-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathEmpty-Potions-Into-Keg.uos
83 lines (82 loc) · 2.12 KB
/
Empty-Potions-Into-Keg.uos
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
//What's missing or could be improved:
//* for some reason it asked for a new keg twice when one keg //is full. Does anyone know why?
//* specific pot identification //(lesser/normal/greater[/deadly]) is missing. I could do that //with clickobject and injournal but that would slow things //down a lot. Any ideas?
clearjournal
while not @findobject 'WhiteKeg'
headmsg 'Strength Keg?'
promptalias 'WhiteKeg'
endwhile
while not @findobject 'BlueKeg'
headmsg 'Agility Keg?'
promptalias 'BlueKeg'
endwhile
while not @findobject 'YellowKeg'
headmsg 'GHeal Keg?'
promptalias 'YellowKeg'
endwhile
while not @findobject 'OrangeKeg'
headmsg 'GCure Keg?'
promptalias 'OrangeKeg'
endwhile
while not @findobject 'RedKeg'
headmsg 'TRefresh Keg?'
promptalias 'RedKeg'
endwhile
while not @findobject 'PurpleKeg'
headmsg 'GExplo Keg?'
promptalias 'PurpleKeg'
endwhile
while @findtype 0xf09
moveitem 'found' 'WhiteKeg'
if @injournal 'The keg will not hold any more!' 'system'
headmsg 'Strength keg is full!' 38
unsetalias 'WhiteKeg'
replay
endif
pause 650
endwhile
while @findtype 0xf08
moveitem 'found' 'BlueKeg'
if @injournal 'The keg will not hold any more!' 'system'
headmsg 'Agility keg is full!' 38
unsetalias 'BlueKeg'
replay
endif
pause 650
endwhile
while @findtype 0xf0c
moveitem 'found' 'YellowKeg'
if @injournal 'The keg will not hold any more!' 'system'
headmsg 'GHeal keg is full!' 38
unsetalias 'YellowKeg'
replay
endif
pause 650
endwhile
while @findtype 0xf07
moveitem 'found' 'OrangeKeg'
if @injournal 'The keg will not hold any more!' 'system'
headmsg 'GCure keg is full!' 38
unsetalias 'OrangeKeg'
replay
endif
pause 650
endwhile
while @findtype 0xf0b
moveitem 'found' 'RedKeg'
if @injournal 'The keg will not hold any more!' 'system'
headmsg 'TRefresh keg is full!' 38
unsetalias 'RedKeg'
replay
endif
pause 650
endwhile
while @findtype 0xf0d
moveitem 'found' 'PurpleKeg'
if @injournal 'The keg will not hold any more!' 'system'
headmsg 'GExplo keg is full!' 38
unsetalias 'PurpleKeg'
replay
endif
pause 650
endwhile