Back to "plant planting seeds growing" tags

Data's Planter by big_data

Description: For Tamal <3

1clearignore                                                                                                                                                    
2clearsysmsg 
3
4overhead 'Select a planter or pot to work on, or target youself to exit' 88
5    setvar 'planter'
6
7    // Add your chars serial to line 6 to enable script exit on target self.
8    while 'planter' != 0x3B5BE6 
9    
10    dclick planter
11    waitforgump 3224608375
12    wait 150
13    gumpresponse 2
14    wait 150
15
16    if insysmsg 'You harvest' 
17        overhead 'Harvested Plant'
18        replay
19    endif 
20    
21       if insysmsg 'Which seed will you plant' 
22            overhead 'Target Seed'
23            waitforsysmsg "You plant a seed"
24            
25            wait 500
26            gumpresponse 3
27            wait 500
28            waitforgump 3224608375
29            wait 500
30            gumpresponse 4
31            waitforgump 3224608375
32            wait 500
33            gumpresponse 5
34            waitforgump 3224608375
35            wait 500
36    endif 
37    gumpresponse 2
38    wait 150
39    waitfortarget
40    waitforgump 3224608375
41
42    // DIRT
43    wait 150
44    targettype 'dirt patch'
45    wait 150
46    waitforgump 3224608375
47    waitforgump 4024474571
48    gumpresponse 2
49    waitforgump 3224608375
50    waitforgump 4024474571
51    gumpclose
52
53    // WATER
54    wait 150
55
56    dclick planter
57    wait 150
58    waitforgump 3224608375
59    wait 200
60    gumpresponse 2
61    wait 200
62    waitfortarget
63    wait 200
64    waitforgump 3224608375
65    targettype 25570
66    waitforgump 3224608375
67    waitforgump 3929333591
68    gumpresponse 2
69    waitforgump 3224608375
70    waitforgump 3929333591
71    gumpclose
72
73
74    // SPADE
75    wait 150
76    dclick planter
77    wait 150
78    waitforgump 3224608375
79    wait 150
80    gumpresponse 2
81    wait 150
82    waitfortarget
83    wait 150
84    waitforgump 3224608375
85    targettype 29868
86    wait 150
87    waitforgump 3224608375
88    waitforgump 1429840072
89    gumpresponse 6
90    waitforgump 3224608375
91    waitforgump 1429840072
92    gumpclose
93
94    overhead 'Plant tended'
95
96    overhead 'Select the next planter or pot or target youself to exit' 88
97    setvar 'planter'
98endwhile    
99 overhead 'Done Planting'