30 This is the official CAW test program\\N - Both autos\S - Auto1 after trig 2\W - Auto2 after trig1\U - obj2 pick up after trig1\D - obj1 pick up after trig2\E - More options (:::):(:) 0 0 0 0 0 0 1 5 9 6 7 8 Both Autos ...\\S - Back to main options\E - Autos but not get\W - Autos which kill objects (A:B::)&get a:&get b(:) 0 0 0 0 0 0 -1 0 2 4 -1 -1 Autos but not get\\W - back to Both Autos\\Exit up open if trig 1 worked, down if trig 2 worked. (C:D::)&say C:&say D(:) 0 0 0 0 1 2 -1 -1 -1 1 3 3 Blank test location (:::):(:) 0 0 0 0 0 0 -1 -1 -1 -1 -1 -1 Autos which kill objects ...\\E - back to Both Autos\\If object E shows, trig 1 not working, F - trig 2 not. (E:F::)&#kill E:&#kill F(:) 0 0 0 0 0 0 -1 -1 1 -1 -1 -1 Auto1 after trig 2\\After SAY H, G should disappear ... (G:H::)&@get g:say H(:) 0 0 0 0 0 0 0 -1 -1 -1 -1 -1 Auto2 after trig 1\\After SAY I, J should disappear ... (I:J::)say I:&@get J(:) 0 0 0 0 0 0 -1 -1 0 -1 -1 -1 Obj2 pick up after trig1\\Obj2 (hidden) should be in inv (@test:&#obj2::)&say test:(:) 0 0 0 0 0 0 -1 -1 -1 -1 -1 0 Obj1 pick up after trig2\\Obj1 (hidden) should be in inv (&#obj1:@test::):&say test(:) 0 0 0 0 0 0 -1 -1 -1 -1 0 -1 Second options page\\W - Back to auto options\N - test get trigs\S - test non-get trigs\U - test get trigs with added text\D - test non-get trigs with added text\E - Yet more options (:::):(:) 0 0 0 0 0 0 10 11 14 0 12 13 Test get trigs\\Try getting each object - you should be able to (K:L::)get K:get L(:) 0 0 0 0 0 0 -1 9 -1 -1 -1 -1 Test non-get trigs\\Type TRY and then the object. You should get an OK and added text on the end of this description.\\ (M:N:TRY M has been successful.: TRY N has beeen successful.)try m:try n(:) 0 0 0 0 0 0 9 -1 -1 -1 -1 -1 Get trigs with instant text\\Get these objects - you should be able to and get a message as well. (O:P::)get O`Success for get O:get P`Success for get P(:) 0 0 0 0 0 0 -1 -1 -1 -1 -1 9 Non-get trigs with instant text\\TRY these objects - you should be able to and get a message as well. (Q:R::)try Q`Success for try Q:try R`Success for try R(:) 0 0 0 0 0 0 -1 -1 -1 -1 9 -1 Yet more options ...\\W - Back to second options page\N - test new location text trig 1\S - test new location text trig 2\U - test death without object\D - test death with object / auto trig death\E - Another menu page (:::):(:) 0 0 0 0 0 0 15 16 20 9 17 18 Type GO 1 for new description, GO Again to test see if trig 2 takes priority. (1:Again:#GO 1 worked fine:#Trig 2 did take priority!)go 1:go again(:) 0 0 0 0 0 0 -1 14 -1 -1 -1 -1 Type GO 2 for new description (2:::#go 2 worked!):go 2(:) 0 0 0 0 0 0 14 -1 -1 -1 -1 -1 You should now die ... (:::):(XXXX:Deaded! Type E and press return to enter edit mode then type normal to return to tests) 0 0 0 0 0 0 -1 -1 -1 -1 -1 14 After you get S you should die\\Go down for an auto trig test (S:::)get S:(#S:Died again!) 0 0 0 0 0 0 -1 -1 -1 -1 14 19 Test of death by auto trigger ... (T:::)&get T:(#T:It worked as well ...) 0 0 0 0 0 0 -1 -1 -1 -1 18 -1 Another menu page ...\\W - Back again\N - Test getting objects without get\S - Test getting objects without get and with instant text\U - Test trig after trig 2\D - test trig after trig 1\E - More! (:::):(:) 0 0 0 0 0 0 21 22 25 14 23 24 Type TAKE then the object, check that it appears in your inventory ... (U:V::)^take U:^take V(:) 0 0 0 0 0 0 -1 20 -1 -1 -1 -1 Type TAKE then the object, check that it appears in your inventory ...\You should also get text after you type it in (U:V::)^take U`Hurrah for U!:^take V`Hurrah for V!(:) 0 0 0 0 0 0 20 -1 -1 -1 -1 -1 Try kick door after wear boot ... (door:boot::)@kick door:wear boot(:) 0 0 0 0 0 0 -1 -1 -1 -1 -1 20 Try throw star after get star ...\\Note - this also tests removing and after other trig prefixes together as well as trying to do it from the inventory (star:::)get star:@#throw star(:) 0 0 0 0 0 0 -1 -1 -1 -1 20 -1 Hopefully the final one!\\W - Back\N - Test ^@trig1\S - test ^@trig2\U - Test auto pick up\D - Test ^@#!\E - Test &^@#!!!\\Test here as well - try GET THE CC and GET THE DD! Shouldn't be got and should still show. (CC:DD::)get the\CC:get the\DD(:) 0 0 0 0 0 0 26 27 30 20 28 29 Type GO FOR IT then try W (or vice-versa). Should pick up W (W:@For it::)^@try w:go for it(:) 0 0 0 0 0 0 -1 25 -1 -1 -1 -1 Type GO FOR IT then try X (or vice-versa). Should pick up X (@For it:X::)go for it:^@try X(:) 0 0 0 0 0 0 25 -1 -1 -1 -1 -1 Go into edit - you should now have &Object1 and &Object2 (&Object1:&Object2::):(:) 0 0 0 0 0 0 -1 -1 -1 -1 -1 25 This doesn't work with PCv1.0 or STv3.7 - no point to it anyway! Type try Y anyway ... after AFTER Z (Y:Z::)^@#try Y:after Z(:) 0 0 0 0 0 0 -1 -1 -1 -1 25 -1 This works although it's manual counterpart won't, pointless anyway. AA should go after WORK BB (AA:BB::)&^@#try AA:WORK BB(:) 0 0 0 0 0 0 -1 -1 -1 25 -1 -1