TILEMASTER2004 DATA V1
SCRIPT: 60
0 SetRedraw 0
0 Pos PC -YOS -1 -NB -EMPTY -TAG 10 -CHECKTILE 0 -SETTARGET
0 Pos PC -XOS 1 -NB -EMPTY -TAG 10 -CHECKTILE 0 -SETTARGET
0 Pos PC -YOS 1 -NB -EMPTY -TAG 10 -CHECKTILE 0 -SETTARGET
0 Pos PC -XOS -1 -NB -EMPTY -TAG 10 -CHECKTILE 0 -SETTARGET
0 BREAK
10 Message "Pit trap!"
0 CheckFlagSwitch SFLAG  0 20  1 30  2 21
20 CRandom 45 -  30 31  25 32
0 GOTO 30
21 CRandom 45 -  30 31  25 32
0 GOTO 30
30 Pos TARGET -ALTERTILE 91
0 CheckFlagSwitch SFLAG  1 33  2 34
0 SetFlag 27 0
0 GOTO 40
31 Pos TARGET -ALTERTILE 92
0 CheckFlagSwitch SFLAG  2 35
0 SetFlag 27 2
0 GOTO 40
32 Pos TARGET -ALTERTILE 93
0 CheckFlagSwitch SFLAG  2 36
0 SetFlag 27 3
0 GOTO 40
33 SetFlag 27 4
0 GOTO 40
34 SetFlag 27 5
0 GOTO 40
35 SetFlag 27 6
0 GOTO 40
36 SetFlag 27 7
0 GOTO 40
40 Set SAVEBMAP 1
0 AbilCheck R 75 50
0 GOTO 60
50 SetRedraw 1
0 Pause
0 Message "Evaded!"
0 Sound BLIP
0 BREAK INC
60 NOOP 
0 Pos TARGET -MOVEPC
0 SetRedraw 1
0 Pause
0 Script 40
0 BREAK ABORT
