(version 2)
(include "sci.sh")
(exports
    0 junkBay
)
(use "Main")
(use "Class_255_0")
(use "Game")
(script 700)



(instance public junkBay of Locale
    (properties)

    (method (handleEvent pEvent)
        (var temp0[50])
        (if ((send pEvent:claimed))
            return 
        )
        (switch ((send pEvent:type))
            (case 128
                (if (Said('get,get[<up]/iron,scrap,debris,heap[<sharp]'))
                    proc255_0(700 0)
                )(else
                    (if (Said('get,manipulate,feel/(edge[<jagged]),(programmer[<barbed])'))
                        proc255_0(700 1)
                    )(else
                        (if (Said('consume/iron,scrap,debris,heap[<sharp]'))
                            proc255_0(700 2)
                        )(else
                            (if (Said('expectorate'))
                                proc255_0(700 3)
                            )(else
                                (if (Said('write,swing'))
                                    proc255_0(700 4)
                                )(else
                                    (if (Said('listen'))
                                        proc255_0(700 5)
                                    )(else
                                        (if (Said('kiss'))
                                            proc255_0(700 6)
                                        )(else
                                            (if (Said('clean'))
                                                proc255_0(700 7)
                                            )(else
                                                (if (Said('consume/ass'))
                                                    proc255_0(700 8)
                                                )(else
                                                    (if (Said('beat'))
                                                        proc255_0(700 9)
                                                    )(else
                                                        (if (Said('press,manipulate,roll/iron,scrap,debris,heap[<sharp]'))
                                                            proc255_0(700 10)
                                                        )(else
                                                            (if (Said('holler,whistle,laugh[<out]'))
                                                                proc255_0(700 11)
                                                            )(else
                                                                (if (Said('cry[<out]'))
                                                                    proc255_0(700 12)
                                                                )(else
                                                                    (if (Said('use/cable'))
                                                                        (if ((send gEgo:has(1)))
                                                                            proc255_0(700 13)
                                                                        )(else
                                                                            proc255_0(700 14)
                                                                        )
                                                                    )(else
                                                                        (if (Said('tie'))
                                                                            proc255_0(700 15)
                                                                        )(else
                                                                            (if (Said('climb/iron,building,heap,debris,scrap[<sharp]'))
                                                                                proc255_0(700 16)
                                                                            )(else
                                                                                (if (Said('use,climb,stand,erect,lean/ladder'))
                                                                                    (if ((send gEgo:has(2)))
                                                                                        proc255_0(700 17)
                                                                                    )(else
                                                                                        proc0_9()
                                                                                    )
                                                                                )(else
                                                                                    (if (Said('look>'))
                                                                                        (if (Said('[<up,above,at]/ceiling') or Said('<up,above,at[/ceiling]'))
                                                                                            proc255_0(700 18)
                                                                                        )(else
                                                                                            (if ((<> global149 global11) and (Said('[<down,below,at]/dirt,deck') or Said('<down,below,at[/dirt,deck]')))
                                                                                                proc255_0(700 19)
                                                                                            )(else
                                                                                                (if (Said('/console'))
                                                                                                    proc255_0(700 20)
                                                                                                )(else
                                                                                                    (if (Said('/banister,banister,beam'))
                                                                                                        proc255_0(700 21)
                                                                                                    )(else
                                                                                                        (if (Said('/partition,console[<leech,e,north,w]'))
                                                                                                            proc255_0(700 22)
                                                                                                        )(else
                                                                                                            (if (Said('[<in,at,through]/debris,heap,iron,garbage,end,debris,scrap'))
                                                                                                                proc255_0(700 23)
                                                                                                            )(else
                                                                                                                (if (Said('/(edge[<jagged]),(programmer[<barbed])'))
                                                                                                                    proc255_0(700 1)
                                                                                                                )(else
                                                                                                                    (if (Said('/dirt'))
                                                                                                                        proc255_0(700 24)
                                                                                                                    )(else
                                                                                                                        (if (Said('/paint,coolant'))
                                                                                                                            proc255_0(700 25)
                                                                                                                        )(else
                                                                                                                            (if (Said('/lamp'))
                                                                                                                                proc255_0(700 26)
                                                                                                                            )(else
                                                                                                                                (if (Said('/conduit,frame'))
                                                                                                                                    proc255_0(700 27)
                                                                                                                                )(else
                                                                                                                                    (if (Said('/console'))
                                                                                                                                        proc255_0(700 28)
                                                                                                                                    )(else
                                                                                                                                        (if (Said('/self'))
                                                                                                                                            proc255_0(700 29)
                                                                                                                                        )(else
                                                                                                                                            (if (Said('/appendage,head,leg,body,self'))
                                                                                                                                                proc255_0(700 30)
                                                                                                                                            )
                                                                                                                                        )
                                                                                                                                    )
                                                                                                                                )
                                                                                                                            )
                                                                                                                        )
                                                                                                                    )
                                                                                                                )
                                                                                                            )
                                                                                                        )
                                                                                                    )
                                                                                                )
                                                                                            )
                                                                                        )
                                                                                    )(else
                                                                                        (if (Said('nap,(lie<down)[/deck]'))
                                                                                            proc255_0(700 31)
                                                                                        )(else
                                                                                            (if (Said('*/cable[<*]'))
                                                                                                proc255_0(700 32)
                                                                                            )(else
                                                                                                (if (Said('drop,hold[<in]/crystal[<glowing]/mouth'))
                                                                                                    proc255_0(700 33)
                                                                                                )(else
                                                                                                    (if (Said('consume,break/crystal[<glowing]'))
                                                                                                        proc255_0(700 34)
                                                                                                    )(else
                                                                                                        (if (Said('dig[/cavity]'))
                                                                                                            proc255_0(700 35)
                                                                                                        )(else
                                                                                                            (if (Said('climb/banister,beam,banister<up<to'))
                                                                                                                proc255_0(700 36)
                                                                                                            )(else
                                                                                                                (if (Said('climb'))
                                                                                                                    proc255_0(700 37)
                                                                                                                )(else
                                                                                                                    (if (Said('jump/craft'))
                                                                                                                        proc255_0(700 38)
                                                                                                                    )(else
                                                                                                                        (if (Said('hoist,open,manipulate,press,drag,bend/deck,console'))
                                                                                                                            proc255_0(700 39)
                                                                                                                        )(else
                                                                                                                            (if (Said('get/tile[<rib,deck]'))
                                                                                                                                proc255_0(700 40)
                                                                                                                            )
                                                                                                                        )
                                                                                                                    )
                                                                                                                )
                                                                                                            )
                                                                                                        )
                                                                                                    )
                                                                                                )
                                                                                            )
                                                                                        )
                                                                                    )
                                                                                )
                                                                            )
                                                                        )
                                                                    )
                                                                )
                                                            )
                                                        )
                                                    )
                                                )
                                            )
                                        )
                                    )
                                )
                            )
                        )
                    )
                )
                (if ((== global149 global11) and Said('use,(turn<on)/motivator,artifact,device'))
                    proc255_0(700 41)
                )
            )
        )
    )

)
