( L E V E L 0 0 0 0 2 ) objects: O 11 9 door d1 13 8 door d2 15 7 door d3 13 3 door d4 9 4 door d5 7 5 door d6 8 10 door d7 4 9 door d8 2 6 door d9 4 2 door d10 lev00003.jor 7 0 exitdoor dx ' dx 6 0 scanner sx defer c10 ' c10 5 1 computer cx ' cx 5 4 computer _c10 ' _c10 ' c10 redefine defer c8 ' c8 11 4 computer c9 ' c9 16 1 computer _c8 ' _c8 ' c8 redefine defer c6 ' c6 16 10 computer c7 ' c7 14 6 computer _c6 ' _c6 ' c6 redefine defer c3 ' c3 10 6 computer c5 defer c2 ' c2 5 6 computer c4 ' c5 1 9 computer _c3 ' _c3 ' c3 redefine ' c4 1 2 computer _c2 ' _c2 ' c2 redefine ' c2 9 11 computer c1 ' d7 0 4 scanner sc1 ' d3 10 0 scanner sc2 ' d1 11 0 scanner sc3 ' d5 12 0 scanner sc4 ' d2 13 7 scanner sc5 ' d4 17 9 scanner sc6 ' c3 13 6 switch s1 ' d6 14 0 switch s2 ' d8 15 0 switch s3 ' d9 16 0 switch s4 ' d10 2 0 switch s5 c2 :noname dup EVTOUCH = isneut? and c4 computer-on? not and if neut say" DESTINATION TERMINAL\IS DISCONNECTED" neut say" PLEASE CONTACT YOUR\SYSTEM ADMINISTRATOR" neut say" THIS INCIDENT HAS\BEEN REPORTED" then chain-listener ; :noname reset-level O s" lev00002.map" load-map 11 11 tile>world pjaye entity.pos! 10 12 tile>world pneut entity.pos! ; ' onload redefine