TILEMASTER2004 DATA V1
SCRIPT: 110
0 CM "TARGET"
0 CheckFlagSwitch SFLAG  0 20  1 21  2 21  3 21  4 21  5 21  6 21
20 SelectTarget 200 3 NOZOOM 201
0 GOTO 30
21 SelectTarget 200 5 NOZOOM 201
0 GOTO 30
30 Pos TARGET -TAG 210 -CHECKTERRAIN BLOCKED
0 FX 3 104
0 CheckFlagSwitch SFLAG  0 41  1 41  2 42  3 41  4 40  5 43  6 40
40 RangeFX WHITE
0 GOTO 50
41 RangeFX BLUE
0 GOTO 50
42 RangeFX RED
0 GOTO 50
43 RangeFX GREEN
0 GOTO 50
50 M "TARGET--HIT!!!"
0 CheckFlagSwitch SFLAG  0 54  1 53  2 51  3 53  4 52  5 55  6 53
0 GOTO 60
51 FXCircleIteratorEx TARGET 3 -FXTYPE 1 -TYPE 5 -COLOR 255 0 0 -SOUND 105
0 GOTO 60
52 FXCircleIteratorEx TARGET 3 -FXTYPE 1 -TYPE 5 -COLOR 255 255 255 -SOUND 102
0 GOTO 60
53 FXCircleIteratorEx TARGET 3 -FXTYPE 1 -TYPE 5 -COLOR 0 0 255 -SOUND 104
0 GOTO 60
54 FXCircleIteratorEx TARGET 1 -FXTYPE 1 -TYPE 5 -COLOR 0 0 255 -SOUND 104
0 GOTO 60
55 FXCircleIteratorEx TARGET 3 -FXTYPE 1 -TYPE 5 -COLOR 0 255 0 -SOUND 104
0 GOTO 60
60 CheckFlagSwitch SFLAG  0 61  1 62  2 62  3 62  4 62  5 62  6 62
61 StartCircleIterator TARGET 1
0 GOTO 70
62 StartCircleIterator TARGET 3
0 GOTO 70
70 SetSafety 256
0 CheckTarget 90 -CREATURE
0 CheckTarget 150 -PC
0 Party -CHECKSPLIT !STOP -GETTARGETPOSPC -CHECKPC 181
80 SetTargetCircleIterator 0
0 CheckTarget 90 -CREATURE -CILOS
0 CheckTarget 150 -PC -CILOS
0 Party -CHECKSPLIT !STOP -GETTARGETPOSPC -CHECKPC 180
0 GOTO 80
90 NOOP
0 CheckFlagSwitch SFLAG  0 91  1 91  2 92  3 93  4 94  5 95  6 96
91 DoEffectSelectedTarget 11 -CMTL 10 -CASTERMOD -QUIET
0 GOTO 80
92 DoEffectSelectedTarget 6 -CASTERMOD -QUIET -DTAG 220
0 GOTO 80
93 DoEffectSelectedTarget 8 -CASTERMOD -QUIET
0 GOTO 80
94 DoEffectSelectedTarget 36 -CASTERMOD -QUIET -DTAG 220
0 GOTO 80
95 DoEffectSelectedTarget 7 -CASTERMOD -QUIET
0 GOTO 80
96 DoEffectSelectedTarget 14 -CASTERMOD -QUIET
0 GOTO 80
150 M "You are caught in your own spell!"
0 AddKeyWords _DONE 80
0 Party -CHECKSPLIT STOP -CHECK 170
151 CheckFlagSwitch SFLAG  0 160  1 160  2 161  3 162  4 163  5 164  6 165
0 GOTO 80
160 Effect 11
0 DoKeyWord _DONE
161 Effect 6
0 DoKeyWord _DONE
162 Effect 43
0 DoKeyWord _DONE
163 Effect 36
0 DoKeyWord _DONE
164 Effect 7
0 DoKeyWord _DONE
165 Effect 14
0 DoKeyWord _DONE
170 Def 0
0 ScriptVal -GETTARGETVAL -SETDEFO 170 0
0 AddKeyWords _DONE 171
0 PartyIterator -INIT
171 PartyIterator -ETAG N172 -PNAME
0 GOTO P151
172 ScriptVal -GETDEFO 170 0 -SETTARGETVAL
0 GOTO 80
180 CheckTarget 181 -CILOS
0 GOTO 80
181 Def 0
0 ScriptVal -GETACHAR -SETDEFO 181 0
0 Party -GETTARGETPOSPC -CHECKPC !80 -UPDATEACHAR -SETACHAR -SETUPACHAR -PNAME
0 AddKeyWords _DONE 182
0 GOTO P151
182 Party -UPDATEACHAR
0 ScriptVal -GETDEFO 181 0 -SETACHAR
0 Party -SETUPACHAR
0 GOTO 80
200 M "ABORTED!"
201 BREAK ABORT
210 M "Not here!"
0 BREAK ABORT
220 EndCircleIterator
0 BREAK
