o]VqVLIN露TMTA鴿妼又V七2丁刀又九乙壬AB浿TAR埧E杻攽CHKSU沊H毐彳柀妱F粍將淇術就煮賁意硼遑1衹1將1淇1術1就1煮1賁1意1硼1遑2訕S刁蚌七MD七CN釢M九DI偝ECTO毢YT躊O姈O谹L崎EMP七炃几淺袒ETR咷ACKS籸SCAP鐺騙I了N儿CN髟TM七D卜刁三儿卜MS夫DI浭釢笊麗M卜M1乃IR卜垝渶涑汞X力DI毧N埩鯊EM几L姇M儿T七H屯CHSE偪V勾硱A@ss\sss[wwbb 4EE y @ @ABpB'AEP@B"5Aq@@Br !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVW@XYZ[\]^_`abcdefghi ##*****************************##* THE WIZARD *##* EDITOR MODULE *(##* by *2##* Clayton Walnum *<##*****************************F6-@6-@'6-@36-@?6-@K6-@W6-@c6-@o6-@ {6-@6-@6-@6-@6-@6-@6-@P=6-@6-@'6-@36-@ = AB@Z2 #AE -A"+67,.>:,/ 2$d A n. 6-%$67$&,.7<,. Ax$%% AP ($9AR1-("@:,/(9 A(>:%A(, A`$22@ !-@P% /22$%K:)"%$7+AY76-F:A`,%AV$F:Aa,%)&@p%!%)%k-@#% 1%@$@eH%@%F:A`,_%@&F:Aa,kAR:-@%( the wizard$-7(貗殢隰罿殣:$BA A-AA?AY@4B$7+AY76-F:A`,%AV$F:Aa,%C&@q%'%@!5%@"C%@#E%@$@e.%@%F:A`,E%@&F:Aa,"9ARA-AA9@, -( the wizard$6= -( 譁迋蹉贍,( 尕攪恓鼴鼴=( 伔珘@8( 眐玵'( 俵埧寑8( 恓埧寑J( 霰衲妅轂奻庥TAY@4$^.67,. 67A,. (67,..6-h: 6-6-6- A`&40 A: A`r( B:, -B:,%$67,. ( |- 6-?:C:,:A:,,L 6-6-@% A`(4*B(7@0<@T,L A  4 A A67@0<@)%B:,,.7<,4NONEA`@ 6- A`4*6(7@U<@y,@ A` 4(  A`67@U<@T%B:,,.(AJ 6-6- A`"4*76.=:@:7@,,,@(J A  4 A Ap6 Ap6.067@<@,.>:A:,,66- & -(EVERYTHING OK?& A*"@:N,)"@:n,$/@:Y,*@:y,A4//67$@&@<$@,.7<,>(67B:,%,.7<,H$R""****** INPUT ROUTINE *******\. 6-6-6-6..AdAUf) A"AR&( )$pAR"A 0z" "AR'" A 8 6-%6-%!%AR/-%&5( 8$!@86-6-%+ -%&(>:,!67,.>:,+ Ap- !(~6-& 6-&&"-6.+ "6-@86-&+6-%@ !6.7<, Ap""********* MAIN MENU ********7+AY76-F:A`,%AV$F:Aa,%)&@p%!%)%k-@#% 1%@$@eH%@%F:A`,_%@&F:Aa,kAR=-@%( the wizard*-@#=(貗殢隰罿殣R -() Create a game$-7() Load a game=-R() Work on rooms< -() Work on items$-<() Work on commands7 -( ) Intro text!--() Quit7 AP A6-$d AP6-&@H.(*!* @:-@!P(闀諃翴濎翴臩譀Z Ad AP.??ApAAA#@AAA A`8 APB!!****** COMMAND MENU *******LI A-*() Simple Commands0-I() Movement CommandsV: -() Item Commands$-:() Fatal Commands`) -() Final commands) APj7 A A0%6-&@H7 )!A0t//A1A2@A4 A3A3`~!!********** QUIT ***********K-@"%( ARE YOU SURE? / AK@:Y,*@:y,A " +@@"!!******** LOAD GAME ********R AP-@#-( 9-@!N( 僸鵻濎鵴覶槼R0Y*0yA :"D:FILENAME.DAT/@:@3 6.6.D: 67B:,%,.367B:,%,..NAMI 6-6.6-6.$6./67,. @67@0,. I67,.&!& B6-@*67B:,&,.ITM * Ap$ 6-%$67$&,.7<,67$&,.7<,MM7<,4GET)7<@!,4DROP)7<@!,4NONE)7<,4 A0- 6-%#67$&,.7<@2,- A0/67B:,&,.RMS%/ A- 6-@:7,,#67<,.*- A $67B:,&,.COM$ A67B:,&,.FAT A67B:,&,.MOV A(67B:,&,.FIN A267B:,&,.CHG A< A F[-@ (( 4-@'?(ERROR!M-APQ [ A P""***** CREATE NEW GAME ******ZE+AY76-F:A`,%AV$F:Aa,%E&@pd' -% %'%n %%x/-@$% /A@T3-@%( the wizard$-3( 湅蘪鍕翴? -( ш翴更鏻鐔?/ -(挓翴緮縃懤?/AY@4 - 4A  - 4AP - 4A`5 67,.6.-+(EVERYTHING OK?5 A"@:N,)"@:n,Ap@:Y,*@:y,Ap" -(CREATING FILES"6-467B:,%,..NAM!((/(4G67B:,&,.COM %767B:,&,.RMSBGG67B:,&,.ITM %767B:,&,.FATBGG67B:,&,.MOV %767B:,&,.FINBGK67B:,&,.CHG %?D:FILENAME.DATF(K%67B:,&,.INT %)D:FILENAME.DAT$()" A ,!!****** WORK ON ROOMS ******65 A-@#5( @:-@$( 玁敳襘瀍": )!@0AJ! 6-6-!67B:,&,.RMST7<,0*A`^ A`h$ $@:,A@r B6-|r 6-6-+$AV0AR<@HAYr6-F:A`,%AV$F:Aa,%@[&@q%-%@$@eD%@%F:A`,[%@&F:Aa,1 -( the wizard$-@&1(ROOM # -( 眐玵恔芶(Q( 恘眕( 衃梊*( 鰻衲7( 覂衲D( 桸Q( 鰍谻U -( 疻衲疶譎(&(尕攪1(伔珘4(7(F( 恓埧寑U( 俵埧寑C-@"(-@"#(/-@"3(?-@"C( --@"( EA@T!A3AAEAY@4(A  -(7<@%,I --%'6-@:7@'%,,3!@0A6-&@0I6-%)( -((NONE) A@ (7<,T -(7@3<@E,$-9(7@<@,?-T(7@q<@,( -(7@F<@p,( A@(67,. 67@,. (67,.&67<,.>:,0L 6-6-6-@$% A`.4*B(7<@%,L Ap: 4 A A@D67<%B:,,.N 6--6-%6-X -%(  A`bS 4*#6.=:@:7@'%,,,+(:A:,!@0I(A:,&@0S Al# 4*(6-A:,# A@v* 46.0-%&6-*(T A 6.6-A:,06-@:7@'%,,@ )!@0J AT A5**&@0'!@0*!56-%@0!!67@'%<@'%,.>:,()00)%A1 -(NONE-%(7@,+-1( ) -(7@t,-)(7@t,k[67@3<@,.@ a6-k A (*A:,!@0(6.=:A:,&@0,/ A:,! -8%<,8%<,/(A:,  B A 0 A A% 6-6-6-6-% A`&*4*(7<,& A!@()0NONEA  " -(7@,-"( 9 -(7@t,-)(7@t,/6-9 A"p  4(NONE A"p* !6-4. -7<,0 $ A. A 0>E'( +7@&%<@&%,45 A;6-E A 0HGA67@&%<@&%,.>:@:7@&%<@&%,,%@0,G6-R= !=67@&%<@&%,.>:@:7@&%,,&@0,\c 6-6-6- A`?*4*7@3<@3,0 Y(7@3<@E,c A!pf 4 A A!@p67@3<@2%B:,,.z] 6-6- A`9*4*7@<@,0 S(7@<@,] A"*0*0R*0I A* A!p 46.I$67@<@,. -$(i 6-6-6-@%% A`E*4*7@q<@q,0 _(7@q<@,i A"@ 4 A A"67@q<@p%B:,,.W 6- A`3*4*7@F<@F,0 M(7@F<@p,W A"p 4 A A"@67@F<@E%B:,,.<-@%( Everything*-@(2(OK?< A"@:N,)"@:n,A`@:Y,*@:y,A"p]67@3,.7@6,]67@&%<@&%,.>:@:7@&%<@&%,,&@0, 7"('-6-7 A  9('67<,.*/6-%9 A !!******* WORK ON ITEMS *****$ >67,. 67A ,. (67,..6-46-> A`. A-@'(濊樇-0( 尕攪A( 譁霰8 '( 眐玵'( Э埏B 8( 譁迋蹉贍'( 尕攪恓鼴鼴8( 伔珘L 8( 俵埧寑&( 恓埧寑8AY@4V 67B:,&,.ITM` : 6-6-6- A`&40 A: A$j ( B:, (67B:,%,.7@%B:,,t B:,"A%P~ - 6-?:C:,:A:,,%A:,"A00 A'`  A(  A&P ) B6-6-# A`)6. *0Y*0N*0 A* A'` = *41%6.>:&A(,-(36.= A(   46.Y( ' 4N'67<,.>:@:7,,%@0, ;*4Y*@:7<,,!@0;67<,.>:@:7,,&@0, @ 6-6- A`"4*6(7<@2,@ A(` #4*4Y6.GET#( $4*4N6.NONE$(" 67<%B:,,., ..7<,4GET)7<@!,4NONEA006 ] 6-6- A`94**7@3<@3,0 S(7@3<@E,] A)@  46.NONE-(J 67@3<@2%B:,,.T ''7@3<@6,0NONEA) ^ g -%( *67@<@,. 0-=(7@t,]67@q<@,.7@t,g A)`h ] 6-6- A`9*4*7@<@,0 S(7@<@,] A)`r *0R*0I*0 A* A)|  46.I( 67@<@,. c 6-6-@% A`?4**7@F<@F,0 Y(7@F<@p,c A)  4 A A)` 67@F<@E%B:,,. ''7@3<@6,4NONEA00 @ 6- A`4*6(7@q<@,@ A00  4(  A00 67@q<@p%B:,,. :*7<@!,4NONE#-)-6(7@t,:  1*7<,4C- --(7@t,1  B -(everything ok?& AB"@:Y,)"@:y,A0 ##*+"@:N,)"@:n,,A#@ "@:N,)"@:n,A#@ A00 A1 X 6-%!@P! A'-<(TOO MANY ITEMS!!J-AN X A & **7<@!,4NONE*67@",.0  *67$&<$,.7<,:  *67$&<$,.7<,D %% A1`N ?67$&<$,.7<,/67$&<$,.7<,4?X  ( A#@b !!***** SIMPLE COMMANDS *****l 67B:,&,.COMv  A` A --@"#(鶅艛懤蜧臇搿劌- AP "@:N,)"@:n,A1  A0 A1 !!**** MOVEMENT COMMANDS **** 67B:,&,.MOV  6- A` A /-@!%(臩欈翴隮蜧臇搿劌/ AP "@:N,)"@:n,A2P  A0 A2P ***** FATAL COMMANDS ***** 67B:,&,.FAT  A` A ,-@#"(糌酃蜧臇搿劌, AP "@:N,)"@:n,A3  A0 A3 !!****** FINAL COMMANDS ***** 67B:,&,.FIN*  A` A4 ,-@#"(縃鍕蜧臇搿劌, AP> "@:N,)"@:n,A3pH  A0 A3pR !!****** ITEM COMMANDS ******\ 67B:,&,.CHG6-f + A`-@#+( 濊樇蜧臇搿劌p O -( 譁迋蹉贍,( 尕攪恓鼴鼴=( O( 眐玵z 7( 證鰻埧&( 濿仴7( Э埏 &( 霰旼埧&(  0( 俵埧寑&( 恓埧寑0 AP : 6-6-6- A`&40 A: A4 ( B:, -B:,%$67,. (  - 6-?:C:,:A:,,P B6-6-# A`,4*F(7@<@,P A8 46.NONE-(67@<@%B:,,.''7@<@,0NONEA8 a67@<@,. 567@<@,. =-%C( Q-%@W( a A9@ 6-6- A`,0*0I*0R6 A@ A8 5#*4*7@<@,4R+(R5 A8` 46.I-( S67@<@,."4I*-%0(YI67@<@,.YS A9: 6- A`&0*0Y*0N0 A: A8`5#*4*7@<@,4N+(N5 A9( 46.Y(267@<@,.<F 6-6- A`"4*<(7@<A,F A90F 46.NONE-(P67@<@%B:,,.Z''7@<@,0NONEA9PdM(67A <A!,. NONE 0-%C(NONE M A9n@ 6- A`*46(7A <A!,@ A9x 46.NONE(67A <A%B:,,.L 6-6-@% A`(4*B(7@0<@T,L A@ 4 A A967@0<@)%B:,,.R7<,4NONE-%((7@t,H67@U<@y,.7@u,R A@PX 6- A`44**7@U<@V,0 N(7@U<@y,X A@P 4 A A@ 67@U<@T%B:,,.,-@#"(EVERYTHING OK?, A"@:N,)"@:n,A4 @:Y,*@:y,A@P67$&<$,.7<,(67B:,%,.7<, A0 A4 4- ( COMMAND USED!* A4 A4""********** INTRO ***********X67B:,&,.INT A`+-@%:( 濎鐍醲欚LAY@4X@"6 AA`)&)66-$@x%,@ -%767$@x&@w<$@x,.; @6 - (@+ -6-6-!6-A+ A`J4A T,-@#"(EVERYTHING OK?, A^"@:N,)"@:n,AA c@:Y,*@:y,AAhF6-B:,(6-P:'@x,86-&$@x?*F*r67$@x%%,.7%,|D -%1(7$@x&@w<$@x,5 :D A !!******** TITLE PAGE *******&A&AF:A,&7+AY76-F:A`,%AV$F:Aa,%# %%%#%E%@$@e.%@%F:A`,E%@&F:Aa,GARA!-0( the wizard<-@'G(A TEXT2-@!%(ADVENTURE CREATOR+-2(By. -(Clayton Walnum.AY@4""******** INITIALIZE ********||;@ ,;@,;@,;@,;,;,;,;AP,;A,;,;@,;@x,;@,mm;,;@,;,;A ,;,;A4,9<,;A,;@0,;AP,;,;A,4 #ACp--!",68<,-0 4 c @67,. )67@0,. 267,.W6.GET DROP ]6-c6-(67,. 67@,. (67,.''29,5,29,15,36,10,22,10,24,5,34,15H6.垂垂垂垂垂垂垂垂16.垂 垂?6.  H6.D:&6.NSEWUD0'6-AU6-A&'6-@': 6-D""**** MOVE CHARACTER SET ****N,6-+F:A,%,$AV,6-'AVXL;@ ,"A.A:ALAA$b*6.h敝侒唄禜禡庈瀫*6-?:C:,,l #AEv""6@A 1-@"-%$@%1  ADp 11,85,85,85,85,85,85,85,85-1aa104,104,133,204,104,133,203,104,133,206,104,133,205,104,141,1,6,104,141,0,6,104,104,133,207[[162,0,142,2,6,142,3,6,134,213,232,160,0,177,203,209,205,208,8,200,196,207,208,245,134OO212,96,173,2,6,24,101,207,141,2,6,144,3,238,3,6,173,2,6,205,0,6,208,8,173\\3,6,205,1,6,240,13,165,205,24,101,207,133,205,144,200,230,206,176,196,169,0,133,212,96 D:WIZARD.BAS