(script 3)

(string
    string_16ba "Ladder"
    string_16c1 "Room3"
    string_16c7 "arm"
    string_16cb "bat"
    string_16cf "bell"
    string_16d4 "bellBase"
    string_16dd "climbDown"
    string_16e7 "climbUp"
    string_16ef "cloud1"
    string_16f6 "cloud2"
    string_16fd "myIcon"
    string_1704 "oilBell"
    string_170c "pickUp"
    string_1713 "pullRope"
    string_171c "ring"
    string_1721 "ringBell"
    string_172a "showers"
    string_1732 "soundFX"
)

(said
    said_10fc (anneau,attirer)<actionner<*/(chanvre,anneau,bell)
    said_1115 (anneau,attirer)<actionner<cane/(chanvre,anneau,bell)
    said_112e /archway
    said_1132 /barriere
    said_1136 /champ
    said_113a /path
    said_113e /tour[<bell]
    said_1147 <(at,dans)/tour
    said_1153 <dans
    said_1157 <haut
    said_115b [<around,at][/room]
    said_1169 attach/huile/bell
    said_1172 attraper,get/bat
    said_117b climb/barriere
    said_1181 climb[/echelle,tour]
    said_118c get,get,attirer,anneau/bell,chanvre,anneau
    said_11a1 get,bouger/bell
    said_11aa get/control
    said_11b0 look/bat
    said_11b6 look/chanvre,anneau
    said_11bf look/echelle
    said_11c5 look<(dans,below)/bell
    said_11d3 look>
    said_11d7 huile/bell
    said_11dd attirer,get,get/(anneau,chanvre,bell)/cane<(avec,actionner)
    said_11fc attirer/(anneau,chanvre)/*<avec
    said_120d anneau/bell
    said_1213 anneau/bell/cane<(avec,actionner)
    said_1224 chercher,look/bell
    said_122d actionner/*/bell<anneau
    said_1239 actionner/bidon<huile
    said_1242 actionner/cane/bell<anneau
)

(local
    local0 = $0000
    local1 = $0000
    local2 = $0000
    local3 = $0000
    local4 = $0000
)

// 1254
(instance public Room3 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $3
        style $ffff
        horizon $0
        controls $0
        north $0
        east $0
        south $0
        west $0
        curPic $0
        picAngle $0
        vanishingX $a0
        vanishingY $8ad0
        vertAngle $0
    )
    (method (init) // method_0022
  0022:35 0e              ldi e 
  0024:65 1e             aTop south 
  0026:35 09              ldi 9 
  0028:65 20             aTop west 
  002a:35 0a              ldi a 
  002c:65 1c             aTop east 
  002e:39 57            pushi 57 // $57 init
  0030:76               push0 
  0031:57 37 04         super Rm 4 

  0034:7a               push2 
  0035:38 0080          pushi 80 // $80 timeLeft
  0038:39 22            pushi 22 // $22 type
  003a:43 00 04         callk Load 4 

  003d:7a               push2 
  003e:38 0084          pushi 84 // $84 stop
  0041:39 49            pushi 49 // $49 semanticFail
  0043:43 00 04         callk Load 4 

  0046:38 00ee          pushi ee // $ee has
  0049:78               push1 
  004a:39 15            pushi 15 // $15 brBottom
  004c:81 00              lag gEgo 
  004e:4a 06             send 6 

  0050:31 1a              bnt code_006c 
  0052:39 04            pushi 4 // $4 x
  0054:38 0080          pushi 80 // $80 timeLeft
  0057:39 1f            pushi 1f // $1f style
  0059:39 20            pushi 20 // $20 state
  005b:39 35            pushi 35 // $35 b-incr
  005d:45 15 08         callb procedure_0015 8 // LoadMany 

  0060:39 03            pushi 3 // $3 y
  0062:38 0084          pushi 84 // $84 stop
  0065:39 1e            pushi 1e // $1e mode
  0067:39 2a            pushi 2a // $2a play
  0069:45 15 06         callb procedure_0015 6 // LoadMany 


        code_006c
  006c:7a               push2 
  006d:38 0084          pushi 84 // $84 stop
  0070:39 11            pushi 11 // $11 signal
  0072:43 00 04         callk Load 4 

  0075:88 00a5            lsg gAct 
  0078:35 01              ldi 1 
  007a:1a                 eq? 
  007b:31 11              bnt code_008e 
  007d:88 009b            lsg global155 
  0080:35 0d              ldi d 
  0082:24                 le? 
  0083:31 09              bnt code_008e 
  0085:38 010a          pushi 10a // $10a setRegions
  0088:78               push1 
  0089:38 017d          pushi 17d // $17d sel_381
  008c:54 06             self 6 


        code_008e
  008e:80 00df            lag gDetailLevel 
  0091:31 1e              bnt code_00b1 
  0093:39 57            pushi 57 // $57 init
  0095:76               push0 
  0096:38 00c6          pushi c6 // $c6 stopUpd
  0099:76               push0 
  009a:39 7a            pushi 7a // $7a setScript
  009c:78               push1 
  009d:74 1226          lofss $12c6 // showers
  00a0:72 14a9          lofsa $154c // cloud1
  00a3:4a 0e             send e 

  00a5:39 57            pushi 57 // $57 init
  00a7:76               push0 
  00a8:38 00c6          pushi c6 // $c6 stopUpd
  00ab:76               push0 
  00ac:72 14eb          lofsa $159a // cloud2
  00af:4a 08             send 8 


        code_00b1
  00b1:39 2b            pushi 2b // $2b number
  00b3:78               push1 
  00b4:39 11            pushi 11 // $11 signal
  00b6:39 06            pushi 6 // $6 loop
  00b8:78               push1 
  00b9:76               push0 
  00ba:72 135d          lofsa $141a // soundFX
  00bd:4a 0c             send c 

  00bf:38 00c8          pushi c8 // $c8 setLoop
  00c2:78               push1 
  00c3:39 04            pushi 4 // $4 x
  00c5:39 36            pushi 36 // $36 xStep
  00c7:78               push1 
  00c8:39 08            pushi 8 // $8 underBits
  00ca:39 12            pushi 12 // $12 illegalBits
  00cc:78               push1 
  00cd:76               push0 
  00ce:39 57            pushi 57 // $57 init
  00d0:76               push0 
  00d1:38 0089          pushi 89 // $89 hide
  00d4:76               push0 
  00d5:72 1510          lofsa $15e8 // bat
  00d8:4a 1a             send 1a 

  00da:80 00a4            lag global164 
  00dd:31 34              bnt code_0113 
  00df:39 12            pushi 12 // $12 illegalBits
  00e1:78               push1 
  00e2:76               push0 
  00e3:38 00c8          pushi c8 // $c8 setLoop
  00e6:78               push1 
  00e7:38 0082          pushi 82 // $82 owner
  00ea:76               push0 
  00eb:39 43            pushi 43 // $43 at
  00ed:78               push1 
  00ee:39 14            pushi 14 // $14 brLeft
  00f0:81 09              lag gInventory 
  00f2:4a 06             send 6 

  00f4:4a 04             send 4 

  00f6:36                push 
  00f7:35 03              ldi 3 
  00f9:1a                 eq? 
  00fa:31 04              bnt code_0100 
  00fc:35 00              ldi 0 
  00fe:33 02              jmp code_0102 

        code_0100
  0100:35 06              ldi 6 

        code_0102
  0102:36                push 
  0103:38 00c5          pushi c5 // $c5 posn
  0106:7a               push2 
  0107:39 48            pushi 48 // $48 syntaxFail
  0109:38 008a          pushi 8a // $8a enable
  010c:72 1335          lofsa $1444 // bell
  010f:4a 14             send 14 

  0111:33 0e              jmp code_0121 

        code_0113
  0113:39 12            pushi 12 // $12 illegalBits
  0115:78               push1 
  0116:76               push0 
  0117:38 00c8          pushi c8 // $c8 setLoop
  011a:78               push1 
  011b:76               push0 
  011c:72 1325          lofsa $1444 // bell
  011f:4a 0c             send c 


        code_0121
  0121:39 42            pushi 42 // $42 setPri
  0123:78               push1 
  0124:39 0b            pushi b // $b nsBottom
  0126:38 00d0          pushi d0 // $d0 baseSetter
  0129:78               push1 
  012a:74 117d          lofss $12aa // bellBase
  012d:39 57            pushi 57 // $57 init
  012f:76               push0 
  0130:38 00c6          pushi c6 // $c6 stopUpd
  0133:76               push0 
  0134:72 130d          lofsa $1444 // bell
  0137:4a 14             send 14 

  0139:38 00c8          pushi c8 // $c8 setLoop
  013c:78               push1 
  013d:78               push1 
  013e:39 42            pushi 42 // $42 setPri
  0140:78               push1 
  0141:39 0b            pushi b // $b nsBottom
  0143:39 57            pushi 57 // $57 init
  0145:76               push0 
  0146:38 00c6          pushi c6 // $c6 stopUpd
  0149:76               push0 
  014a:72 135f          lofsa $14ac // ring
  014d:4a 14             send 14 

  014f:39 42            pushi 42 // $42 setPri
  0151:78               push1 
  0152:39 0e            pushi e // $e lsLeft
  0154:39 57            pushi 57 // $57 init
  0156:76               push0 
  0157:38 0089          pushi 89 // $89 hide
  015a:76               push0 
  015b:72 13a0          lofsa $14fe // arm
  015e:4a 0e             send e 

  0160:38 010b          pushi 10b // $10b setFeatures
  0163:78               push1 
  0164:74 14e9          lofss $1650 // Ladder
  0167:54 06             self 6 

  0169:88 00a5            lsg gAct 
  016c:35 02              ldi 2 
  016e:20                 ge? 
  016f:31 1a              bnt code_018b 
  0171:88 00a5            lsg gAct 
  0174:35 04              ldi 4 
  0176:22                 lt? 
  0177:31 12              bnt code_018b 
  0179:88 0171            lsg global369 
  017c:34 02bc            ldi 2bc 
  017f:22                 lt? 
  0180:31 09              bnt code_018b 
  0182:38 010a          pushi 10a // $10a setRegions
  0185:78               push1 
  0186:38 00ca          pushi ca // $ca show
  0189:54 06             self 6 


        code_018b
  018b:88 00a5            lsg gAct 
  018e:35 03              ldi 3 
  0190:1a                 eq? 
  0191:31 07              bnt code_019a 
  0193:89 72              lsg global114 
  0195:35 02              ldi 2 
  0197:22                 lt? 
  0198:2f 10               bt code_01aa 

        code_019a
  019a:88 00a5            lsg gAct 
  019d:35 06              ldi 6 
  019f:1a                 eq? 
  01a0:31 11              bnt code_01b3 
  01a2:89 76              lsg gMustDos 
  01a4:35 02              ldi 2 
  01a6:12                 and 
  01a7:18                 not 
  01a8:31 09              bnt code_01b3 

        code_01aa
  01aa:38 010a          pushi 10a // $10a setRegions
  01ad:78               push1 
  01ae:38 0119          pushi 119 // $119 startExtra
  01b1:54 06             self 6 


        code_01b3
  01b3:89 0c              lsg gPrevRoomNum 
  01b5:3c                 dup 
  01b6:35 0a              ldi a 
  01b8:1a                 eq? 
  01b9:31 10              bnt code_01cb 
  01bb:38 00c5          pushi c5 // $c5 posn
  01be:7a               push2 
  01bf:38 013e          pushi 13e // $13e elevY
  01c2:38 00af          pushi af // $af incClientPos
  01c5:81 00              lag gEgo 
  01c7:4a 08             send 8 

  01c9:33 28              jmp code_01f3 

        code_01cb
  01cb:3c                 dup 
  01cc:35 0e              ldi e 
  01ce:1a                 eq? 
  01cf:31 10              bnt code_01e1 
  01d1:38 00c5          pushi c5 // $c5 posn
  01d4:7a               push2 
  01d5:38 0131          pushi 131 // $131 numOfLoops
  01d8:38 00bb          pushi bb // $bb targetY
  01db:81 00              lag gEgo 
  01dd:4a 08             send 8 

  01df:33 12              jmp code_01f3 

        code_01e1
  01e1:3c                 dup 
  01e2:35 09              ldi 9 
  01e4:1a                 eq? 
  01e5:31 0c              bnt code_01f3 
  01e7:38 00c5          pushi c5 // $c5 posn
  01ea:7a               push2 
  01eb:78               push1 
  01ec:38 00b0          pushi b0 // $b0 pickLoop
  01ef:81 00              lag gEgo 
  01f1:4a 08             send 8 


        code_01f3
  01f3:3a                toss 
  01f4:39 05            pushi 5 // $5 view
  01f6:78               push1 
  01f7:76               push0 
  01f8:39 12            pushi 12 // $12 illegalBits
  01fa:78               push1 
  01fb:38 8000          pushi 8000 // $8000 sel_32768
  01fe:39 57            pushi 57 // $57 init
  0200:76               push0 
  0201:81 00              lag gEgo 
  0203:4a 10             send 10 

  0205:48                 ret 
    )

    (method (doit) // method_0206
  0206:76               push0 
  0207:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  020a:31 0a              bnt code_0216 
  020c:7a               push2 
  020d:39 03            pushi 3 // $3 y
  020f:76               push0 
  0210:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0216
  0216:83 03              lal local3 
  0218:18                 not 
  0219:31 1d              bnt code_0238 
  021b:38 00db          pushi db // $db onControl
  021e:78               push1 
  021f:76               push0 
  0220:81 00              lag gEgo 
  0222:4a 06             send 6 

  0224:36                push 
  0225:35 02              ldi 2 
  0227:12                 and 
  0228:31 0e              bnt code_0238 
  022a:35 01              ldi 1 
  022c:a3 03              sal local3 
  022e:39 7a            pushi 7a // $7a setScript
  0230:78               push1 
  0231:74 10c2          lofss $12f6 // climbUp
  0234:81 00              lag gEgo 
  0236:4a 06             send 6 


        code_0238
  0238:39 3c            pushi 3c // $3c doit
  023a:76               push0 
  023b:57 37 04         super Rm 4 

  023e:48                 ret 
    )

    (method (dispose) // method_023f
  023f:78               push1 
  0240:38 03d9          pushi 3d9 // $3d9 sel_985
  0243:43 03 02         callk DisposeScript 2 

  0246:39 58            pushi 58 // $58 dispose
  0248:76               push0 
  0249:57 37 04         super Rm 4 

  024c:48                 ret 
    )

    (method (newRoom) // method_024d
  024d:38 00f8          pushi f8 // $f8 newRoom
  0250:78               push1 
  0251:8f 01              lsp param1 
  0253:57 37 06         super Rm 6 

  0256:48                 ret 
    )

    (method (handleEvent) // method_0257
  0257:3f 01             link 1 // (var $1)
  0259:78               push1 
  025a:38 03de          pushi 3de // $3de sel_990
  025d:43 03 02         callk DisposeScript 2 

  0260:39 6f            pushi 6f // $6f handleEvent
  0262:78               push1 
  0263:8f 01              lsp param1 
  0265:57 37 06         super Rm 6 

  0268:39 4c            pushi 4c // $4c claimed
  026a:76               push0 
  026b:87 01              lap param1 
  026d:4a 04             send 4 

  026f:31 03              bnt code_0274 
  0271:35 01              ldi 1 
  0273:48                 ret 

        code_0274
  0274:39 22            pushi 22 // $22 type
  0276:76               push0 
  0277:87 01              lap param1 
  0279:4a 04             send 4 

  027b:36                push 
  027c:3c                 dup 
  027d:34 0080            ldi 80 
  0280:1a                 eq? 
  0281:30 01dc            bnt code_0460 
  0284:78               push1 
  0285:74 0f4b          lofss $11d3 // look>
  0288:43 25 02         callk Said 2 

  028b:30 0153            bnt code_03e1 
  028e:78               push1 
  028f:74 0ec9          lofss $115b // [<around,at][/room]
  0292:43 25 02         callk Said 2 

  0295:31 1e              bnt code_02b5 
  0297:80 00a4            lag global164 
  029a:31 0c              bnt code_02a8 
  029c:7a               push2 
  029d:39 03            pushi 3 // $3 y
  029f:78               push1 
  02a0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02a6:33 0a              jmp code_02b2 

        code_02a8
  02a8:7a               push2 
  02a9:39 03            pushi 3 // $3 y
  02ab:76               push0 
  02ac:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_02b2
  02b2:32 012a            jmp code_03df 

        code_02b5
  02b5:78               push1 
  02b6:74 0e9e          lofss $1157 // <haut
  02b9:43 25 02         callk Said 2 

  02bc:31 38              bnt code_02f6 
  02be:38 00db          pushi db // $db onControl
  02c1:78               push1 
  02c2:78               push1 
  02c3:81 00              lag gEgo 
  02c5:4a 06             send 6 

  02c7:36                push 
  02c8:35 04              ldi 4 
  02ca:12                 and 
  02cb:31 1e              bnt code_02eb 
  02cd:80 00a4            lag global164 
  02d0:31 0c              bnt code_02de 
  02d2:7a               push2 
  02d3:39 03            pushi 3 // $3 y
  02d5:7a               push2 
  02d6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02dc:33 0b              jmp code_02e9 

        code_02de
  02de:7a               push2 
  02df:39 03            pushi 3 // $3 y
  02e1:39 03            pushi 3 // $3 y
  02e3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_02e9
  02e9:33 08              jmp code_02f3 

        code_02eb
  02eb:39 4c            pushi 4c // $4c claimed
  02ed:78               push1 
  02ee:76               push0 
  02ef:87 01              lap param1 
  02f1:4a 06             send 6 


        code_02f3
  02f3:32 00e9            jmp code_03df 

        code_02f6
  02f6:78               push1 
  02f7:74 0e40          lofss $113a // /path
  02fa:43 25 02         callk Said 2 

  02fd:31 0e              bnt code_030d 
  02ff:7a               push2 
  0300:39 03            pushi 3 // $3 y
  0302:39 04            pushi 4 // $4 x
  0304:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  030a:32 00d2            jmp code_03df 

        code_030d
  030d:78               push1 
  030e:74 0e25          lofss $1136 // /champ
  0311:43 25 02         callk Said 2 

  0314:31 0e              bnt code_0324 
  0316:7a               push2 
  0317:39 03            pushi 3 // $3 y
  0319:39 05            pushi 5 // $5 view
  031b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0321:32 00bb            jmp code_03df 

        code_0324
  0324:78               push1 
  0325:74 0e0a          lofss $1132 // /barriere
  0328:43 25 02         callk Said 2 

  032b:31 0e              bnt code_033b 
  032d:7a               push2 
  032e:39 03            pushi 3 // $3 y
  0330:39 06            pushi 6 // $6 loop
  0332:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0338:32 00a4            jmp code_03df 

        code_033b
  033b:78               push1 
  033c:74 0def          lofss $112e // /archway
  033f:43 25 02         callk Said 2 

  0342:31 0e              bnt code_0352 
  0344:7a               push2 
  0345:39 03            pushi 3 // $3 y
  0347:39 07            pushi 7 // $7 cel
  0349:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  034f:32 008d            jmp code_03df 

        code_0352
  0352:78               push1 
  0353:74 0df1          lofss $1147 // <(at,dans)/tour
  0356:43 25 02         callk Said 2 

  0359:2f 09               bt code_0364 
  035b:78               push1 
  035c:74 0df4          lofss $1153 // <dans
  035f:43 25 02         callk Said 2 

  0362:31 56              bnt code_03ba 

        code_0364
  0364:83 00              lal local0 
  0366:31 18              bnt code_0380 
  0368:80 00a4            lag global164 
  036b:31 06              bnt code_0373 
  036d:76               push0 
  036e:45 0b 00         callb procedure_000b 0 // SeeNothing 

  0371:33 0b              jmp code_037e 

        code_0373
  0373:7a               push2 
  0374:39 03            pushi 3 // $3 y
  0376:39 08            pushi 8 // $8 underBits
  0378:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_037e
  037e:33 38              jmp code_03b8 

        code_0380
  0380:38 00db          pushi db // $db onControl
  0383:78               push1 
  0384:78               push1 
  0385:81 00              lag gEgo 
  0387:4a 06             send 6 

  0389:36                push 
  038a:35 04              ldi 4 
  038c:12                 and 
  038d:31 1e              bnt code_03ad 
  038f:80 00a4            lag global164 
  0392:31 0c              bnt code_03a0 
  0394:7a               push2 
  0395:39 03            pushi 3 // $3 y
  0397:7a               push2 
  0398:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  039e:33 0b              jmp code_03ab 

        code_03a0
  03a0:7a               push2 
  03a1:39 03            pushi 3 // $3 y
  03a3:39 03            pushi 3 // $3 y
  03a5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03ab
  03ab:33 0b              jmp code_03b8 

        code_03ad
  03ad:7a               push2 
  03ae:39 03            pushi 3 // $3 y
  03b0:39 09            pushi 9 // $9 nsTop
  03b2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03b8
  03b8:33 25              jmp code_03df 

        code_03ba
  03ba:78               push1 
  03bb:74 0d80          lofss $113e // /tour[<bell]
  03be:43 25 02         callk Said 2 

  03c1:31 1c              bnt code_03df 
  03c3:80 00a4            lag global164 
  03c6:31 0c              bnt code_03d4 
  03c8:7a               push2 
  03c9:39 03            pushi 3 // $3 y
  03cb:78               push1 
  03cc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03d2:33 0b              jmp code_03df 

        code_03d4
  03d4:7a               push2 
  03d5:39 03            pushi 3 // $3 y
  03d7:39 0a            pushi a // $a nsLeft
  03d9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03df
  03df:33 7d              jmp code_045e 

        code_03e1
  03e1:78               push1 
  03e2:74 0d96          lofss $117b // climb/barriere
  03e5:43 25 02         callk Said 2 

  03e8:31 0d              bnt code_03f7 
  03ea:7a               push2 
  03eb:39 03            pushi 3 // $3 y
  03ed:39 0b            pushi b // $b nsBottom
  03ef:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03f5:33 67              jmp code_045e 

        code_03f7
  03f7:78               push1 
  03f8:74 0e3e          lofss $1239 // actionner/bidon<huile
  03fb:43 25 02         callk Said 2 

  03fe:2f 12               bt code_0412 
  0400:78               push1 
  0401:74 0dd3          lofss $11d7 // huile/bell
  0404:43 25 02         callk Said 2 

  0407:2f 09               bt code_0412 
  0409:78               push1 
  040a:74 0d5c          lofss $1169 // attach/huile/bell
  040d:43 25 02         callk Said 2 

  0410:31 4c              bnt code_045e 

        code_0412
  0412:88 00b8            lsg global184 
  0415:35 00              ldi 0 
  0417:1a                 eq? 
  0418:31 39              bnt code_0453 
  041a:38 00ee          pushi ee // $ee has
  041d:78               push1 
  041e:39 03            pushi 3 // $3 y
  0420:81 00              lag gEgo 
  0422:4a 06             send 6 

  0424:31 20              bnt code_0446 
  0426:83 00              lal local0 
  0428:31 0f              bnt code_0439 
  042a:35 01              ldi 1 
  042c:a0 00b8            sag global184 
  042f:39 7a            pushi 7a // $7a setScript
  0431:78               push1 
  0432:74 0f21          lofss $1356 // oilBell
  0435:54 06             self 6 

  0437:33 0b              jmp code_0444 

        code_0439
  0439:7a               push2 
  043a:39 03            pushi 3 // $3 y
  043c:39 0c            pushi c // $c nsRight
  043e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0444
  0444:33 0b              jmp code_0451 

        code_0446
  0446:7a               push2 
  0447:39 03            pushi 3 // $3 y
  0449:39 0d            pushi d // $d lsTop
  044b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0451
  0451:33 0b              jmp code_045e 

        code_0453
  0453:7a               push2 
  0454:39 03            pushi 3 // $3 y
  0456:39 0e            pushi e // $e lsLeft
  0458:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_045e
  045e:33 6b              jmp code_04cb 

        code_0460
  0460:3c                 dup 
  0461:35 01              ldi 1 
  0463:1a                 eq? 
  0464:31 3a              bnt code_04a0 
  0466:83 00              lal local0 
  0468:31 34              bnt code_049e 
  046a:39 03            pushi 3 // $3 y
  046c:76               push0 
  046d:87 01              lap param1 
  046f:4a 04             send 4 

  0471:36                push 
  0472:39 03            pushi 3 // $3 y
  0474:76               push0 
  0475:81 00              lag gEgo 
  0477:4a 04             send 4 

  0479:1e                 gt? 
  047a:31 22              bnt code_049e 
  047c:39 40            pushi 40 // $40 modifiers
  047e:76               push0 
  047f:87 01              lap param1 
  0481:4a 04             send 4 

  0483:36                push 
  0484:35 0f              ldi f 
  0486:12                 and 
  0487:18                 not 
  0488:31 14              bnt code_049e 
  048a:38 00e2          pushi e2 // $e2 canInput
  048d:76               push0 
  048e:51 2b            class User 
  0490:4a 04             send 4 

  0492:31 0a              bnt code_049e 
  0494:39 7a            pushi 7a // $7a setScript
  0496:78               push1 
  0497:74 0e8c          lofss $1326 // climbDown
  049a:81 00              lag gEgo 
  049c:4a 06             send 6 


        code_049e
  049e:33 2b              jmp code_04cb 

        code_04a0
  04a0:3c                 dup 
  04a1:35 40              ldi 40 
  04a3:1a                 eq? 
  04a4:31 25              bnt code_04cb 
  04a6:83 00              lal local0 
  04a8:31 21              bnt code_04cb 
  04aa:39 28            pushi 28 // $28 message
  04ac:76               push0 
  04ad:87 01              lap param1 
  04af:4a 04             send 4 

  04b1:36                push 
  04b2:35 05              ldi 5 
  04b4:1a                 eq? 
  04b5:31 14              bnt code_04cb 
  04b7:38 00e2          pushi e2 // $e2 canInput
  04ba:76               push0 
  04bb:51 2b            class User 
  04bd:4a 04             send 4 

  04bf:31 0a              bnt code_04cb 
  04c1:39 7a            pushi 7a // $7a setScript
  04c3:78               push1 
  04c4:74 0e5f          lofss $1326 // climbDown
  04c7:81 00              lag gEgo 
  04c9:4a 06             send 6 


        code_04cb
  04cb:3a                toss 
  04cc:48                 ret 
    )

)

// 12a4
(instance bellBase of Code
    (properties
    )
    (method (doit) // method_04cd
  04cd:39 13            pushi 13 // $13 brTop
  04cf:78               push1 
  04d0:39 03            pushi 3 // $3 y
  04d2:76               push0 
  04d3:72 0f6e          lofsa $1444 // bell
  04d6:4a 04             send 4 

  04d8:36                push 
  04d9:35 08              ldi 8 
  04db:02                 add 
  04dc:36                push 
  04dd:39 14            pushi 14 // $14 brLeft
  04df:78               push1 
  04e0:39 04            pushi 4 // $4 x
  04e2:76               push0 
  04e3:72 0f5e          lofsa $1444 // bell
  04e6:4a 04             send 4 

  04e8:36                push 
  04e9:35 02              ldi 2 
  04eb:04                 sub 
  04ec:36                push 
  04ed:39 15            pushi 15 // $15 brBottom
  04ef:78               push1 
  04f0:39 03            pushi 3 // $3 y
  04f2:76               push0 
  04f3:72 0f4e          lofsa $1444 // bell
  04f6:4a 04             send 4 

  04f8:36                push 
  04f9:35 0c              ldi c 
  04fb:02                 add 
  04fc:36                push 
  04fd:39 16            pushi 16 // $16 brRight
  04ff:78               push1 
  0500:39 04            pushi 4 // $4 x
  0502:76               push0 
  0503:72 0f3e          lofsa $1444 // bell
  0506:4a 04             send 4 

  0508:36                push 
  0509:35 02              ldi 2 
  050b:02                 add 
  050c:36                push 
  050d:72 0f34          lofsa $1444 // bell
  0510:4a 18             send 18 

  0512:48                 ret 
    )

)

// 12c0
(instance showers of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0513
  0513:87 01              lap param1 
  0515:65 0a             aTop state 
  0517:36                push 
  0518:3c                 dup 
  0519:35 00              ldi 0 
  051b:1a                 eq? 
  051c:31 09              bnt code_0527 
  051e:35 03              ldi 3 
  0520:65 0a             aTop state 
  0522:65 12             aTop seconds 
  0524:32 0082            jmp code_05a9 

        code_0527
  0527:3c                 dup 
  0528:35 01              ldi 1 
  052a:1a                 eq? 
  052b:31 1c              bnt code_0549 
  052d:39 7e            pushi 7e // $7e setCycle
  052f:78               push1 
  0530:51 16            class Fwd 
  0532:36                push 
  0533:72 1016          lofsa $154c // cloud1
  0536:4a 06             send 6 

  0538:39 7e            pushi 7e // $7e setCycle
  053a:78               push1 
  053b:51 16            class Fwd 
  053d:36                push 
  053e:72 1059          lofsa $159a // cloud2
  0541:4a 06             send 6 

  0543:35 07              ldi 7 
  0545:65 10             aTop cycles 
  0547:33 60              jmp code_05a9 

        code_0549
  0549:3c                 dup 
  054a:35 02              ldi 2 
  054c:1a                 eq? 
  054d:31 19              bnt code_0568 
  054f:39 7e            pushi 7e // $7e setCycle
  0551:78               push1 
  0552:51 1a            class End 
  0554:36                push 
  0555:72 0ff4          lofsa $154c // cloud1
  0558:4a 06             send 6 

  055a:39 7e            pushi 7e // $7e setCycle
  055c:7a               push2 
  055d:51 1a            class End 
  055f:36                push 
  0560:7c            pushSelf 
  0561:72 1036          lofsa $159a // cloud2
  0564:4a 08             send 8 

  0566:33 41              jmp code_05a9 

        code_0568
  0568:3c                 dup 
  0569:35 03              ldi 3 
  056b:1a                 eq? 
  056c:31 10              bnt code_057e 
  056e:39 2b            pushi 2b // $2b number
  0570:78               push1 
  0571:39 11            pushi 11 // $11 signal
  0573:39 2a            pushi 2a // $2a play
  0575:78               push1 
  0576:7c            pushSelf 
  0577:72 0ea0          lofsa $141a // soundFX
  057a:4a 0c             send c 

  057c:33 2b              jmp code_05a9 

        code_057e
  057e:3c                 dup 
  057f:35 04              ldi 4 
  0581:1a                 eq? 
  0582:31 17              bnt code_059b 
  0584:7a               push2 
  0585:78               push1 
  0586:39 64            pushi 64 // $64 allTrue
  0588:43 40 04         callk Random 4 

  058b:36                push 
  058c:35 19              ldi 19 
  058e:22                 lt? 
  058f:31 04              bnt code_0595 
  0591:35 00              ldi 0 
  0593:65 0a             aTop state 

        code_0595
  0595:35 07              ldi 7 
  0597:65 10             aTop cycles 
  0599:33 0e              jmp code_05a9 

        code_059b
  059b:3c                 dup 
  059c:35 05              ldi 5 
  059e:1a                 eq? 
  059f:31 08              bnt code_05a9 
  05a1:35 03              ldi 3 
  05a3:65 0a             aTop state 
  05a5:35 05              ldi 5 
  05a7:65 12             aTop seconds 

        code_05a9
  05a9:3a                toss 
  05aa:48                 ret 
    )

)

// 12f0
(instance climbUp of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_05ab
  05ab:87 01              lap param1 
  05ad:65 0a             aTop state 
  05af:36                push 
  05b0:3c                 dup 
  05b1:35 00              ldi 0 
  05b3:1a                 eq? 
  05b4:31 2d              bnt code_05e3 
  05b6:35 01              ldi 1 
  05b8:a3 03              sal local3 
  05ba:76               push0 
  05bb:45 03 00         callb procedure_0003 0 // HandsOff 

  05be:39 12            pushi 12 // $12 illegalBits
  05c0:78               push1 
  05c1:76               push0 
  05c2:38 00c8          pushi c8 // $c8 setLoop
  05c5:78               push1 
  05c6:39 06            pushi 6 // $6 loop
  05c8:76               push0 
  05c9:81 00              lag gEgo 
  05cb:4a 04             send 4 

  05cd:36                push 
  05ce:38 00d3          pushi d3 // $d3 setMotion
  05d1:39 04            pushi 4 // $4 x
  05d3:51 1d            class MoveTo 
  05d5:36                push 
  05d6:39 1a            pushi 1a // $1a text
  05d8:38 009c          pushi 9c // $9c right
  05db:7c            pushSelf 
  05dc:81 00              lag gEgo 
  05de:4a 18             send 18 

  05e0:32 011d            jmp code_0700 

        code_05e3
  05e3:3c                 dup 
  05e4:35 01              ldi 1 
  05e6:1a                 eq? 
  05e7:31 26              bnt code_060f 
  05e9:39 05            pushi 5 // $5 view
  05eb:78               push1 
  05ec:39 22            pushi 22 // $22 type
  05ee:38 00c8          pushi c8 // $c8 setLoop
  05f1:78               push1 
  05f2:76               push0 
  05f3:39 07            pushi 7 // $7 cel
  05f5:78               push1 
  05f6:76               push0 
  05f7:38 00a4          pushi a4 // $a4 cycleSpeed
  05fa:78               push1 
  05fb:78               push1 
  05fc:39 42            pushi 42 // $42 setPri
  05fe:78               push1 
  05ff:39 0c            pushi c // $c nsRight
  0601:39 7e            pushi 7e // $7e setCycle
  0603:7a               push2 
  0604:51 1a            class End 
  0606:36                push 
  0607:7c            pushSelf 
  0608:81 00              lag gEgo 
  060a:4a 26             send 26 

  060c:32 00f1            jmp code_0700 

        code_060f
  060f:3c                 dup 
  0610:35 02              ldi 2 
  0612:1a                 eq? 
  0613:31 20              bnt code_0635 
  0615:38 00c5          pushi c5 // $c5 posn
  0618:7a               push2 
  0619:39 1a            pushi 1a // $1a text
  061b:38 0091          pushi 91 // $91 isType
  061e:38 00c8          pushi c8 // $c8 setLoop
  0621:78               push1 
  0622:78               push1 
  0623:39 07            pushi 7 // $7 cel
  0625:78               push1 
  0626:76               push0 
  0627:39 7e            pushi 7e // $7e setCycle
  0629:7a               push2 
  062a:51 1a            class End 
  062c:36                push 
  062d:7c            pushSelf 
  062e:81 00              lag gEgo 
  0630:4a 1c             send 1c 

  0632:32 00cb            jmp code_0700 

        code_0635
  0635:3c                 dup 
  0636:35 03              ldi 3 
  0638:1a                 eq? 
  0639:31 1a              bnt code_0655 
  063b:38 00c5          pushi c5 // $c5 posn
  063e:7a               push2 
  063f:39 1a            pushi 1a // $1a text
  0641:39 78            pushi 78 // $78 changeState
  0643:39 07            pushi 7 // $7 cel
  0645:78               push1 
  0646:76               push0 
  0647:39 7e            pushi 7e // $7e setCycle
  0649:7a               push2 
  064a:51 1a            class End 
  064c:36                push 
  064d:7c            pushSelf 
  064e:81 00              lag gEgo 
  0650:4a 16             send 16 

  0652:32 00ab            jmp code_0700 

        code_0655
  0655:3c                 dup 
  0656:35 04              ldi 4 
  0658:1a                 eq? 
  0659:31 1f              bnt code_067a 
  065b:38 00c8          pushi c8 // $c8 setLoop
  065e:78               push1 
  065f:7a               push2 
  0660:38 00c5          pushi c5 // $c5 posn
  0663:7a               push2 
  0664:39 1a            pushi 1a // $1a text
  0666:39 6e            pushi 6e // $6e indexOf
  0668:39 07            pushi 7 // $7 cel
  066a:78               push1 
  066b:76               push0 
  066c:39 7e            pushi 7e // $7e setCycle
  066e:7a               push2 
  066f:51 1a            class End 
  0671:36                push 
  0672:7c            pushSelf 
  0673:81 00              lag gEgo 
  0675:4a 1c             send 1c 

  0677:32 0086            jmp code_0700 

        code_067a
  067a:3c                 dup 
  067b:35 05              ldi 5 
  067d:1a                 eq? 
  067e:31 42              bnt code_06c2 
  0680:38 00c8          pushi c8 // $c8 setLoop
  0683:78               push1 
  0684:39 03            pushi 3 // $3 y
  0686:39 07            pushi 7 // $7 cel
  0688:78               push1 
  0689:76               push0 
  068a:38 00c5          pushi c5 // $c5 posn
  068d:7a               push2 
  068e:39 27            pushi 27 // $27 who
  0690:39 37            pushi 37 // $37 yStep
  0692:39 7e            pushi 7e // $7e setCycle
  0694:7a               push2 
  0695:51 1a            class End 
  0697:36                push 
  0698:7c            pushSelf 
  0699:81 00              lag gEgo 
  069b:4a 1c             send 1c 

  069d:83 04              lal local4 
  069f:18                 not 
  06a0:31 1e              bnt code_06c0 
  06a2:c3 04              +al local4 
  06a4:38 00ca          pushi ca // $ca show
  06a7:76               push0 
  06a8:39 7e            pushi 7e // $7e setCycle
  06aa:78               push1 
  06ab:51 17            class Walk 
  06ad:36                push 
  06ae:38 00d3          pushi d3 // $d3 setMotion
  06b1:39 03            pushi 3 // $3 y
  06b3:51 1d            class MoveTo 
  06b5:36                push 
  06b6:38 0154          pushi 154 // $154 itemY
  06b9:39 50            pushi 50 // $50 title
  06bb:72 0f2a          lofsa $15e8 // bat
  06be:4a 14             send 14 


        code_06c0
  06c0:33 3e              jmp code_0700 

        code_06c2
  06c2:3c                 dup 
  06c3:35 06              ldi 6 
  06c5:1a                 eq? 
  06c6:31 1d              bnt code_06e5 
  06c8:38 00ca          pushi ca // $ca show
  06cb:76               push0 
  06cc:72 0e2f          lofsa $14fe // arm
  06cf:4a 04             send 4 

  06d1:39 06            pushi 6 // $6 loop
  06d3:78               push1 
  06d4:39 08            pushi 8 // $8 underBits
  06d6:38 00c6          pushi c6 // $c6 stopUpd
  06d9:78               push1 
  06da:76               push0 
  06db:81 00              lag gEgo 
  06dd:4a 0c             send c 

  06df:35 01              ldi 1 
  06e1:65 10             aTop cycles 
  06e3:33 1b              jmp code_0700 

        code_06e5
  06e5:3c                 dup 
  06e6:35 07              ldi 7 
  06e8:1a                 eq? 
  06e9:31 15              bnt code_0700 
  06eb:35 01              ldi 1 
  06ed:a3 00              sal local0 
  06ef:38 00e2          pushi e2 // $e2 canInput
  06f2:78               push1 
  06f3:78               push1 
  06f4:51 2b            class User 
  06f6:4a 06             send 6 

  06f8:39 7a            pushi 7a // $7a setScript
  06fa:78               push1 
  06fb:76               push0 
  06fc:63 08             pToa client 
  06fe:4a 06             send 6 


        code_0700
  0700:3a                toss 
  0701:48                 ret 
    )

)

// 1320
(instance climbDown of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0702
  0702:87 01              lap param1 
  0704:65 0a             aTop state 
  0706:36                push 
  0707:3c                 dup 
  0708:35 00              ldi 0 
  070a:1a                 eq? 
  070b:31 2a              bnt code_0737 
  070d:38 00e2          pushi e2 // $e2 canInput
  0710:78               push1 
  0711:76               push0 
  0712:51 2b            class User 
  0714:4a 06             send 6 

  0716:39 07            pushi 7 // $7 cel
  0718:78               push1 
  0719:39 03            pushi 3 // $3 y
  071b:39 06            pushi 6 // $6 loop
  071d:78               push1 
  071e:39 03            pushi 3 // $3 y
  0720:39 7e            pushi 7e // $7e setCycle
  0722:7a               push2 
  0723:51 1b            class Beg 
  0725:36                push 
  0726:7c            pushSelf 
  0727:81 00              lag gEgo 
  0729:4a 14             send 14 

  072b:38 0089          pushi 89 // $89 hide
  072e:76               push0 
  072f:72 0dcc          lofsa $14fe // arm
  0732:4a 04             send 4 

  0734:32 00fa            jmp code_0831 

        code_0737
  0737:3c                 dup 
  0738:35 01              ldi 1 
  073a:1a                 eq? 
  073b:31 20              bnt code_075d 
  073d:38 00c8          pushi c8 // $c8 setLoop
  0740:78               push1 
  0741:7a               push2 
  0742:38 00c5          pushi c5 // $c5 posn
  0745:7a               push2 
  0746:39 1a            pushi 1a // $1a text
  0748:39 6e            pushi 6e // $6e indexOf
  074a:39 07            pushi 7 // $7 cel
  074c:78               push1 
  074d:39 03            pushi 3 // $3 y
  074f:39 7e            pushi 7e // $7e setCycle
  0751:7a               push2 
  0752:51 1b            class Beg 
  0754:36                push 
  0755:7c            pushSelf 
  0756:81 00              lag gEgo 
  0758:4a 1c             send 1c 

  075a:32 00d4            jmp code_0831 

        code_075d
  075d:3c                 dup 
  075e:35 02              ldi 2 
  0760:1a                 eq? 
  0761:31 20              bnt code_0783 
  0763:38 00c8          pushi c8 // $c8 setLoop
  0766:78               push1 
  0767:78               push1 
  0768:38 00c5          pushi c5 // $c5 posn
  076b:7a               push2 
  076c:39 1a            pushi 1a // $1a text
  076e:39 78            pushi 78 // $78 changeState
  0770:39 07            pushi 7 // $7 cel
  0772:78               push1 
  0773:39 03            pushi 3 // $3 y
  0775:39 7e            pushi 7e // $7e setCycle
  0777:7a               push2 
  0778:51 1b            class Beg 
  077a:36                push 
  077b:7c            pushSelf 
  077c:81 00              lag gEgo 
  077e:4a 1c             send 1c 

  0780:32 00ae            jmp code_0831 

        code_0783
  0783:3c                 dup 
  0784:35 03              ldi 3 
  0786:1a                 eq? 
  0787:31 1c              bnt code_07a5 
  0789:38 00c5          pushi c5 // $c5 posn
  078c:7a               push2 
  078d:39 1a            pushi 1a // $1a text
  078f:38 0091          pushi 91 // $91 isType
  0792:39 07            pushi 7 // $7 cel
  0794:78               push1 
  0795:39 03            pushi 3 // $3 y
  0797:39 7e            pushi 7e // $7e setCycle
  0799:7a               push2 
  079a:51 1b            class Beg 
  079c:36                push 
  079d:7c            pushSelf 
  079e:81 00              lag gEgo 
  07a0:4a 16             send 16 

  07a2:32 008c            jmp code_0831 

        code_07a5
  07a5:3c                 dup 
  07a6:35 04              ldi 4 
  07a8:1a                 eq? 
  07a9:31 20              bnt code_07cb 
  07ab:38 00c8          pushi c8 // $c8 setLoop
  07ae:78               push1 
  07af:76               push0 
  07b0:38 00c5          pushi c5 // $c5 posn
  07b3:7a               push2 
  07b4:39 1a            pushi 1a // $1a text
  07b6:38 009c          pushi 9c // $9c right
  07b9:39 07            pushi 7 // $7 cel
  07bb:78               push1 
  07bc:39 03            pushi 3 // $3 y
  07be:39 7e            pushi 7e // $7e setCycle
  07c0:7a               push2 
  07c1:51 1b            class Beg 
  07c3:36                push 
  07c4:7c            pushSelf 
  07c5:81 00              lag gEgo 
  07c7:4a 1c             send 1c 

  07c9:33 66              jmp code_0831 

        code_07cb
  07cb:3c                 dup 
  07cc:35 05              ldi 5 
  07ce:1a                 eq? 
  07cf:31 3c              bnt code_080d 
  07d1:39 05            pushi 5 // $5 view
  07d3:78               push1 
  07d4:76               push0 
  07d5:38 00c5          pushi c5 // $c5 posn
  07d8:7a               push2 
  07d9:39 1a            pushi 1a // $1a text
  07db:38 009e          pushi 9e // $9e completed
  07de:39 42            pushi 42 // $42 setPri
  07e0:78               push1 
  07e1:39 ff            pushi ff // $ff checkAni
  07e3:39 7e            pushi 7e // $7e setCycle
  07e5:78               push1 
  07e6:51 17            class Walk 
  07e8:36                push 
  07e9:38 00c8          pushi c8 // $c8 setLoop
  07ec:78               push1 
  07ed:7a               push2 
  07ee:39 12            pushi 12 // $12 illegalBits
  07f0:78               push1 
  07f1:38 8000          pushi 8000 // $8000 sel_32768
  07f4:38 00a4          pushi a4 // $a4 cycleSpeed
  07f7:78               push1 
  07f8:76               push0 
  07f9:38 00d3          pushi d3 // $d3 setMotion
  07fc:39 04            pushi 4 // $4 x
  07fe:51 1d            class MoveTo 
  0800:36                push 
  0801:39 20            pushi 20 // $20 state
  0803:38 00a4          pushi a4 // $a4 cycleSpeed
  0806:7c            pushSelf 
  0807:81 00              lag gEgo 
  0809:4a 38             send 38 

  080b:33 24              jmp code_0831 

        code_080d
  080d:3c                 dup 
  080e:35 06              ldi 6 
  0810:1a                 eq? 
  0811:31 1e              bnt code_0831 
  0813:38 00c8          pushi c8 // $c8 setLoop
  0816:78               push1 
  0817:39 ff            pushi ff // $ff checkAni
  0819:81 00              lag gEgo 
  081b:4a 06             send 6 

  081d:76               push0 
  081e:45 04 00         callb procedure_0004 0 // HandsOn 

  0821:35 00              ldi 0 
  0823:a3 03              sal local3 
  0825:a3 00              sal local0 
  0827:a3 01              sal local1 
  0829:39 7a            pushi 7a // $7a setScript
  082b:78               push1 
  082c:76               push0 
  082d:63 08             pToa client 
  082f:4a 06             send 6 


        code_0831
  0831:3a                toss 
  0832:48                 ret 
    )

)

// 1350
(instance oilBell of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0833
  0833:87 01              lap param1 
  0835:65 0a             aTop state 
  0837:36                push 
  0838:3c                 dup 
  0839:35 00              ldi 0 
  083b:1a                 eq? 
  083c:31 31              bnt code_086f 
  083e:38 00e2          pushi e2 // $e2 canInput
  0841:78               push1 
  0842:76               push0 
  0843:51 2b            class User 
  0845:4a 06             send 6 

  0847:38 00c8          pushi c8 // $c8 setLoop
  084a:78               push1 
  084b:39 06            pushi 6 // $6 loop
  084d:72 0cae          lofsa $14fe // arm
  0850:4a 06             send 6 

  0852:39 07            pushi 7 // $7 cel
  0854:78               push1 
  0855:78               push1 
  0856:74 0ca5          lofss $14fe // arm
  0859:43 0e 02         callk NumCels 2 

  085c:36                push 
  085d:35 01              ldi 1 
  085f:04                 sub 
  0860:36                push 
  0861:39 7e            pushi 7e // $7e setCycle
  0863:7a               push2 
  0864:51 1b            class Beg 
  0866:36                push 
  0867:7c            pushSelf 
  0868:72 0c93          lofsa $14fe // arm
  086b:4a 0e             send e 

  086d:33 77              jmp code_08e6 

        code_086f
  086f:3c                 dup 
  0870:35 01              ldi 1 
  0872:1a                 eq? 
  0873:31 28              bnt code_089d 
  0875:39 2b            pushi 2b // $2b number
  0877:78               push1 
  0878:39 49            pushi 49 // $49 semanticFail
  087a:39 06            pushi 6 // $6 loop
  087c:78               push1 
  087d:78               push1 
  087e:39 2a            pushi 2a // $2a play
  0880:76               push0 
  0881:72 0b96          lofsa $141a // soundFX
  0884:4a 10             send 10 

  0886:38 00c8          pushi c8 // $c8 setLoop
  0889:78               push1 
  088a:39 07            pushi 7 // $7 cel
  088c:39 7e            pushi 7e // $7e setCycle
  088e:78               push1 
  088f:51 16            class Fwd 
  0891:36                push 
  0892:72 0c69          lofsa $14fe // arm
  0895:4a 0c             send c 

  0897:35 10              ldi 10 
  0899:65 10             aTop cycles 
  089b:33 49              jmp code_08e6 

        code_089d
  089d:3c                 dup 
  089e:35 02              ldi 2 
  08a0:1a                 eq? 
  08a1:31 21              bnt code_08c4 
  08a3:38 0084          pushi 84 // $84 stop
  08a6:76               push0 
  08a7:72 0b70          lofsa $141a // soundFX
  08aa:4a 04             send 4 

  08ac:38 00c8          pushi c8 // $c8 setLoop
  08af:78               push1 
  08b0:39 06            pushi 6 // $6 loop
  08b2:39 07            pushi 7 // $7 cel
  08b4:78               push1 
  08b5:76               push0 
  08b6:39 7e            pushi 7e // $7e setCycle
  08b8:7a               push2 
  08b9:51 1a            class End 
  08bb:36                push 
  08bc:7c            pushSelf 
  08bd:72 0c3e          lofsa $14fe // arm
  08c0:4a 14             send 14 

  08c2:33 22              jmp code_08e6 

        code_08c4
  08c4:3c                 dup 
  08c5:35 03              ldi 3 
  08c7:1a                 eq? 
  08c8:31 1c              bnt code_08e6 
  08ca:7a               push2 
  08cb:39 03            pushi 3 // $3 y
  08cd:39 0f            pushi f // $f lsBottom
  08cf:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  08d5:38 00e2          pushi e2 // $e2 canInput
  08d8:78               push1 
  08d9:78               push1 
  08da:51 2b            class User 
  08dc:4a 06             send 6 

  08de:39 7a            pushi 7a // $7a setScript
  08e0:78               push1 
  08e1:76               push0 
  08e2:63 08             pToa client 
  08e4:4a 06             send 6 


        code_08e6
  08e6:3a                toss 
  08e7:48                 ret 
    )

)

// 1380
(instance ringBell of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (doit) // method_08e8
  08e8:39 3c            pushi 3c // $3c doit
  08ea:76               push0 
  08eb:57 05 04         super Script 4 

  08ee:38 00ae          pushi ae // $ae distanceTo
  08f1:78               push1 
  08f2:74 0b4f          lofss $1444 // bell
  08f5:81 00              lag gEgo 
  08f7:4a 06             send 6 

  08f9:36                push 
  08fa:35 4b              ldi 4b 
  08fc:22                 lt? 
  08fd:31 2e              bnt code_092d 
  08ff:39 05            pushi 5 // $5 view
  0901:76               push0 
  0902:81 00              lag gEgo 
  0904:4a 04             send 4 

  0906:36                push 
  0907:35 1f              ldi 1f 
  0909:1c                 ne? 
  090a:31 21              bnt code_092d 
  090c:83 02              lal local2 
  090e:31 1d              bnt code_092d 
  0910:39 05            pushi 5 // $5 view
  0912:78               push1 
  0913:39 1f            pushi 1f // $1f style
  0915:38 00c8          pushi c8 // $c8 setLoop
  0918:78               push1 
  0919:76               push0 
  091a:39 07            pushi 7 // $7 cel
  091c:78               push1 
  091d:76               push0 
  091e:38 00a4          pushi a4 // $a4 cycleSpeed
  0921:78               push1 
  0922:76               push0 
  0923:39 7e            pushi 7e // $7e setCycle
  0925:78               push1 
  0926:51 1a            class End 
  0928:36                push 
  0929:81 00              lag gEgo 
  092b:4a 1e             send 1e 


        code_092d
  092d:39 05            pushi 5 // $5 view
  092f:76               push0 
  0930:81 00              lag gEgo 
  0932:4a 04             send 4 

  0934:36                push 
  0935:35 1f              ldi 1f 
  0937:1a                 eq? 
  0938:31 27              bnt code_0961 
  093a:39 07            pushi 7 // $7 cel
  093c:76               push0 
  093d:81 00              lag gEgo 
  093f:4a 04             send 4 

  0941:36                push 
  0942:35 03              ldi 3 
  0944:1a                 eq? 
  0945:31 1a              bnt code_0961 
  0947:38 00d3          pushi d3 // $d3 setMotion
  094a:39 03            pushi 3 // $3 y
  094c:51 1d            class MoveTo 
  094e:36                push 
  094f:39 49            pushi 49 // $49 semanticFail
  0951:38 0094          pushi 94 // $94 retreat
  0954:81 00              lag gEgo 
  0956:4a 0a             send a 

  0958:38 0089          pushi 89 // $89 hide
  095b:76               push0 
  095c:72 0ae5          lofsa $1444 // bell
  095f:4a 04             send 4 


        code_0961
  0961:48                 ret 
    )

    (method (changeState) // method_0962
  0962:87 01              lap param1 
  0964:65 0a             aTop state 
  0966:36                push 
  0967:3c                 dup 
  0968:35 00              ldi 0 
  096a:1a                 eq? 
  096b:31 48              bnt code_09b5 
  096d:76               push0 
  096e:45 03 00         callb procedure_0003 0 // HandsOff 

  0971:38 00db          pushi db // $db onControl
  0974:78               push1 
  0975:78               push1 
  0976:81 00              lag gEgo 
  0978:4a 06             send 6 

  097a:36                push 
  097b:35 08              ldi 8 
  097d:12                 and 
  097e:31 18              bnt code_0998 
  0980:38 00d3          pushi d3 // $d3 setMotion
  0983:39 04            pushi 4 // $4 x
  0985:51 1d            class MoveTo 
  0987:36                push 
  0988:39 5e            pushi 5e // $5e respondsTo
  098a:38 0090          pushi 90 // $90 setMark
  098d:7c            pushSelf 
  098e:81 00              lag gEgo 
  0990:4a 0c             send c 

  0992:35 00              ldi 0 
  0994:a3 02              sal local2 
  0996:33 1a              jmp code_09b2 

        code_0998
  0998:39 12            pushi 12 // $12 illegalBits
  099a:78               push1 
  099b:76               push0 
  099c:38 00d3          pushi d3 // $d3 setMotion
  099f:39 04            pushi 4 // $4 x
  09a1:51 1d            class MoveTo 
  09a3:36                push 
  09a4:39 49            pushi 49 // $49 semanticFail
  09a6:38 0090          pushi 90 // $90 setMark
  09a9:7c            pushSelf 
  09aa:81 00              lag gEgo 
  09ac:4a 12             send 12 

  09ae:35 01              ldi 1 
  09b0:a3 02              sal local2 

        code_09b2
  09b2:32 02d7            jmp code_0c8c 

        code_09b5
  09b5:3c                 dup 
  09b6:35 01              ldi 1 
  09b8:1a                 eq? 
  09b9:31 31              bnt code_09ec 
  09bb:39 05            pushi 5 // $5 view
  09bd:78               push1 
  09be:39 35            pushi 35 // $35 b-incr
  09c0:39 07            pushi 7 // $7 cel
  09c2:78               push1 
  09c3:76               push0 
  09c4:39 06            pushi 6 // $6 loop
  09c6:78               push1 
  09c7:83 02              lal local2 
  09c9:31 04              bnt code_09cf 
  09cb:35 04              ldi 4 
  09cd:33 02              jmp code_09d1 

        code_09cf
  09cf:35 00              ldi 0 

        code_09d1
  09d1:36                push 
  09d2:39 7e            pushi 7e // $7e setCycle
  09d4:78               push1 
  09d5:51 1a            class End 
  09d7:36                push 
  09d8:81 00              lag gEgo 
  09da:4a 18             send 18 

  09dc:7a               push2 
  09dd:39 03            pushi 3 // $3 y
  09df:39 10            pushi 10 // $10 lsRight
  09e1:40 f627 04        call proc_000c 4 

  09e5:35 03              ldi 3 
  09e7:65 12             aTop seconds 
  09e9:32 02a0            jmp code_0c8c 

        code_09ec
  09ec:3c                 dup 
  09ed:35 02              ldi 2 
  09ef:1a                 eq? 
  09f0:31 6b              bnt code_0a5d 
  09f2:76               push0 
  09f3:45 0f 00         callb procedure_000f 0 // cls 

  09f6:80 00b8            lag global184 
  09f9:31 4e              bnt code_0a49 
  09fb:39 06            pushi 6 // $6 loop
  09fd:78               push1 
  09fe:83 02              lal local2 
  0a00:31 04              bnt code_0a06 
  0a02:35 05              ldi 5 
  0a04:33 02              jmp code_0a08 

        code_0a06
  0a06:35 02              ldi 2 

        code_0a08
  0a08:36                push 
  0a09:38 00a4          pushi a4 // $a4 cycleSpeed
  0a0c:78               push1 
  0a0d:7a               push2 
  0a0e:39 7e            pushi 7e // $7e setCycle
  0a10:78               push1 
  0a11:51 16            class Fwd 
  0a13:36                push 
  0a14:81 00              lag gEgo 
  0a16:4a 12             send 12 

  0a18:39 7e            pushi 7e // $7e setCycle
  0a1a:78               push1 
  0a1b:51 16            class Fwd 
  0a1d:36                push 
  0a1e:72 0a23          lofsa $1444 // bell
  0a21:4a 06             send 6 

  0a23:38 00a3          pushi a3 // $a3 startUpd
  0a26:76               push0 
  0a27:39 7e            pushi 7e // $7e setCycle
  0a29:78               push1 
  0a2a:51 16            class Fwd 
  0a2c:36                push 
  0a2d:72 0a7c          lofsa $14ac // ring
  0a30:4a 0a             send a 

  0a32:39 2b            pushi 2b // $2b number
  0a34:78               push1 
  0a35:39 1e            pushi 1e // $1e mode
  0a37:39 06            pushi 6 // $6 loop
  0a39:78               push1 
  0a3a:78               push1 
  0a3b:39 2a            pushi 2a // $2a play
  0a3d:76               push0 
  0a3e:72 09d9          lofsa $141a // soundFX
  0a41:4a 10             send 10 

  0a43:35 08              ldi 8 
  0a45:65 10             aTop cycles 
  0a47:33 11              jmp code_0a5a 

        code_0a49
  0a49:35 03              ldi 3 
  0a4b:65 0a             aTop state 
  0a4d:7a               push2 
  0a4e:39 03            pushi 3 // $3 y
  0a50:39 11            pushi 11 // $11 signal
  0a52:40 f5b6 04        call proc_000c 4 

  0a56:35 04              ldi 4 
  0a58:65 12             aTop seconds 

        code_0a5a
  0a5a:32 022f            jmp code_0c8c 

        code_0a5d
  0a5d:3c                 dup 
  0a5e:35 03              ldi 3 
  0a60:1a                 eq? 
  0a61:30 008b            bnt code_0aef 
  0a64:76               push0 
  0a65:45 0f 00         callb procedure_000f 0 // cls 

  0a68:39 05            pushi 5 // $5 view
  0a6a:78               push1 
  0a6b:38 00cb          pushi cb // $cb addToPic
  0a6e:38 00c8          pushi c8 // $c8 setLoop
  0a71:78               push1 
  0a72:76               push0 
  0a73:38 00a2          pushi a2 // $a2 setCel
  0a76:78               push1 
  0a77:76               push0 
  0a78:38 00a4          pushi a4 // $a4 cycleSpeed
  0a7b:78               push1 
  0a7c:76               push0 
  0a7d:39 37            pushi 37 // $37 yStep
  0a7f:78               push1 
  0a80:39 0a            pushi a // $a nsLeft
  0a82:72 09bf          lofsa $1444 // bell
  0a85:4a 1e             send 1e 

  0a87:39 7e            pushi 7e // $7e setCycle
  0a89:78               push1 
  0a8a:51 1b            class Beg 
  0a8c:36                push 
  0a8d:72 0a1c          lofsa $14ac // ring
  0a90:4a 06             send 6 

  0a92:80 00b8            lag global184 
  0a95:31 21              bnt code_0ab8 
  0a97:83 02              lal local2 
  0a99:31 1d              bnt code_0ab8 
  0a9b:38 00d3          pushi d3 // $d3 setMotion
  0a9e:39 04            pushi 4 // $4 x
  0aa0:51 1d            class MoveTo 
  0aa2:36                push 
  0aa3:39 42            pushi 42 // $42 setPri
  0aa5:39 6c            pushi 6c // $6c addToEnd
  0aa7:7c            pushSelf 
  0aa8:72 0999          lofsa $1444 // bell
  0aab:4a 0c             send c 

  0aad:7a               push2 
  0aae:39 03            pushi 3 // $3 y
  0ab0:39 12            pushi 12 // $12 illegalBits
  0ab2:40 f556 04        call proc_000c 4 

  0ab6:33 34              jmp code_0aec 

        code_0ab8
  0ab8:35 01              ldi 1 
  0aba:a0 00a4            sag global164 
  0abd:38 00c8          pushi c8 // $c8 setLoop
  0ac0:78               push1 
  0ac1:39 06            pushi 6 // $6 loop
  0ac3:38 00c9          pushi c9 // $c9 ignoreActors
  0ac6:78               push1 
  0ac7:78               push1 
  0ac8:38 00d3          pushi d3 // $d3 setMotion
  0acb:39 04            pushi 4 // $4 x
  0acd:51 1d            class MoveTo 
  0acf:36                push 
  0ad0:39 48            pushi 48 // $48 syntaxFail
  0ad2:38 008a          pushi 8a // $8a enable
  0ad5:7c            pushSelf 
  0ad6:72 096b          lofsa $1444 // bell
  0ad9:4a 18             send 18 

  0adb:39 7e            pushi 7e // $7e setCycle
  0add:78               push1 
  0ade:76               push0 
  0adf:81 00              lag gEgo 
  0ae1:4a 06             send 6 

  0ae3:7a               push2 
  0ae4:39 03            pushi 3 // $3 y
  0ae6:39 13            pushi 13 // $13 brTop
  0ae8:40 f520 04        call proc_000c 4 


        code_0aec
  0aec:32 019d            jmp code_0c8c 

        code_0aef
  0aef:3c                 dup 
  0af0:35 04              ldi 4 
  0af2:1a                 eq? 
  0af3:30 0088            bnt code_0b7e 
  0af6:76               push0 
  0af7:45 0f 00         callb procedure_000f 0 // cls 

  0afa:80 00b8            lag global184 
  0afd:31 35              bnt code_0b34 
  0aff:83 02              lal local2 
  0b01:31 31              bnt code_0b34 
  0b03:39 2b            pushi 2b // $2b number
  0b05:78               push1 
  0b06:39 2a            pushi 2a // $2a play
  0b08:39 2a            pushi 2a // $2a play
  0b0a:76               push0 
  0b0b:72 090c          lofsa $141a // soundFX
  0b0e:4a 0a             send a 

  0b10:7a               push2 
  0b11:39 05            pushi 5 // $5 view
  0b13:78               push1 
  0b14:43 6a 04         callk ShakeScreen 4 

  0b17:7a               push2 
  0b18:78               push1 
  0b19:39 64            pushi 64 // $64 allTrue
  0b1b:43 40 04         callk Random 4 

  0b1e:36                push 
  0b1f:35 06              ldi 6 
  0b21:22                 lt? 
  0b22:31 06              bnt code_0b2a 
  0b24:35 05              ldi 5 
  0b26:65 0a             aTop state 
  0b28:33 04              jmp code_0b2e 

        code_0b2a
  0b2a:35 08              ldi 8 
  0b2c:65 0a             aTop state 

        code_0b2e
  0b2e:35 0e              ldi e 
  0b30:65 10             aTop cycles 
  0b32:33 47              jmp code_0b7b 

        code_0b34
  0b34:88 00a4            lsg global164 
  0b37:35 01              ldi 1 
  0b39:1a                 eq? 
  0b3a:31 14              bnt code_0b50 
  0b3c:39 2b            pushi 2b // $2b number
  0b3e:78               push1 
  0b3f:39 1e            pushi 1e // $1e mode
  0b41:39 2a            pushi 2a // $2a play
  0b43:76               push0 
  0b44:72 08d3          lofsa $141a // soundFX
  0b47:4a 0a             send a 

  0b49:7a               push2 
  0b4a:39 05            pushi 5 // $5 view
  0b4c:78               push1 
  0b4d:43 6a 04         callk ShakeScreen 4 


        code_0b50
  0b50:39 06            pushi 6 // $6 loop
  0b52:78               push1 
  0b53:83 02              lal local2 
  0b55:31 04              bnt code_0b5b 
  0b57:35 04              ldi 4 
  0b59:33 02              jmp code_0b5d 

        code_0b5b
  0b5b:35 00              ldi 0 

        code_0b5d
  0b5d:36                push 
  0b5e:81 00              lag gEgo 
  0b60:4a 06             send 6 

  0b62:39 07            pushi 7 // $7 cel
  0b64:78               push1 
  0b65:78               push1 
  0b66:89 00              lsg gEgo 
  0b68:43 0e 02         callk NumCels 2 

  0b6b:36                push 
  0b6c:35 01              ldi 1 
  0b6e:04                 sub 
  0b6f:36                push 
  0b70:39 7e            pushi 7e // $7e setCycle
  0b72:7a               push2 
  0b73:51 1b            class Beg 
  0b75:36                push 
  0b76:7c            pushSelf 
  0b77:81 00              lag gEgo 
  0b79:4a 0e             send e 


        code_0b7b
  0b7b:32 010e            jmp code_0c8c 

        code_0b7e
  0b7e:3c                 dup 
  0b7f:35 05              ldi 5 
  0b81:1a                 eq? 
  0b82:31 5e              bnt code_0be2 
  0b84:39 05            pushi 5 // $5 view
  0b86:78               push1 
  0b87:76               push0 
  0b88:39 06            pushi 6 // $6 loop
  0b8a:78               push1 
  0b8b:80 00b8            lag global184 
  0b8e:31 04              bnt code_0b94 
  0b90:35 01              ldi 1 
  0b92:33 02              jmp code_0b96 

        code_0b94
  0b94:35 02              ldi 2 

        code_0b96
  0b96:36                push 
  0b97:38 00a4          pushi a4 // $a4 cycleSpeed
  0b9a:78               push1 
  0b9b:76               push0 
  0b9c:39 12            pushi 12 // $12 illegalBits
  0b9e:78               push1 
  0b9f:38 8000          pushi 8000 // $8000 sel_32768
  0ba2:39 7e            pushi 7e // $7e setCycle
  0ba4:78               push1 
  0ba5:51 17            class Walk 
  0ba7:36                push 
  0ba8:81 00              lag gEgo 
  0baa:4a 1e             send 1e 

  0bac:38 00c6          pushi c6 // $c6 stopUpd
  0baf:76               push0 
  0bb0:72 08f9          lofsa $14ac // ring
  0bb3:4a 04             send 4 

  0bb5:80 00b8            lag global184 
  0bb8:31 19              bnt code_0bd3 
  0bba:38 00c9          pushi c9 // $c9 ignoreActors
  0bbd:78               push1 
  0bbe:76               push0 
  0bbf:38 00c6          pushi c6 // $c6 stopUpd
  0bc2:76               push0 
  0bc3:72 087e          lofsa $1444 // bell
  0bc6:4a 0a             send a 

  0bc8:7a               push2 
  0bc9:39 03            pushi 3 // $3 y
  0bcb:39 14            pushi 14 // $14 brLeft
  0bcd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0bd3
  0bd3:76               push0 
  0bd4:45 04 00         callb procedure_0004 0 // HandsOn 

  0bd7:39 7a            pushi 7a // $7a setScript
  0bd9:78               push1 
  0bda:76               push0 
  0bdb:63 08             pToa client 
  0bdd:4a 06             send 6 

  0bdf:32 00aa            jmp code_0c8c 

        code_0be2
  0be2:3c                 dup 
  0be3:35 06              ldi 6 
  0be5:1a                 eq? 
  0be6:31 3c              bnt code_0c24 
  0be8:35 00              ldi 0 
  0bea:a3 02              sal local2 
  0bec:39 05            pushi 5 // $5 view
  0bee:78               push1 
  0bef:39 20            pushi 20 // $20 state
  0bf1:38 00c8          pushi c8 // $c8 setLoop
  0bf4:78               push1 
  0bf5:39 ff            pushi ff // $ff checkAni
  0bf7:39 7e            pushi 7e // $7e setCycle
  0bf9:78               push1 
  0bfa:51 17            class Walk 
  0bfc:36                push 
  0bfd:38 00d4          pushi d4 // $d4 setAvoider
  0c00:78               push1 
  0c01:39 56            pushi 56 // $56 new
  0c03:76               push0 
  0c04:51 21            class Avoid 
  0c06:4a 04             send 4 

  0c08:36                push 
  0c09:39 12            pushi 12 // $12 illegalBits
  0c0b:78               push1 
  0c0c:38 8000          pushi 8000 // $8000 sel_32768
  0c0f:38 00d3          pushi d3 // $d3 setMotion
  0c12:39 04            pushi 4 // $4 x
  0c14:51 1d            class MoveTo 
  0c16:36                push 
  0c17:38 00b3          pushi b3 // $b3 thisTurn
  0c1a:38 00a7          pushi a7 // $a7 isStopped
  0c1d:7c            pushSelf 
  0c1e:81 00              lag gEgo 
  0c20:4a 2a             send 2a 

  0c22:33 68              jmp code_0c8c 

        code_0c24
  0c24:3c                 dup 
  0c25:35 07              ldi 7 
  0c27:1a                 eq? 
  0c28:31 2f              bnt code_0c59 
  0c2a:39 2b            pushi 2b // $2b number
  0c2c:78               push1 
  0c2d:39 1e            pushi 1e // $1e mode
  0c2f:39 2a            pushi 2a // $2a play
  0c31:76               push0 
  0c32:72 07e5          lofsa $141a // soundFX
  0c35:4a 0a             send a 

  0c37:7a               push2 
  0c38:39 05            pushi 5 // $5 view
  0c3a:7a               push2 
  0c3b:43 6a 04         callk ShakeScreen 4 

  0c3e:38 00c8          pushi c8 // $c8 setLoop
  0c41:78               push1 
  0c42:39 05            pushi 5 // $5 view
  0c44:38 00d3          pushi d3 // $d3 setMotion
  0c47:39 04            pushi 4 // $4 x
  0c49:51 1d            class MoveTo 
  0c4b:36                push 
  0c4c:38 009f          pushi 9f // $9f nextCel
  0c4f:38 00a7          pushi a7 // $a7 isStopped
  0c52:7c            pushSelf 
  0c53:81 00              lag gEgo 
  0c55:4a 12             send 12 

  0c57:33 33              jmp code_0c8c 

        code_0c59
  0c59:3c                 dup 
  0c5a:35 08              ldi 8 
  0c5c:1a                 eq? 
  0c5d:31 0f              bnt code_0c6e 
  0c5f:39 06            pushi 6 // $6 loop
  0c61:78               push1 
  0c62:39 04            pushi 4 // $4 x
  0c64:81 00              lag gEgo 
  0c66:4a 06             send 6 

  0c68:35 07              ldi 7 
  0c6a:65 12             aTop seconds 
  0c6c:33 1e              jmp code_0c8c 

        code_0c6e
  0c6e:3c                 dup 
  0c6f:35 09              ldi 9 
  0c71:1a                 eq? 
  0c72:31 18              bnt code_0c8c 
  0c74:72 0a05          lofsa $167c // myIcon
  0c77:a0 0080            sag global128 
  0c7a:35 02              ldi 2 
  0c7c:a0 0081            sag global129 
  0c7f:35 00              ldi 0 
  0c81:a0 0082            sag global130 
  0c84:7a               push2 
  0c85:39 03            pushi 3 // $3 y
  0c87:39 15            pushi 15 // $15 brBottom
  0c89:45 13 04         callb procedure_0013 4 // EgoDead 


        code_0c8c
  0c8c:3a                toss 
  0c8d:48                 ret 
    )

)

// 13b4
(instance pullRope of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0c8e
  0c8e:87 01              lap param1 
  0c90:65 0a             aTop state 
  0c92:36                push 
  0c93:3c                 dup 
  0c94:35 00              ldi 0 
  0c96:1a                 eq? 
  0c97:31 1d              bnt code_0cb6 
  0c99:76               push0 
  0c9a:45 03 00         callb procedure_0003 0 // HandsOff 

  0c9d:39 12            pushi 12 // $12 illegalBits
  0c9f:78               push1 
  0ca0:76               push0 
  0ca1:38 00d3          pushi d3 // $d3 setMotion
  0ca4:39 04            pushi 4 // $4 x
  0ca6:51 1d            class MoveTo 
  0ca8:36                push 
  0ca9:39 55            pushi 55 // $55 z
  0cab:38 0092          pushi 92 // $92 checkState
  0cae:7c            pushSelf 
  0caf:81 00              lag gEgo 
  0cb1:4a 12             send 12 

  0cb3:32 00a5            jmp code_0d5b 

        code_0cb6
  0cb6:3c                 dup 
  0cb7:35 01              ldi 1 
  0cb9:1a                 eq? 
  0cba:31 28              bnt code_0ce4 
  0cbc:39 05            pushi 5 // $5 view
  0cbe:78               push1 
  0cbf:39 3a            pushi 3a // $3a heading
  0cc1:39 07            pushi 7 // $7 cel
  0cc3:78               push1 
  0cc4:76               push0 
  0cc5:39 06            pushi 6 // $6 loop
  0cc7:78               push1 
  0cc8:76               push0 
  0cc9:38 00a4          pushi a4 // $a4 cycleSpeed
  0ccc:78               push1 
  0ccd:78               push1 
  0cce:39 7e            pushi 7e // $7e setCycle
  0cd0:7a               push2 
  0cd1:51 1a            class End 
  0cd3:36                push 
  0cd4:7c            pushSelf 
  0cd5:81 00              lag gEgo 
  0cd7:4a 20             send 20 

  0cd9:7a               push2 
  0cda:39 03            pushi 3 // $3 y
  0cdc:39 16            pushi 16 // $16 brRight
  0cde:40 f32a 04        call proc_000c 4 

  0ce2:33 77              jmp code_0d5b 

        code_0ce4
  0ce4:3c                 dup 
  0ce5:35 02              ldi 2 
  0ce7:1a                 eq? 
  0ce8:31 14              bnt code_0cfe 
  0cea:39 06            pushi 6 // $6 loop
  0cec:78               push1 
  0ced:7a               push2 
  0cee:39 7e            pushi 7e // $7e setCycle
  0cf0:78               push1 
  0cf1:51 16            class Fwd 
  0cf3:36                push 
  0cf4:81 00              lag gEgo 
  0cf6:4a 0c             send c 

  0cf8:35 03              ldi 3 
  0cfa:65 12             aTop seconds 
  0cfc:33 5d              jmp code_0d5b 

        code_0cfe
  0cfe:3c                 dup 
  0cff:35 03              ldi 3 
  0d01:1a                 eq? 
  0d02:31 19              bnt code_0d1d 
  0d04:39 06            pushi 6 // $6 loop
  0d06:78               push1 
  0d07:76               push0 
  0d08:39 07            pushi 7 // $7 cel
  0d0a:78               push1 
  0d0b:39 05            pushi 5 // $5 view
  0d0d:39 7e            pushi 7e // $7e setCycle
  0d0f:78               push1 
  0d10:51 1b            class Beg 
  0d12:36                push 
  0d13:81 00              lag gEgo 
  0d15:4a 12             send 12 

  0d17:35 03              ldi 3 
  0d19:65 12             aTop seconds 
  0d1b:33 3e              jmp code_0d5b 

        code_0d1d
  0d1d:3c                 dup 
  0d1e:35 04              ldi 4 
  0d20:1a                 eq? 
  0d21:31 38              bnt code_0d5b 
  0d23:76               push0 
  0d24:45 0f 00         callb procedure_000f 0 // cls 

  0d27:7a               push2 
  0d28:39 03            pushi 3 // $3 y
  0d2a:39 17            pushi 17 // $17 name
  0d2c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d32:39 05            pushi 5 // $5 view
  0d34:78               push1 
  0d35:76               push0 
  0d36:39 06            pushi 6 // $6 loop
  0d38:78               push1 
  0d39:78               push1 
  0d3a:38 00a4          pushi a4 // $a4 cycleSpeed
  0d3d:78               push1 
  0d3e:76               push0 
  0d3f:39 12            pushi 12 // $12 illegalBits
  0d41:78               push1 
  0d42:38 8000          pushi 8000 // $8000 sel_32768
  0d45:39 7e            pushi 7e // $7e setCycle
  0d47:78               push1 
  0d48:51 17            class Walk 
  0d4a:36                push 
  0d4b:81 00              lag gEgo 
  0d4d:4a 1e             send 1e 

  0d4f:76               push0 
  0d50:45 04 00         callb procedure_0004 0 // HandsOn 

  0d53:39 7a            pushi 7a // $7a setScript
  0d55:78               push1 
  0d56:76               push0 
  0d57:63 08             pToa client 
  0d59:4a 06             send 6 


        code_0d5b
  0d5b:3a                toss 
  0d5c:48                 ret 
    )

)

// 13e4
(instance pickUp of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0d5d
  0d5d:87 01              lap param1 
  0d5f:65 0a             aTop state 
  0d61:36                push 
  0d62:3c                 dup 
  0d63:35 00              ldi 0 
  0d65:1a                 eq? 
  0d66:31 2c              bnt code_0d94 
  0d68:76               push0 
  0d69:45 03 00         callb procedure_0003 0 // HandsOff 

  0d6c:7a               push2 
  0d6d:89 00              lsg gEgo 
  0d6f:39 04            pushi 4 // $4 x
  0d71:39 04            pushi 4 // $4 x
  0d73:76               push0 
  0d74:81 00              lag gEgo 
  0d76:4a 04             send 4 

  0d78:36                push 
  0d79:39 03            pushi 3 // $3 y
  0d7b:76               push0 
  0d7c:81 00              lag gEgo 
  0d7e:4a 04             send 4 

  0d80:36                push 
  0d81:39 48            pushi 48 // $48 syntaxFail
  0d83:38 0096          pushi 96 // $96 busy
  0d86:43 43 08         callk GetAngle 8 

  0d89:36                push 
  0d8a:43 50 04         callk DirLoop 4 

  0d8d:35 02              ldi 2 
  0d8f:65 10             aTop cycles 
  0d91:32 0088            jmp code_0e1c 

        code_0d94
  0d94:3c                 dup 
  0d95:35 01              ldi 1 
  0d97:1a                 eq? 
  0d98:31 1b              bnt code_0db5 
  0d9a:39 05            pushi 5 // $5 view
  0d9c:78               push1 
  0d9d:39 11            pushi 11 // $11 signal
  0d9f:39 07            pushi 7 // $7 cel
  0da1:78               push1 
  0da2:76               push0 
  0da3:38 00d3          pushi d3 // $d3 setMotion
  0da6:78               push1 
  0da7:76               push0 
  0da8:39 7e            pushi 7e // $7e setCycle
  0daa:7a               push2 
  0dab:51 1a            class End 
  0dad:36                push 
  0dae:7c            pushSelf 
  0daf:81 00              lag gEgo 
  0db1:4a 1a             send 1a 

  0db3:33 67              jmp code_0e1c 

        code_0db5
  0db5:3c                 dup 
  0db6:35 02              ldi 2 
  0db8:1a                 eq? 
  0db9:31 2e              bnt code_0de9 
  0dbb:35 01              ldi 1 
  0dbd:a0 00b6            sag global182 
  0dc0:7a               push2 
  0dc1:39 03            pushi 3 // $3 y
  0dc3:39 18            pushi 18 // $18 key
  0dc5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0dcb:38 00ec          pushi ec // $ec get
  0dce:78               push1 
  0dcf:39 14            pushi 14 // $14 brLeft
  0dd1:81 00              lag gEgo 
  0dd3:4a 06             send 6 

  0dd5:38 00c8          pushi c8 // $c8 setLoop
  0dd8:78               push1 
  0dd9:76               push0 
  0dda:38 00c7          pushi c7 // $c7 forceUpd
  0ddd:76               push0 
  0dde:72 0663          lofsa $1444 // bell
  0de1:4a 0a             send a 

  0de3:35 02              ldi 2 
  0de5:65 10             aTop cycles 
  0de7:33 33              jmp code_0e1c 

        code_0de9
  0de9:3c                 dup 
  0dea:35 03              ldi 3 
  0dec:1a                 eq? 
  0ded:31 0d              bnt code_0dfc 
  0def:39 7e            pushi 7e // $7e setCycle
  0df1:7a               push2 
  0df2:51 1b            class Beg 
  0df4:36                push 
  0df5:7c            pushSelf 
  0df6:81 00              lag gEgo 
  0df8:4a 08             send 8 

  0dfa:33 20              jmp code_0e1c 

        code_0dfc
  0dfc:3c                 dup 
  0dfd:35 04              ldi 4 
  0dff:1a                 eq? 
  0e00:31 1a              bnt code_0e1c 
  0e02:76               push0 
  0e03:45 04 00         callb procedure_0004 0 // HandsOn 

  0e06:39 05            pushi 5 // $5 view
  0e08:78               push1 
  0e09:76               push0 
  0e0a:39 7e            pushi 7e // $7e setCycle
  0e0c:78               push1 
  0e0d:51 17            class Walk 
  0e0f:36                push 
  0e10:81 00              lag gEgo 
  0e12:4a 0c             send c 

  0e14:39 7a            pushi 7a // $7a setScript
  0e16:78               push1 
  0e17:76               push0 
  0e18:63 08             pToa client 
  0e1a:4a 06             send 6 


        code_0e1c
  0e1c:3a                toss 
  0e1d:48                 ret 
    )

)

// 1414
(instance soundFX of Sound
    (properties
        state $0
        number $11
        priority $3
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 143e
(instance bell of Act
    (properties
        y $c
        x $48
        z $0
        heading $0
        yStep $2
        view $cb
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
    (method (handleEvent) // method_0e1e
  0e1e:78               push1 
  0e1f:74 03a3          lofss $11c5 // look<(dans,below)/bell
  0e22:43 25 02         callk Said 2 

  0e25:31 20              bnt code_0e47 
  0e27:80 00a4            lag global164 
  0e2a:31 0d              bnt code_0e39 
  0e2c:7a               push2 
  0e2d:39 03            pushi 3 // $3 y
  0e2f:39 19            pushi 19 // $19 time
  0e31:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0e37:33 0b              jmp code_0e44 

        code_0e39
  0e39:7a               push2 
  0e3a:39 03            pushi 3 // $3 y
  0e3c:39 1a            pushi 1a // $1a text
  0e3e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0e44
  0e44:32 01f7            jmp code_103e 

        code_0e47
  0e47:78               push1 
  0e48:74 035f          lofss $11aa // get/control
  0e4b:43 25 02         callk Said 2 

  0e4e:31 4f              bnt code_0e9f 
  0e50:80 00a4            lag global164 
  0e53:31 3c              bnt code_0e91 
  0e55:38 0082          pushi 82 // $82 owner
  0e58:76               push0 
  0e59:39 43            pushi 43 // $43 at
  0e5b:78               push1 
  0e5c:39 14            pushi 14 // $14 brLeft
  0e5e:81 09              lag gInventory 
  0e60:4a 06             send 6 

  0e62:4a 04             send 4 

  0e64:36                push 
  0e65:35 03              ldi 3 
  0e67:1c                 ne? 
  0e68:31 06              bnt code_0e70 
  0e6a:76               push0 
  0e6b:45 0a 00         callb procedure_000a 0 // AlreadyTook 

  0e6e:33 1f              jmp code_0e8f 

        code_0e70
  0e70:38 00ae          pushi ae // $ae distanceTo
  0e73:78               push1 
  0e74:74 05cd          lofss $1444 // bell
  0e77:81 00              lag gEgo 
  0e79:4a 06             send 6 

  0e7b:36                push 
  0e7c:35 0f              ldi f 
  0e7e:22                 lt? 
  0e7f:31 0a              bnt code_0e8b 
  0e81:39 7a            pushi 7a // $7a setScript
  0e83:78               push1 
  0e84:74 0563          lofss $13ea // pickUp
  0e87:54 06             self 6 

  0e89:33 04              jmp code_0e8f 

        code_0e8b
  0e8b:76               push0 
  0e8c:45 09 00         callb procedure_0009 0 // NotClose 


        code_0e8f
  0e8f:33 0b              jmp code_0e9c 

        code_0e91
  0e91:7a               push2 
  0e92:39 03            pushi 3 // $3 y
  0e94:39 1b            pushi 1b // $1b elements
  0e96:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0e9c
  0e9c:32 019f            jmp code_103e 

        code_0e9f
  0e9f:78               push1 
  0ea0:74 02fe          lofss $11a1 // get,bouger/bell
  0ea3:43 25 02         callk Said 2 

  0ea6:31 0e              bnt code_0eb6 
  0ea8:7a               push2 
  0ea9:39 03            pushi 3 // $3 y
  0eab:39 1c            pushi 1c // $1c color
  0ead:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0eb3:32 0188            jmp code_103e 

        code_0eb6
  0eb6:78               push1 
  0eb7:74 025b          lofss $1115 // (anneau,attirer)<actionner<cane/(chanvre,anneau,bell)
  0eba:43 25 02         callk Said 2 

  0ebd:2f 1b               bt code_0eda 
  0ebf:78               push1 
  0ec0:74 037f          lofss $1242 // actionner/cane/bell<anneau
  0ec3:43 25 02         callk Said 2 

  0ec6:2f 12               bt code_0eda 
  0ec8:78               push1 
  0ec9:74 0311          lofss $11dd // attirer,get,get/(anneau,chanvre,bell)/cane<(avec,actionner)
  0ecc:43 25 02         callk Said 2 

  0ecf:2f 09               bt code_0eda 
  0ed1:78               push1 
  0ed2:74 033e          lofss $1213 // anneau/bell/cane<(avec,actionner)
  0ed5:43 25 02         callk Said 2 

  0ed8:31 56              bnt code_0f30 

        code_0eda
  0eda:80 00a4            lag global164 
  0edd:18                 not 
  0ede:31 42              bnt code_0f22 
  0ee0:38 00ee          pushi ee // $ee has
  0ee3:78               push1 
  0ee4:39 15            pushi 15 // $15 brBottom
  0ee6:81 00              lag gEgo 
  0ee8:4a 06             send 6 

  0eea:31 30              bnt code_0f1c 
  0eec:38 00db          pushi db // $db onControl
  0eef:78               push1 
  0ef0:78               push1 
  0ef1:81 00              lag gEgo 
  0ef3:4a 06             send 6 

  0ef5:36                push 
  0ef6:35 08              ldi 8 
  0ef8:12                 and 
  0ef9:2f 0f               bt code_0f0a 
  0efb:38 00db          pushi db // $db onControl
  0efe:78               push1 
  0eff:78               push1 
  0f00:81 00              lag gEgo 
  0f02:4a 06             send 6 

  0f04:36                push 
  0f05:35 04              ldi 4 
  0f07:12                 and 
  0f08:31 0c              bnt code_0f16 

        code_0f0a
  0f0a:39 7a            pushi 7a // $7a setScript
  0f0c:78               push1 
  0f0d:74 0476          lofss $1386 // ringBell
  0f10:81 00              lag gEgo 
  0f12:4a 06             send 6 

  0f14:33 04              jmp code_0f1a 

        code_0f16
  0f16:76               push0 
  0f17:45 09 00         callb procedure_0009 0 // NotClose 


        code_0f1a
  0f1a:33 04              jmp code_0f20 

        code_0f1c
  0f1c:76               push0 
  0f1d:45 0d 00         callb procedure_000d 0 // DontHave 


        code_0f20
  0f20:33 0b              jmp code_0f2d 

        code_0f22
  0f22:7a               push2 
  0f23:39 03            pushi 3 // $3 y
  0f25:39 1d            pushi 1d // $1d back
  0f27:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0f2d
  0f2d:32 010e            jmp code_103e 

        code_0f30
  0f30:78               push1 
  0f31:74 01c8          lofss $10fc // (anneau,attirer)<actionner<*/(chanvre,anneau,bell)
  0f34:43 25 02         callk Said 2 

  0f37:2f 12               bt code_0f4b 
  0f39:78               push1 
  0f3a:74 02f0          lofss $122d // actionner/*/bell<anneau
  0f3d:43 25 02         callk Said 2 

  0f40:2f 09               bt code_0f4b 
  0f42:78               push1 
  0f43:74 02b6          lofss $11fc // attirer/(anneau,chanvre)/*<avec
  0f46:43 25 02         callk Said 2 

  0f49:31 0e              bnt code_0f59 

        code_0f4b
  0f4b:7a               push2 
  0f4c:39 03            pushi 3 // $3 y
  0f4e:39 1e            pushi 1e // $1e mode
  0f50:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0f56:32 00e5            jmp code_103e 

        code_0f59
  0f59:78               push1 
  0f5a:74 02b0          lofss $120d // anneau/bell
  0f5d:43 25 02         callk Said 2 

  0f60:31 20              bnt code_0f82 
  0f62:80 00a4            lag global164 
  0f65:31 0d              bnt code_0f74 
  0f67:7a               push2 
  0f68:39 03            pushi 3 // $3 y
  0f6a:39 1d            pushi 1d // $1d back
  0f6c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0f72:33 0b              jmp code_0f7f 

        code_0f74
  0f74:7a               push2 
  0f75:39 03            pushi 3 // $3 y
  0f77:39 1f            pushi 1f // $1f style
  0f79:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0f7f
  0f7f:32 00bc            jmp code_103e 

        code_0f82
  0f82:78               push1 
  0f83:74 0206          lofss $118c // get,get,attirer,anneau/bell,chanvre,anneau
  0f86:43 25 02         callk Said 2 

  0f89:31 42              bnt code_0fcd 
  0f8b:80 00a4            lag global164 
  0f8e:31 0d              bnt code_0f9d 
  0f90:7a               push2 
  0f91:39 03            pushi 3 // $3 y
  0f93:39 1d            pushi 1d // $1d back
  0f95:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0f9b:33 2e              jmp code_0fcb 

        code_0f9d
  0f9d:38 00db          pushi db // $db onControl
  0fa0:78               push1 
  0fa1:78               push1 
  0fa2:81 00              lag gEgo 
  0fa4:4a 06             send 6 

  0fa6:36                push 
  0fa7:35 08              ldi 8 
  0fa9:12                 and 
  0faa:2f 0f               bt code_0fbb 
  0fac:38 00db          pushi db // $db onControl
  0faf:78               push1 
  0fb0:78               push1 
  0fb1:81 00              lag gEgo 
  0fb3:4a 06             send 6 

  0fb5:36                push 
  0fb6:35 04              ldi 4 
  0fb8:12                 and 
  0fb9:31 0c              bnt code_0fc7 

        code_0fbb
  0fbb:39 7a            pushi 7a // $7a setScript
  0fbd:78               push1 
  0fbe:74 03f9          lofss $13ba // pullRope
  0fc1:81 00              lag gEgo 
  0fc3:4a 06             send 6 

  0fc5:33 04              jmp code_0fcb 

        code_0fc7
  0fc7:76               push0 
  0fc8:45 09 00         callb procedure_0009 0 // NotClose 


        code_0fcb
  0fcb:33 71              jmp code_103e 

        code_0fcd
  0fcd:39 03            pushi 3 // $3 y
  0fcf:7c            pushSelf 
  0fd0:8f 01              lsp param1 
  0fd2:39 03            pushi 3 // $3 y
  0fd4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0fda:2f 09               bt code_0fe5 
  0fdc:78               push1 
  0fdd:74 0244          lofss $1224 // chercher,look/bell
  0fe0:43 25 02         callk Said 2 

  0fe3:31 59              bnt code_103e 

        code_0fe5
  0fe5:39 4c            pushi 4c // $4c claimed
  0fe7:78               push1 
  0fe8:78               push1 
  0fe9:87 01              lap param1 
  0feb:4a 06             send 6 

  0fed:80 00a4            lag global164 
  0ff0:31 2f              bnt code_1021 
  0ff2:38 0082          pushi 82 // $82 owner
  0ff5:76               push0 
  0ff6:39 43            pushi 43 // $43 at
  0ff8:78               push1 
  0ff9:39 14            pushi 14 // $14 brLeft
  0ffb:81 09              lag gInventory 
  0ffd:4a 06             send 6 

  0fff:4a 04             send 4 

  1001:36                push 
  1002:35 03              ldi 3 
  1004:1a                 eq? 
  1005:31 0d              bnt code_1014 
  1007:7a               push2 
  1008:39 03            pushi 3 // $3 y
  100a:39 20            pushi 20 // $20 state
  100c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1012:33 0b              jmp code_101f 

        code_1014
  1014:7a               push2 
  1015:39 03            pushi 3 // $3 y
  1017:39 21            pushi 21 // $21 font
  1019:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_101f
  101f:33 1d              jmp code_103e 

        code_1021
  1021:80 00b8            lag global184 
  1024:31 0d              bnt code_1033 
  1026:7a               push2 
  1027:39 03            pushi 3 // $3 y
  1029:39 0f            pushi f // $f lsBottom
  102b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1031:33 0b              jmp code_103e 

        code_1033
  1033:7a               push2 
  1034:39 03            pushi 3 // $3 y
  1036:39 22            pushi 22 // $22 type
  1038:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_103e
  103e:48                 ret 
    )

)

// 14a6
(instance ring of Prop
    (properties
        y $52
        x $4d
        z $0
        heading $0
        yStep $2
        view $cb
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_103f
  103f:39 03            pushi 3 // $3 y
  1041:7c            pushSelf 
  1042:8f 01              lsp param1 
  1044:39 03            pushi 3 // $3 y
  1046:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  104c:2f 09               bt code_1057 
  104e:78               push1 
  104f:74 0164          lofss $11b6 // look/chanvre,anneau
  1052:43 25 02         callk Said 2 

  1055:31 13              bnt code_106a 

        code_1057
  1057:39 4c            pushi 4c // $4c claimed
  1059:78               push1 
  105a:78               push1 
  105b:87 01              lap param1 
  105d:4a 06             send 6 

  105f:7a               push2 
  1060:39 03            pushi 3 // $3 y
  1062:39 23            pushi 23 // $23 window
  1064:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_106a
  106a:48                 ret 
    )

)

// 14f8
(instance arm of Prop
    (properties
        y $1c
        x $2e
        z $0
        heading $0
        yStep $2
        view $22
        loop $4
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $2
        script $0
        cycler $0
        timer $0
    )
)

// 1546
(instance cloud1 of Prop
    (properties
        y $36
        x $115
        z $0
        heading $0
        yStep $2
        view $cb
        loop $2
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 1594
(instance cloud2 of Prop
    (properties
        y $39
        x $d3
        z $0
        heading $0
        yStep $2
        view $cb
        loop $3
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 15e2
(instance bat of Act
    (properties
        y $e
        x $4a
        z $0
        heading $0
        yStep $2
        view $cb
        loop $4
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
    (method (handleEvent) // method_106b
  106b:39 03            pushi 3 // $3 y
  106d:7c            pushSelf 
  106e:8f 01              lsp param1 
  1070:39 03            pushi 3 // $3 y
  1072:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1078:2f 09               bt code_1083 
  107a:78               push1 
  107b:74 0132          lofss $11b0 // look/bat
  107e:43 25 02         callk Said 2 

  1081:31 15              bnt code_1098 

        code_1083
  1083:39 4c            pushi 4c // $4c claimed
  1085:78               push1 
  1086:78               push1 
  1087:87 01              lap param1 
  1089:4a 06             send 6 

  108b:7a               push2 
  108c:39 03            pushi 3 // $3 y
  108e:39 24            pushi 24 // $24 cursor
  1090:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1096:33 14              jmp code_10ac 

        code_1098
  1098:78               push1 
  1099:74 00d6          lofss $1172 // attraper,get/bat
  109c:43 25 02         callk Said 2 

  109f:31 0b              bnt code_10ac 
  10a1:7a               push2 
  10a2:39 03            pushi 3 // $3 y
  10a4:39 25            pushi 25 // $25 max
  10a6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_10ac
  10ac:48                 ret 
    )

)

// 164a
(instance Ladder of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $2e
        nsLeft $1c
        nsBottom $9c
        nsRight $25
    )
    (method (handleEvent) // method_10ad
  10ad:39 03            pushi 3 // $3 y
  10af:7c            pushSelf 
  10b0:8f 01              lsp param1 
  10b2:39 03            pushi 3 // $3 y
  10b4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  10ba:2f 09               bt code_10c5 
  10bc:78               push1 
  10bd:74 00ff          lofss $11bf // look/echelle
  10c0:43 25 02         callk Said 2 

  10c3:31 15              bnt code_10da 

        code_10c5
  10c5:39 4c            pushi 4c // $4c claimed
  10c7:78               push1 
  10c8:78               push1 
  10c9:87 01              lap param1 
  10cb:4a 06             send 6 

  10cd:7a               push2 
  10ce:39 03            pushi 3 // $3 y
  10d0:39 26            pushi 26 // $26 mark
  10d2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  10d8:33 1d              jmp code_10f7 

        code_10da
  10da:78               push1 
  10db:74 00a3          lofss $1181 // climb[/echelle,tour]
  10de:43 25 02         callk Said 2 

  10e1:31 14              bnt code_10f7 
  10e3:83 00              lal local0 
  10e5:31 0c              bnt code_10f3 
  10e7:39 7a            pushi 7a // $7a setScript
  10e9:78               push1 
  10ea:74 0239          lofss $1326 // climbDown
  10ed:81 00              lag gEgo 
  10ef:4a 06             send 6 

  10f1:33 04              jmp code_10f7 

        code_10f3
  10f3:76               push0 
  10f4:45 09 00         callb procedure_0009 0 // NotClose 


        code_10f7
  10f7:48                 ret 
    )

)

// 1676
(instance myIcon of DCIcon
    (properties
        type $4
        state $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        key $0
        said $0
        value $0
        view $1f
        loop $2
        cel $0
        cycler $0
        cycleSpeed $10
        signal $0
        count $ffff
    )
)



(procedure proc_000c
  000c:39 06            pushi 6 // $6 loop
  000e:59 01            &rest 1 
  0010:39 43            pushi 43 // $43 at
  0012:39 6e            pushi 6e // $6e indexOf
  0014:39 19            pushi 19 // $19 time
  0016:39 1e            pushi 1e // $1e mode
  0018:78               push1 
  0019:39 58            pushi 58 // $58 dispose
  001b:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  0021:48                 ret 
)

