Back to "plant planter plants growing seeds" tags

Data's Planter - Looping by big_data

Description: for Tamal <3

1clearignore
2
3while findtype 6330 ground any any 2 as planter 
4    clearsysmsg 
5
6    wait 500
7    dclick planter
8    waitforgump 3224608375
9    wait 150
10    gumpresponse 2
11    wait 450
12
13        if insysmsg 'You harvest' 
14            overhead 'Harvested Plant'
15            wait 500
16            wait 500
17            dclick planter
18            waitforgump 3224608375
19            wait 150
20            gumpresponse 2
21            wait 350
22        endif 
23    
24       if insysmsg 'Which seed will you plant' 
25            overhead 'Target Seed'
26            waitforsysmsg "You plant a seed"
27            wait 500
28            gumpresponse 3
29            wait 500
30            waitforgump 3224608375
31            wait 500
32            gumpresponse 4
33            waitforgump 3224608375
34            wait 500
35            gumpresponse 5
36            waitforgump 3224608375
37            wait 500
38        endif 
39    
40    gumpresponse 2
41    wait 150
42    waitfortarget
43    waitforgump 3224608375
44
45    // DIRT
46    wait 150
47    targettype 'dirt patch'
48    wait 150
49    waitforgump 3224608375
50    waitforgump 4024474571
51    gumpresponse 2
52    waitforgump 3224608375
53    waitforgump 4024474571
54    gumpclose
55
56    // WATER
57    wait 150
58    dclick planter
59    wait 150
60    waitforgump 3224608375
61    wait 200
62    gumpresponse 2
63    wait 200
64    waitfortarget
65    wait 200
66    waitforgump 3224608375
67    targettype 25570
68    waitforgump 3224608375
69    waitforgump 3929333591
70    gumpresponse 2
71    waitforgump 3224608375
72    waitforgump 3929333591
73    gumpclose
74
75
76    // SPADE
77    wait 150
78    dclick planter
79    wait 150
80    waitforgump 3224608375
81    wait 150
82    gumpresponse 2
83    wait 150
84    waitfortarget
85    wait 150
86    waitforgump 3224608375
87    targettype 29868
88    wait 150
89    waitforgump 3224608375
90    waitforgump 1429840072
91    gumpresponse 6
92    waitforgump 3224608375
93    waitforgump 1429840072
94    gumpclose
95
96    overhead 'Plant tended'
97
98    if findtype 25570 as 'can'
99        wait 250
100        dclick 'can'
101        wait 500
102        overhead 'Water can refilled'
103    endif
104    
105    ignore planter
106
107endwhile    
108
109overhead 'Done Planting'