TILEMASTER2004 DATA V1
SCRIPT: 75
0 Check FP == 1 50
0 CheckZoom ATTACKTYPE 60
0 CheckZoom ACTIVE 30
0 CMessage "Refill: Well (W), Fountain (F), or None (N)? "
0 AddKeyWords W 100  F 200
0 DoKeyInput
10 Message "NONE"
11 BREAK
20 Message "INVALID SELECTION"
0 BREAK
30 Message "Not here!"
0 BREAK
50 Message "Refill using a fountain"
0 GOTO 210
60 CheckTile 11 PC 30
0 CheckTile 4 PC 30
0 CheckTile 3 PC 30
0 GOTO 500
100 Message "WELL"
0 Message "Select center point (water)"
0 CMessage "TARGET"
0 SelectTargetEx -TAG 10 -RANGE 2
0 Message "SELECT"
0 CheckTile 9 TARGET 20 -NOT
0 CheckTile 29 TARGET 20 -NOT -YOS -1
0 CheckTile 29 TARGET 20 -NOT -YOS 1
0 CheckTile 29 TARGET 20 -NOT -XOS -1
0 CheckTile 29 TARGET 20 -NOT -XOS 1
0 GOTO 500
200 Message "FOUNTAIN"
0 Check FP == 1 210
0 CMessage "TARGET"
0 SelectTargetEx -TAG 10 -RANGE 2
0 Message "SELECT"
0 GOTO 220
210 CMessage "TARGET"
0 SelectTargetEx -TAG 11 -FPMODE 1
0 CMessage -NL
220 PosItem TARGET -TAG 230 -STOPTRUEONLY -GETGI -CHECKDEF 60 -CHECKDEF 61 -CHECKDEF 62 -CHECKDEF 63 -CHECKDEF 64 -CHECKDEF 69 -CHECKDEF 235
0 CheckTile 36 TARGET 240
0 GOTO 20
230 PosItem TARGET -GETGI -TAG 231 -CHECKUSED 1
0 Message "You must try this water before you can take it."
0 PosItem TARGET -GETGI -GSCRIPT -TAG 0 -CHECKUSED 0
0 Pause
231 PosItem TARGET -TAG 232 -STOPTRUEONLY -GETGI -CHECKDEF 61 -CHECKDEF 63
0 Message "You have determined that the water is clean."
0 GOTO 500
232 Message "You obviously decide not to take this tainted water."
0 BREAK
240 GOTO 500
500 CMessage  "Refill how many (you have " -ICOUNT TARGET ")? "
0 SelectAmount 0
0 TakeItemEx 176 -QSA -SHOW -TAG 510
0 GiveItem 42 -QSA -SHOW
0 BREAK
510 Message "Invalid amount"
0 Pause
0 GOTO 500
