diff --git a/1.4 b/2.0b
    index 09f6fc8..d866a2c 100644
    --- a/1.4
    +++ b/2.0b
    @@ -22,7 +22,6 @@
        rm5300 0
        chickenPetite 1
        chickenSound 2
    -   chickenTimerScript 3
        proc5300_4 4
        archDuke 5
        townHallDoor 6
    @@ -32,33 +31,84 @@
        fauxDoor 10
        bull 11
        chinaDoor 12
    +   glint1 13
    +   glint2 14
    +   glint3 15
    +   proc5300_16 16
    +   bigGate 17
    +   fauxSign 18
    +   badger 19
    +   curtain 20
    +   chinaBird 21
    +   mockingBird 22
    +   stork 23
    +   hippo 24
    +   moon 25
    +   nickel 26
    +   yBranch 27
    +   rubChicken 28
        archTalker 29
        chickenTalker 30
        guardTalker 31
    +   cageCover 32
        mockingBirdTalker 33
        snakeTalker 34
        chinaBirdTalker 35
        bullTalker 36
        fauxOwnerTalker 37
    +   fauxDoorExit 38
    +   crook 39
    +   partySound1 40
    +   partySound2 41
    +   feather 45
    +   wagonSign 46
    +   cageDoor 47
    +   iSign 50
    +   sky 51
    +   bigGate 52
    +   littleDoor 53
    +   littleDoorExit 54
    +   chinaDoorExit 55
    +   wagon 56
    +   pool 57
    +   birdCage 58
    +   snakeSalesman 59
    +   chickenRunsOff 61
    +   archDukeTalk 62
    +   unCoverCage 63
    +   openCageDoor 64
    +   getTheChinaBird 65
    +   tryGetBird 66
    +   getBlownOn 67
    +   showTheComb 68
    +   standUpDuke 69
    +   theMoonFalls 70
    +   bobbingMoon 71
    +   mockingBirdFlysAway 72
    +   cantPassDuke 73
    +   stepBackEgo 74
    +   walkThroughDoor 75
    +   partyGoers 76
    +   rosellaFirstEnter 77
    +   snakeChickenCartoon 78
    +   getTheMoon 79
    +   crookFalls 80
    +   talkToChickenAboutMoon 81
     )
     
     (local
        local0
        local1
        local2
    -   local3
    -   [local4 2]
    +   [local3 2]
    +   local5
        local6
    -   local7
        gKQEgoX
        gKQEgoY
        theGRoomFeatureInitCode
    +   local10
        local11
        local12
    -   local13
    -   local14
    -   local15
    -   local16
     )
     (procedure (proc5300_4)
        (cond
    @@ -89,7 +139,7 @@
        )
     )
     
    -(procedure (localproc_77f0 param1 &tmp temp0)
    +(procedure (proc5300_16 param1 &tmp temp0)
        (return
            (if
            (<= (= temp0 (Abs (gNewPlane_2 left:))) param1)
    @@ -100,163 +150,6 @@
        )
     )
     
    -(procedure (localproc_7b59)
    -   (if (global2 obstacles?)
    -       ((global2 obstacles?) dispose:)
    -       (global2 obstacles: 0)
    -   )
    -   (global2
    -       addObstacle:
    -           (if (or (<= global122 4) (proc11_0 202))
    -               ((Polygon new:)
    -                   type: 3
    -                   init:
    -                       16
    -                       117
    -                       39
    -                       121
    -                       102
    -                       129
    -                       191
    -                       124
    -                       232
    -                       110
    -                       264
    -                       101
    -                       299
    -                       101
    -                       342
    -                       119
    -                       449
    -                       123
    -                       497
    -                       109
    -                       536
    -                       121
    -                       587
    -                       121
    -                       562
    -                       110
    -                       548
    -                       113
    -                       507
    -                       104
    -                       475
    -                       86
    -                       475
    -                       70
    -                       455
    -                       75
    -                       432
    -                       68
    -                       416
    -                       75
    -                       358
    -                       75
    -                       345
    -                       70
    -                       307
    -                       70
    -                       294
    -                       77
    -                       251
    -                       95
    -                       216
    -                       102
    -                       142
    -                       111
    -                       100
    -                       111
    -                       45
    -                       99
    -                   yourself:
    -               )
    -           else
    -               ((Polygon new:)
    -                   type: 3
    -                   init:
    -                       57
    -                       105
    -                       57
    -                       116
    -                       21
    -                       116
    -                       14
    -                       117
    -                       39
    -                       121
    -                       102
    -                       129
    -                       191
    -                       124
    -                       232
    -                       110
    -                       264
    -                       101
    -                       299
    -                       101
    -                       342
    -                       119
    -                       449
    -                       123
    -                       497
    -                       109
    -                       536
    -                       121
    -                       587
    -                       121
    -                       562
    -                       108
    -                       548
    -                       113
    -                       507
    -                       104
    -                       475
    -                       86
    -                       475
    -                       70
    -                       455
    -                       75
    -                       432
    -                       68
    -                       416
    -                       75
    -                       357
    -                       75
    -                       343
    -                       68
    -                       307
    -                       68
    -                       294
    -                       77
    -                       251
    -                       95
    -                       216
    -                       102
    -                       142
    -                       111
    -                       100
    -                       111
    -                       51
    -                       98
    -                       39
    -                       105
    -                   yourself:
    -               )
    -           )
    -           ((Polygon new:)
    -               type: 2
    -               init: 396 90 476 98 455 111 341 111 326 108 325 101
    -               yourself:
    -           )
    -           ((Polygon new:)
    -               type: 2
    -               init: 278 94 284 85 374 85 374 90 341 94
    -               yourself:
    -           )
    -   )
    -)
    -
     (instance rm5300 of KQRoom
        (properties
            picture 5301
    @@ -269,23 +162,23 @@
            (super init:)
            (= global372 -1)
            (= temp1 0)
    -       (= local13 0)
    +       (= local10 0)
            (= temp0 5300)
            (= theGRoomFeatureInitCode gRoomFeatureInitCode)
            (= gRoomFeatureInitCode roomFeatureInitCode)
            (proc11_1 55)
    -       (= local6 ((ScriptID 19 1) nsTop?))
    -       (= local7 ((ScriptID 19 0) nsTop?))
    +       (= local5 ((ScriptID 19 1) nsTop?))
    +       (= local6 ((ScriptID 19 0) nsTop?))
            ((ScriptID 19 1) nsTop: 60)
            ((ScriptID 19 0) nsTop: 60)
    -       (localproc_7b59)
    +       (localproc_1162)
            (gKQEgo
                init:
                normalize:
                ignoreActors: 1
                setScaler: Scaler 83 53 98 78
            )
    -       (= local1
    +       (= local0
                (if (or (gKQEgo has: 43) (proc11_0 137))
                else
                    (proc11_0 121)
    @@ -293,17 +186,17 @@
            )
            (if (gKQEgo has: 47) (proc11_1 123))
            (proc11_2 138)
    -       (genericEnterScript register: 0)
    +       ((ScriptID 5302 8) register: 0)
            (switch global12
                (5400
                    (self setRect: 0 0 640 136)
                    (gKQEgo normalize: 3 heading: 0 posn: 20 112)
    -               (self setScript: enterFromGate)
    +               (self setScript: (ScriptID 5300 8))
                )
                (5050
                    (self setRect: 0 0 640 136)
                    (gKQEgo normalize: 3 heading: 0 posn: 127 118)
    -               (genericEnterScript
    +               ((ScriptID 5302 8)
                        register: (chinaDoor cel: 4 yourself:)
                    )
                )
    @@ -316,7 +209,7 @@
                    (self setRect: -318 0 321 136)
                    (gKQEgo normalize: 6 heading: 45 posn: 419 75)
                    (fauxDoor cel: 5)
    -               (genericEnterScript register: fauxDoor)
    +               ((ScriptID 5302 8) register: fauxDoor)
                )
                (6200
                    (self setRect: -318 0 321 136)
    @@ -354,8 +247,8 @@
            (if (and (proc11_0 110) (not (proc11_0 203)))
                (chinaDoorExit init:)
            )
    -       (if (genericEnterScript register?)
    -           (self setScript: genericEnterScript)
    +       (if ((ScriptID 5302 8) register?)
    +           (self setScript: (ScriptID 5302 8))
            )
            (switch global122
                (3
    @@ -367,7 +260,12 @@
                    )
                    (if (and (not (proc11_0 126)) (proc11_0 111))
                        (pool init:)
    -                   (moon init: setScript: bobbingMoon)
    +                   (moon
    +                       view: 5312
    +                       loop: 6
    +                       init:
    +                       setScript: (ScriptID 5300 71)
    +                   )
                    )
                    (proc5300_4)
                    (if (not (proc11_0 113)) (mockingBird init:))
    @@ -382,29 +280,29 @@
                    (if (not (proc11_0 123))
                        (fauxDoor loop: 5 x: 433 y: 71)
                        (UpdateScreenItem fauxDoor)
    -                   (snakeSalesman init: setScript: keepSalesmanBusy)
    +                   (snakeSalesman init: setScript: (ScriptID 5302 0))
                    else
                        (if (proc11_0 122) (fauxDoorExit init:))
                        (wagonSign init:)
                    )
                    (gKQEgo actions: egoActions)
    -               (if local1
    -                   (= local2 (if (< (gKQEgo x?) 181) 181 else 239))
    -                   (= local3
    +               (if local0
    +                   (= local1 (if (< (gKQEgo x?) 181) 181 else 239))
    +                   (= local2
                            (proc64999_3
                                (-
                                    50
                                    (proc64999_2
    -                                   (Abs (GetDistance (gKQEgo x?) 0 local2 0))
    +                                   (Abs (GetDistance (gKQEgo x?) 0 local1 0))
                                        50
                                    )
                                )
                                20
                            )
                        )
    -                   (= local16 1)
    -                   (partySound1 play: local3 0)
    -                   (partySound2 play: local3 0)
    +                   (= local12 1)
    +                   (partySound1 play: local2 0)
    +                   (partySound2 play: local2 0)
                    )
                    (switch global12
                        (5400 0)
    @@ -418,7 +316,7 @@
                                setPri: 88
                                setScaler: Scaler 83 53 98 78
                            )
    -                       (global2 setScript: fromAssembly)
    +                       (global2 setScript: (ScriptID 5302 19))
                        )
                    )
                    (cond
    @@ -436,7 +334,7 @@
                                (not (proc11_0 407))
                            )
                            (proc11_1 407)
    -                       (= local13 1)
    +                       (= local10 1)
                            (global2 setScript: (ScriptID 5301 0))
                        )
                        (
    @@ -473,17 +371,17 @@
                            setPri: 88
                            setScaler: Scaler 83 53 98 78
                        )
    -                   (global2 setScript: fromAssembly)
    +                   (global2 setScript: (ScriptID 5302 19))
                    )
                    (if (not (proc11_1 450))
                        (= temp1 1)
                        (proc11_1 166)
    -                   (global2 setScript: rosellaFirstEnter)
    +                   (global2 setScript: (ScriptID 5300 77))
                    )
                )
                (5
                    (if (not (proc11_0 198))
    -                   (snakeSalesman init: setScript: keepSalesmanBusy)
    +                   (snakeSalesman init: setScript: (ScriptID 5302 0))
                    else
                        (curtain init:)
                    )
    @@ -498,21 +396,21 @@
                        (feather init:)
                    )
                    (if (proc11_0 203)
    -                   (= local2 (if (< (gKQEgo x?) 181) 181 else 239))
    -                   (= local3
    +                   (= local1 (if (< (gKQEgo x?) 181) 181 else 239))
    +                   (= local2
                            (proc64999_3
                                (-
                                    127
                                    (proc64999_2
    -                                   (Abs (GetDistance (gKQEgo x?) 0 local2 0))
    +                                   (Abs (GetDistance (gKQEgo x?) 0 local1 0))
                                        127
                                    )
                                )
                                0
                            )
                        )
    -                   (= local16 1)
    -                   (partySound1 number: 5409 play: local3 0)
    +                   (= local12 1)
    +                   (partySound1 number: 5409 play: local2 0)
                    )
                    (if (gKQEgo has: 48) (sky init:))
                    (if (not (proc11_0 203)) (fauxDoorExit init:))
    @@ -529,16 +427,16 @@
                                setPri: 88
                                setScaler: Scaler 83 53 98 78
                            )
    -                       (global2 setScript: fromAssembly)
    +                       (global2 setScript: (ScriptID 5302 19))
                        else
    -                       (global2 setScript: escortedOutOfTownHall)
    +                       (global2 setScript: (ScriptID 5302 14))
                        )
                    )
                )
            )
            (if
                (and
    -               (= local11 (gNewCast contains: snakeSalesman))
    +               (= global377 (gNewCast contains: snakeSalesman))
                    (== global12 5000)
                )
                (= temp0 5325)
    @@ -565,7 +463,7 @@
                        (proc11_0 138)
                        (gKQEgo has: 42)
                        (gNewCast contains: cageCover)
    -                   (not (localproc_77f0 (- (cageCover nsLeft?) 40)))
    +                   (not (proc5300_16 (- (cageCover nsLeft?) 40)))
                    )
                    (cageCover dispose:)
                    (cageDoor cel: 0)
    @@ -574,49 +472,48 @@
                (if (not script)
                    (if
                    (and (not (proc11_0 110)) (>= (gKQEgo x?) 107))
    -                   (global2 setScript: cantPassDuke)
    +                   (global2 setScript: (ScriptID 5300 73))
                    )
    -               (if
    -               (and (not (proc11_0 409)) (localproc_77f0 561))
    +               (if (and (not (proc11_0 409)) (proc5300_16 561))
                        (proc11_1 409)
                        (if (proc11_0 97) (gKQEgo setMotion: 0))
                        (snakeSalesman setScript: 0)
    -                   (global2 setScript: snakeChickenCartoon)
    +                   (global2 setScript: (ScriptID 5300 78))
                    )
                    (if
                        (and
                            (proc11_0 407)
    -                       (not local13)
    +                       (not local10)
                            (not (proc11_0 408))
    -                       (localproc_77f0 193)
    +                       (proc5300_16 193)
                        )
                        (proc11_1 408)
    -                   (global2 setScript: partyGoers)
    +                   (global2 setScript: (ScriptID 5300 76))
                    )
                    (if
                        (and
                            (not (proc11_0 111))
                            (gKQEgo has: 47)
    -                       (localproc_77f0 500)
    +                       (proc5300_16 500)
                        )
                        (proc11_1 111)
    -                   (global2 setScript: moveEgoIntoPosition)
    +                   (global2 setScript: (ScriptID 5302 9))
                    )
                )
    -           (if local16
    +           (if local12
                    (if
                    (not (if (<= 181 (gKQEgo x?)) (<= (gKQEgo x?) 239)))
                        (cond
    -                       ((localproc_77f0 239)
    -                           (= local2 (if (< (gKQEgo x?) 181) 181 else 239))
    +                       ((proc5300_16 239)
    +                           (= local1 (if (< (gKQEgo x?) 181) 181 else 239))
                                (if
                                    (!=
    -                                   (= local3
    +                                   (= local2
                                            (proc64999_3
                                                (-
                                                    50
                                                    (proc64999_2
    -                                                   (Abs (GetDistance (gKQEgo x?) 0 local2 0))
    +                                                   (Abs (GetDistance (gKQEgo x?) 0 local1 0))
                                                        50
                                                    )
                                                )
    @@ -625,8 +522,8 @@
                                        )
                                        (partySound1 vol?)
                                    )
    -                               (partySound1 setVol: local3)
    -                               (partySound2 setVol: local3)
    +                               (partySound1 setVol: local2)
    +                               (partySound2 setVol: local2)
                                )
                            )
                            ((partySound1 vol?) (partySound1 setVol: 20) (partySound2 setVol: 20))
    @@ -635,20 +532,20 @@
                )
            )
            (if (== global122 5)
    -           (if local16
    +           (if local12
                    (if
                    (not (if (<= 181 (gKQEgo x?)) (<= (gKQEgo x?) 239)))
                        (cond
    -                       ((localproc_77f0 239)
    -                           (= local2 (if (< (gKQEgo x?) 181) 181 else 239))
    +                       ((proc5300_16 239)
    +                           (= local1 (if (< (gKQEgo x?) 181) 181 else 239))
                                (if
                                    (!=
    -                                   (= local3
    +                                   (= local2
                                            (proc64999_3
                                                (-
                                                    127
                                                    (proc64999_2
    -                                                   (Abs (GetDistance (gKQEgo x?) 0 local2 0))
    +                                                   (Abs (GetDistance (gKQEgo x?) 0 local1 0))
                                                        127
                                                    )
                                                )
    @@ -657,7 +554,7 @@
                                        )
                                        (partySound1 vol?)
                                    )
    -                               (partySound1 setVol: local3)
    +                               (partySound1 setVol: local2)
                                )
                            )
                            ((partySound1 vol?) (partySound1 setVol: 0))
    @@ -666,40 +563,39 @@
                )
                (if
                    (and
    -                   local16
    +                   local12
                        (not (proc11_0 347))
                        (<= 181 (gKQEgo x?))
                        (<= (gKQEgo x?) 239)
    +                   (proc11_0 203)
                    )
                    (proc11_1 347)
                    (global2 setScript: (ScriptID 5301 6))
                )
            )
    -       (if (not local12)
    +       (if (not global378)
                (if
                    (and
    -                   local11
    -                   (localproc_77f0 541)
    +                   global377
    +                   (proc5300_16 541)
                        (== (gKqMusic1 number?) 5300)
                    )
    -               (= local12 1)
    -               (gKQEgo setScript: switchMusic 0 5325)
    +               (= global378 1)
    +               (gKQEgo setScript: (ScriptID 5302 23) 0 5325)
                )
                (if
                    (and
                        (!= (gKqMusic1 number?) 5300)
    -                   (or (not (localproc_77f0 541)) (not local11))
    +                   (or (not (proc5300_16 541)) (not global377))
                    )
    -               (= local12 1)
    -               (gKQEgo setScript: switchMusic 0 5300)
    +               (= global378 1)
    +               (gKQEgo setScript: (ScriptID 5302 23) 0 5300)
                )
            )
        )
       
        (method (dispose)
            (gKQEgo actions: 0)
    -       (DisposeScript 5301)
    -       (DisposeScript -597)
            (super dispose:)
        )
       
    @@ -710,15 +606,15 @@
                        (proc64999_5
                            theScript
                            (ScriptID 5301 2)
    -                       rosellaFirstEnter
    -                       escortedOutOfTownHall
    +                       (ScriptID 5300 77)
    +                       (ScriptID 5302 14)
                        )
                    )
                    (proc64999_5
                        script
    -                   genericEnterScript
    -                   enterFromGate
    -                   fromAssembly
    +                   (ScriptID 5302 8)
    +                   (ScriptID 5300 8)
    +                   (ScriptID 5302 19)
                    )
                )
                (script next: theScript)
    @@ -730,8 +626,8 @@
       
        (method (newRoom)
            (= gRoomFeatureInitCode theGRoomFeatureInitCode)
    -       ((ScriptID 19 1) nsTop: local6)
    -       ((ScriptID 19 0) nsTop: local7)
    +       ((ScriptID 19 1) nsTop: local5)
    +       ((ScriptID 19 0) nsTop: local6)
            (super newRoom: &rest)
        )
       
    @@ -741,2629 +637,307 @@
        )
     )
     
    -(instance genericEnterScript of Script
    -   (properties)
    -  
    -   (method (doit)
    -       (super doit:)
    -       (if
    -           (and
    -               (gKQEgo mover?)
    -               ((global2 obstacles?)
    -                   firstTrue: #onMe (gKQEgo x?) (gKQEgo y?)
    -               )
    -           )
    -           (gKQEgo setMotion: 0)
    -           (= cycles 1)
    -       )
    +(instance glint1 of Prop
    +   (properties
    +       x 365
    +       y 92
    +       priority 109
    +       fixPriority 1
    +       view 5300
    +       loop 4
    +       cycleSpeed 9
        )
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (Load rsCDAUDIO 802)
    -               (gKQEgo
    -                   posn: (register approachX?) (register approachY?)
    -               )
    -               (= cycles 1)
    -           )
    -           (1
    -               (register cel: (register lastCel:) setCycle: Beg self)
    -           )
    -           (2
    -               (gKqSound1 number: 802 setLoop: 1 play:)
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (3
    -               (if
    -                   (not
    -                       ((global2 obstacles?)
    -                           firstTrue: #onMe (gKQEgo x?) (gKQEgo y?)
    -                       )
    -                   )
    -                   (gKQEgo setMotion: MoveTo (gKQEgo x?) 150)
    -               else
    -                   (= cycles 1)
    -               )
    -           )
    -           (4
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    +   (method (init)
    +       (super init: &rest)
    +       (self setScript: (ScriptID 5301 9))
        )
     )
     
    -(instance enterFromGate of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (littleDoor cel: (littleDoor lastCel:))
    -               (= cycles 4)
    -           )
    -           (1
    -               (gKQEgo normalize: 3)
    -               (= cycles 1)
    -           )
    -           (2
    -               (littleDoor setCycle: Beg self)
    -           )
    -           (3
    -               (gKqSound1 number: 802 loop: 1 play:)
    -               (gKQEgo setHeading: 90 self)
    -           )
    -           (4
    -               (if (== next (ScriptID 5301 0))
    -                   (gKQEgo setMotion: MoveTo 60 (gKQEgo y?) self)
    -               else
    -                   (gKQEgo setMotion: MoveTo 40 (gKQEgo y?) self)
    -               )
    -           )
    -           (5
    -               (if (and (not next) (== client global2))
    -                   (global1 handsOn:)
    -               )
    -               (self dispose:)
    -           )
    -       )
    +(instance glint2 of Prop
    +   (properties
    +       x 414
    +       y 94
    +       priority 109
    +       fixPriority 1
    +       view 5300
    +       loop 5
    +       cycleSpeed 10
        )
     )
     
    -(instance chickenRunsOff of Script
    -   (properties)
    +(instance glint3 of Prop
    +   (properties
    +       x 394
    +       y 93
    +       priority 109
    +       fixPriority 1
    +       view 5300
    +       loop 6
    +       cycleSpeed 14
    +   )
    +)
    +
    +(instance chinaDoor of Prop
    +   (properties
    +       noun 11
    +       approachX 116
    +       approachY 109
    +       x 128
    +       y 104
    +       priority 10
    +       fixPriority 1
    +       view 5302
    +   )
       
        (method (init)
    -       (proc11_2 539)
            (super init: &rest)
    +       (if (and (proc11_0 203) (not (proc11_0 284)))
    +           (self setHotspot: 8 10 approachVerbs: 8)
    +       )
        )
       
    -   (method (dispose)
    -       (proc11_2 539)
    -       (super dispose:)
    +   (method (doVerb)
    +       (global2 setScript: (ScriptID 5302 6))
    +   )
    +)
    +
    +(instance fauxDoor of Prop
    +   (properties
    +       noun 12
    +       approachX 435
    +       approachY 69
    +       x 439
    +       y 69
    +       z 3
    +       priority 66
    +       fixPriority 1
    +       view 5302
    +       loop 2
        )
       
    -   (method (changeState newState &tmp temp0)
    -       (if (not (proc11_0 539))
    -           (switch (= state newState)
    -               (0
    -                   (global1 handsOff: 1)
    -                   (gKqMusic1 pause: 1)
    -                   (chickenSound number: 5310 loop: -1 play:)
    -                   (chickenPetite
    -                       view: 5311
    -                       setLoop: 6 1
    -                       setCel: 0
    -                       setPri: -1
    -                       setCycle: End self
    -                   )
    -               )
    -               (1
    -                   (if (< (chickenPetite x?) 320)
    -                       (= global372 8)
    -                       (proc11_3 gKQEgo 315 104 0)
    -                       (chickenPetite
    -                           setLoop: 7 1
    -                           setCel: 0
    -                           setCycle: Walk
    -                           setMotion: PolyPath 315 104 self
    -                       )
    -                   else
    -                       (= global372 9)
    -                       (= temp0 (- (Abs (gNewPlane_2 left:)) 15))
    -                       (proc11_3 gKQEgo temp0 (chickenPetite y?) 0)
    -                       (chickenPetite
    -                           setLoop: 0 1
    -                           setCycle: Walk
    -                           setMotion: PolyPath temp0 (chickenPetite y?) self
    -                       )
    -                   )
    -                   (gKqMessager say: 0 0 13 0 chickenPetite)
    +   (method (init)
    +       (super init:)
    +       (if (not (proc11_0 276)) (self setHotspot: 8 10))
    +       (self
    +           approachVerbs: 8
    +           setPolygon:
    +               ((Polygon new:)
    +                   type: 1
    +                   init: 438 65 446 67 443 30 431 33
    +                   yourself:
                    )
    -               (2
    -                   (chickenSound fade:)
    -                   (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    -                   (chickenPetite setCycle: 0)
    -                   (proc5300_4)
    -                   (global1 handsOn:)
    -                   (self dispose:)
    +       )
    +   )
    +  
    +   (method (doVerb)
    +       (cond
    +           ((== global104 -4)
    +               (cond
    +                   ((proc11_0 203) (global2 setScript: (ScriptID 5301 4)))
    +                   ((== global122 5) (global2 setScript: (ScriptID 5302 4)))
    +                   ((and (proc11_0 120) (proc11_0 121)) (gKqMessager say: 8 8 34 0))
    +                   ((not (proc11_0 123)) (gKqMessager say: 8 8 33 0))
    +                   ((proc11_0 122) (global2 setScript: (ScriptID 5302 4)))
    +                   (else (global2 setScript: (ScriptID 5300 75)))
                    )
                )
    -       else
    -           (chickenSound stop:)
    -           (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    -           (chickenPetite setCycle: 0 setMotion: 0)
    -           (proc5300_4)
    -           (global1 handsOn:)
    -           (self dispose:)
    +           ((proc11_0 149) (global2 setScript: (ScriptID 5302 4)))
    +           (else (global2 setScript: (ScriptID 5300 75)))
    +       )
    +   )
    +  
    +   (method (onMe param1 &tmp temp0)
    +       (if
    +           (and
    +               (= temp0 (super onMe: param1))
    +               (param1 type?)
    +               (== loop 5)
    +           )
    +           (= approachX (- x 3))
    +           (= approachY y)
            )
    +       (return temp0)
        )
     )
     
    -(instance archDukeTalk of Script
    -   (properties)
    -  
    -   (method (doit)
    -       (super doit:)
    -       (if (and (== state 1) register) (self cue:))
    -   )
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (archDuke
    -                   view: 5303
    -                   setLoop: 0
    -                   setCel: 0
    -                   posn: 147 115
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (if (not register)
    -                   (archDuke setLoop: 1 setCel: 0 setCycle: Fwd)
    -               else
    -                   (self cue:)
    -               )
    -           )
    -           (2
    -               (archDuke setLoop: 2 setCel: 0 setCycle: CT 16 1 self)
    -           )
    -           (3
    -               (gKQEgo setScript: getBlownOn)
    -               (archDuke setLoop: 2 setCel: 17 setCycle: CT 20 1 self)
    -           )
    -           (4
    -               (gKqSound1 number: 5305 loop: 1 play:)
    -               (archDuke setCycle: CT 24 1 self)
    -           )
    -           (5
    -               (gKqSound1 stop:)
    -               (archDuke setCycle: End self)
    -           )
    -           (6 (self dispose:))
    -       )
    -   )
    -)
    -
    -(instance getBlownOn of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKQEgo
    -                   view: 5303
    -                   setLoop: 8
    -                   cel: 0
    -                   setScale: 0
    -                   posn: (+ (gKQEgo x?) 25) (gKQEgo y?)
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (gKQEgo
    -                   normalize: 0
    -                   x: (- (gKQEgo x?) 25)
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance showTheComb of Script
    -   (properties)
    -  
    -   (method (init)
    -       (proc11_2 539)
    -       (super init: &rest)
    -   )
    -  
    -   (method (dispose)
    -       (proc11_2 539)
    -       (super dispose:)
    -   )
    -  
    -   (method (changeState newState)
    -       (if (not (proc11_0 539))
    -           (switch (= state newState)
    -               (0
    -                   (global1 handsOff: 1)
    -                   (Load rsVIEW 5303)
    -                   (Load rsCDAUDIO 5305)
    -                   (Load rsVIEW 8132)
    -                   (Load rsVIEW 5334)
    -                   (= register (gKQEgo cycleSpeed?))
    -                   (gKQEgo
    -                       view: 8241
    -                       setLoop:
    -                           (if
    -                               (and
    -                                   (< 0 (gKQEgo heading?))
    -                                   (< (= register (gKQEgo cycleSpeed?)) 180)
    -                               )
    -                               0
    -                           else
    -                               1
    -                           )
    -                       setCel: 0
    -                       cycleSpeed: 12
    -                       setCycle: CT 20 1 self
    -                   )
    -               )
    -               (1
    -                   (gKqSound1 number: 1256 setLoop: -1 play:)
    -                   (gKQEgo setCycle: End self)
    -               )
    -               (2
    -                   (gKQEgo setCycle: CT 20 -1 self)
    -               )
    -               (3
    -                   (gKqSound1 setLoop: 1 stop:)
    -                   (gKQEgo setCycle: Beg self)
    -               )
    -               (4
    -                   (gKQEgo
    -                       normalize: 0
    -                       setScaler: Scaler 83 53 98 78
    -                       cycleSpeed: register
    -                   )
    -                   (= cycles 1)
    -               )
    -               (5
    -                   (archTalker clientCel: -2 hide_mouth: 1 modeless: 2)
    -                   (gKqMessager say: 1 5 6 1 self)
    -               )
    -               (6
    -                   (self setScript: archDukeTalk self)
    -                   (gKqMessager say: 1 5 6 2 self)
    -               )
    -               (7 (script register: 1))
    -               (8
    -                   (gKqMusic1 pause: 1)
    -                   (chickenSound number: 5310 loop: -1 play:)
    -                   (archTalker clientCel: -1 hide_mouth: 0 modeless: 1)
    -                   (self setScript: standUpDuke self self)
    -                   (= register (gKQEgo cycleSpeed?))
    -                   (chickenPetite
    -                       posn: 308 102
    -                       setPri: 130
    -                       view: 5303
    -                       setLoop: 4
    -                       setCel: 0
    -                       init:
    -                       setCycle: CT 16 1 self
    -                   )
    -                   (chickenTalker modeless: 2)
    -                   (= global372 7)
    -                   (gKqMessager say: 1 5 6 3 chickenPetite)
    -               )
    -               (9
    -                   (chickenPetite setCycle: CT 36 1 self)
    -                   (gKQEgo
    -                       view: 8132
    -                       setLoop: 0
    -                       setCel: 6
    -                       cycleSpeed: 13
    -                       setCycle: Beg
    -                   )
    -               )
    -               (10
    -                   (chickenPetite setCycle: End self)
    -                   (gKQEgo setCycle: End)
    -               )
    -               (11
    -                   (chickenSound fade:)
    -                   (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    -                   (gKQEgo
    -                       normalize: 0
    -                       setScaler: Scaler 83 53 98 78
    -                       cycleSpeed: register
    -                   )
    -                   (proc5300_4)
    -                   (= cycles 2)
    -               )
    -               (12
    -                   (archTalker clientCel: 4)
    -                   (gKqMessager say: 1 5 6 4 self)
    -               )
    -               (13
    -                   (archTalker clientCel: -1)
    -                   (archDuke setCycle: CT 12 1 self)
    -               )
    -               (14
    -                   (archDuke setPri: 86 setCycle: End self)
    -               )
    -               (15
    -                   (archDuke hide:)
    -                   (townHallDoor setHotspot: 8 10 setCycle: Beg self)
    -               )
    -               (16
    -                   (gKqSound1 number: 802 setLoop: 1 play:)
    -                   (archDuke
    -                       view: 5334
    -                       setLoop: 3 1
    -                       cel: 0
    -                       posn: 218 88
    -                       setPri: 82
    -                       show:
    -                       setCycle: Walk
    -                       setScaler: Scaler 92 73 86 78
    -                       setMotion: MoveTo 177 75 self
    -                   )
    -               )
    -               (17
    -                   (chickenTalker modeless: 1)
    -                   (archDuke dispose:)
    -                   (proc11_1 110)
    -                   (if (gKQEgo scratch?)
    -                       (gKQEgo addRespondVerb: 51)
    -                   else
    -                       (gKQEgo setHotspot: 0 51)
    -                   )
    -                   (chinaDoorExit init:)
    -                   (global1 handsOn:)
    -                   (self dispose:)
    -               )
    -           )
    -       else
    -           (switch (= state newState)
    -               (0
    -                   (gKqSound1 stop:)
    -                   (gKQEgo setScript: 0)
    -                   (if script (script caller: 0))
    -                   (= cycles 2)
    -               )
    -               (1
    -                   (gKQEgo
    -                       normalize: 0
    -                       setScaler: Scaler 83 53 98 78
    -                       posn: (archDuke approachX?) (archDuke approachY?)
    -                       cycleSpeed: register
    -                   )
    -                   (archDuke dispose:)
    -                   (proc11_1 110)
    -                   (if (gKQEgo scratch?)
    -                       (gKQEgo addRespondVerb: 51)
    -                   else
    -                       (gKQEgo setHotspot: 0 51)
    -                   )
    -                   (chickenPetite setCycle: 0 setMotion: 0)
    -                   (proc5300_4)
    -                   (archTalker clientCel: -1 hide_mouth: 0 modeless: 1)
    -                   (chickenTalker modeless: 1)
    -                   (chinaDoorExit init:)
    -                   (chickenSound fade:)
    -                   (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    -                   (archTalker clientCel: -1)
    -                   (townHallDoor setHotspot: 8 10 cel: 0)
    -                   (UpdateScreenItem townHallDoor)
    -                   (global1 handsOn:)
    -                   (self dispose:)
    -               )
    -           )
    -       )
    -   )
    -)
    -
    -(instance standUpDuke of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (archDuke
    -                   posn: 147 116
    -                   setLoop: 3
    -                   setCel: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (archDuke
    -                   posn: 206 107
    -                   setLoop: 5
    -                   setCel: 0
    -                   setCycle: CT 4 1 self
    -               )
    -           )
    -           (2 (self dispose:))
    -       )
    -   )
    -)
    -
    -(instance theMoonFalls of Script
    -   (properties)
    -  
    -   (method (init)
    -       (proc11_2 539)
    -       (super init: &rest)
    -   )
    -  
    -   (method (dispose)
    -       (proc11_2 539)
    -       (super dispose:)
    -   )
    -  
    -   (method (changeState newState)
    -       (if (not (proc11_0 539))
    -           (switch (= state newState)
    -               (0
    -                   (global1 handsOff: 1)
    -                   (Load rsCDAUDIO 907)
    -                   (Load rsCDAUDIO 854)
    -                   (Load rsCDAUDIO 836)
    -                   (Load rsVIEW 5314)
    -                   (localproc_7b59)
    -                   (= global372 9)
    -                   (chickenPetite
    -                       view: 5311
    -                       setLoop: 0 1
    -                       setCycle: Walk
    -                       posn: 607 117
    -                       moveSpeed: 3
    -                       setPri: -1
    -                       init:
    -                       setMotion: MoveTo 500 107 self
    -                   )
    -                   (chickenTalker hide_mouth: 1 modeless: 2)
    -                   (gKqMessager say: 0 0 16 1 chickenPetite)
    -               )
    -               (1
    -                   (chickenPetite setMotion: PolyPath 468 94 self)
    -               )
    -               (2
    -                   (chickenPetite setMotion: PolyPath 393 86 self)
    -               )
    -               (3
    -                   (chickenPetite setMotion: PolyPath 321 102 self)
    -               )
    -               (4
    -                   (= global372 8)
    -                   (chickenPetite
    -                       setLoop: (if (global84 size:) 7 else 8) 1
    -                   )
    -                   (chickenPetite setMotion: PolyPath 402 117 self)
    -               )
    -               (5
    -                   (chickenPetite setMotion: PolyPath 477 98 self)
    -               )
    -               (6
    -                   (= global372 8)
    -                   (chickenPetite
    -                       setLoop: (if (global84 size:) 0 else 9) 1
    -                   )
    -                   (chickenPetite setMotion: PolyPath 468 94 self)
    -               )
    -               (7
    -                   (= global372 -1)
    -                   (chickenPetite
    -                       view: 5314
    -                       setLoop: 5
    -                       cel: 0
    -                       x: 475
    -                       y: 135
    -                       setPri: 100
    -                       setCycle: 0
    -                   )
    -                   (UnLoad 128 5311)
    -                   (chickenTalker hide_mouth: 1 clientCel: -2)
    -                   (moon
    -                       view: 5314
    -                       loop: 0
    -                       cel: 0
    -                       x: 382
    -                       y: 95
    -                       setPri: 150
    -                       init:
    -                       setCycle: End self
    -                   )
    -               )
    -               (8
    -                   (moon loop: 1 cel: 0 setCycle: End self)
    -               )
    -               (9
    -                   (mockingBird
    -                       view: 5314
    -                       loop: 3
    -                       cel: 0
    -                       x: 349
    -                       y: 49
    -                       z: 0
    -                       setPri: 150
    -                       setCycle: CT 2 1
    -                   )
    -                   (moon loop: 2 cel: 0 setCycle: CT 1 1 self)
    -               )
    -               (10
    -                   (gKqSound1 number: 907 loop: 1 play:)
    -                   (moon loop: 2 setCycle: CT 11 1 self)
    -               )
    -               (11
    -                   (self setScript: mockingBirdFlysAway)
    -                   (moon setCycle: End self)
    -               )
    -               (12
    -                   (chickenPetite setPri: -1 setCycle: CT 6 1 self)
    -               )
    -               (13
    -                   (archDukeSound number: 854 loop: 1 play:)
    -                   (chickenPetite setCycle: End self)
    -               )
    -               (14
    -                   (gKqSound1 number: 836 loop: 1 play:)
    -                   (chickenPetite
    -                       view: 5315
    -                       loop: 0
    -                       cel: 0
    -                       posn: 415 93
    -                       setPri: 125
    -                       setCycle: End self
    -                   )
    -               )
    -               (15
    -                   (moon setScript: bobbingMoon)
    -                   (gKqSound1 number: 836 loop: 1 play:)
    -                   (chickenPetite loop: 1 cel: 0 setCycle: End self)
    -               )
    -               (16
    -                   (chickenPetite
    -                       loop: 2
    -                       cel: 0
    -                       setHotspot: 8 10
    -                       approachVerbs: 8
    -                       setPri: 110
    -                       setCycle: End self
    -                   )
    -               )
    -               (17
    -                   (global1 handsOn:)
    -                   (pool init:)
    -                   (self dispose:)
    -               )
    -           )
    -       else
    -           (self setScript: 0)
    -           (gKqSound1 stop:)
    -           (proc11_1 113)
    -           (mockingBird dispose:)
    -           (chickenPetite view: 5315 loop: 2)
    -           (chickenPetite
    -               cel: (chickenPetite lastCel:)
    -               posn: 415 93
    -               setPri: 110
    -               setMotion: 0
    -               setCycle: 0
    -               setHotspot: 8 10
    -               approachVerbs: 8
    -           )
    -           (nickel init:)
    -           (if (not (moon script?))
    -               (moon init: setScript: bobbingMoon)
    -           )
    -           (gKQEgo normalize: 5)
    -           (pool init:)
    -           (global1 handsOn:)
    -           (self dispose:)
    -       )
    -   )
    -)
    -
    -(instance bobbingMoon of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (moon
    -                   setLoop: 6 1
    -                   cel: 14
    -                   cycleSpeed: 8
    -                   posn: 409 93
    -                   setPri: 110
    -                   setCycle: Beg self
    -               )
    -           )
    -           (1
    -               (if register
    -                   (moon setCycle: End self)
    -               else
    -                   (-- state)
    -                   (moon setCycle: ROsc 1 4 9 self)
    -               )
    -           )
    -           (2 (self dispose:))
    -       )
    -   )
    -)
    -
    -(instance mockingBirdFlysAway of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKqSound1 number: 5312 loop: 1 play:)
    -               (mockingBird view: 5314 loop: 3 cel: 2 setCycle: End self)
    -           )
    -           (1
    -               (nickel init:)
    -               (mockingBird
    -                   setLoop: 4 1
    -                   cel: 0
    -                   setCycle: Fwd
    -                   posn: 362 52
    -                   setPri: 150
    -                   moveSpeed: 1
    -                   setMotion: MoveTo 640 1 self
    -               )
    -           )
    -           (2
    -               (proc11_1 113)
    -               (mockingBird dispose:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance cantPassDuke of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo setMotion: 0)
    -               (= cycles 1)
    -           )
    -           (1
    -               (archTalker modeless: 2)
    -               (gKqMessager say: 0 0 2 0 self)
    -               (self setScript: stepBackEgo self)
    -           )
    -           (2 0)
    -           (3
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance stepBackEgo of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKQEgo
    -                   view: 8021
    -                   setLoop: 0
    -                   setCel: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (gKQEgo
    -                   normalize: 0
    -                   setScaler: Scaler 83 53 98 78
    -                   posn: 90 (gKQEgo y?)
    -                   ignoreActors: 1
    -               )
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance walkThroughDoor of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKqSound1 number: 801 loop: 1 play:)
    -               (fauxDoor setCycle: End self)
    -           )
    -           (1
    -               (gKQEgo setMotion: MoveTo 457 69 self)
    -           )
    -           (2
    -               (gKQEgo setMotion: MoveTo 466 69 self)
    -           )
    -           (3
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (4 (= seconds 3))
    -           (5
    -               (gKQEgo
    -                   setMotion: MoveTo (fauxDoor approachX?) (fauxDoor approachY?) self
    -               )
    -           )
    -           (6
    -               (fauxDoor setCycle: Beg self)
    -           )
    -           (7
    -               (gKqSound1 number: 802 loop: 1 play:)
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance partyGoers of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (if (not (proc11_0 539))
    -           (switch (= state newState)
    -               (0
    -                   (global1 handsOff: 1)
    -                   (gKQEgo setMotion: 0)
    -                   (proc11_3 gKQEgo badger 0)
    -                   (stork setCycle: CT 11 1 self)
    -                   (hippo setCycle: CT 9 1 self)
    -               )
    -               (1 0)
    -               (2
    -                   (badger setCycle: CT 12 1 self)
    -               )
    -               (3
    -                   (guardTalker clientCel: -2 client: badger)
    -                   (gKqMessager say: 0 0 15 0 self)
    -               )
    -               (4
    -                   (badger setPri: 110 setCycle: End self)
    -               )
    -               (5
    -                   (stork setCycle: End self)
    -                   (hippo setCycle: End self)
    -               )
    -               (6 0)
    -               (7
    -                   (stork dispose:)
    -                   (hippo view: -12406 setLoop: 0 cel: 0 setCycle: End self)
    -               )
    -               (8
    -                   (hippo dispose:)
    -                   (badger setCycle: CT 15 -1 self)
    -               )
    -               (9
    -                   (badger
    -                       view: 5305
    -                       setLoop: 3
    -                       posn: 217 93
    -                       cel: 0
    -                       setPri: 82
    -                       setCycle: End self
    -                   )
    -               )
    -               (10
    -                   (badger dispose:)
    -                   (townHallDoor setCycle: Beg self)
    -               )
    -               (11
    -                   (gKqSound1 number: 802 loop: 1 play:)
    -                   (global1 handsOn:)
    -                   (self dispose:)
    -               )
    -           )
    -       else
    -           (proc11_2 539)
    -           (gKqSound1 stop:)
    -           (badger dispose:)
    -           (hippo dispose:)
    -           (stork dispose:)
    -           (townHallDoor cel: 0)
    -           (UpdateScreenItem townHallDoor)
    -           (global1 handsOn:)
    -           (self dispose:)
    -       )
    -   )
    -)
    -
    -(instance rosellaFirstEnter of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (Load rsSOUND 5307)
    -               (Load rsSOUND 5308)
    -               (Load rsCDAUDIO 5408)
    -               (townHallDoor cel: 4 setPri: 80)
    -               (archDukeSound number: 5307 loop: -1 play:)
    -               (archDuke
    -                   view: 5341
    -                   loop: 0
    -                   cel: 0
    -                   x: 229
    -                   y: 105
    -                   cycleSpeed: 10
    -                   init:
    -                   setCycle: Fwd
    -               )
    -               (self setScript: enterFromGate self)
    -           )
    -           (1
    -               (gKQEgo setMotion: PolyPath 170 111 self)
    -           )
    -           (2
    -               (archDukeSound number: 5308 loop: 1 play:)
    -               (archDuke cel: 0 setCycle: End self)
    -           )
    -           (3
    -               (archDuke loop: 1 cel: 0 x: 233 y: 105 setCycle: End self)
    -           )
    -           (4
    -               (archDuke loop: 2 cel: 0 x: 233 y: 105 setCycle: End self)
    -           )
    -           (5
    -               (archDukeSound fade: 0 50 20 1)
    -               (archTalker clientCel: -2)
    -               (gKqMessager sayRange: 0 0 35 1 3 self)
    -           )
    -           (6
    -               (archDukeSound number: 5307 loop: -1 play:)
    -               (archDuke
    -                   view: 5341
    -                   loop: 0
    -                   cel: 0
    -                   x: 229
    -                   y: 105
    -                   setCycle: Fwd
    -               )
    -               (= seconds 3)
    -           )
    -           (7
    -               (archDukeSound number: 5308 loop: 1 play: fade: 0 50 20 1)
    -               (archDuke
    -                   view: 5342
    -                   loop: 0
    -                   cel: 0
    -                   x: 233
    -                   y: 103
    -                   setCycle: End self
    -               )
    -           )
    -           (8
    -               (gKqSound1 number: 5408 loop: 1 play:)
    -               (archDuke view: 5342 loop: 1 cel: 0 x: 233 y: 103)
    -               (UpdateScreenItem archDuke)
    -               (FrameOut)
    -               (= cycles 1)
    -           )
    -           (9
    -               (archTalker hide_mouth: 1 clientCel: -2)
    -               (gKqMessager say: 0 0 35 4 self)
    -           )
    -           (10
    -               (gKqMusic1 loop: -1 play: setVol: 0 fade: 127 25 10 0)
    -               (archDuke
    -                   view: 5334
    -                   setLoop: 3 1
    -                   cel: 0
    -                   x: 234
    -                   y: 100
    -                   setPri: 82
    -                   setCycle: Walk
    -                   setMotion: MoveTo 177 75 self
    -               )
    -           )
    -           (11
    -               (archDuke dispose:)
    -               (townHallDoor setCycle: Beg self)
    -           )
    -           (12
    -               (gKqSound1 number: 802 loop: 1 play:)
    -               (if (not (proc11_1 167))
    -                   ((ScriptID 13 0) hide_mouth: 1)
    -                   (gKqMessager say: 0 0 36 0 self)
    -               else
    -                   (self cue:)
    -               )
    -           )
    -           (13
    -               ((ScriptID 13 0) hide_mouth: 0)
    -               (if (gKQEgo scratch?)
    -                   (gKQEgo addRespondVerb: 51)
    -               else
    -                   (gKQEgo setHotspot: 0 51)
    -               )
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance snakeChickenCartoon of Script
    -   (properties)
    -  
    -   (method (init)
    -       (proc11_2 539)
    -       (super init: &rest)
    -   )
    -  
    -   (method (dispose)
    -       (proc11_2 539)
    -       (super dispose:)
    -   )
    -  
    -   (method (changeState newState)
    -       (if (not (proc11_0 539))
    -           (switch (= state newState)
    -               (0
    -                   (global1 handsOff: 1)
    -                   (Load rsVIEW 5323)
    -                   (Load rsVIEW 5325)
    -                   (chickenPetite
    -                       view: 5323
    -                       loop: 0
    -                       cel: 0
    -                       x: 520
    -                       y: 108
    -                       init:
    -                   )
    -                   (chickenTalker hide_mouth: 0 clientCel: -2 modeless: 2)
    -                   (gKqMessager say: 0 0 21 1 self)
    -               )
    -               (1
    -                   (snakeSalesman
    -                       view: 5323
    -                       loop: 1
    -                       cel: 0
    -                       posn: 529 92
    -                       setCycle: End self
    -                   )
    -               )
    -               (2
    -                   (gKqMessager say: 0 0 21 2 self)
    -               )
    -               (3
    -                   (snakeSalesman
    -                       view: 5323
    -                       loop: 2
    -                       cel: 0
    -                       posn: 534 95
    -                       setCycle: End self
    -                   )
    -               )
    -               (4
    -                   (gKqMessager sayRange: 0 0 21 3 4 self)
    -               )
    -               (5
    -                   (snakeSalesman
    -                       view: 5323
    -                       loop: 3
    -                       cel: 0
    -                       posn: 543 90
    -                       setCycle: End self
    -                   )
    -               )
    -               (6
    -                   (gKqMessager say: 0 0 21 5 self)
    -               )
    -               (7
    -                   (chickenPetite setCycle: End self)
    -               )
    -               (8
    -                   (chickenPetite dispose:)
    -                   (snakeSalesman
    -                       view: 5325
    -                       loop: 0
    -                       cel: 4
    -                       posn: 491 128
    -                       setCycle: End self
    -                   )
    -               )
    -               (9
    -                   (snakeSalesman setScript: keepSalesmanBusy)
    -                   (gKQEgo setHeading: 180 self)
    -               )
    -               (10
    -                   (global1 handsOn:)
    -                   (self dispose:)
    -               )
    -           )
    -       else
    -           (chickenPetite dispose:)
    -           (if (not (snakeSalesman script?))
    -               (snakeSalesman setScript: keepSalesmanBusy)
    -           )
    -           (gKQEgo normalize: 2)
    -           (global1 handsOn:)
    -           (self dispose:)
    -       )
    -   )
    -)
    -
    -(instance getTheMoon of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (Load rsVIEW 5319)
    -               (guardTalker client: archDuke loop: 28)
    -               (global2 centerScreen: -318 self 10)
    -           )
    -           (1
    -               (moon setScript: 0 cel: 9 setCycle: End)
    -               (gKQEgo
    -                   view: 5319
    -                   loop: 0
    -                   cel: 0
    -                   x: 463
    -                   y: 101
    -                   setPri: 109
    -                   setScale: 0
    -                   setCycle: CT 9 1 self
    -               )
    -           )
    -           (2
    -               (gKqSound1 number: 836 loop: -1 play:)
    -               (gKQEgo cel: 10 setCycle: End self)
    -           )
    -           (3
    -               (gKQEgo view: 5319 loop: 1 cel: 0 setCycle: End self)
    -           )
    -           (4
    -               (gKQEgo view: 5319 loop: 2 cel: 0 setCycle: CT 5 1 self)
    -           )
    -           (5
    -               (gKqSound1 stop:)
    -               (gKQEgo setCycle: End self)
    -           )
    -           (6
    -               (gKQEgo view: 5319 loop: 3 cel: 0 setCycle: CT 3 1 self)
    -           )
    -           (7
    -               (gKqSound1 number: 836 loop: -1 play:)
    -               (gKQEgo cel: 4 setCycle: End self)
    -           )
    -           (8
    -               (self setScript: crookFalls)
    -               (gKQEgo view: 5319 loop: 5 cel: 0 setCycle: CT 4 1 self)
    -           )
    -           (9
    -               (gKqSound1 stop:)
    -               (gKQEgo setCycle: CT 15 1 self)
    -           )
    -           (10
    -               (gKQEgo setCycle: End self)
    -               (= local12 1)
    -               (gKqMusic1 number: 5315 loop: 1 play:)
    -               (gateGuard
    -                   view: 5328
    -                   setLoop: 2 1
    -                   cel: 0
    -                   init:
    -                   posn: 290 113
    -                   setCycle: Walk
    -                   setSpeed: 4
    -                   setMotion: MoveTo 420 118 gateGuard
    -               )
    -               (archDuke
    -                   view: 5319
    -                   loop: 6
    -                   cel: 0
    -                   x: 469
    -                   y: 136
    -                   setPri: 90
    -                   cycleSpeed: 6
    -                   init:
    -                   setScale: 0
    -                   setCycle: CT 29 1 self
    -               )
    -           )
    -           (11
    -               (archDuke setPri: 100 setCycle: End self)
    -           )
    -           (12
    -               (gKQEgo hide:)
    -               (archDuke view: 5319 loop: 7 cel: 0 setCycle: End self)
    -           )
    -           (13
    -               (if (gateGuard mover?) (-- state))
    -               (= cycles 3)
    -           )
    -           (14
    -               (gKqMessager sayRange: 0 0 18 1 2 self)
    -           )
    -           (15
    -               (guardTalker client: gateGuard loop: -1)
    -               (gKqMessager sayRange: 0 0 18 3 4 self)
    -           )
    -           (16
    -               (= local12 1)
    -               (gKqMusic1 number: 5316 loop: 1 play: self)
    -           )
    -           (17
    -               (gKQEgo get: 48)
    -               (proc11_1 126)
    -               (global2 newRoom: 35)
    -           )
    -       )
    -   )
    -)
    -
    -(instance crookFalls of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (crook
    -                   view: 5319
    -                   loop: 4
    -                   cel: 0
    -                   x: 425
    -                   y: 93
    -                   setPri: 140
    -                   init:
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (gKQEgo put: 39)
    -               (crook dispose:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance talkToChicken of Script
    -   (properties)
    -  
    -   (method (init)
    -       (proc11_2 539)
    -       (super init: &rest)
    -   )
    -  
    -   (method (dispose)
    -       (proc11_2 539)
    -       (super dispose:)
    -   )
    -  
    -   (method (changeState newState)
    -       (if (not (proc11_0 539))
    -           (switch (= state newState)
    -               (0
    -                   (global1 handsOff: 1)
    -                   (proc11_3 gKQEgo chickenPetite self)
    -               )
    -               (1
    -                   (chickenTalker hide_mouth: 0)
    -                   (gKqMessager say: 4 8 14 0 self)
    -               )
    -               (2
    -                   (chickenPetite
    -                       setLoop: 6 1
    -                       setCel: 0
    -                       setCycle: Fwd
    -                       ignoreActors: 1
    -                       setMotion: PolyPath 400 (chickenPetite y?) self
    -                   )
    -               )
    -               (3
    -                   (gKQEgo setHeading: 180 self)
    -               )
    -               (4
    -                   (proc5300_4)
    -                   (global1 handsOn:)
    -                   (self dispose:)
    -               )
    -           )
    -       else
    -           (gKQEgo normalize: 2)
    -           (chickenPetite setCycle: 0 setMotion: 0)
    -           (proc5300_4)
    -           (global1 handsOn:)
    -           (self dispose:)
    -       )
    -   )
    -)
    -
    -(instance talkToChickenAboutMoon of Script
    -   (properties)
    -  
    -   (method (changeState newState &tmp temp0)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKqMessager say: 4 8 17 1 self)
    -           )
    -           (1
    -               (chickenPetite view: 5311 setLoop: 6 cel: 0 posn: 424 82)
    -               (UpdateScreenItem chickenPetite)
    -               (FrameOut)
    -               (chickenTalker hide_mouth: 0 modeless: 2)
    -               (= cycles 1)
    -           )
    -           (2
    -               (gKqMessager say: 4 8 17 2 self)
    -           )
    -           (3
    -               (chickenTalker hide_mouth: 1 modeless: 2 loop: -1)
    -               (chickenPetite setCycle: CT 3 1 self)
    -           )
    -           (4
    -               (chickenPetite setLoop: 2 1 cel: 4 setCycle: Beg self)
    -           )
    -           (5
    -               (gKqMessager say: 4 8 17 3 self)
    -           )
    -           (6
    -               (gKqSound1 number: 5311 loop: 1 play:)
    -               (chickenPetite
    -                   setCycle: ROsc -1 0 2
    -                   moveSpeed: 8
    -                   setMotion: MoveTo 452 64 self
    -               )
    -           )
    -           (7
    -               (chickenPetite setCycle: End self)
    -           )
    -           (8
    -               (gKQEgo hide:)
    -               (chickenPetite
    -                   setLoop: 3
    -                   cel: 0
    -                   setPri: -1
    -                   posn: 459 100
    -                   setCycle: Fwd
    -               )
    -               (gKqMessager say: 4 8 17 4 self)
    -           )
    -           (9
    -               (chickenPetite setCycle: End self)
    -           )
    -           (10
    -               (chickenPetite
    -                   setLoop: 4
    -                   cel: 0
    -                   posn: 451 93
    -                   setCycle: End self
    -               )
    -           )
    -           (11
    -               (gKQEgo show:)
    -               (= temp0 (- (Abs (gNewPlane_2 left:)) 10))
    -               (chickenPetite
    -                   setLoop: 0 1
    -                   setCel: 0
    -                   setCycle: Walk
    -                   ignoreActors: 1
    -                   setMotion: PolyPath temp0 (chickenPetite y?) self
    -               )
    -               (gKqMessager say: 4 8 17 5 self)
    -           )
    -           (12
    -               (gKQEgo
    -                   normalize: 1
    -                   posn: (chickenPetite approachX?) (chickenPetite approachY?)
    -                   setHeading: 180 self
    -               )
    -           )
    -           (13 0)
    -           (14
    -               (proc5300_4)
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance uncoverCage of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (proc11_1 138)
    -               (cageCover dispose:)
    -               (chinaBird view: 5329 loop: 1 cel: 0 x: 571 y: 97 init:)
    -               (gKQEgo
    -                   view: 5327
    -                   loop: 0
    -                   cel: 0
    -                   x: 503
    -                   y: 138
    -                   setPri: 119
    -                   setScale: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (cageCover init:)
    -               (gKQEgo
    -                   normalize: 2
    -                   posn: (birdCage approachX?) (birdCage approachY?)
    -                   setScaler: Scaler 83 53 98 78
    -                   setHeading: 90
    -               )
    -               (chinaBird
    -                   view: 5327
    -                   loop: 1
    -                   cel: 0
    -                   x: 502
    -                   y: 141
    -                   setCycle: End self
    -               )
    -           )
    -           (2
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance openCageDoor of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= gKQEgoX (gKQEgo x?))
    -               (= gKQEgoY (gKQEgo y?))
    -               (gKQEgo setHeading: 90 self)
    -           )
    -           (1
    -               (gKQEgo
    -                   view: 5327
    -                   loop: 3
    -                   cel: 0
    -                   x: 535
    -                   y: 123
    -                   setScale: 0
    -                   setCycle: CT 5 1 self
    -               )
    -           )
    -           (2
    -               (gKqSound1 number: 5330 loop: 1 play:)
    -               (cageDoor setCycle: End)
    -               (gKQEgo setCycle: CT 9 1 self)
    -           )
    -           (3 (gKQEgo setCycle: Beg self))
    -           (4
    -               (gKQEgo
    -                   normalize: 0
    -                   posn: gKQEgoX gKQEgoY
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance getTheChinaBird of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= gKQEgoX (gKQEgo x?))
    -               (= gKQEgoY (gKQEgo y?))
    -               (gKQEgo setHeading: 90 self)
    -           )
    -           (1
    -               (gKqMessager say: 7 8 28 0 self)
    -           )
    -           (2
    -               (gKQEgo
    -                   view: 5327
    -                   loop: 3
    -                   cel: 0
    -                   x: 535
    -                   y: 123
    -                   setScale: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (3
    -               (gKQEgo hide:)
    -               (chinaBird
    -                   view: 5327
    -                   loop: 4
    -                   cel: 1
    -                   x: 557
    -                   y: 114
    -                   setPri: 123
    -                   setCycle: End self
    -               )
    -           )
    -           (4
    -               (chinaBird dispose:)
    -               (gKQEgo get: 42)
    -               (birdCage dispose:)
    -               (gKQEgo
    -                   show:
    -                   posn: gKQEgoX gKQEgoY
    -                   normalize: 4
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance tryGetBird of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo setPri: 119 setHeading: 90 self)
    -           )
    -           (1
    -               (cond
    -                   ((not (proc11_1 118)) (self setScript: firstAttemptToGetBird self))
    -                   ((not (proc11_1 119)) (self setScript: secondAttemptToGetBird self))
    -               )
    -           )
    -           (2
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (3
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance firstAttemptToGetBird of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= gKQEgoX (gKQEgo x?))
    -               (= gKQEgoY (gKQEgo y?))
    -               (gKqMessager sayRange: 7 8 29 1 3 self)
    -           )
    -           (1
    -               (gKQEgo
    -                   setScale: 0
    -                   view: 5329
    -                   loop: 0
    -                   cel: 0
    -                   x: 550
    -                   y: 109
    -                   setCycle: End self
    -               )
    -           )
    -           (2
    -               (chinaBird
    -                   view: 5329
    -                   loop: 1
    -                   cel: 0
    -                   x: 571
    -                   y: 97
    -                   setCycle: End self
    -               )
    -           )
    -           (3
    -               (chinaBirdTalker hide_mouth: 1)
    -               (gKqMessager say: 7 8 29 4 self)
    -           )
    -           (4
    -               (snakeSalesman hide:)
    -               (= seconds 2)
    -           )
    -           (5
    -               (chinaBirdTalker hide_mouth: 0)
    -               (snakeSalesman
    -                   setScript: 0
    -                   view: 5329
    -                   loop: 2
    -                   cel: 0
    -                   x: 522
    -                   y: 96
    -                   setPri: 88
    -                   show:
    -                   setCycle: CT 6 1 self
    -               )
    -           )
    -           (6
    -               (snakeSalesman setPri: 121 setCycle: End self)
    -           )
    -           (7
    -               (gKqMessager say: 7 8 29 5 self)
    -           )
    -           (8
    -               (proc11_2 138)
    -               (snakeSalesman
    -                   view: 5329
    -                   loop: 3
    -                   cel: 0
    -                   x: 519
    -                   y: 105
    -                   setCycle: CT 2 1 self
    -               )
    -           )
    -           (9
    -               (cageCover dispose:)
    -               (snakeSalesman cel: 3 setCycle: CT 10 1 self)
    -           )
    -           (10
    -               (gKqSound1 number: 5331 loop: 1 play:)
    -               (cageDoor cel: (cageDoor lastCel:) setCycle: Beg self)
    -               (snakeSalesman setCycle: CT 24 1 self)
    -           )
    -           (11
    -               (cageCover init:)
    -               (snakeSalesman cel: 25 setCycle: End self)
    -               (chinaBird setCycle: Beg)
    -           )
    -           (12
    -               (snakeSalesman
    -                   view: 5329
    -                   setLoop: 8
    -                   cel: 4
    -                   posn: 554 108
    -                   setCycle: CT 13 1 self
    -               )
    -           )
    -           (13
    -               (snakeSalesman setPri: 80 setCycle: End self)
    -           )
    -           (14
    -               (snakeSalesman hide:)
    -               (= seconds 2)
    -           )
    -           (15
    -               (snakeSalesman
    -                   view: 5323
    -                   loop: 1
    -                   cel: 0
    -                   posn: 531 90
    -                   setPri: 90
    -                   show:
    -                   setScript: keepSalesmanBusy
    -               )
    -               (gKQEgo
    -                   posn: gKQEgoX gKQEgoY
    -                   normalize:
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance secondAttemptToGetBird of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= gKQEgoX (gKQEgo x?))
    -               (= gKQEgoY (gKQEgo y?))
    -               (gKQEgo
    -                   setScale: 0
    -                   view: 5329
    -                   loop: 0
    -                   cel: 0
    -                   x: 550
    -                   y: 109
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (chinaBird
    -                   view: 5329
    -                   loop: 1
    -                   cel: 0
    -                   x: 571
    -                   y: 97
    -                   setCycle: End self
    -               )
    -           )
    -           (2
    -               (chinaBirdTalker hide_mouth: 1)
    -               (gKqMessager say: 7 8 31 1 self)
    -           )
    -           (3
    -               (snakeSalesman hide:)
    -               (= seconds 2)
    -           )
    -           (4
    -               (chinaBirdTalker hide_mouth: 0)
    -               (snakeSalesman
    -                   setScript: 0
    -                   view: 5329
    -                   loop: 2
    -                   cel: 0
    -                   x: 522
    -                   y: 96
    -                   setPri: 88
    -                   show:
    -                   setCycle: CT 6 1 self
    -               )
    -           )
    -           (5
    -               (snakeSalesman setPri: 121 setCycle: End self)
    -           )
    -           (6
    -               (gKqMessager say: 7 8 31 2 self)
    -           )
    -           (7
    -               (proc11_2 138)
    -               (snakeSalesman
    -                   view: 5329
    -                   loop: 3
    -                   cel: 0
    -                   x: 519
    -                   y: 105
    -                   setCycle: CT 2 1 self
    -               )
    -           )
    -           (8
    -               (cageCover dispose:)
    -               (snakeSalesman cel: 3 setCycle: CT 10 1 self)
    -           )
    -           (9
    -               (gKqSound1 number: 5331 loop: 1 play:)
    -               (cageDoor cel: (cageDoor lastCel:) setCycle: Beg self)
    -               (snakeSalesman setCycle: CT 24 1 self)
    -           )
    -           (10
    -               (cageCover init:)
    -               (snakeSalesman cel: 25 setCycle: End self)
    -           )
    -           (11
    -               (snakeSalesman
    -                   view: 5329
    -                   setLoop: 8
    -                   cel: 4
    -                   posn: 554 108
    -                   setCycle: CT 13 1 self
    -               )
    -           )
    -           (12
    -               (snakeSalesman setPri: 80 setCycle: End self)
    -           )
    -           (13
    -               (snakeSalesman
    -                   view: 5323
    -                   loop: 1
    -                   cel: 0
    -                   posn: 531 90
    -                   setPri: 90
    -                   setScript: keepSalesmanBusy
    -               )
    -               (gKQEgo
    -                   posn: gKQEgoX gKQEgoY
    -                   normalize:
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance takeBird of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= gKQEgoX (gKQEgo x?))
    -               (= gKQEgoY (gKQEgo y?))
    -               (gKQEgo
    -                   setScale: 0
    -                   view: 5329
    -                   loop: 0
    -                   cel: 0
    -                   x: 550
    -                   y: 109
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (chinaBird
    -                   view: 5329
    -                   loop: 1
    -                   cel: 0
    -                   x: 571
    -                   y: 97
    -                   setCycle: End self
    -               )
    -           )
    -           (2
    -               (chinaBirdTalker hide_mouth: 1)
    -               (gKqMessager say: 7 8 32 1 self)
    -           )
    -           (3
    -               (chinaBirdTalker hide_mouth: 0)
    -               (snakeSalesman
    -                   setScript: 0
    -                   view: 5329
    -                   loop: 2
    -                   cel: 0
    -                   x: 522
    -                   y: 96
    -                   setPri: 88
    -                   setCycle: CT 6 1 self
    -               )
    -           )
    -           (4
    -               (snakeSalesman setPri: 121 setCycle: End self)
    -           )
    -           (5
    -               (proc11_2 138)
    -               (snakeSalesman
    -                   view: 5329
    -                   loop: 3
    -                   cel: 0
    -                   x: 519
    -                   y: 105
    -                   setCycle: CT 2 1 self
    -               )
    -           )
    -           (6
    -               (cageCover dispose:)
    -               (snakeSalesman cel: 3 setCycle: CT 10 1 self)
    -           )
    -           (7
    -               (gKqSound1 number: 5331 loop: 1 play:)
    -               (cageDoor cel: (cageDoor lastCel:) setCycle: Beg self)
    -               (snakeSalesman setCycle: CT 24 1 self)
    -           )
    -           (8
    -               (cageCover init:)
    -               (snakeSalesman cel: 25 setCycle: End self)
    -           )
    -           (9
    -               (snakeTalker hide_mouth: 1 clientCel: -2)
    -               (gKqMessager say: 7 8 32 2 self)
    -           )
    -           (10
    -               (gKQEgo hide:)
    -               (snakeSalesman
    -                   view: 5329
    -                   loop: 5
    -                   cel: 0
    -                   x: 552
    -                   y: 112
    -                   setCycle: CT 14 1 self
    -               )
    -           )
    -           (11
    -               (gKqSound1 number: 831 loop: 1 play:)
    -               (snakeSalesman setCycle: End self)
    -           )
    -           (12
    -               (snakeSalesman
    -                   view: 5329
    -                   loop: 6
    -                   cel: 0
    -                   x: 576
    -                   y: 113
    -                   setCycle: CT 11 1 self
    -               )
    -           )
    -           (13
    -               (gKqSound1 number: 825 loop: 1 play:)
    -               (snakeSalesman setCycle: CT 34 1 self)
    -           )
    -           (14
    -               (snakeTalker hide_mouth: 1)
    -               (gKqMessager say: 7 8 32 3 self)
    -           )
    -           (15
    -               (snakeTalker hide_mouth: 0)
    -               (snakeSalesman setCycle: End self)
    -           )
    -           (16 (proc11_5 45 self))
    -           (17
    -               (snakeSalesman
    -                   view: 5323
    -                   loop: 1
    -                   cel: 0
    -                   posn: 531 90
    -                   setPri: 90
    -                   setScript: keepSalesmanBusy
    -               )
    -               (gKQEgo
    -                   show:
    -                   normalize:
    -                   posn: gKQEgoX gKQEgoY
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (18
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance giveStatue of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKqMessager say: 6 61 0 1 self)
    -           )
    -           (1
    -               (if (snakeSalesman script?)
    -                   (keepSalesmanBusy caller: self register: 1)
    -               else
    -                   (= cycles 1)
    -               )
    -           )
    -           (2
    -               (snakeSalesman hide:)
    -               (wagon dispose:)
    -               (gKQEgo
    -                   view: 5338
    -                   setLoop: 1 1
    -                   cel: 0
    -                   posn: 515 107
    -                   setScale: 0
    -                   setCycle: CT 9 1 self
    -               )
    -           )
    -           (3
    -               (proc11_1 204)
    -               (gKQEgo put: 47 setCycle: CT 11 1 self)
    -           )
    -           (4
    -               (gKQEgo
    -                   normalize: 6
    -                   posn: 494 108
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (snakeSalesman
    -                   view: 5338
    -                   setLoop: 1 1
    -                   posn: 515 107
    -                   cel: 12
    -                   show:
    -                   setPri: 110
    -                   setCycle: End self
    -               )
    -           )
    -           (5
    -               (snakeSalesman setLoop: 2 1 cel: 0 setCycle: End self)
    -           )
    -           (6
    -               (snakeSalesman setLoop: 3 1 cel: 0 setCycle: CT 6 1 self)
    -               (gKQEgo view: 8075 setLoop: 0 1 cel: 0 setCycle: End self)
    -           )
    -           (7 0)
    -           (8
    -               (snakeSalesman setCycle: End self)
    -               (gKQEgo setCycle: Beg self)
    -           )
    -           (9
    -               (gKQEgo normalize: 6 posn: 494 108)
    -               ((ScriptID 13 0)
    -                   client: gKQEgo
    -                   view: -1
    -                   loop: -1
    -                   clientCel: -2
    -               )
    -               (snakeTalker view: 5338 loop: 24 clientCel: -2)
    -               (gKqMessager sayRange: 6 61 0 2 6 self)
    -           )
    -           (10
    -               (gKqSound1 number: 5333 loop: 1 play:)
    -               (snakeSalesman setLoop: 4 1 cel: 0 setCycle: End self)
    -           )
    -           (11
    -               (gKqSound1 stop:)
    -               (curtain init:)
    -               (= local11 0)
    -               (gKQEgo get: 65)
    -               (proc11_1 198)
    -               (= cycles 1)
    -           )
    -           (12
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (13
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance knockOnTownHallDoor of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (Load rsVIEW 5305)
    -               (Load rsVIEW 5306)
    -               (= cycles 1)
    -           )
    -           (1
    -               (gKQEgo
    -                   view: 5306
    -                   loop: 0
    -                   cel: 0
    -                   posn: 231 104
    -                   setScale: 0
    -                   setCycle: CT 2 1 self
    -               )
    -               (gKqSound1 number: 808 loop: 1 play:)
    -           )
    -           (2
    -               (gKqSound1 number: 808 loop: 1 play:)
    -               (gKQEgo setCycle: CT 4 1 self)
    -           )
    -           (3
    -               (gKqSound1 number: 801 setLoop: 1 play:)
    -               (townHallDoor setCycle: CT 4 1 self)
    -           )
    -           (4
    -               (if (not (proc11_0 421))
    -                   (gKQEgo
    -                       view: 5306
    -                       setLoop: 3
    -                       cel: 0
    -                       posn: 236 100
    -                       setCycle: End
    -                   )
    -               else
    -                   (gKQEgo normalize: 7 setScaler: Scaler 83 53 98 78)
    -               )
    -               (badger
    -                   view: 5306
    -                   setLoop: 2
    -                   cel: 0
    -                   posn: 226 97
    -                   setPri: 86
    -                   init:
    -                   setCycle: End self
    -               )
    -           )
    -           (5
    -               (cond
    -                   ((not (proc11_1 421)) (self setScript: firstDoorKnock self))
    -                   ((not (proc11_1 420)) (gKqMessager say: 3 8 9 0 self))
    -                   (else (gKqMessager say: 3 8 10 0 self))
    -               )
    -           )
    -           (6
    -               (badger
    -                   view: 5305
    -                   setLoop: 3
    -                   posn: 217 93
    -                   cel: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (7
    -               (badger dispose:)
    -               (townHallDoor setCycle: Beg self)
    -           )
    -           (8
    -               (gKqSound1 number: 802 setLoop: 1 play:)
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance firstDoorKnock of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKqMessager say: 3 8 8 1 self)
    -           )
    -           (1 (gKQEgo setCycle: Beg self))
    -           (2
    -               (gKQEgo
    -                   normalize: 7
    -                   posn: (townHallDoor approachX?) (townHallDoor approachY?)
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (UpdateScreenItem gKQEgo)
    -               (FrameOut)
    -               (= cycles 2)
    -           )
    -           (3
    -               (gKqMessager sayRange: 3 8 8 2 3 self)
    -           )
    -           (4 (self dispose:))
    -       )
    -   )
    -)
    -
    -(instance escortedOutOfTownHall of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (townHallDoor cel: 4 setPri: 10)
    -               (badger
    -                   view: 5306
    -                   loop: 2
    -                   cel: 0
    -                   x: 226
    -                   y: 98
    -                   priority: 83
    -                   fixPriority: 1
    -                   init:
    -                   setCycle: End self
    -               )
    -               (gKQEgo
    -                   normalize: 4
    -                   posn: 220 97
    -                   setMotion: MoveTo 240 103 self
    -               )
    -           )
    -           (1 (proc11_3 gKQEgo badger))
    -           (2
    -               (badger
    -                   view: 5305
    -                   setLoop: 3
    -                   posn: 217 93
    -                   cel: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (3
    -               (badger dispose:)
    -               (townHallDoor setCycle: Beg self)
    -           )
    -           (4
    -               (gKqSound1 number: 802 loop: 1 play:)
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (5
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance enterTownHall of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo
    -                   posn: 232 100
    -                   view: 5307
    -                   setLoop: 0
    -                   setCel: 0
    -                   cycleSpeed: 6
    -                   setScale: 0
    -               )
    -               (UpdateScreenItem gKQEgo)
    -               (FrameOut)
    -               (gKqSound1 number: 808 loop: 1 play: self)
    -           )
    -           (1
    -               (gKQEgo setCycle: CT 2 1 self)
    -           )
    -           (2 (gKQEgo setCycle: Beg self))
    -           (3
    -               (gKqSound1 play:)
    -               (gKQEgo setCycle: CT 2 1 self)
    -           )
    -           (4 (gKQEgo setCycle: Beg self))
    -           (5
    -               (gKqSound1 play:)
    -               (gKQEgo setCycle: CT 3 1 self)
    -           )
    -           (6
    -               (gKqSound1 number: 801 loop: 1 play:)
    -               (townHallDoor setPri: 80 setCycle: CT 4 1 self)
    -           )
    -           (7
    -               (badger
    -                   view: 5306
    -                   loop: 2
    -                   cel: 0
    -                   x: 226
    -                   y: 98
    -                   priority: 83
    -                   fixPriority: 1
    -                   init:
    -                   setCycle: End self
    -               )
    -           )
    -           (8
    -               (gKQEgo
    -                   cel: 5
    -                   posn: 221 103
    -                   setPri: 83
    -                   setCycle: CT 6 1 self
    -               )
    -           )
    -           (9
    -               (badger hide:)
    -               (gKQEgo cel: 7 setCycle: End self)
    -           )
    -           (10
    -               (guardTalker client: gKQEgo)
    -               (gKqMessager say: 3 8 11 0 self)
    -           )
    -           (11
    -               (gKQEgo
    -                   posn: 240 101
    -                   setLoop: 1
    -                   setCel: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (12
    -               (gKQEgo
    -                   posn: 242 100
    -                   setLoop: 2
    -                   setCel: 0
    -                   setCycle: CT 12 1 self
    -               )
    -           )
    -           (13
    -               (gKQEgo setPri: 88 setCycle: End self)
    -           )
    -           (14 (global2 newRoom: 5100))
    -       )
    -   )
    -)
    -
    -(instance dukeStopsVal of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= local0 1)
    -               (proc11_3 gKQEgo archDuke)
    -               (archDuke
    -                   posn: 160 111
    -                   setLoop: 4
    -                   setCel: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (archTalker modeless: 2)
    -               (gKqMessager say: 0 0 2 0 self)
    -               (self setScript: egoBackOff self)
    -           )
    -           (2 0)
    -           (3
    -               (archTalker modeless: 1)
    -               (archDuke setCycle: Beg self)
    -           )
    -           (4
    -               (archDuke posn: 225 112 setLoop: 2)
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance egoBackOff of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKQEgo
    -                   view: 5301
    -                   setLoop: 5
    -                   setCel: 0
    -                   setScale: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (gKQEgo normalize: 0 setScaler: Scaler 83 53 98 78)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance fromAssembly of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (= cycles 0)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (= cycles 4)
    -           )
    -           (1
    -               (gKQEgo
    -                   setLoop: (gKQEgo loop?) 1
    -                   setMotion: MoveTo 229 99 self
    -               )
    -           )
    -           (2
    -               (townHallDoor setCycle: Beg self)
    -           )
    -           (3
    -               (gKqSound1 number: 802 loop: 1 play:)
    -               (gKQEgo setHeading: 225 self)
    -           )
    -           (4
    -               (if (== global122 3)
    -                   (self setScript: removeValsMask self)
    -               else
    -                   (= cycles 1)
    -               )
    -           )
    -           (5
    -               (gKQEgo normalize: 5 setScaler: Scaler 83 53 98 78)
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (6
    -               (if (not next) (global1 handsOn:))
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance removeValsMask of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKQEgo
    -                   view: 5309
    -                   setLoop: 0
    -                   setCel: 21
    -                   setScale: 0
    -                   cycleSpeed: 6
    -                   setCycle: Beg self
    -               )
    -           )
    -           (1
    -               (gKQEgo setLoop: 2 cel: 27 setCycle: Beg self)
    -           )
    -           (2
    -               (gKQEgo get: 43)
    -               (proc11_2 137)
    -               (self dispose:)
    -           )
    -       )
    -   )
    -)
    -
    -(instance putOnMask of Script
    -   (properties)
    -  
    -   (method (dispose)
    -       (if (gOldWalkHandler contains: self)
    -           (gOldWalkHandler delete: self)
    -           (global73 delete: self)
    -       )
    -       (super dispose:)
    -   )
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (global1 handsOff:)
    -               (gKQEgo setMotion: PolyPath 237 98 self)
    -           )
    -           (1
    -               (gKQEgo
    -                   view: 5309
    -                   setLoop: 2
    -                   setCel: 0
    -                   setScale: 0
    -                   cycleSpeed: 6
    -                   setCycle: End self
    -               )
    -           )
    -           (2
    -               (gKQEgo
    -                   view: 5309
    -                   setLoop: 0 1
    -                   setCel: 0
    -                   setCycle: End self
    -               )
    -               (proc11_1 137)
    -               (gKQEgo put: 43)
    -           )
    -           (3
    -               (gOldWalkHandler add: self)
    -               (global73 add: self)
    -               (global1 handsOn:)
    -           )
    -           (4
    -               (global1 handsOff:)
    -               (gOldWalkHandler delete: self)
    -               (global73 delete: self)
    -               (gKQEgo
    -                   view: 5309
    -                   setLoop: 0
    -                   setCel: 21
    -                   setScale: 0
    -                   setCycle: Beg self
    -               )
    -               (proc11_2 137)
    -               (gKQEgo get: 43)
    -           )
    -           (5
    -               (gKQEgo setLoop: 3 cel: 0 setCycle: End self)
    -           )
    -           (6
    -               (global1 handsOn:)
    -               (gKQEgo normalize: 5 setScaler: Scaler 83 53 98 78)
    -               (self dispose:)
    -           )
    -       )
    +(instance townHallDoor of Prop
    +   (properties
    +       heading 90
    +       noun 3
    +       sightAngle 15
    +       approachX 239
    +       approachY 100
    +       x 231
    +       y 90
    +       priority 85
    +       fixPriority 1
    +       view 5302
    +       loop 4
        )
       
    -   (method (handleEvent pEvent &tmp temp0)
    +   (method (init)
    +       (super init:)
            (if
                (or
    -               (and
    -                   (& (pEvent type?) evMOUSEBUTTON)
    -                   (= temp0 1)
    -                   (or (pEvent localize: gNewPlane_2) 1)
    -                   (gNewPlane_2 onMe: pEvent)
    -                   (not (townHallDoor onMe: pEvent))
    -               )
    -               (& (pEvent type?) evMOVE)
    -           )
    -           (pEvent claimed: 1)
    -           (self changeState: 4)
    -       )
    -       (if temp0 (pEvent globalize:))
    -       (pEvent claimed?)
    -   )
    -)
    -
    -(instance chickenTimerScript of Script
    -   (properties)
    -  
    -   (method (dispose)
    -       (gOldWalkHandler delete: self)
    -       (global73 delete: self)
    -       (chickenPetite setHotspot: 8 10)
    -       (super dispose:)
    -   )
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gOldWalkHandler add: self)
    -               (global73 add: self)
    -               (chickenPetite setHotspot: 8 10)
    -               (= seconds (+ register 1))
    -           )
    -           (1
    -               (chickenPetite setHotspot: 0)
    -               (global2 setScript: chickenRunsOff)
    -               (self dispose:)
    +               (and (== global122 3) (not local0))
    +               (and (== global122 5) (proc11_0 203))
                )
    +           (= loop 3)
            )
    -   )
    -  
    -   (method (handleEvent pEvent &tmp temp0 temp1)
    -       (= temp1 0)
    -       (if
    -           (and
    -               (& (pEvent type?) evMOUSEBUTTON)
    -               (= temp1 1)
    -               (or (pEvent localize: gNewPlane_2) 1)
    -               (chickenPetite onMe: pEvent)
    -           )
    -           (pEvent globalize:)
    -           (self dispose:)
    -           (return 0)
    +       (if (not (proc11_0 110))
    +           (= cel 4)
    +       else
    +           (self setHotspot: 8 10)
            )
    -       (if temp1 (pEvent globalize:))
    -       (if
    -           (and
    -               (gNewPlane_2 onMe: pEvent)
    -               (or
    -                   (& (pEvent type?) evMOVE)
    -                   (& (pEvent type?) evMOUSEBUTTON)
    +       (self
    +           approachVerbs: 8
    +           setPolygon:
    +               ((Polygon new:)
    +                   type: 0
    +                   init: 211 98 206 67 206 52 212 45 220 44 227 47 231 55 233 70 235 91
    +                   yourself:
                    )
    -           )
    -           (pEvent claimed: 1)
    -           (self seconds: 0 cycles: 1)
            )
    -       (return (pEvent claimed?))
        )
    -)
    -
    -(instance enterChinaShop of Script
    -   (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (if (!= global104 -3)
    -                   (gKQEgo
    -                       view: 8123
    -                       setLoop: 1 1
    -                       cel: 0
    -                       setCycle: CT 14 1 self
    +   (method (doVerb theVerb)
    +       (return
    +           (if
    +           (and (> global122 3) (== noun 3) (== theVerb 8))
    +               (global2
    +                   setScript: (ScriptID 5302 32) 0 (== global122 5)
    +               )
    +           else
    +               (if (and (== global122 5) (== noun 2))
    +                   (global2 setScript: (ScriptID 5302 31))
    +                   (return 1)
    +               )
    +               (cond
    +                   (
    +                       (and
    +                           (not (proc11_0 137))
    +                           (or
    +                               (and (== loop 3) (not (proc11_0 449)))
    +                               (== noun 2)
    +                           )
    +                       )
    +                       ((ScriptID 13 0) hide_mouth: 1)
    +                       (gKqMessager say: 2 theVerb 7 0 self)
    +                       (proc11_1 449)
                        )
    -               else
    -                   (= cycles 1)
    +                   ((== global104 -3) (global2 newRoom: 5100))
    +                   ((!= global122 3) (global2 newRoom: 5100))
    +                   ((proc11_0 137) (global2 setScript: (ScriptID 5302 16)))
    +                   (else (global2 setScript: (ScriptID 5302 1)))
                    )
                )
    -           (1
    -               (gKqSound1 number: 801 setLoop: 1 play:)
    -               (chinaDoor setCycle: End self)
    -           )
    -           (2 (global2 newRoom: 5050))
            )
        )
    -)
    -
    -(instance getWoodenNickel of Script
    -   (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo
    -                   view: 5317
    -                   loop: 0
    -                   cel: 0
    -                   x: 371
    -                   y: 89
    -                   setScale: 0
    -                   cycleSpeed: 6
    -                   setPri: 108
    -                   setCycle: End self
    +   (method (onMe param1 &tmp temp0 temp1 temp2)
    +       (= temp0 (super onMe: param1))
    +       (= temp1 (- (param1 x?) nsLeft))
    +       (= temp2 (- (param1 y?) nsTop))
    +       (if
    +           (and
    +               (== loop 3)
    +               (not (proc11_0 137))
    +               (or
    +                   (and
    +                       (proc64999_5 temp1 9 10)
    +                       (<= 24 temp2)
    +                       (<= temp2 34)
    +                   )
    +                   (and
    +                       (<= 10 temp1)
    +                       (<= temp1 18)
    +                       (proc64999_5 temp2 23 24)
    +                   )
    +                   (and
    +                       (proc64999_5 temp1 18 19)
    +                       (<= 24 temp2)
    +                       (<= temp2 34)
    +                   )
    +                   (and
    +                       (<= 10 temp1)
    +                       (<= temp1 18)
    +                       (proc64999_5 temp2 34 35)
    +                   )
                    )
                )
    -           (1
    -               (gKQEgo
    -                   loop: 1
    -                   cel: 0
    -                   posn: 372 82
    -                   setPri: 150
    -                   setCycle: CT 6 1 self
    +           (return 0)
    +       )
    +       (if (and temp0 (param1 type?))
    +           (if
    +               (and
    +                   (== loop 3)
    +                   (not (proc11_0 137))
    +                   (<= 10 temp1)
    +                   (<= temp1 18)
    +                   (<= 24 temp2)
    +                   (<= temp2 34)
                    )
    -           )
    -           (2
    -               (nickel dispose:)
    -               (gKQEgo get: 44)
    -               (gKQEgo setCycle: End self)
    -           )
    -           (3
    -               (gKQEgo setCycle: CT 7 -1 self)
    -           )
    -           (4
    -               (gKQEgo
    -                   loop: 0
    -                   cel: 15
    -                   x: 371
    -                   y: 89
    -                   setPri: -1
    -                   setCycle: Beg self
    +               (if (proc11_0 137) (return 0))
    +               (= noun 2)
    +               (if (not (proc11_0 137))
    +                   (= approachX 239)
    +                   (= approachY 100)
    +               else
    +                   (= approachX (gKQEgo x?))
    +                   (= approachY (gKQEgo y?))
                    )
    -           )
    -           (5
    -               (gKQEgo
    -                   normalize: 5
    -                   posn: (nickel approachX?) (nickel approachY?)
    -                   setScaler: Scaler 83 53 98 78
    -                   setHeading: 180 self
    +           else
    +               (= noun 3)
    +               (if
    +               (and (== global122 5) (== (global80 message?) 8))
    +                   (= approachX 226)
    +                   (= approachY 102)
    +               else
    +                   (if (or (!= global122 3) (proc11_0 449))
    +                       (= approachX 232)
    +                       (= approachY 103)
    +                   )
    +                   (if (proc11_0 137) (= approachX 237) (= approachY 98))
                    )
                )
    -           (6
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
            )
    +       (return temp0)
    +   )
    +  
    +   (method (cue)
    +       ((ScriptID 13 0) hide_mouth: 0)
        )
     )
     
    -(instance switchMusic of Script
    -   (properties)
    +(instance fauxSign of Feature
    +   (properties
    +       noun 8
    +       approachX 413
    +       approachY 75
    +       x 413
    +       y 70
    +   )
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (gKqMusic1 fade: 30 25 20 1 self)
    -           )
    -           (1
    -               (gKqMusic1 number: register loop: -1 play: setVol: 30)
    -               (gKqMusic1 fade: 127 25 20 0)
    -               (= local12 (= register 0))
    -               (self dispose:)
    -           )
    +   (method (init)
    +       (super init:)
    +       (self
    +           setHotspot: 8 10
    +           approachVerbs: 8
    +           setPolygon:
    +               ((Polygon new:)
    +                   type: 1
    +                   init: 398 32 399 31 412 30 425 36 425 38 398 40
    +                   yourself:
    +               )
            )
        )
    -)
    -
    -(instance moveEgoIntoPosition of Script
    -   (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo setMotion: PolyPath 482 91 self)
    -           )
    -           (1
    -               (global2 centerScreen: -318 self)
    -               (gKQEgo setHeading: 225 self)
    -           )
    -           (2 0)
    -           (3
    -               (global2 setScript: theMoonFalls)
    -           )
    +   (method (doVerb theVerb)
    +       (if (== global104 -3)
    +           (gKqMessager say: noun theVerb 37)
    +       else
    +           (gKqMessager say: noun theVerb 0)
            )
        )
     )
    @@ -3385,43 +959,19 @@
            (super init:)
            (if (!= global122 4)
                (self setHotspot: 9998 approachVerbs: 9998)
    -       )
    -   )
    -  
    -   (method (doVerb theVerb)
    -       (switch theVerb
    -           (8
    -               (global2 setScript: talkToDuke)
    -           )
    -           (5
    -               (global2 setScript: showTheComb)
    -           )
    -           (else
    -               (gKqMessager say: noun 0 5 0)
    -           )
    -       )
    -   )
    -)
    -
    -(instance talkToDuke of Script
    -   (properties)
    +       )
    +   )
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (proc11_3 gKQEgo archDuke self)
    +   (method (doVerb theVerb)
    +       (switch theVerb
    +           (8
    +               (global2 setScript: (ScriptID 5302 24))
                )
    -           (1
    -               (if (not (proc11_1 410))
    -                   (gKqMessager say: 1 8 3 0 self)
    -               else
    -                   (gKqMessager say: 1 8 4 0 self)
    -               )
    +           (5
    +               (global2 setScript: (ScriptID 5300 68))
                )
    -           (2
    -               (global1 handsOn:)
    -               (self dispose:)
    +           (else
    +               (gKqMessager say: noun 0 5 0)
                )
            )
        )
    @@ -3438,9 +988,9 @@
       
        (method (doVerb)
            (if (proc11_0 111)
    -           (global2 setScript: talkToChickenAboutMoon)
    +           (global2 setScript: (ScriptID 5300 81))
            else
    -           (global2 setScript: talkToChicken)
    +           (global2 setScript: (ScriptID 5301 8))
            )
        )
       
    @@ -3492,7 +1042,7 @@
        (properties
            x 533
            y 84
    -       priority 98
    +       priority 90
            fixPriority 1
            view 5302
            loop 6
    @@ -3558,369 +1108,447 @@
        )
     )
     
    -(instance stork of Prop
    +(instance stork of Prop
    +   (properties
    +       x 272
    +       y 106
    +       view 5313
    +   )
    +  
    +   (method (init)
    +       (super init: &rest)
    +       (if (not (proc5300_16 195)) (= cel 11))
    +   )
    +)
    +
    +(instance hippo of Prop
    +   (properties
    +       x 264
    +       y 107
    +       view 5313
    +       loop 1
    +   )
    +  
    +   (method (init)
    +       (super init: &rest)
    +       (if (not (proc5300_16 195)) (= cel 9))
    +   )
    +  
    +   (method (cue)
    +       (gateGuard view: 5326 setLoop: 0 cel: 1 setCycle: 0)
    +       (UpdateScreenItem gateGuard)
    +   )
    +)
    +
    +(instance moon of Prop
    +   (properties
    +       approachX 362
    +       approachY 78
    +       x 350
    +       y 75
    +       view 5312
    +   )
    +  
    +   (method (init)
    +       (super init:)
    +       (self heading: 135 setHotspot: 0 52 approachVerbs: 52)
    +   )
    +  
    +   (method (doVerb theVerb)
    +       (pool doVerb: theVerb)
    +   )
    +)
    +
    +(instance nickel of View
    +   (properties
    +       approachX 371
    +       approachY 89
    +       x 351
    +       y 48
    +       priority 95
    +       fixPriority 1
    +       view 5321
    +       loop 1
    +   )
    +  
    +   (method (init)
    +       (super init:)
    +       (self setHotspot: 8 10 approachVerbs: 8)
    +       (= signal (& signal $efff))
    +   )
    +  
    +   (method (doVerb)
    +       (global2 setScript: (ScriptID 5302 3))
    +   )
    +)
    +
    +(instance yBranch of Feature
    +   (properties
    +       approachX 279
    +       approachY 102
    +       x 288
    +       y 81
    +   )
    +  
    +   (method (init)
    +       (super init:)
    +       (self
    +           setHotspot: 8 10 60
    +           approachVerbs: 8 60
    +           setPolygon:
    +               ((Polygon new:)
    +                   type: 0
    +                   init: 287 57 294 47 316 53 311 89
    +                   yourself:
    +               )
    +       )
    +   )
    +  
    +   (method (doVerb theVerb)
    +       (switch theVerb
    +           (8
    +               (global2 setScript: (ScriptID 5302 25))
    +           )
    +           (60
    +               (global2 setScript: (ScriptID 5302 26))
    +               (self dispose:)
    +           )
    +       )
    +       (return 1)
    +   )
    +)
    +
    +(instance rubChicken of Actor
    +   (properties
    +       approachX 279
    +       approachY 102
    +       x 298
    +       y 61
    +       priority 93
    +       fixPriority 1
    +       view 5331
    +       loop 4
    +   )
    +  
    +   (method (init)
    +       (super init:)
    +       (self setHotspot: 8 10 71 approachVerbs: 8 71)
    +       (= signal (& signal $efff))
    +   )
    +  
    +   (method (doVerb theVerb)
    +       (return
    +           (switch theVerb
    +               (8
    +                   (global2 setScript: (ScriptID 5302 27))
    +                   (return 1)
    +               )
    +               (71
    +                   (global2 setScript: (ScriptID 5302 28))
    +                   (return 1)
    +               )
    +           )
    +       )
    +   )
    +  
    +   (method (onMe param1 &tmp temp0)
    +       (if (= temp0 (super onMe: param1))
    +           (if (== (global80 message?) 8)
    +               (= approachX 279)
    +               (= approachY 102)
    +           )
    +           (if (== (global80 message?) 71)
    +               (= approachX 282)
    +               (= approachY 100)
    +           )
    +       )
    +       (return temp0)
    +   )
    +)
    +
    +(instance cageCover of View
    +   (properties
    +       x 572
    +       y 89
    +       view 5300
    +       loop 1
    +   )
    +  
    +   (method (init)
    +       (super init: &rest)
    +       (if (proc11_0 138)
    +           (self loop: 0 x: 510 y: 120 setPri: 1)
    +       else
    +           (self loop: 1 cel: 0 x: 559 y: 70 setPri: 110)
    +       )
    +       (self ignoreActors:)
    +   )
    +  
    +   (method (onMe)
    +       (return 0)
    +   )
    +)
    +
    +(instance fauxDoorExit of ExitFeature
    +   (properties
    +       noun 12
    +       approachX 435
    +       approachY 69
    +       x 439
    +       y 66
    +       exitDir 2
    +   )
    +  
    +   (method (init)
    +       (super init:)
    +       (self setHotspot: 8 10 approachVerbs: 8)
    +       (fauxDoor setHotspot: 0)
    +   )
    +  
    +   (method (doVerb theVerb)
    +       (fauxDoor doVerb: theVerb)
    +   )
    +  
    +   (method (onMe param1 &tmp temp0)
    +       (if
    +           (and
    +               (= temp0 (fauxDoor onMe: param1))
    +               (param1 type?)
    +               (proc11_0 203)
    +           )
    +           (= approachX 424)
    +           (= approachY 72)
    +       )
    +       (return temp0)
    +   )
    +)
    +
    +(instance crook of Prop
    +   (properties)
    +  
    +   (method (cue)
    +       (gKQEgo view: 5326 loop: 0 cel: 0)
    +       (UpdateScreenItem gKQEgo)
    +   )
    +)
    +
    +(instance partySound1 of Sound
    +   (properties
    +       flags $0004
    +       number 5100
    +       loop -1
    +   )
    +)
    +
    +(instance partySound2 of Sound
    +   (properties
    +       flags $0004
    +       number 5102
    +       loop -1
    +   )
    +)
    +
    +(instance archDukeSound of Sound
    +   (properties
    +       flags $0004
    +       number 5301
    +       loop -1
    +   )
    +)
    +
    +(instance chickenSound of Sound
        (properties
    -       x 272
    -       y 106
    -       view 5313
    -   )
    -  
    -   (method (init)
    -       (super init: &rest)
    -       (if (not (localproc_77f0 195)) (= cel 11))
    +       flags $0004
    +       number 5310
    +       loop -1
        )
     )
     
    -(instance hippo of Prop
    +(instance gateGuard of Actor
        (properties
    -       x 264
    -       y 107
    -       view 5313
    -       loop 1
    +       noun 10
    +       approachX 61
    +       approachY 113
    +       x 29
    +       y 113
    +       view 5328
        )
       
        (method (init)
            (super init: &rest)
    -       (if (not (localproc_77f0 195)) (= cel 9))
    +       (self setHotspot: 8 10 approachVerbs: 8)
    +   )
    +  
    +   (method (doVerb)
    +       (guardTalker client: self)
    +       (cond
    +           ((not (proc11_1 542)) (gKqMessager say: noun 8 39 0))
    +           ((not (proc11_1 543)) (gKqMessager say: noun 8 38 0))
    +           (else (gKqMessager say: noun 8 40 0))
    +       )
    +   )
    +  
    +   (method (cue)
    +       (self view: 5328 setLoop: 0 cel: 0 setCycle: 0)
    +       (UpdateScreenItem self)
    +       (FrameOut)
        )
     )
     
    -(instance moon of Prop
    +(instance feather of View
        (properties
    -       approachX 362
    -       approachY 78
    -       x 350
    -       y 75
    -       view 5314
    +       approachX 280
    +       approachY 93
    +       x 295
    +       y 62
    +       priority 93
    +       fixPriority 1
    +       view 5331
    +       loop 5
        )
       
        (method (init)
    -       (super init:)
    -       (self heading: 135 setHotspot: 0 52 approachVerbs: 52)
    +       (super init: &rest)
    +       (if (not (gKQEgo has: 41))
    +           (self setHotspot: 8 10 approachVerbs: 8)
    +           (= signal (& signal $efff))
    +       )
        )
       
    -   (method (doVerb theVerb)
    -       (pool doVerb: theVerb)
    +   (method (doVerb)
    +       (global2 setScript: (ScriptID 5302 29))
        )
     )
     
    -(instance nickel of View
    +(instance wagonSign of View
        (properties
    -       approachX 371
    -       approachY 89
    -       x 351
    -       y 48
    +       x 520
    +       y 53
            priority 95
            fixPriority 1
    -       view 5321
    -       loop 1
    +       view 5300
    +       loop 7
        )
       
        (method (init)
    -       (super init:)
    -       (self setHotspot: 8 10 approachVerbs: 8)
    -       (= signal (& signal $efff))
    +       (super init: &rest)
    +       (= local11 1)
        )
    -  
    -   (method (doVerb)
    -       (global2 setScript: getWoodenNickel)
    +)
    +
    +(instance cageDoor of Prop
    +   (properties
    +       x 577
    +       y 94
    +       priority 98
    +       fixPriority 1
    +       view 5300
    +       loop 3
        )
     )
     
    -(instance yBranch of Feature
    +(instance archTalker of KQTalker
        (properties
    -       approachX 279
    -       approachY 102
    -       x 288
    -       y 81
    +       clientCel -1
        )
       
        (method (init)
    -       (super init:)
    -       (self
    -           setHotspot: 8 10 60
    -           approachVerbs: 8 60
    -           setPolygon:
    -               ((Polygon new:)
    -                   type: 0
    -                   init: 287 57 294 47 316 53 311 89
    -                   yourself:
    -               )
    -       )
    +       (= client archDuke)
    +       (super init: &rest)
        )
    -  
    -   (method (doVerb theVerb)
    -       (switch theVerb
    -           (8 (global2 setScript: sayHmmm))
    -           (60
    -               (global2 setScript: putChickenOnTree)
    -               (self dispose:)
    -           )
    -       )
    -       (return 1)
    +)
    +
    +(instance bull of Prop
    +   (properties
    +       x 108
    +       y 78
    +       priority 92
    +       fixPriority 1
    +       view 5337
    +       loop 1
        )
     )
     
    -(instance sayHmmm of Script
    +(instance bullTalker of KQTalker
        (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo
    -                   view: 8295
    -                   setLoop: 0
    -                   setCel: 0
    -                   setCycle: End self
    -               )
    -               ((ScriptID 13 0) hide_mouth: 1)
    -           )
    -           (1
    -               (gKqMessager say: 1 8 3 0 self 1250)
    -           )
    -           (2
    -               ((ScriptID 13 0) hide_mouth: 0)
    -               (gKQEgo setCycle: Beg self)
    -           )
    -           (3
    -               (gKQEgo normalize: 6)
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    +   (method (init)
    +       (= client bull)
    +       (super init: &rest)
        )
     )
     
    -(instance putChickenOnTree of Script
    +(instance fauxOwnerTalker of KQTalker
        (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo
    -                   setScale: 0
    -                   view: 5330
    -                   loop: 0
    -                   cel: 0
    -                   x: 269
    -                   y: 103
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (gKQEgo loop: 1 cel: 0 x: 269 y: 103 setCycle: End self)
    -           )
    -           (2
    -               (proc11_1 273)
    -               (gKQEgo put: 46)
    -               (rubChicken init:)
    -               (gKQEgo
    -                   normalize: 6
    -                   posn: 283 102
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    +   (method (init)
    +       (= client fauxDoor)
    +       (= mouth_y (* (client z?) -1))
    +       (super init: &rest)
        )
     )
     
    -(instance rubChicken of Actor
    -   (properties
    -       approachX 279
    -       approachY 102
    -       x 298
    -       y 61
    -       priority 93
    -       fixPriority 1
    -       view 5331
    -       loop 4
    -   )
    +(instance mockingBirdTalker of KQTalker
    +   (properties)
       
        (method (init)
    -       (super init:)
    -       (self setHotspot: 8 10 71 approachVerbs: 8 71)
    -       (= signal (& signal $efff))
    +       (= client mockingBird)
    +       (= loop 2)
    +       (= mouth_y (* (client z?) -1))
    +       (super init: &rest)
        )
    -  
    -   (method (doVerb theVerb)
    -       (return
    -           (switch theVerb
    -               (8
    -                   (global2 setScript: getChickenDown)
    -                   (return 1)
    -               )
    -               (71
    -                   (global2 setScript: replaceTheMoon)
    -                   (return 1)
    -               )
    -           )
    -       )
    +)
    +
    +(instance guardTalker of KQTalker
    +   (properties
    +       clientCel -1
        )
       
    -   (method (onMe param1 &tmp temp0)
    -       (if (= temp0 (super onMe: param1))
    -           (if (== (global80 message?) 8)
    -               (= approachX 279)
    -               (= approachY 102)
    -           )
    -           (if (== (global80 message?) 71)
    -               (= approachX 282)
    -               (= approachY 100)
    -           )
    -       )
    -       (return temp0)
    +   (method (init)
    +       (if (not client) (= client badger))
    +       (super init: &rest)
        )
     )
     
    -(instance getChickenDown of Script
    +(instance snakeTalker of KQTalker
        (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo
    -                   view: 5332
    -                   loop: 0
    -                   cel: 0
    -                   x: 269
    -                   y: 103
    -                   setScale: 0
    -                   setCycle: End self
    -               )
    -               (gKQEgo get: 46)
    -               (proc11_2 273)
    -               (rubChicken dispose:)
    -               (yBranch init:)
    -           )
    -           (1
    -               (gKQEgo
    -                   normalize: 3
    -                   posn: (rubChicken approachX?) (rubChicken approachY?)
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    +   (method (init)
    +       (if (!= client gKQEgo) (= client snakeSalesman))
    +       (super init: &rest)
    +   )
    +)
    +
    +(instance chickenTalker of KQTalker
    +   (properties
    +       hide_mouth 1
    +   )
    +  
    +   (method (init)
    +       (= client chickenPetite)
    +       (super init: &rest)
        )
     )
     
    -(instance replaceTheMoon of Script
    +(instance chinaBirdTalker of KQTalker
        (properties)
       
    -   (method (changeState newState &tmp temp0)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (Load rsCDAUDIO 5405)
    -               (Load rsSOUND 854)
    -               (Load rsCDAUDIO 5404)
    -               (gKQEgo
    -                   view: 5331
    -                   loop: 0
    -                   cel: 0
    -                   x: 282
    -                   y: 99
    -                   setScale: 0
    -                   setCycle: End self
    -               )
    -           )
    -           (1
    -               (rubChicken hide:)
    -               (gKqSound1 number: 5404 loop: 1 play:)
    -               (gKQEgo
    -                   view: 5331
    -                   loop: 1
    -                   cel: 0
    -                   x: 281
    -                   y: 103
    -                   setCycle: End self
    -               )
    -           )
    -           (2 (= cycles 60))
    -           (3
    -               (if
    -               (and (not (proc11_0 136)) (not (gKQEgo has: 41)))
    -                   (feather init:)
    -               )
    -               (gKqSound1 number: 854 loop: 1 play:)
    -               (gKQEgo
    -                   view: 5331
    -                   loop: 2
    -                   cel: 0
    -                   x: 280
    -                   y: 103
    -                   setCycle: End self
    -               )
    -           )
    -           (4
    -               (gKQEgo
    -                   put: 48
    -                   normalize: 6
    -                   posn: 278 102
    -                   setScaler: Scaler 83 53 98 78
    -               )
    -               (gKqSound1 number: 5405 loop: 1 play:)
    -               (rubChicken
    -                   show:
    -                   view: 5331
    -                   loop: 3
    -                   cel: 0
    -                   x: 296
    -                   y: 96
    -                   setCycle: End self
    -               )
    -           )
    -           (5
    -               (= temp0 (+ (Abs ((global2 plane?) left:)) 330))
    -               (rubChicken
    -                   setLoop: 6 1
    -                   cel: 0
    -                   posn: 327 94
    -                   setCycle: Walk
    -                   setPri: -1
    -                   setMotion: PolyPath temp0 94 self
    -               )
    -           )
    -           (6
    -               (proc11_2 273)
    -               (rubChicken dispose:)
    -               (littleDoorExit init:)
    -               (bigGate dispose:)
    -               (proc11_1 202)
    -               (localproc_7b59)
    -               (archTalker clientCel: -2)
    -               (global2 setScript: (ScriptID 5301 1))
    -           )
    -       )
    +   (method (init)
    +       (= client chinaBird)
    +       (super init: &rest)
        )
     )
     
    -(instance cageCover of View
    +(instance iSign of Inset
        (properties
    -       x 572
    -       y 89
    -       view 5300
    -       loop 1
    +       picture 5303
    +       priority 200
        )
       
        (method (init)
    +       (= x (Abs ((global2 plane?) left:)))
            (super init: &rest)
    -       (if (proc11_0 138)
    -           (self loop: 0 x: 510 y: 120 setPri: 1)
    -       else
    -           (self loop: 1 cel: 0 x: 559 y: 70 setPri: 110)
    -       )
    -       (self ignoreActors:)
    -   )
    -  
    -   (method (onMe)
    -       (return 0)
    +       (proc11_6)
        )
     )
     
    @@ -3937,47 +1565,7 @@
        )
       
        (method (doVerb)
    -       (global2 setScript: tryAndThrowMoonUp)
    -   )
    -)
    -
    -(instance tryAndThrowMoonUp of Script
    -   (properties)
    -  
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKQEgo setHeading: 180 self)
    -           )
    -           (1
    -               (gKQEgo
    -                   view: 5336
    -                   setLoop: 0 1
    -                   cel: 0
    -                   setCycle: CT 10 1 self
    -               )
    -           )
    -           (2
    -               (gKqSound1 number: 824 loop: 1 play:)
    -               (gKQEgo setCycle: End self)
    -           )
    -           (3
    -               (gKQEgo setLoop: 1 1 cel: 0 setCycle: CT 6 1 self)
    -           )
    -           (4
    -               (gKqSound1 number: 856 loop: 1 play:)
    -               (gKQEgo setCycle: End self)
    -           )
    -           (5
    -               (gKQEgo setLoop: 2 1 cel: 0 setCycle: End self)
    -           )
    -           (6
    -               (gKQEgo normalize: 2)
    -               (global1 handsOn:)
    -               (self dispose:)
    -           )
    -       )
    +       (global2 setScript: (ScriptID 5302 30))
        )
     )
     
    @@ -4091,1160 +1679,1193 @@
        )
       
        (method (doVerb)
    -       (global2 setScript: exitToGate)
    +       (global2 setScript: (ScriptID 5302 5))
            (return 1)
        )
     )
     
    -(instance exitToGate of Script
    -   (properties)
    +(instance chinaDoorExit of ExitFeature
    +   (properties
    +       noun 11
    +       approachX 116
    +       approachY 109
    +       exitDir 1
    +   )
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKqSound1 number: 801 loop: 1 play:)
    -               (littleDoor setCycle: End self)
    -           )
    -           (1
    -               (gKQEgo setMotion: MoveTo 27 113 self)
    -           )
    -           (2
    -               (gKQEgo setHeading: 315 self)
    -           )
    -           (3
    -               (if (== global104 -4)
    -                   (gKQEgo
    -                       view: 8065
    -                       loop: 1
    -                       cel: 0
    -                       priority: 109
    -                       fixPriority: 1
    -                       setCycle: CT 4 1 self
    -                   )
    -               else
    -                   (= cycles 1)
    -               )
    -           )
    -           (4 (global2 newRoom: 5400))
    +   (method (init)
    +       (super init:)
    +       (= x approachX)
    +       (= y (chinaDoor y?))
    +       (self setHotspot: 8 10 approachVerbs: 8)
    +   )
    +  
    +   (method (doVerb)
    +       (if (or (proc11_0 110) (!= global122 3))
    +           (global2 setScript: (ScriptID 5302 6))
    +       else
    +           (global2 setScript: (ScriptID 5302 17))
            )
    +       (return 1)
    +   )
    +  
    +   (method (onMe param1)
    +       (chinaDoor onMe: param1)
        )
     )
     
    -(instance chinaDoor of Prop
    +(instance wagon of Feature
        (properties
    -       noun 11
    -       approachX 116
    -       approachY 109
    -       x 128
    -       y 104
    -       priority 10
    -       fixPriority 1
    -       view 5302
    +       noun 6
    +       approachX 511
    +       approachY 115
    +       x 534
    +       y 112
        )
       
        (method (init)
    -       (super init: &rest)
    -       (if (and (proc11_0 203) (not (proc11_0 284)))
    -           (self setHotspot: 8 10 approachVerbs: 8)
    +       (super init:)
    +       (self
    +           setHotspot: 9998
    +           approachVerbs: 9998
    +           setPolygon:
    +               ((Polygon new:)
    +                   type: 0
    +                   init: 518 57 550 55 550 81 541 86 516 81 521 98
    +                   yourself:
    +               )
            )
        )
       
    -   (method (doVerb)
    -       (global2 setScript: (ScriptID 5301 5))
    +   (method (doVerb theVerb)
    +       (if local11 (gKqMessager say: noun 8 46 0) (return 1))
    +       (return
    +           (if (!= global104 -3)
    +               (switch theVerb
    +                   (8
    +                       (global2 setScript: (ScriptID 5302 34))
    +                   )
    +                   (61
    +                       (global2 setScript: (ScriptID 5302 13))
    +                   )
    +                   (5
    +                       (global2 setScript: (ScriptID 5302 35))
    +                   )
    +                   (else
    +                       (global2 setScript: (ScriptID 5302 33))
    +                   )
    +               )
    +           else
    +               0
    +           )
    +       )
    +   )
    +  
    +   (method (onMe param1 &tmp temp0)
    +       (if
    +       (and (proc11_0 349) (== (global80 message?) 5))
    +           (return 0)
    +       )
    +       (if
    +           (and
    +               local11
    +               (not (proc64999_5 (global80 message?) 8 10))
    +           )
    +           (return 0)
    +       )
    +       (= temp0
    +           (if (super onMe: param1)
    +           else
    +               (snakeSalesman onMe: param1)
    +           )
    +       )
    +       (if (param1 type?)
    +           (cond
    +               ((== (global80 message?) 61) (= approachX 490) (= approachY 108))
    +               (
    +               (and (not (proc11_0 116)) (not (proc11_0 461))) (= approachX 506) (= approachY 104))
    +               (else (= approachX 495) (= approachY 100))
    +           )
    +       )
    +       (return temp0)
        )
     )
     
    -(instance chinaDoorExit of ExitFeature
    +(instance pool of Feature
        (properties
    -       noun 11
    -       approachX 116
    -       approachY 109
    -       exitDir 1
    +       sightAngle 180
    +       approachX 471
    +       approachY 103
    +       x 466
    +       y 108
        )
       
        (method (init)
            (super init:)
    -       (= x approachX)
    -       (= y (chinaDoor y?))
    -       (self setHotspot: 8 10 approachVerbs: 8)
    +       (self
    +           setHotspot: 8 10 52
    +           approachVerbs: 8 52
    +           setPolygon:
    +               ((Polygon new:)
    +                   type: 1
    +                   init: 445 88 436 107 349 109 330 103 324 87 326 80 355 78 428 81
    +                   yourself:
    +               )
    +       )
        )
       
    -   (method (doVerb)
    -       (if (or (proc11_0 110) (!= global122 3))
    -           (global2 setScript: enterChinaShop)
    -       else
    -           (global2 setScript: dukeStopsVal)
    +   (method (doVerb theVerb)
    +       (switch theVerb
    +           (8
    +               (global2 setScript: (ScriptID 5302 7))
    +           )
    +           (52
    +               (global2 setScript: (ScriptID 5300 79))
    +           )
            )
    -       (return 1)
        )
       
    -   (method (onMe param1)
    -       (chinaDoor onMe: param1)
    +   (method (onMe param1 &tmp temp0)
    +       (if
    +       (and (= temp0 (super onMe: param1)) (param1 type?))
    +           (switch (global80 message?)
    +               (8
    +                   (= approachX 442)
    +                   (= approachY 114)
    +                   (= x 440)
    +               )
    +               (else
    +                   (= approachX 471)
    +                   (= approachY 103)
    +                   (= x 466)
    +               )
    +           )
    +       )
    +       (return temp0)
        )
     )
     
    -(instance townHallDoor of Prop
    +(instance birdCage of Feature
        (properties
    -       heading 90
    -       noun 3
    -       sightAngle 15
    -       approachX 239
    -       approachY 100
    -       x 231
    -       y 90
    -       priority 85
    -       fixPriority 1
    -       view 5302
    -       loop 4
    +       noun 7
    +       approachX 556
    +       approachY 110
    +       x 560
    +       y 113
        )
       
        (method (init)
            (super init:)
    -       (if
    -           (or
    -               (and (== global122 3) (not local1))
    -               (and (== global122 5) (proc11_0 203))
    -           )
    -           (= loop 3)
    -       )
    -       (if (not (proc11_0 110))
    -           (= cel 4)
    -       else
    -           (self setHotspot: 8 10)
    -       )
            (self
    +           setHotspot: 8 10
                approachVerbs: 8
                setPolygon:
                    ((Polygon new:)
                        type: 0
    -                   init: 211 98 206 67 206 52 212 45 220 44 227 47 231 55 233 70 235 91
    +                   init:
    +                       565
    +                       105
    +                       561
    +                       97
    +                       561
    +                       88
    +                       562
    +                       82
    +                       571
    +                       70
    +                       574
    +                       70
    +                       584
    +                       80
    +                       586
    +                       91
    +                       585
    +                       98
    +                       582
    +                       105
    +                       574
    +                       106
                        yourself:
                    )
            )
        )
       
    -   (method (doVerb theVerb)
    -       (return
    -           (if
    -           (and (> global122 3) (== noun 3) (== theVerb 8))
    -               (global2 setScript: openTownHallDoor 0 (== global122 5))
    -           else
    -               (if (and (== global122 5) (== noun 2))
    -                   (global2 setScript: showTownHallSign)
    -                   (return 1)
    -               )
    +   (method (doVerb)
    +       (cond
    +           ((not (proc11_0 138)) (global2 setScript: (ScriptID 5300 63)))
    +           ((not (proc11_0 139)) (global2 setScript: (ScriptID 5300 64)) (proc11_1 139))
    +           ((not (gKQEgo has: 42))
                    (cond
    -                   (
    -                       (and
    -                           (not (proc11_0 137))
    -                           (or
    -                               (and (== loop 3) (not (proc11_0 449)))
    -                               (== noun 2)
    -                           )
    +                   ((and (not (proc11_0 109)) (proc11_0 117)) (global2 setScript: (ScriptID 5300 65)))
    +                   ((not (proc11_0 109))
    +                       (if (proc11_0 119)
    +                           (global2 setScript: (ScriptID 5302 12))
    +                       else
    +                           (global2 setScript: (ScriptID 5300 66))
                            )
    -                       ((ScriptID 13 0) hide_mouth: 1)
    -                       (gKqMessager say: 2 theVerb 7 0 self)
    -                       (proc11_1 449)
                        )
    -                   ((== global104 -3) (global2 newRoom: 5100))
    -                   ((!= global122 3) (global2 newRoom: 5100))
    -                   ((proc11_0 137) (global2 setScript: enterTownHall))
    -                   (else (global2 setScript: knockOnTownHallDoor))
                    )
    +               (proc11_2 139)
                )
            )
    +       (return 1)
        )
       
    -   (method (onMe param1 &tmp temp0 temp1 temp2)
    -       (= temp0 (super onMe: param1))
    -       (= temp1 (- (param1 x?) nsLeft))
    -       (= temp2 (- (param1 y?) nsTop))
    +   (method (onMe param1 &tmp temp0)
            (if
                (and
    -               (== loop 3)
    -               (not (proc11_0 137))
    -               (or
    -                   (and
    -                       (proc64999_5 temp1 9 10)
    -                       (<= 24 temp2)
    -                       (<= temp2 34)
    -                   )
    -                   (and
    -                       (<= 10 temp1)
    -                       (<= temp1 18)
    -                       (proc64999_5 temp2 23 24)
    -                   )
    -                   (and
    -                       (proc64999_5 temp1 18 19)
    -                       (<= 24 temp2)
    -                       (<= temp2 34)
    -                   )
    -                   (and
    -                       (<= 10 temp1)
    -                       (<= temp1 18)
    -                       (proc64999_5 temp2 34 35)
    -                   )
    -               )
    +               (= temp0 (super onMe: param1))
    +               (proc11_0 117)
    +               (proc11_0 138)
                )
    -           (return 0)
    +           (= approachX 556)
    +           (= approachY 113)
            )
    -       (if (and temp0 (param1 type?))
    -           (if
    -               (and
    -                   (== loop 3)
    -                   (not (proc11_0 137))
    -                   (<= 10 temp1)
    -                   (<= temp1 18)
    -                   (<= 24 temp2)
    -                   (<= temp2 34)
    -               )
    -               (if (proc11_0 137) (return 0))
    -               (= noun 2)
    -               (if (not (proc11_0 137))
    -                   (= approachX 239)
    -                   (= approachY 100)
    -               else
    -                   (= approachX (gKQEgo x?))
    -                   (= approachY (gKQEgo y?))
    -               )
    -           else
    -               (= noun 3)
    -               (if
    -               (and (== global122 5) (== (global80 message?) 8))
    -                   (= approachX 226)
    -                   (= approachY 102)
    +       (return temp0)
    +   )
    +)
    +
    +(instance snakeSalesman of Prop
    +   (properties
    +       x 531
    +       y 90
    +       priority 90
    +       fixPriority 1
    +       view 5323
    +       loop 1
    +   )
    +)
    +
    +(instance egoActions of Actions
    +   (properties)
    +  
    +   (method (doVerb theVerb)
    +       (switch theVerb
    +           (57
    +               (if (proc5300_16 195)
    +                   (global2 setScript: (ScriptID 5302 21))
                    else
    -                   (if (or (!= global122 3) (proc11_0 449))
    -                       (= approachX 232)
    -                       (= approachY 103)
    -                   )
    -                   (if (proc11_0 137) (= approachX 237) (= approachY 98))
    +                   (return 0)
                    )
                )
    +           (else  (return 0))
            )
    -       (return temp0)
    +       (return 1)
        )
    +)
    +
    +(instance roomFeatureInitCode of Code
    +   (properties)
       
    -   (method (cue)
    -       ((ScriptID 13 0) hide_mouth: 0)
    +   (method (doit param1)
    +       (if
    +           (and
    +               (not (param1 isKindOf: KQInventory))
    +               (param1 respondsTo: #signal)
    +           )
    +           (param1
    +               sightAngle: 10
    +               signal: (| (param1 signal?) $7001)
    +           )
    +       )
    +   )
    +)
    +
    +(instance enterFromGate of Script
    +   (properties)
    +  
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (global1 handsOff:)
    +               (littleDoor cel: (littleDoor lastCel:))
    +               (= cycles 4)
    +           )
    +           (1
    +               (gKQEgo normalize: 3)
    +               (= cycles 1)
    +           )
    +           (2
    +               (littleDoor setCycle: Beg self)
    +           )
    +           (3
    +               (gKqSound1 number: 802 loop: 1 play:)
    +               (gKQEgo setHeading: 90 self)
    +           )
    +           (4
    +               (if (== next (ScriptID 5301 0))
    +                   (gKQEgo setMotion: MoveTo 60 (gKQEgo y?) self)
    +               else
    +                   (gKQEgo setMotion: MoveTo 40 (gKQEgo y?) self)
    +               )
    +           )
    +           (5
    +               (if (and (not next) (== client global2))
    +                   (global1 handsOn:)
    +               )
    +               (self dispose:)
    +           )
    +       )
        )
     )
     
    -(instance showTownHallSign of Script
    +(instance chickenRunsOff of Script
        (properties)
       
    -   (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global2 setInset: iSign self)
    +   (method (init)
    +       (proc11_2 539)
    +       (super init: &rest)
    +   )
    +  
    +   (method (dispose)
    +       (proc11_2 539)
    +       (super dispose:)
    +   )
    +  
    +   (method (changeState newState &tmp temp0)
    +       (if (not (proc11_0 539))
    +           (switch (= state newState)
    +               (0
    +                   (global1 handsOff: 1)
    +                   (gKqMusic1 pause: 1)
    +                   (chickenSound number: 5310 loop: -1 play:)
    +                   (chickenPetite
    +                       view: 5311
    +                       setLoop: 6 1
    +                       setCel: 0
    +                       setPri: -1
    +                       setCycle: End self
    +                   )
    +               )
    +               (1
    +                   (if (< (chickenPetite x?) 320)
    +                       (= global372 8)
    +                       (proc11_3 gKQEgo 315 104 0)
    +                       (chickenPetite
    +                           setLoop: 7 1
    +                           setCel: 0
    +                           setCycle: Walk
    +                           setMotion: PolyPath 315 104 self
    +                       )
    +                   else
    +                       (= global372 9)
    +                       (= temp0 (- (Abs (gNewPlane_2 left:)) 15))
    +                       (proc11_3 gKQEgo temp0 (chickenPetite y?) 0)
    +                       (chickenPetite
    +                           setLoop: 0 1
    +                           setCycle: Walk
    +                           setMotion: PolyPath temp0 (chickenPetite y?) self
    +                       )
    +                   )
    +                   (gKqMessager say: 0 0 13 0 chickenPetite)
    +               )
    +               (2
    +                   (chickenSound fade:)
    +                   (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    +                   (chickenPetite setCycle: 0)
    +                   (proc5300_4)
    +                   (global1 handsOn:)
    +                   (self dispose:)
    +               )
                )
    -           (1 (self dispose:))
    +       else
    +           (chickenSound stop:)
    +           (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    +           (chickenPetite setCycle: 0 setMotion: 0)
    +           (proc5300_4)
    +           (global1 handsOn:)
    +           (self dispose:)
            )
        )
     )
     
    -(instance openTownHallDoor of Script
    +(instance archDukeTalk of Script
        (properties)
       
    +   (method (doit)
    +       (super doit:)
    +       (if (and (== state 1) register) (self cue:))
    +   )
    +  
        (method (changeState newState)
            (switch (= state newState)
                (0
    -               (global1 handsOff:)
    -               (if (== global104 -4)
    -                   (gKQEgo
    -                       view: 8125
    -                       loop: 1
    -                       cel: 0
    -                       posn: 228 100
    -                       setPri: 88
    -                       setCycle: CT 5 1 self
    -                   )
    -               else
    -                   (gKQEgo
    -                       view: 8485
    -                       setLoop: 1
    -                       cel: 0
    -                       setPri: 88
    -                       setCycle: CT 5 1 self
    -                   )
    +               (archDuke
    +                   view: 5303
    +                   setLoop: 0
    +                   setCel: 0
    +                   posn: 147 115
    +                   setCycle: End self
                    )
                )
                (1
    -               (if register
    -                   (gKqSound1 number: 803 loop: 1 play: self)
    +               (if (not register)
    +                   (archDuke setLoop: 1 setCel: 0 setCycle: Fwd)
                    else
    -                   (= cycles 1)
    +                   (self cue:)
                    )
                )
                (2
    -               (if register
    -                   ((ScriptID 13 0) hide_mouth: 1 clientCel: -2)
    -                   (gKqMessager say: 0 0 47 0 self)
    -               else
    -                   (gKqSound1 number: 801 loop: 1 play:)
    -                   (townHallDoor setPri: 10 setCycle: End self)
    -                   (gKQEgo setCycle: End self)
    -               )
    +               (archDuke setLoop: 2 setCel: 0 setCycle: CT 16 1 self)
                )
                (3
    -               ((ScriptID 13 0) hide_mouth: 0)
    -               (if register (gKQEgo setCycle: Beg self))
    +               (gKQEgo setScript: (ScriptID 5300 67))
    +               (archDuke setLoop: 2 setCel: 17 setCycle: CT 20 1 self)
                )
                (4
    -               (if register
    -                   (gKQEgo
    -                       normalize: 7
    -                       posn: (townHallDoor approachX?) (townHallDoor approachY?)
    -                   )
    -                   (global1 handsOn:)
    -                   (self dispose:)
    -               else
    -                   (gKQEgo
    -                       normalize: 3
    -                       posn: 222 101
    -                       setPri: 20
    -                       setMotion: MoveTo 177 75 self
    -                   )
    -               )
    +               (gKqSound1 number: 5305 loop: 1 play:)
    +               (archDuke setCycle: CT 24 1 self)
    +           )
    +           (5
    +               (gKqSound1 stop:)
    +               (archDuke setCycle: End self)
                )
    -           (5 (global2 newRoom: 5100))
    +           (6 (self dispose:))
            )
        )
     )
     
    -(instance wagon of Feature
    -   (properties
    -       noun 6
    -       approachX 511
    -       approachY 115
    -       x 534
    -       y 112
    -   )
    +(instance unCoverCage of Script
    +   (properties)
       
    -   (method (init)
    -       (super init:)
    -       (self
    -           setHotspot: 9998
    -           approachVerbs: 9998
    -           setPolygon:
    -               ((Polygon new:)
    -                   type: 0
    -                   init: 518 57 550 55 550 81 541 86 516 81 521 98
    -                   yourself:
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (global1 handsOff:)
    +               (proc11_1 138)
    +               (cageCover dispose:)
    +               (chinaBird view: 5329 loop: 1 cel: 0 x: 571 y: 97 init:)
    +               (gKQEgo
    +                   view: 5327
    +                   loop: 0
    +                   cel: 0
    +                   x: 503
    +                   y: 138
    +                   setPri: 119
    +                   setScale: 0
    +                   setCycle: End self
                    )
    -       )
    -   )
    -  
    -   (method (doVerb theVerb)
    -       (if local15 (gKqMessager say: noun 8 46 0) (return 1))
    -       (return
    -           (if (!= global104 -3)
    -               (switch theVerb
    -                   (8
    -                       (global2 setScript: snakeDoVerbDo)
    -                   )
    -                   (61
    -                       (global2 setScript: giveStatue)
    -                   )
    -                   (5
    -                       (global2 setScript: snakeDoVerbComb)
    -                   )
    -                   (else
    -                       (global2 setScript: snakeDoVerbElse)
    -                   )
    +           )
    +           (1
    +               (cageCover init:)
    +               (gKQEgo
    +                   normalize: 2
    +                   posn: (birdCage approachX?) (birdCage approachY?)
    +                   setScaler: Scaler 83 53 98 78
    +                   setHeading: 90
                    )
    -           else
    -               0
    +               (chinaBird
    +                   view: 5327
    +                   loop: 1
    +                   cel: 0
    +                   x: 502
    +                   y: 141
    +                   setCycle: End self
    +               )
    +           )
    +           (2
    +               (global1 handsOn:)
    +               (self dispose:)
                )
            )
        )
    +)
    +
    +(instance openCageDoor of Script
    +   (properties)
       
    -   (method (onMe param1 &tmp temp0)
    -       (if
    -       (and (proc11_0 349) (== (global80 message?) 5))
    -           (return 0)
    -       )
    -       (if
    -           (and
    -               local15
    -               (not (proc64999_5 (global80 message?) 8 10))
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (global1 handsOff:)
    +               (= gKQEgoX (gKQEgo x?))
    +               (= gKQEgoY (gKQEgo y?))
    +               (gKQEgo setHeading: 90 self)
                )
    -           (return 0)
    -       )
    -       (= temp0
    -           (if (super onMe: param1)
    -           else
    -               (snakeSalesman onMe: param1)
    +           (1
    +               (gKQEgo
    +                   view: 5327
    +                   loop: 3
    +                   cel: 0
    +                   x: 535
    +                   y: 123
    +                   setScale: 0
    +                   setCycle: CT 5 1 self
    +               )
                )
    -       )
    -       (if (param1 type?)
    -           (cond
    -               ((== (global80 message?) 61) (= approachX 490) (= approachY 108))
    -               (
    -               (and (not (proc11_0 116)) (not (proc11_0 461))) (= approachX 506) (= approachY 104))
    -               (else (= approachX 495) (= approachY 100))
    +           (2
    +               (gKqSound1 number: 5330 loop: 1 play:)
    +               (cageDoor setCycle: End)
    +               (gKQEgo setCycle: CT 9 1 self)
    +           )
    +           (3 (gKQEgo setCycle: Beg self))
    +           (4
    +               (gKQEgo
    +                   normalize: 0
    +                   posn: gKQEgoX gKQEgoY
    +                   setScaler: Scaler 83 53 98 78
    +               )
    +               (global1 handsOn:)
    +               (self dispose:)
                )
            )
    -       (return temp0)
        )
     )
     
    -(instance snakeDoVerbElse of Script
    +(instance getTheChinaBird of Script
        (properties)
       
        (method (changeState newState)
            (switch (= state newState)
                (0
                    (global1 handsOff:)
    -               (if (snakeSalesman script?)
    -                   (keepSalesmanBusy caller: self register: 1)
    -               else
    -                   (= cycles 1)
    -               )
    +               (= gKQEgoX (gKQEgo x?))
    +               (= gKQEgoY (gKQEgo y?))
    +               (gKQEgo setHeading: 90 self)
                )
                (1
    -               (if (or (proc11_0 116) (proc11_0 95))
    -                   (gKqMessager say: 6 0 45 0 self)
    -               else
    -                   (gKqMessager say: 6 98 5 0 self)
    -               )
    +               (gKqMessager say: 7 8 28 0 self)
                )
                (2
    -               ((ScriptID 13 0) hide_mouth: 0 modeless: 1)
    +               (gKQEgo
    +                   view: 5327
    +                   loop: 3
    +                   cel: 0
    +                   x: 535
    +                   y: 123
    +                   setScale: 0
    +                   setCycle: End self
    +               )
    +           )
    +           (3
    +               (gKQEgo hide:)
    +               (chinaBird
    +                   view: 5327
    +                   loop: 4
    +                   cel: 1
    +                   x: 557
    +                   y: 114
    +                   setPri: 123
    +                   setCycle: End self
    +               )
    +           )
    +           (4
    +               (chinaBird dispose:)
    +               (gKQEgo get: 42)
    +               (birdCage dispose:)
    +               (gKQEgo
    +                   show:
    +                   posn: gKQEgoX gKQEgoY
    +                   normalize: 4
    +                   setScaler: Scaler 83 53 98 78
    +               )
                    (global1 handsOn:)
    -               (snakeSalesman setScript: keepSalesmanBusy)
                    (self dispose:)
                )
            )
        )
     )
     
    -(instance snakeDoVerbDo of Script
    +(instance tryGetBird of Script
        (properties)
       
        (method (changeState newState)
            (switch (= state newState)
                (0
                    (global1 handsOff:)
    -               (if (snakeSalesman script?)
    -                   (keepSalesmanBusy caller: self register: 1)
    -               else
    -                   (= cycles 1)
    -               )
    +               (gKQEgo setPri: 119 setHeading: 90 self)
                )
                (1
                    (cond
    -                   ((or (proc11_0 116) (proc11_0 95))
    -                       (if (or (not (proc11_0 123)) (== global122 5))
    -                           (cond
    -                               (
    -                               (and (not (proc11_0 95)) (not (proc11_1 416))) (gKqMessager say: 6 8 22 0 self))
    -                               ((not (proc11_1 417)) (gKqMessager say: 6 8 23 0 self))
    -                               (else (gKqMessager say: 6 8 24 0 self))
    -                           )
    -                       else
    -                           (gKqMessager say: 6 8 24 0 self)
    -                       )
    -                   )
    -                   ((or (not (proc11_0 123)) (== global122 5))
    -                       (cond
    -                           ((not (proc11_1 418)) (gKqMessager say: 6 8 25 0 self))
    -                           ((not (proc11_1 419)) (gKqMessager say: 6 8 26 0 self))
    -                           (else
    -                               ((ScriptID 13 0) hide_mouth: 1)
    -                               (gKqMessager say: 6 8 27 0 self)
    -                           )
    -                       )
    -                   )
    -                   (else
    -                       ((ScriptID 13 0) hide_mouth: 1)
    -                       (snakeSalesman setScript: keepSalesmanBusy)
    -                       (gKqMessager say: 6 8 27 0 self)
    -                   )
    +                   ((not (proc11_1 118)) (self setScript: (ScriptID 5302 10) self))
    +                   ((not (proc11_1 119)) (self setScript: (ScriptID 5302 11) self))
                    )
                )
                (2
    -               ((ScriptID 13 0) hide_mouth: 0 modeless: 1)
    +               (gKQEgo setHeading: 180 self)
    +           )
    +           (3
                    (global1 handsOn:)
    -               (if (not (snakeSalesman script?))
    -                   (snakeSalesman setScript: keepSalesmanBusy)
    -               )
                    (self dispose:)
                )
            )
        )
     )
     
    -(instance snakeDoVerbComb of Script
    +(instance getBlownOn of Script
        (properties)
       
        (method (changeState newState)
            (switch (= state newState)
                (0
    -               (global1 handsOff:)
    -               (if (snakeSalesman script?)
    -                   (keepSalesmanBusy caller: self register: 1)
    -               else
    -                   (= cycles 1)
    +               (gKQEgo
    +                   view: 5303
    +                   setLoop: 8
    +                   cel: 0
    +                   setScale: 0
    +                   posn: (+ (gKQEgo x?) 25) (gKQEgo y?)
    +                   setCycle: End self
                    )
                )
                (1
    -               (cond
    -                   ((proc11_0 116) (gKqMessager say: 6 5 22 0 self) (proc11_1 349))
    -                   ((not (proc11_1 461)) (proc11_1 95) (self setScript: haveSalesmanPoint))
    -                   ((not (proc11_1 417)) (gKqMessager say: 6 5 26 0 self))
    -                   (else (proc11_1 349) (gKqMessager say: 6 5 27 0 self))
    +               (gKQEgo
    +                   normalize: 0
    +                   x: (- (gKQEgo x?) 25)
    +                   setScaler: Scaler 83 53 98 78
                    )
    -           )
    -           (2
    -               ((ScriptID 13 0) hide_mouth: 0 modeless: 1)
    -               (global1 handsOn:)
    -               (snakeSalesman setScript: keepSalesmanBusy)
                    (self dispose:)
                )
            )
        )
     )
     
    -(instance haveSalesmanPoint of Script
    +(instance showTheComb of Script
        (properties)
       
    +   (method (init)
    +       (proc11_2 539)
    +       (super init: &rest)
    +   )
    +  
    +   (method (dispose)
    +       (proc11_2 539)
    +       (super dispose:)
    +   )
    +  
        (method (changeState newState)
    -       (switch (= state newState)
    -           (0
    -               (global1 handsOff:)
    -               (gKqMessager say: 6 5 25 1 self)
    -           )
    -           (1
    -               (if (snakeSalesman script?)
    -                   (keepSalesmanBusy caller: self register: 1)
    -               else
    +       (if (not (proc11_0 539))
    +           (switch (= state newState)
    +               (0
    +                   (global1 handsOff: 1)
    +                   (Load rsVIEW 5303)
    +                   (Load rsCDAUDIO 5305)
    +                   (Load rsVIEW 8132)
    +                   (Load rsVIEW 5334)
    +                   (= register (gKQEgo cycleSpeed?))
    +                   (gKQEgo
    +                       view: 8241
    +                       setLoop:
    +                           (if
    +                               (and
    +                                   (< 0 (gKQEgo heading?))
    +                                   (< (= register (gKQEgo cycleSpeed?)) 180)
    +                               )
    +                               0
    +                           else
    +                               1
    +                           )
    +                       setCel: 0
    +                       cycleSpeed: 12
    +                       setCycle: CT 20 1 self
    +                   )
    +               )
    +               (1
    +                   (gKqSound1 number: 1256 setLoop: -1 play:)
    +                   (gKQEgo setCycle: End self)
    +               )
    +               (2
    +                   (gKQEgo setCycle: CT 20 -1 self)
    +               )
    +               (3
    +                   (gKqSound1 setLoop: 1 stop:)
    +                   (gKQEgo setCycle: Beg self)
    +               )
    +               (4
    +                   (gKQEgo
    +                       normalize: 0
    +                       setScaler: Scaler 83 53 98 78
    +                       cycleSpeed: register
    +                   )
                        (= cycles 1)
                    )
    +               (5
    +                   (archTalker clientCel: -2 hide_mouth: 1 modeless: 2)
    +                   (gKqMessager say: 1 5 6 1 self)
    +               )
    +               (6
    +                   (self setScript: (ScriptID 5300 62) self)
    +                   (gKqMessager say: 1 5 6 2 self)
    +               )
    +               (7 (script register: 1))
    +               (8
    +                   (gKqMusic1 pause: 1)
    +                   (chickenSound number: 5310 loop: -1 play:)
    +                   (archTalker clientCel: -1 hide_mouth: 0 modeless: 1)
    +                   (self setScript: (ScriptID 5300 69) self self)
    +                   (= register (gKQEgo cycleSpeed?))
    +                   (chickenPetite
    +                       posn: 308 102
    +                       setPri: 130
    +                       view: 5303
    +                       setLoop: 4
    +                       setCel: 0
    +                       init:
    +                       setCycle: CT 16 1 self
    +                   )
    +                   (chickenTalker modeless: 2)
    +                   (= global372 7)
    +                   (gKqMessager say: 1 5 6 3 chickenPetite)
    +               )
    +               (9
    +                   (chickenPetite setCycle: CT 36 1 self)
    +                   (gKQEgo
    +                       view: 8132
    +                       setLoop: 0
    +                       setCel: 6
    +                       cycleSpeed: 13
    +                       setCycle: Beg
    +                   )
    +               )
    +               (10
    +                   (chickenPetite setCycle: End self)
    +                   (gKQEgo setCycle: End)
    +               )
    +               (11
    +                   (chickenSound fade:)
    +                   (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    +                   (gKQEgo
    +                       normalize: 0
    +                       setScaler: Scaler 83 53 98 78
    +                       cycleSpeed: register
    +                   )
    +                   (proc5300_4)
    +                   (= cycles 2)
    +               )
    +               (12
    +                   (archTalker clientCel: 4)
    +                   (gKqMessager say: 1 5 6 4 self)
    +               )
    +               (13
    +                   (archTalker clientCel: -1)
    +                   (archDuke setCycle: CT 12 1 self)
    +               )
    +               (14
    +                   (archDuke setPri: 86 setCycle: End self)
    +               )
    +               (15
    +                   (archDuke hide:)
    +                   (townHallDoor setHotspot: 8 10 setCycle: Beg self)
    +               )
    +               (16
    +                   (gKqSound1 number: 802 setLoop: 1 play:)
    +                   (archDuke
    +                       view: 5334
    +                       setLoop: 3 1
    +                       cel: 0
    +                       posn: 218 88
    +                       setPri: 82
    +                       show:
    +                       setCycle: Walk
    +                       setScaler: Scaler 92 73 86 78
    +                       setMotion: MoveTo 177 75 self
    +                   )
    +               )
    +               (17
    +                   (chickenTalker modeless: 1)
    +                   (archDuke dispose:)
    +                   (proc11_1 110)
    +                   (if (gKQEgo scratch?)
    +                       (gKQEgo addRespondVerb: 51)
    +                   else
    +                       (gKQEgo setHotspot: 0 51)
    +                   )
    +                   (chinaDoorExit init:)
    +                   (global1 handsOn:)
    +                   (self dispose:)
    +               )
                )
    -           (2
    -               (gKqMessager sayRange: 6 5 25 2 4 self)
    -           )
    -           (3
    -               (if (not (gKQEgo has: 47))
    -                   (gKqMessager say: 6 5 25 5 self)
    -               else
    +       else
    +           (switch (= state newState)
    +               (0
    +                   (gKqSound1 stop:)
    +                   (gKQEgo setScript: 0)
    +                   (if script (script caller: 0))
    +                   (= cycles 2)
    +               )
    +               (1
    +                   (gKQEgo
    +                       normalize: 0
    +                       setScaler: Scaler 83 53 98 78
    +                       posn: (archDuke approachX?) (archDuke approachY?)
    +                       cycleSpeed: register
    +                   )
    +                   (archDuke dispose:)
    +                   (proc11_1 110)
    +                   (if (gKQEgo scratch?)
    +                       (gKQEgo addRespondVerb: 51)
    +                   else
    +                       (gKQEgo setHotspot: 0 51)
    +                   )
    +                   (chickenPetite setCycle: 0 setMotion: 0)
    +                   (proc5300_4)
    +                   (archTalker clientCel: -1 hide_mouth: 0 modeless: 1)
    +                   (chickenTalker modeless: 1)
    +                   (chinaDoorExit init:)
    +                   (chickenSound fade:)
    +                   (gKqMusic1 setVol: 0 pause: 0 fade: 127 25 10 0)
    +                   (archTalker clientCel: -1)
    +                   (townHallDoor setHotspot: 8 10 cel: 0)
    +                   (UpdateScreenItem townHallDoor)
                        (global1 handsOn:)
    -                   (snakeSalesman setScript: keepSalesmanBusy)
                        (self dispose:)
                    )
                )
    -           (4
    -               (gKQEgo hide:)
    -               (= register (snakeSalesman priority?))
    -               (snakeSalesman
    -                   view: 5325
    -                   setLoop: 2 1
    -                   cel: 0
    -                   posn: 491 134
    -                   setPri: 150
    -                   setCycle: CT 8 1 self
    -               )
    -           )
    -           (5
    -               (snakeSalesman cel: 9)
    -               (UpdateScreenItem snakeSalesman)
    -               (FrameOut)
    -               (= cycles 1)
    -           )
    -           (6
    -               (gKqMessager say: 6 5 25 6 self)
    -           )
    -           (7
    -               (snakeSalesman setCycle: Beg self)
    -           )
    -           (8
    -               (gKQEgo show:)
    -               (snakeSalesman
    -                   setLoop: 5
    -                   cel: 7
    -                   setPri: register
    -                   posn: 497 129
    -               )
    -               (UpdateScreenItem snakeSalesman)
    -               (FrameOut)
    -               (= cycles 3)
    -           )
    -           (9
    -               (gKqMessager sayRange: 6 5 25 7 9 self)
    -           )
    -           (10
    -               (global1 handsOn:)
    -               (snakeSalesman setScript: keepSalesmanBusy)
    -               (self dispose:)
    -           )
            )
        )
     )
     
    -(instance keepSalesmanBusy of Script
    +(instance standUpDuke of Script
        (properties)
       
    -   (method (doit)
    -       (if (and seconds (or register next))
    -           (= seconds 0)
    -           (= cycles 1)
    -       )
    -       (super doit:)
    -   )
    -  
        (method (changeState newState)
            (switch (= state newState)
                (0
    -               (= local14 (= state 1))
    -               (snakeSalesman
    -                   view: 5325
    -                   setLoop: 5
    -                   cel: 7
    -                   posn: 497 129
    -                   setPri: 95
    -                   setCycle: Beg self
    -               )
    -           )
    -           (1
    -               (= local14 0)
    -               (= seconds (Random 2 5))
    -           )
    -           (2
    -               (= local14 1)
    -               (if (and (not next) (not register))
    -                   (if (Random 0 1)
    -                       (self changeState: 8)
    -                   else
    -                       (self changeState: 4)
    -                   )
    -               else
    -                   (snakeSalesman
    -                       setLoop: 5
    -                       setPri: 95
    -                       posn: 497 129
    -                       setCycle: End self
    -                   )
    -               )
    -           )
    -           (3
    -               (= register 0)
    -               (if next (next caller: caller) (= caller 0))
    -               (self dispose:)
    -           )
    -           (4
    -               (snakeSalesman
    -                   setLoop: 4
    -                   cel: 0
    -                   setPri: 92
    -                   posn: 529 95
    -                   setCycle: CT 6 1 self
    -               )
    -           )
    -           (5
    -               (if (and (not register) (Random 0 1))
    -                   (-- state)
    -                   (snakeSalesman setCycle: ROsc 1 6 14 self)
    -               else
    -                   (= cycles 1)
    -               )
    -           )
    -           (6
    -               (snakeSalesman setCycle: CT 18 1 self)
    -           )
    -           (7
    -               (= state 0)
    -               (snakeSalesman
    -                   setLoop: 5
    -                   cel: 3
    -                   setPri: 95
    -                   posn: 497 129
    -                   setCycle: End self
    -               )
    -           )
    -           (8
    -               (snakeSalesman
    +               (archDuke
    +                   posn: 147 116
                        setLoop: 3
    -                   cel: 0
    -                   setPri: 92
    -                   posn: 496 129
    +                   setCel: 0
                        setCycle: End self
                    )
                )
    -           (9 (= seconds 3))
    -           (10
    -               (snakeSalesman setCycle: Beg self)
    -           )
    -           (11
    -               (= state 0)
    -               (snakeSalesman
    +           (1
    +               (archDuke
    +                   posn: 206 107
                        setLoop: 5
    -                   setPri: 95
    -                   posn: 497 129
    -                   cel: 3
    -                   setCycle: End self
    +                   setCel: 0
    +                   setCycle: CT 4 1 self
                    )
                )
    +           (2 (self dispose:))
            )
        )
     )
     
    -(instance pool of Feature
    -   (properties
    -       sightAngle 180
    -       approachX 471
    -       approachY 103
    -       x 466
    -       y 108
    -   )
    +(instance theMoonFalls of Script
    +   (properties)
       
        (method (init)
    -       (super init:)
    -       (self
    -           setHotspot: 8 10 52
    -           approachVerbs: 8 52
    -           setPolygon:
    -               ((Polygon new:)
    -                   type: 1
    -                   init: 445 88 436 107 349 109 330 103 324 87 326 80 355 78 428 81
    -                   yourself:
    -               )
    -       )
    +       (proc11_2 539)
    +       (super init: &rest)
        )
       
    -   (method (doVerb theVerb)
    -       (switch theVerb
    -           (8
    -               (global2 setScript: tryToGetMoon)
    -           )
    -           (52
    -               (global2 setScript: getTheMoon)
    -           )
    -       )
    +   (method (dispose)
    +       (proc11_2 539)
    +       (super dispose:)
        )
       
    -   (method (onMe param1 &tmp temp0)
    -       (if
    -       (and (= temp0 (super onMe: param1)) (param1 type?))
    -           (switch (global80 message?)
    -               (8
    -                   (= approachX 442)
    -                   (= approachY 114)
    -                   (= x 440)
    +   (method (changeState newState)
    +       (if (not (proc11_0 539))
    +           (switch (= state newState)
    +               (0
    +                   (global1 handsOff: 1)
    +                   (Load rsCDAUDIO 907)
    +                   (Load rsCDAUDIO 854)
    +                   (Load rsCDAUDIO 836)
    +                   (Load rsVIEW 5314)
    +                   (localproc_1162)
    +                   (= global372 9)
    +                   (chickenPetite
    +                       view: 5311
    +                       setLoop: 0 1
    +                       setCycle: Walk
    +                       posn: 607 117
    +                       moveSpeed: 3
    +                       setPri: -1
    +                       init:
    +                       setMotion: MoveTo 500 107 self
    +                   )
    +                   (chickenTalker hide_mouth: 1 modeless: 2)
    +                   (gKqMessager say: 0 0 16 1 chickenPetite)
                    )
    -               (else
    -                   (= approachX 471)
    -                   (= approachY 103)
    -                   (= x 466)
    +               (1
    +                   (chickenPetite setMotion: PolyPath 468 94 self)
                    )
    -           )
    -       )
    -       (return temp0)
    -   )
    -)
    -
    -(instance birdCage of Feature
    -   (properties
    -       noun 7
    -       approachX 556
    -       approachY 110
    -       x 560
    -       y 113
    -   )
    -  
    -   (method (init)
    -       (super init:)
    -       (self
    -           setHotspot: 8 10
    -           approachVerbs: 8
    -           setPolygon:
    -               ((Polygon new:)
    -                   type: 0
    -                   init:
    -                       565
    -                       105
    -                       561
    -                       97
    -                       561
    -                       88
    -                       562
    -                       82
    -                       571
    -                       70
    -                       574
    -                       70
    -                       584
    -                       80
    -                       586
    -                       91
    -                       585
    -                       98
    -                       582
    -                       105
    -                       574
    -                       106
    -                   yourself:
    +               (2
    +                   (chickenPetite setMotion: PolyPath 393 86 self)
    +               )
    +               (3
    +                   (chickenPetite setMotion: PolyPath 321 102 self)
    +               )
    +               (4
    +                   (= global372 8)
    +                   (chickenPetite
    +                       setLoop: (if (global84 size:) 7 else 8) 1
    +                   )
    +                   (chickenPetite setMotion: PolyPath 402 117 self)
    +               )
    +               (5
    +                   (chickenPetite setMotion: PolyPath 477 98 self)
    +               )
    +               (6
    +                   (= global372 8)
    +                   (chickenPetite
    +                       setLoop: (if (global84 size:) 0 else 9) 1
    +                   )
    +                   (chickenPetite setMotion: PolyPath 468 94 self)
    +               )
    +               (7
    +                   (= global372 -1)
    +                   (chickenPetite
    +                       view: 5314
    +                       setLoop: 5
    +                       cel: 0
    +                       x: 475
    +                       y: 135
    +                       setPri: 100
    +                       setCycle: 0
    +                   )
    +                   (UnLoad 128 5311)
    +                   (chickenTalker hide_mouth: 1 clientCel: -2)
    +                   (moon
    +                       view: 5312
    +                       loop: 0
    +                       cel: 0
    +                       x: 382
    +                       y: 95
    +                       setPri: 150
    +                       init:
    +                       setCycle: End self
    +                   )
    +               )
    +               (8
    +                   (moon loop: 1 cel: 0 setCycle: End self)
                    )
    -       )
    -   )
    -  
    -   (method (doVerb)
    -       (cond
    -           ((not (proc11_0 138)) (global2 setScript: uncoverCage))
    -           ((not (proc11_0 139)) (global2 setScript: openCageDoor) (proc11_1 139))
    -           ((not (gKQEgo has: 42))
    -               (cond
    -                   ((and (not (proc11_0 109)) (proc11_0 117)) (global2 setScript: getTheChinaBird))
    -                   ((not (proc11_0 109))
    -                       (if (proc11_0 119)
    -                           (global2 setScript: takeBird)
    -                       else
    -                           (global2 setScript: tryGetBird)
    -                       )
    +               (9
    +                   (mockingBird
    +                       view: 5314
    +                       loop: 3
    +                       cel: 0
    +                       x: 349
    +                       y: 49
    +                       z: 0
    +                       setPri: 150
    +                       setCycle: CT 2 1
                        )
    +                   (moon loop: 2 cel: 0 setCycle: CT 1 1 self)
    +               )
    +               (10
    +                   (gKqSound1 number: 907 loop: 1 play:)
    +                   (moon loop: 2 setCycle: CT 11 1 self)
    +               )
    +               (11
    +                   (self setScript: (ScriptID 5300 72))
    +                   (moon setCycle: End self)
    +               )
    +               (12
    +                   (chickenPetite setPri: -1 setCycle: CT 6 1 self)
    +               )
    +               (13
    +                   (archDukeSound number: 854 loop: 1 play:)
    +                   (chickenPetite setCycle: End self)
    +               )
    +               (14
    +                   (gKqSound1 number: 836 loop: 1 play:)
    +                   (chickenPetite
    +                       view: 5315
    +                       loop: 0
    +                       cel: 0
    +                       posn: 415 93
    +                       setPri: 125
    +                       setCycle: End self
    +                   )
    +               )
    +               (15
    +                   (moon
    +                       view: 5316
    +                       loop: 6
    +                       cel: 0
    +                       setScript: (ScriptID 5300 71)
    +                   )
    +                   (gKqSound1 number: 836 loop: 1 play:)
    +                   (chickenPetite loop: 1 cel: 0 setCycle: End self)
    +               )
    +               (16
    +                   (chickenPetite
    +                       loop: 2
    +                       cel: 0
    +                       setHotspot: 8 10
    +                       approachVerbs: 8
    +                       setPri: 110
    +                       setCycle: End self
    +                   )
    +               )
    +               (17
    +                   (global1 handsOn:)
    +                   (pool init:)
    +                   (self dispose:)
                    )
    -               (proc11_2 139)
                )
    -       )
    -       (return 1)
    -   )
    -  
    -   (method (onMe param1 &tmp temp0)
    -       (if
    -           (and
    -               (= temp0 (super onMe: param1))
    -               (proc11_0 117)
    -               (proc11_0 138)
    +       else
    +           (self setScript: 0)
    +           (gKqSound1 stop:)
    +           (proc11_1 113)
    +           (mockingBird dispose:)
    +           (chickenPetite view: 5315 loop: 2)
    +           (chickenPetite
    +               cel: (chickenPetite lastCel:)
    +               posn: 415 93
    +               setPri: 110
    +               setMotion: 0
    +               setCycle: 0
    +               setHotspot: 8 10
    +               approachVerbs: 8
                )
    -           (= approachX 556)
    -           (= approachY 113)
    -       )
    -       (return temp0)
    -   )
    -)
    -
    -(instance fauxSign of Feature
    -   (properties
    -       noun 8
    -       approachX 413
    -       approachY 75
    -       x 413
    -       y 70
    -   )
    -  
    -   (method (init)
    -       (super init:)
    -       (self
    -           setHotspot: 8 10
    -           approachVerbs: 8
    -           setPolygon:
    -               ((Polygon new:)
    -                   type: 1
    -                   init: 398 32 399 31 412 30 425 36 425 38 398 40
    -                   yourself:
    +           (nickel init:)
    +           (if (not (moon script?))
    +               (moon
    +                   view: 5316
    +                   loop: 6
    +                   cel: 0
    +                   init:
    +                   setScript: (ScriptID 5300 71)
                    )
    -       )
    -   )
    -  
    -   (method (doVerb theVerb)
    -       (if (== global104 -3)
    -           (gKqMessager say: noun theVerb 37)
    -       else
    -           (gKqMessager say: noun theVerb 0)
    +           )
    +           (gKQEgo normalize: 5)
    +           (pool init:)
    +           (global1 handsOn:)
    +           (self dispose:)
            )
        )
     )
     
    -(instance fauxDoor of Prop
    -   (properties
    -       noun 12
    -       approachX 435
    -       approachY 69
    -       x 439
    -       y 69
    -       z 3
    -       priority 66
    -       fixPriority 1
    -       view 5302
    -       loop 2
    -   )
    -  
    -   (method (init)
    -       (super init:)
    -       (if (not (proc11_0 276)) (self setHotspot: 8 10))
    -       (self
    -           approachVerbs: 8
    -           setPolygon:
    -               ((Polygon new:)
    -                   type: 1
    -                   init: 438 65 446 67 443 30 431 33
    -                   yourself:
    -               )
    -       )
    -   )
    +(instance bobbingMoon of Script
    +   (properties)
       
    -   (method (doVerb)
    -       (cond
    -           ((== global104 -4)
    -               (cond
    -                   ((proc11_0 203) (global2 setScript: (ScriptID 5301 4)))
    -                   ((== global122 5) (global2 setScript: enterFauxShop))
    -                   ((and (proc11_0 120) (proc11_0 121)) (gKqMessager say: 8 8 34 0))
    -                   ((not (proc11_0 123)) (gKqMessager say: 8 8 33 0))
    -                   ((proc11_0 122) (global2 setScript: enterFauxShop))
    -                   (else (global2 setScript: walkThroughDoor))
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (moon
    +                   view: 5316
    +                   setLoop: 6 1
    +                   cel: 14
    +                   cycleSpeed: 8
    +                   posn: 409 93
    +                   setPri: 110
    +                   setCycle: Beg self
                    )
                )
    -           ((proc11_0 149) (global2 setScript: enterFauxShop))
    -           (else (global2 setScript: walkThroughDoor))
    -       )
    -   )
    -  
    -   (method (onMe param1 &tmp temp0)
    -       (if
    -           (and
    -               (= temp0 (super onMe: param1))
    -               (param1 type?)
    -               (== loop 5)
    +           (1
    +               (if register
    +                   (moon setCycle: End self)
    +               else
    +                   (-- state)
    +                   (moon setCycle: ROsc 1 4 9 self)
    +               )
                )
    -           (= approachX (- x 3))
    -           (= approachY y)
    +           (2 (self dispose:))
            )
    -       (return temp0)
        )
     )
     
    -(instance readFauxDoorSign of Script
    +(instance mockingBirdFlysAway of Script
        (properties)
       
        (method (changeState newState)
            (switch (= state newState)
                (0
    -               (global1 handsOff:)
    -               (gKQEgo setHeading: 90 self)
    +               (gKqSound1 number: 5312 loop: 1 play:)
    +               (mockingBird view: 5314 loop: 3 cel: 2 setCycle: End self)
                )
                (1
    -               (gKqMessager say: 8 8 register 0)
    +               (nickel init:)
    +               (mockingBird
    +                   setLoop: 4 1
    +                   cel: 0
    +                   setCycle: Fwd
    +                   posn: 362 52
    +                   setPri: 150
    +                   moveSpeed: 1
    +                   setMotion: MoveTo 640 1 self
    +               )
                )
                (2
    -               (global1 handsOn:)
    +               (proc11_1 113)
    +               (mockingBird dispose:)
                    (self dispose:)
                )
            )
        )
     )
     
    -(instance fauxDoorExit of ExitFeature
    -   (properties
    -       noun 12
    -       approachX 435
    -       approachY 69
    -       x 439
    -       y 66
    -       exitDir 2
    -   )
    -  
    -   (method (init)
    -       (super init:)
    -       (self setHotspot: 8 10 approachVerbs: 8)
    -       (fauxDoor setHotspot: 0)
    -   )
    -  
    -   (method (doVerb theVerb)
    -       (fauxDoor doVerb: theVerb)
    -   )
    -  
    -   (method (onMe param1 &tmp temp0)
    -       (if
    -           (and
    -               (= temp0 (fauxDoor onMe: param1))
    -               (param1 type?)
    -               (proc11_0 203)
    -           )
    -           (= approachX 424)
    -           (= approachY 72)
    -       )
    -       (return temp0)
    -   )
    -)
    -
    -(instance enterFauxShop of Script
    +(instance cantPassDuke of Script
        (properties)
       
        (method (changeState newState)
            (switch (= state newState)
                (0
                    (global1 handsOff:)
    -               (if (!= global104 -3)
    -                   (gKQEgo view: 8121 loop: 0 cel: 0 setCycle: CT 2 1 self)
    -               else
    -                   (= cycles 1)
    -               )
    +               (gKQEgo setMotion: 0)
    +               (= cycles 1)
                )
                (1
    -               (gKqSound1 number: 801 loop: 1 play:)
    -               (fauxDoor setCycle: End self)
    -               (if (!= global104 -3)
    -                   (gKQEgo setCycle: Beg self)
    -               else
    -                   (= cycles 1)
    -               )
    +               (archTalker modeless: 2)
    +               (gKqMessager say: 0 0 2 0 self)
    +               (self setScript: (ScriptID 5300 74) self)
                )
                (2 0)
                (3
    -               (gKQEgo normalize: 0 setMotion: MoveTo 450 69 self)
    +               (global1 handsOn:)
    +               (self dispose:)
                )
    -           (4 (global2 newRoom: 5000))
            )
        )
     )
     
    -(instance snakeSalesman of Prop
    -   (properties
    -       x 531
    -       y 90
    -       priority 90
    -       fixPriority 1
    -       view 5323
    -       loop 1
    -   )
    -)
    -
    -(instance crook of Prop
    -   (properties)
    -)
    -
    -(instance egoActions of Actions
    +(instance stepBackEgo of Script
        (properties)
       
    -   (method (doVerb theVerb)
    -       (switch theVerb
    -           (57
    -               (if (localproc_77f0 195)
    -                   (global2 setScript: putOnMask)
    -               else
    -                   (return 0)
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (gKQEgo
    +                   view: 8021
    +                   setLoop: 0
    +                   setCel: 0
    +                   setCycle: End self
                    )
                )
    -           (else  (return 0))
    -       )
    -       (return 1)
    -   )
    -)
    -
    -(instance partySound1 of Sound
    -   (properties
    -       flags $0004
    -       number 5100
    -       loop -1
    -   )
    -)
    -
    -(instance partySound2 of Sound
    -   (properties
    -       flags $0004
    -       number 5102
    -       loop -1
    -   )
    -)
    -
    -(instance archDukeSound of Sound
    -   (properties
    -       flags $0004
    -       number 5301
    -       loop -1
    -   )
    -)
    -
    -(instance chickenSound of Sound
    -   (properties
    -       flags $0004
    -       number 5310
    -       loop -1
    -   )
    -)
    -
    -(instance gateGuard of Actor
    -   (properties
    -       noun 10
    -       approachX 61
    -       approachY 113
    -       x 29
    -       y 113
    -       view 5328
    -   )
    -  
    -   (method (init)
    -       (super init: &rest)
    -       (self setHotspot: 8 10 approachVerbs: 8)
    -   )
    -  
    -   (method (doVerb)
    -       (guardTalker client: self)
    -       (cond
    -           ((not (proc11_1 542)) (gKqMessager say: noun 8 39 0))
    -           ((not (proc11_1 543)) (gKqMessager say: noun 8 38 0))
    -           (else (gKqMessager say: noun 8 40 0))
    -       )
    -   )
    -  
    -   (method (cue)
    -       (self view: 5328 setLoop: 0 cel: 0 setCycle: 0)
    -       (UpdateScreenItem self)
    -       (FrameOut)
    -   )
    -)
    -
    -(instance feather of View
    -   (properties
    -       approachX 280
    -       approachY 93
    -       x 295
    -       y 62
    -       priority 93
    -       fixPriority 1
    -       view 5331
    -       loop 5
    -   )
    -  
    -   (method (init)
    -       (super init: &rest)
    -       (if (not (gKQEgo has: 41))
    -           (self setHotspot: 8 10 approachVerbs: 8)
    -           (= signal (& signal $efff))
    +           (1
    +               (gKQEgo
    +                   normalize: 0
    +                   setScaler: Scaler 83 53 98 78
    +                   posn: 90 (gKQEgo y?)
    +                   ignoreActors: 1
    +               )
    +               (self dispose:)
    +           )
            )
        )
    -  
    -   (method (doVerb)
    -       (global2 setScript: getFeather)
    -   )
     )
     
    -(instance getFeather of Script
    +(instance walkThroughDoor of Script
        (properties)
       
        (method (changeState newState)
            (switch (= state newState)
                (0
                    (global1 handsOff:)
    -               (= gKQEgoX (gKQEgo x?))
    -               (= gKQEgoY (gKQEgo y?))
    -               (= cycles 3)
    +               (gKqSound1 number: 801 loop: 1 play:)
    +               (fauxDoor setCycle: End self)
                )
                (1
    -               (gKQEgo view: 8075 loop: 0 cel: 0 setCycle: End self)
    +               (gKQEgo setMotion: MoveTo 457 69 self)
                )
                (2
    -               (feather dispose:)
    -               (gKQEgo get: 41 setCycle: Beg self)
    +               (gKQEgo setMotion: MoveTo 466 69 self)
                )
                (3
    +               (gKQEgo setHeading: 180 self)
    +           )
    +           (4 (= seconds 3))
    +           (5
                    (gKQEgo
    -                   normalize: 6
    -                   posn: gKQEgoX gKQEgoY
    -                   setScaler: Scaler 83 53 98 78
    +                   setMotion: MoveTo (fauxDoor approachX?) (fauxDoor approachY?) self
                    )
    +           )
    +           (6
    +               (fauxDoor setCycle: Beg self)
    +           )
    +           (7
    +               (gKqSound1 number: 802 loop: 1 play:)
                    (global1 handsOn:)
                    (self dispose:)
                )
    @@ -5252,250 +2873,519 @@
        )
     )
     
    -(instance wagonSign of View
    -   (properties
    -       x 520
    -       y 53
    -       priority 95
    -       fixPriority 1
    -       view 5300
    -       loop 7
    -   )
    -  
    -   (method (init)
    -       (super init: &rest)
    -       (= local15 1)
    -   )
    -)
    -
    -(instance cageDoor of Prop
    -   (properties
    -       x 577
    -       y 94
    -       priority 98
    -       fixPriority 1
    -       view 5300
    -       loop 3
    -   )
    -)
    -
    -(instance glint1 of Prop
    -   (properties
    -       x 365
    -       y 92
    -       priority 109
    -       fixPriority 1
    -       view 5300
    -       loop 4
    -       cycleSpeed 9
    -   )
    +(instance partyGoers of Script
    +   (properties)
       
    -   (method (init)
    -       (super init: &rest)
    -       (self setScript: glintScript)
    -   )
    -)
    -
    -(instance glint2 of Prop
    -   (properties
    -       x 414
    -       y 94
    -       priority 109
    -       fixPriority 1
    -       view 5300
    -       loop 5
    -       cycleSpeed 10
    -   )
    -)
    -
    -(instance glint3 of Prop
    -   (properties
    -       x 394
    -       y 93
    -       priority 109
    -       fixPriority 1
    -       view 5300
    -       loop 6
    -       cycleSpeed 14
    +   (method (changeState newState)
    +       (if (not (proc11_0 539))
    +           (switch (= state newState)
    +               (0
    +                   (global1 handsOff: 1)
    +                   (gKQEgo setMotion: 0)
    +                   (proc11_3 gKQEgo badger 0)
    +                   (stork setCycle: CT 11 1 self)
    +                   (hippo setCycle: CT 9 1 self)
    +               )
    +               (1 0)
    +               (2
    +                   (badger setCycle: CT 12 1 self)
    +               )
    +               (3
    +                   (guardTalker clientCel: -2 client: badger)
    +                   (gKqMessager say: 0 0 15 0 self)
    +               )
    +               (4
    +                   (badger setPri: 110 setCycle: End self)
    +               )
    +               (5
    +                   (stork setCycle: End self)
    +                   (hippo setCycle: End self)
    +               )
    +               (6 0)
    +               (7
    +                   (stork dispose:)
    +                   (hippo view: -12406 setLoop: 0 cel: 0 setCycle: End self)
    +               )
    +               (8
    +                   (hippo dispose:)
    +                   (badger setCycle: CT 15 -1 self)
    +               )
    +               (9
    +                   (badger
    +                       view: 5305
    +                       setLoop: 3
    +                       posn: 217 93
    +                       cel: 0
    +                       setPri: 82
    +                       setCycle: End self
    +                   )
    +               )
    +               (10
    +                   (badger dispose:)
    +                   (townHallDoor setCycle: Beg self)
    +               )
    +               (11
    +                   (gKqSound1 number: 802 loop: 1 play:)
    +                   (global1 handsOn:)
    +                   (self dispose:)
    +               )
    +           )
    +       else
    +           (proc11_2 539)
    +           (gKqSound1 stop:)
    +           (badger dispose:)
    +           (hippo dispose:)
    +           (stork dispose:)
    +           (townHallDoor cel: 0)
    +           (UpdateScreenItem townHallDoor)
    +           (global1 handsOn:)
    +           (self dispose:)
    +       )
        )
     )
     
    -(instance glintScript of Script
    +(instance rosellaFirstEnter of Script
        (properties)
       
    -   (method (init)
    -       (glint2 init: hide:)
    -       (glint3 init: hide:)
    -       (super init: &rest)
    -   )
    -  
        (method (changeState newState)
            (switch (= state newState)
                (0
    -               (glint1 show: cel: 0 setCycle: End self)
    +               (global1 handsOff:)
    +               (Load rsSOUND 5307)
    +               (Load rsSOUND 5308)
    +               (Load rsCDAUDIO 5408)
    +               (townHallDoor cel: 4 setPri: 80)
    +               (archDukeSound number: 5307 loop: -1 play:)
    +               (archDuke
    +                   view: 5341
    +                   loop: 0
    +                   cel: 0
    +                   x: 229
    +                   y: 105
    +                   cycleSpeed: 10
    +                   init:
    +                   setCycle: Fwd
    +               )
    +               (self setScript: (ScriptID 5300 8) self)
                )
                (1
    -               (glint1 hide:)
    -               (glint2 show: cel: 0 setCycle: End self)
    +               (gKQEgo setMotion: PolyPath 170 111 self)
                )
                (2
    -               (glint2 hide:)
    -               (= state -1)
    -               (glint3 show: cel: 0 setCycle: End self)
    +               (archDukeSound number: 5308 loop: 1 play:)
    +               (archDuke cel: 0 setCycle: End self)
    +           )
    +           (3
    +               (archDuke loop: 1 cel: 0 x: 233 y: 105 setCycle: End self)
    +           )
    +           (4
    +               (archDuke loop: 2 cel: 0 x: 233 y: 105 setCycle: End self)
    +           )
    +           (5
    +               (archDukeSound fade: 0 50 20 1)
    +               (archTalker clientCel: -2 loop: 3)
    +               (gKqMessager sayRange: 0 0 35 1 3 self)
    +           )
    +           (6
    +               (archDukeSound number: 5307 loop: -1 play:)
    +               (archDuke
    +                   view: 5341
    +                   loop: 0
    +                   cel: 0
    +                   x: 229
    +                   y: 105
    +                   setCycle: Fwd
    +               )
    +               (= seconds 3)
    +           )
    +           (7
    +               (archDukeSound number: 5308 loop: 1 play: fade: 0 50 20 1)
    +               (archDuke
    +                   view: 5342
    +                   loop: 0
    +                   cel: 0
    +                   x: 233
    +                   y: 103
    +                   setCycle: End self
    +               )
    +           )
    +           (8
    +               (gKqSound1 number: 5408 loop: 1 play: self)
    +               (archDuke view: 5342 loop: 1 cel: 0 x: 233 y: 103)
    +               (UpdateScreenItem archDuke)
    +               (FrameOut)
    +           )
    +           (9
    +               (archTalker hide_mouth: 1 clientCel: -2)
    +               (gKqMessager say: 0 0 35 4 self)
    +           )
    +           (10
    +               (gKqMusic1 loop: -1 play: setVol: 0 fade: 127 25 10 0)
    +               (archDuke
    +                   view: 5334
    +                   setLoop: 3 1
    +                   cel: 0
    +                   x: 234
    +                   y: 100
    +                   setPri: 82
    +                   setCycle: Walk
    +                   setMotion: MoveTo 177 75 self
    +               )
    +           )
    +           (11
    +               (archDuke dispose:)
    +               (townHallDoor setCycle: Beg self)
    +           )
    +           (12
    +               (gKqSound1 number: 802 loop: 1 play:)
    +               (if (not (proc11_1 167))
    +                   ((ScriptID 13 0) hide_mouth: 1)
    +                   (gKqMessager say: 0 0 36 0 self)
    +               else
    +                   (self cue:)
    +               )
    +           )
    +           (13
    +               ((ScriptID 13 0) hide_mouth: 0)
    +               (if (gKQEgo scratch?)
    +                   (gKQEgo addRespondVerb: 51)
    +               else
    +                   (gKQEgo setHotspot: 0 51)
    +               )
    +               (global1 handsOn:)
    +               (self dispose:)
                )
            )
        )
     )
     
    -(instance archTalker of KQTalker
    -   (properties
    -       clientCel -1
    -   )
    -  
    -   (method (init)
    -       (= client archDuke)
    -       (super init: &rest)
    -   )
    -)
    -
    -(instance bull of Prop
    -   (properties
    -       x 108
    -       y 78
    -       priority 92
    -       fixPriority 1
    -       view 5337
    -       loop 1
    -   )
    -)
    -
    -(instance bullTalker of KQTalker
    -   (properties)
    -  
    -   (method (init)
    -       (= client bull)
    -       (super init: &rest)
    -   )
    -)
    -
    -(instance fauxOwnerTalker of KQTalker
    -   (properties)
    -  
    -   (method (init)
    -       (= client fauxDoor)
    -       (= mouth_y (* (client z?) -1))
    -       (super init: &rest)
    -   )
    -)
    -
    -(instance mockingBirdTalker of KQTalker
    +(instance snakeChickenCartoon of Script
        (properties)
       
        (method (init)
    -       (= client mockingBird)
    -       (= loop 2)
    -       (= mouth_y (* (client z?) -1))
    -       (super init: &rest)
    -   )
    -)
    -
    -(instance guardTalker of KQTalker
    -   (properties
    -       clientCel -1
    -   )
    -  
    -   (method (init)
    -       (if (not client) (= client badger))
    +       (proc11_2 539)
            (super init: &rest)
        )
    -)
    -
    -(instance snakeTalker of KQTalker
    -   (properties)
       
    -   (method (init)
    -       (if (!= client gKQEgo) (= client snakeSalesman))
    -       (super init: &rest)
    -   )
    -)
    -
    -(instance chickenTalker of KQTalker
    -   (properties
    -       hide_mouth 1
    +   (method (dispose)
    +       (proc11_2 539)
    +       (super dispose:)
        )
       
    -   (method (init)
    -       (= client chickenPetite)
    -       (super init: &rest)
    +   (method (changeState newState)
    +       (if (not (proc11_0 539))
    +           (switch (= state newState)
    +               (0
    +                   (global1 handsOff: 1)
    +                   (Load rsVIEW 5323)
    +                   (Load rsVIEW 5325)
    +                   (chickenPetite
    +                       view: 5323
    +                       loop: 0
    +                       cel: 0
    +                       x: 520
    +                       y: 108
    +                       init:
    +                   )
    +                   (chickenTalker hide_mouth: 0 clientCel: -2 modeless: 2)
    +                   (gKqMessager say: 0 0 21 1 self)
    +               )
    +               (1
    +                   (snakeSalesman
    +                       view: 5323
    +                       loop: 1
    +                       cel: 0
    +                       posn: 529 92
    +                       setCycle: End self
    +                   )
    +               )
    +               (2
    +                   (gKqMessager say: 0 0 21 2 self)
    +               )
    +               (3
    +                   (snakeSalesman
    +                       view: 5323
    +                       loop: 2
    +                       cel: 0
    +                       posn: 534 95
    +                       setCycle: End self
    +                   )
    +               )
    +               (4
    +                   (gKqMessager sayRange: 0 0 21 3 4 self)
    +               )
    +               (5
    +                   (snakeSalesman
    +                       view: 5323
    +                       loop: 3
    +                       cel: 0
    +                       posn: 543 90
    +                       setCycle: End self
    +                   )
    +               )
    +               (6
    +                   (gKqMessager say: 0 0 21 5 self)
    +               )
    +               (7
    +                   (chickenPetite setCycle: End self)
    +               )
    +               (8
    +                   (chickenPetite dispose:)
    +                   (snakeSalesman
    +                       view: 5325
    +                       loop: 0
    +                       cel: 4
    +                       posn: 491 128
    +                       setCycle: End self
    +                   )
    +               )
    +               (9
    +                   (snakeSalesman setScript: (ScriptID 5302 0))
    +                   (gKQEgo setHeading: 180 self)
    +               )
    +               (10
    +                   (global1 handsOn:)
    +                   (self dispose:)
    +               )
    +           )
    +       else
    +           (chickenPetite dispose:)
    +           (if (not (snakeSalesman script?))
    +               (snakeSalesman setScript: (ScriptID 5302 0))
    +           )
    +           (gKQEgo normalize: 2)
    +           (global1 handsOn:)
    +           (self dispose:)
    +       )
        )
     )
     
    -(instance chinaBirdTalker of KQTalker
    +(instance getTheMoon of Script
        (properties)
       
    -   (method (init)
    -       (= client chinaBird)
    -       (super init: &rest)
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (global1 handsOff:)
    +               (Load rsVIEW 5319)
    +               (guardTalker client: archDuke view: 5319 loop: 28)
    +               (global2 centerScreen: -318 self 10)
    +           )
    +           (1
    +               (moon setScript: 0 cel: 9 setCycle: End)
    +               (gKQEgo
    +                   view: 5322
    +                   loop: 0
    +                   cel: 0
    +                   x: 463
    +                   y: 101
    +                   setPri: 109
    +                   setScale: 0
    +                   setCycle: CT 9 1 self
    +               )
    +           )
    +           (2
    +               (gKqSound1 number: 836 loop: -1 play:)
    +               (gKQEgo cel: 10 setCycle: End self)
    +           )
    +           (3
    +               (gKQEgo view: 5322 loop: 1 cel: 0 setCycle: End self)
    +           )
    +           (4
    +               (gKQEgo view: 5322 loop: 2 cel: 0 setCycle: CT 5 1 self)
    +           )
    +           (5
    +               (gKqSound1 stop:)
    +               (gKQEgo setCycle: End self)
    +           )
    +           (6
    +               (gKQEgo view: 5318 loop: 3 cel: 0 setCycle: CT 3 1 self)
    +           )
    +           (7
    +               (gKqSound1 number: 836 loop: -1 play:)
    +               (gKQEgo cel: 4 setCycle: End self)
    +           )
    +           (8
    +               (self setScript: (ScriptID 5300 80))
    +               (gKQEgo view: 5324 loop: 0 cel: 0 setCycle: CT 4 1 self)
    +           )
    +           (9
    +               (gKqSound1 stop:)
    +               (gKQEgo setCycle: CT 15 1 self)
    +           )
    +           (10
    +               (gKQEgo setCycle: End crook)
    +               (= global378 1)
    +               (gKqMusic1 number: 5315 loop: 1 play:)
    +               (gateGuard
    +                   view: 5328
    +                   setLoop: 2 1
    +                   cel: 0
    +                   init:
    +                   posn: 290 113
    +                   setCycle: Walk
    +                   setSpeed: 4
    +                   setMotion: MoveTo 420 118 hippo
    +               )
    +               (archDuke
    +                   view: 5320
    +                   loop: 0
    +                   cel: 0
    +                   x: 469
    +                   y: 136
    +                   setPri: 90
    +                   cycleSpeed: 6
    +                   init:
    +                   setScale: 0
    +                   setCycle: CT 29 1 self
    +               )
    +           )
    +           (11
    +               (archDuke setPri: 100 setCycle: End self)
    +           )
    +           (12
    +               (gKQEgo dispose:)
    +               (archDuke view: 5319 loop: 7 cel: 0 setCycle: End self)
    +           )
    +           (13
    +               (if (gateGuard mover?) (-- state))
    +               (= cycles 3)
    +           )
    +           (14
    +               (gKqMessager sayRange: 0 0 18 1 2 self)
    +           )
    +           (15
    +               (guardTalker
    +                   client: gateGuard
    +                   view: -1
    +                   loop: 1
    +                   hide_mouth: 0
    +               )
    +               (gKqMessager sayRange: 0 0 18 3 4 self)
    +           )
    +           (16
    +               (= global378 1)
    +               (gKqMusic1 number: 5316 loop: 1 play: self)
    +           )
    +           (17
    +               (gKQEgo get: 48)
    +               (proc11_1 126)
    +               (global2 newRoom: 35)
    +           )
    +       )
        )
     )
     
    -(instance roomFeatureInitCode of Code
    +(instance crookFalls of Script
        (properties)
       
    -   (method (doit param1)
    -       (if
    -           (and
    -               (not (param1 isKindOf: KQInventory))
    -               (param1 respondsTo: #signal)
    +   (method (changeState newState)
    +       (switch (= state newState)
    +           (0
    +               (crook
    +                   view: 5318
    +                   loop: 4
    +                   cel: 0
    +                   x: 425
    +                   y: 93
    +                   setPri: 140
    +                   init:
    +                   setCycle: End self
    +               )
                )
    -           (param1
    -               sightAngle: 10
    -               signal: (| (param1 signal?) $7001)
    +           (1
    +               (gKQEgo put: 39)
    +               (crook dispose:)
    +               (self dispose:)
                )
            )
        )
     )
     
    -(instance iSign of Inset
    -   (properties
    -       picture 5303
    -       priority 200
    -   )
    -  
    -   (method (init)
    -       (= x (Abs ((global2 plane?) left:)))
    -       (super init: &rest)
    -       (proc11_6)
    -   )
    -)
    -
    -(instance tryToGetMoon of Script
    +(instance talkToChickenAboutMoon of Script
        (properties)
       
    -   (method (changeState newState)
    +   (method (changeState newState &tmp temp0)
            (switch (= state newState)
                (0
                    (global1 handsOff:)
    -               (gKQEgo view: 8075 setLoop: 1 1 cel: 0 setCycle: End self)
    +               (gKqMessager say: 4 8 17 1 self)
                )
                (1
    -               ((ScriptID 13 0) hide_mouth: 1)
    -               (gKqMessager say: 12 8 18 2 self 1100)
    +               (chickenPetite view: 5311 setLoop: 6 cel: 0 posn: 424 82)
    +               (UpdateScreenItem chickenPetite)
    +               (FrameOut)
    +               (chickenTalker hide_mouth: 0 modeless: 2)
    +               (= cycles 1)
    +           )
    +           (2
    +               (gKqMessager say: 4 8 17 2 self)
                )
    -           (2 (gKQEgo setCycle: Beg self))
                (3
    -               (gKQEgo view: 8295 setLoop: 1 1 cel: 0 setCycle: End self)
    +               (chickenTalker hide_mouth: 1 modeless: 2 loop: -1)
    +               (chickenPetite setCycle: CT 3 1 self)
                )
                (4
    -               ((ScriptID 13 0) hide_mouth: 1)
    -               (gKqMessager say: 1 8 3 0 self 1250)
    +               (chickenPetite setLoop: 2 1 cel: 4 setCycle: Beg self)
                )
                (5
    -               ((ScriptID 13 0) hide_mouth: 0)
    -               (gKQEgo setCycle: Beg self)
    +               (gKqMessager say: 4 8 17 3 self)
                )
                (6
    -               (gKQEgo normalize: 7)
    +               (gKqSound1 number: 5311 loop: 1 play:)
    +               (chickenPetite
    +                   setCycle: ROsc -1 0 2
    +                   moveSpeed: 8
    +                   setMotion: MoveTo 452 64 self
    +               )
    +           )
    +           (7
    +               (chickenPetite setCycle: End self)
    +           )
    +           (8
    +               (gKQEgo hide:)
    +               (chickenPetite
    +                   setLoop: 3
    +                   cel: 0
    +                   setPri: -1
    +                   posn: 459 100
    +                   setCycle: Fwd
    +               )
    +               (gKqMessager say: 4 8 17 4 self)
    +           )
    +           (9
    +               (chickenPetite setCycle: End self)
    +           )
    +           (10
    +               (chickenPetite
    +                   setLoop: 4
    +                   cel: 0
    +                   posn: 451 93
    +                   setCycle: End self
    +               )
    +           )
    +           (11
    +               (gKQEgo show:)
    +               (= temp0 (- (Abs (gNewPlane_2 left:)) 10))
    +               (chickenPetite
    +                   setLoop: 0 1
    +                   setCel: 0
    +                   setCycle: Walk
    +                   ignoreActors: 1
    +                   setMotion: PolyPath temp0 (chickenPetite y?) self
    +               )
    +               (gKqMessager say: 4 8 17 5 self)
    +           )
    +           (12
    +               (gKQEgo
    +                   normalize: 1
    +                   posn: (chickenPetite approachX?) (chickenPetite approachY?)
    +                   setHeading: 180 self
    +               )
    +           )
    +           (13 0)
    +           (14
    +               (proc5300_4)
                    (global1 handsOn:)
                    (self dispose:)
                )