(script 212)

(string
    string_0122 "passReg"
)

(said
    said_00d4 /ceiling
    said_00d8 /dirt
    said_00dc /panel
    said_00e0 /platform
    said_00e4 /escalier
    said_00e8 /mur
    said_00ec <bas
    said_00f0 look>
)

(synonym
    room = passage | passageway | tunnel
)

(local
)

// 00fa
(instance public passReg of Rgn
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
    )
    (method (dispose) // method_0016
  0016:39 58            pushi 58 // $58 dispose
  0018:76               push0 
  0019:57 36 04         super Rgn 4 

  001c:48                 ret 
    )

    (method (handleEvent) // method_001d
  001d:39 4c            pushi 4c // $4c claimed
  001f:76               push0 
  0020:87 01              lap param1 
  0022:4a 04             send 4 

  0024:31 01              bnt code_0027 
  0026:48                 ret 

        code_0027
  0027:39 22            pushi 22 // $22 type
  0029:76               push0 
  002a:87 01              lap param1 
  002c:4a 04             send 4 

  002e:36                push 
  002f:34 0080            ldi 80 
  0032:1a                 eq? 
  0033:30 0098            bnt code_00ce 
  0036:78               push1 
  0037:74 00b6          lofss $00f0 // look>
  003a:43 25 02         callk Said 2 

  003d:30 008e            bnt code_00ce 
  0040:78               push1 
  0041:74 0090          lofss $00d4 // /ceiling
  0044:43 25 02         callk Said 2 

  0047:31 0d              bnt code_0056 
  0049:7a               push2 
  004a:38 00d4          pushi d4 // $d4 setAvoider
  004d:76               push0 
  004e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0054:33 78              jmp code_00ce 

        code_0056
  0056:78               push1 
  0057:74 008e          lofss $00e8 // /mur
  005a:43 25 02         callk Said 2 

  005d:31 0d              bnt code_006c 
  005f:7a               push2 
  0060:38 00d4          pushi d4 // $d4 setAvoider
  0063:78               push1 
  0064:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  006a:33 62              jmp code_00ce 

        code_006c
  006c:78               push1 
  006d:74 0068          lofss $00d8 // /dirt
  0070:43 25 02         callk Said 2 

  0073:2f 09               bt code_007e 
  0075:78               push1 
  0076:74 0073          lofss $00ec // <bas
  0079:43 25 02         callk Said 2 

  007c:31 0d              bnt code_008b 

        code_007e
  007e:7a               push2 
  007f:38 00d4          pushi d4 // $d4 setAvoider
  0082:7a               push2 
  0083:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0089:33 43              jmp code_00ce 

        code_008b
  008b:78               push1 
  008c:74 0055          lofss $00e4 // /escalier
  008f:43 25 02         callk Said 2 

  0092:31 0e              bnt code_00a2 
  0094:7a               push2 
  0095:38 00d4          pushi d4 // $d4 setAvoider
  0098:39 03            pushi 3 // $3 y
  009a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  00a0:33 2c              jmp code_00ce 

        code_00a2
  00a2:78               push1 
  00a3:74 003a          lofss $00e0 // /platform
  00a6:43 25 02         callk Said 2 

  00a9:31 0e              bnt code_00b9 
  00ab:7a               push2 
  00ac:38 00d4          pushi d4 // $d4 setAvoider
  00af:39 04            pushi 4 // $4 x
  00b1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  00b7:33 15              jmp code_00ce 

        code_00b9
  00b9:78               push1 
  00ba:74 001f          lofss $00dc // /panel
  00bd:43 25 02         callk Said 2 

  00c0:31 0c              bnt code_00ce 
  00c2:7a               push2 
  00c3:38 00d4          pushi d4 // $d4 setAvoider
  00c6:39 05            pushi 5 // $5 view
  00c8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_00ce
  00ce:48                 ret 
  00cf:00                bnot 
    )

)



