@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} 1,1 |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8|} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uEiͩkΩ͙kCop j`j {j`Hi͝Νh`V}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`@TU^ n AXLPB0NZ X} +AdAUuA@'A @9A@K@@]@@7 Y}c(}uAR@++(#++(#| ANTIC MONTHLY DISK JAN. 1986 |++(# Z}(++(# @ -@A $ [} GG;@@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@D:*.* \}6,6." 6 @0i6-%@(6.7@<@,A67@ <@ ,..i67@ ]}<@,.7@<@,3 6.|67B:,%@,.367B:,%@,.G67@<@,.(--@B ^}:,:7<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@<@,.0 _}$@(''7@<@,4FREE@- @ 2() <@F''7@<@ `},4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z++(#| a} |[ ( |  |\++(#d**(" Select HEL b}P.BAS for information.xAR[@@9'-@@#C( FILE NUMBERM A0Q c}[ BP:,A00"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@ d},$@%@,L B37@<@,4 36.7@<@,!7@<@,4DOS!.0 6. e}-@B:,07<,4 AH67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?AR@ f}'-@@"?  LOADING 7 A)6-?:C:h'SR`,,-%7 B[-@@"- g}  CANNOT RUN 7 @LF:A,"@![% D:HELP.BAS B A0D1:MENU. h}MENU.DOC.TXT .TXTC .TXT .TXTA0 /|LINEAxx ;A ,;@,; (}@;@@ D:DOC.TXTj} A(@2vB:,!@-7@<@,4XXX0(3(E-@@"Y(ӠΠf@k}l(}v @@<( @@dj@ B*-@@"R("ΠҠՠҠˠҠ_@l}j%D:MENU D:HELP.BAS ;A ,;@,; (}@;@@ D:DOC.TXT% WELCOME TO THE ANTIC MONTHLY DISK Most of the n}programs on this disk arewritten in Atari BASIC. Some requirespecial hardware or specific instruc-tions. We recommend you o}refer to thecorresponding issue of ANTIC forcomprehensive documentation. If youwish to order a back issue, or needsubscrip}ption information, contact usat (415) 957-0886 or, for credit cardorders, dial (800) 227-1617, Ex. 133.In California,(800)q} 722-3545, Ex. 133XXXThe menu that appeared on the screenwhen you booted the disk will onlyRUN programs with a .BAS exter}nder.If you try to run a program and the response is 'cannot run Filename',then check the file extender withthe followings} list:XXX.BAS BASIC saved program, use menu RUN or LOAD and RUN..LST BASIC listed program, ENTER then t}RUN..EXE Assembly language 'Load and Go' file. Remove BASIC, boot DOS, type L then enter the filenameu}..ASM Assembly language source code from Atari Assembler Editor. Must be assembled..M65 Same as .ASM onlyv} MAC/65..SYN Same as .ASM only Synassembler.AMC Same as .ASM only AMACXXX.OBJ Machine language object file. w} Same as .EXE but not 'Load and Go'. See corresponding article..SYS Reserved for DOS system files..DAT Data filex}. Usually accessed by another program..LGO Logo language, requires Logo cartridge..TXT Text file. Usuallyy} accessed by another program.XXX *** Files for the 520 ST ***.C C Language source code. Must bz}e ported to a 520 ST and then compiled. See the corresponding article for complete instructions..FNT {} A font to be used with the ST Font Loader desk accessory. Must be ported to an ST disk. See the corres|}ponding article for complete details.XXX.ACC An ST Desk Accessory. Must be ported to your ST powerup }} disk. See the corresponding article for complete details.XXXAll programs from ANTIC issues datedprior to Augu~}st 1984 were reproducedfrom ANTIC's Archive. We have up-dated them from our HELP columns and most are compatible with the }XL and XE machines. We have worked to insurethat our programs operate as pub-lished, but we consider all our software li}stings to be works in progress which we encourage you, thereader, to personalize and enhance.Good luck, and ENJOY! } -ANTIC EDich we encourage you, thereader, to personalize and enhance.Good luck, and ENJOY! # /* * ST/FONT! Ver. 100285 * file: B:ACFONT.C * (c) 1985 Antic Publishing * Written by Patrick Bass * * The pur}pose of this program is to access character fonts from an * 8-bit Atari and display them from within the 520ST. * */ } #include "obdefs.h" #include "define.h" #include "gemdefs.h" #include "osbind.h" extern int gl_apid; int gl}_hchar, gl_wchar, gl_wbox, gl_hbox, menu_id, phys_handle, handle, file_handle, wi_handle, top_window, xdesk}, ydesk, hdesk, wdesk, xold, yold, hold, wold, xwork, ywork, hwork, wwork, msgbuff[8], keycode, ret, } i, j, k, l, done, button, contrl[12], intin[128], ptsin[128], intout[128], ptsout[128], work_in[11], w}ork_out[57]; char file_buffer[32768], path[]="a:*.FNT\0", file_name[]="new .fnt\0", alert0[]="[1][ ST/FO}NT v.100285 | A Fontable Accessory | (c)1985 Antic Publishing | written by Patrick Bass ][ Perform ]", alert1[]="[3}][ Place Fonts in Drive A: ][ Read Disk ]", alert2[]="[3][ Thanks for using | ST/FONT! v.100285 | | By Patrick Bass }][ Exit ]"; long max_len=32768, char8x8=0x00018006, char8x16=0x00018a62, number, source_char}; /*----------------------------------------------------------------------*/ main() { appl_init(); p}hys_handle=graf_handle( &gl_wchar, &gl_hchar, &gl_wbox, &gl_hbox ); menu_id=menu_register( gl_apid," ST Font Loader} " ); wind_get( 0, WF_WORKXYWH, &xdesk, &ydesk, &wdesk, &hdesk); wi_handle=(-1); fontable(); }} /*----------------------------------------------------------------------*/ open_vwork() { int i; for( i=0; i}<10; work_in[i++]=1 ); work_in[10]=2; handle=phys_handle; v_opnvwk( work_in, &handle, work_out ); } /*-}---------------------------------------------------------------------*/ set_clip( x, y, w, h ) int x, y, w, h; { int clip}[4]; clip[0]=x; clip[1]=y; clip[2]=x+w; clip[3]=y+h; vs_clip( handle, 1, clip ); } /*------------------}----------------------------------------------------*/ open_window() { wi_handle=wind_create( NAME, (xdesk+wdesk)/}4, (ydesk+hdesk)/4, wdesk/2, hdesk/2 ); wind_set( wi_handle, WF_NAME,"} ST/FONT! ", 0, 0 ); graf_growbox( 10, 10, 10, 10, (xdesk+wdesk)/4, (ydesk+hdesk)/4, wdesk/2, h}desk/2 ); wind_open( wi_handle, (xdesk+wdesk)/4, (ydesk+hdesk)/4, wdesk/2, hd}esk/2 ); wind_get( wi_handle, WF_WORKXYWH, &xwork, &ywork, &wwork, &hwork ); } /*-------------------------------}---------------------------------------*/ do_redraw( xc, yc, wc, hc ) int xc, yc, wc, hc; { GRECT t1, t2; wind}_update( TRUE ); t2.g_x=xc; t2.g_y=yc; t2.g_w=wc; t2.g_h=hc; wind_get( wi_handle, WF_FIRSTXYWH, &t1.g_x, &t}1.g_y, &t1.g_w, &t1.g_h ); while ( t1.g_w && t1.g_h ) { if ( rc_intersect( &t2, &t1 ) ){ } set_clip( t1.g_x, t1.g_y, t1.g_w, t1.g_h ); do_font(); } }wind_get( wi_handle, WF_NEXTXYWH, &t1.g_x, &t1.g_y, &t1.g_w, &t1.g_h ); } wind_update( FALSE ); } /*-}---------------------------------------------------------------------*/ fontable() { int event; while (TRUE) { } event = evnt_multi( MU_MESAG, 1, 1, ret, 0, 0, 0, 0, 0, } 0, 0, 0, 0, 0, msgbuff, 0, 0, &ret, &ret, &ret, &ret, &ret, &ret ); wind_upd}ate( TRUE ); if ( event & MU_MESAG ) switch ( msgbuff[0] ) { case WM_REDRAW: } if ( msgbuff[3] == wi_handle ) do_redraw( msgbuff[4], msgbuff[5], msgbuff[6], msgbuff[7] ); br}eak; case AC_OPEN: if ( msgbuff[4] == menu_id ) { if( wi_handle == (-1) ) } { open_vwork(); open_window(); } else wind_set( wi_handle, WF_TOP, 0, 0, 0, 0 ); } } break; case AC_CLOSE: if( ( msgbuff[3] == menu_id ) && ( wi_handle != (-1) ) ) } { v_clsvwk(handle); wi_handle = (-1); } break; } /* end switch */ win}d_update( FALSE ); } /* end while */ } /*---------------------------------------------------------------------}-*/ do_font() { clear_window(); form_alert( 1, alert0 ); for( i=0; i<9000; i++ ); for}m_alert( 1, alert1 ); fsel_input( path, file_name, &button ); if( button != 0 ){ graf_m}ouse( M_OFF, 0x0L ); clear_window(); file_handle=Fopen( file_name, 0 ); if( fil}e_handle > (-1) ){ done=Fread( file_handle, max_len, file_buffer ); bios( 38, configu}re() ); } Fclose( file_handle ); graf_mouse( M_ON, 0x0L ); } clea}r_window(); form_alert( 1, alert2 ); wind_close( wi_handle ); graf_shrinkbox( 10, 10, 10, 10, } (xdesk+wdesk)/4, (ydesk+hdesk)/4, wdesk/2, hdesk/2 ); wind_delete( wi_handle ); msgb}uff[0]=AC_CLOSE; msgbuff[3]=menu_id; wi_handle=(-1); } /*----------------------------------------------}-------------------------*/ clear_window() { int temp[4]; vsf_interior( handle, 2 ); vsf_style( ha}ndle, 8 ); vsf_color( handle, 0 ); temp[0]=xdesk; temp[1]=ydesk; temp[2]=xdesk+wdesk; } temp[3]=ydesk+hdesk; v_bar( handle, temp ); } /*----------------------------------------------------------}-------------*/ configure() { char *point1, *point2; for( i=0; i<128; i++ ){ l=i; if( i}<32 ) l=l+64; if( i>31 & i<96 ) l=l-32; for( j=0; j<16; j++ ){ source_char=( l*8 )}+( j/2 ); point1=( char8x8+( j*128 ))+i; point2=( char8x16+( j*256 ))+i; *(p}oint1)=file_buffer[ source_char ]; *(point2)=file_buffer[ source_char ]; } } } purydEYGAMASKBINGOCOUNNUM@COMPUT}ER BINGO CALLERBY JAMES PERONE%%(c) 1985, ANTIC PUBLISHING INC.0 +09@u,;@,;@, M}A@h'AAH9A @M-@@ -(ҠϠ    (}( #6-(-@A 2*-@@u&68,-*  6-%@}!@u %%%6-P:H:,$@u,%@"8,A 68,-#!* @# A0}#!@* @1# A0#!@0* @F# A0 #!@E* @a# A00#!@`* @v}# A0@"@A!@AJ-@!6(Would you like a new number :J4Y}AM-@!>($Would you like to play another game BJ4YM% +<<(}  }    3-@ 3( 2-@ 2(The next numb}er is: L -  A  (6-@ 6-%@%6.B($ (6-@6-&@%6.I($ (6-}@6-&@)%6.N($ (6-@!6-&@D%6.G($ (6-@%6-&@Y%6.O($ D1:BI}NGO.BASdEYGAMASKBINGOCOUNNUM@COMPUT>$$FF1FFFCLCSSLF1LABCFDF1F2F1FF1F2FF1FUF1F1F1MYFDATDAYFIFDFJF12F12B }KMSCSRDAF2F1DE@@@@AR@& @ @  &  }& &@@'@@ @@@@"@@@@@ }@t } @ !@"@#@$@%@(&A'@()@*@+@( },BB-A&.A%/B~~0@12@3@!4@A56 APPOINTMENT CALENDARBY ALF }RED FILSKOV%%(c) 1985, ANTIC PUBLISHING INC. ""ԠҠ""٠ĠȮ֠ A }(DISPLAY CALENDAR2- A!00!('-6-<K 6- A!0@#+-@#/(3(7( }?-C(G K(FK 6- A!0@(+-@(/(3(7(?-C(G K(P8 6- A!0- }#(+-/(3 8(Z7 6- A!0-#('(+(/(3(7(d! 6- A!0-(!(n) - }!67<,.>:@#,% )(x- 67,.67,.-%-)(- 7 -67<,.>:, )-/-3 }(7 / -!67<,.>:@$,% +-/(?67<,.>:@$,#67,.>:,)-2(7<,;(7<,?(< 6. }67B:,%,. (67B:,%,.8-P:&B:,',<(. #A-"!-*(7<,. >>MONDAY,TUESDAY,WEDNESD }AY,THURSDAY,FRIDAY,SATURDAY,SUNDAY! -"-(! ZZ29,1,MENU,24,3,1. View date,24,4,2. Edit date,24,5,3 }. Print date,24,6,4. Print monthDD24,7,5. Main menu,30,12,MESSAGE,2,18,DATE,11,15,><DISPLAY DATESF 6 }-#A@-"# :"@(*'"P:',F6-@)))31,28,31,30,31,30,31,31,30,31,30,31;6-+&A,$ }%%6-A:7<,,/6-$&56-;6- -'  6. 67,.=:,' A 6.=:,">7$&<$,0 }-:67<,.>:@:7<,,%A(,> , - (6 6-%!6-6-%@ 6-% JGET MENU OPTIONT 6 }- A^, )6-&@H, )!%APh77AAAA`A ArVIEW DAY }|, 6-% A!-@6',(4 )4+!@W) @H,*@2A@ (>:,)(>:,7 }7+!@W) @H,*@2*AUA@/6-&@H6-&@G) )!/6-  )!6- }6-$%& A` 6- )!A@ "6- A 6-%& !6-& A2 #A }-" )-@ 2(7<,-&B:=:,,( > -6-$&%$!-%,(7<%,0 >"A@ }EDIT APPOINTMENTS 6-6-& -(0 ):"@'AD%"@(*!6-&%  }APN%"@)* 6-%% APX1+"@0)"A&,*!'6-&1 APb+"@1* @&!6-% }+ APl+"AU* 6-%!6-+ APv77 @2)+!A$* A`,)!ARA` 6-6-$ }&%+&,$%&67<,.>:,(>:,'"@&(>:@0,' AP 6-% AP%-@$%( 6. }  6- A APPRINT DATE(AP A@6- A7 6.-67,.  }67,.,67<,.+767,.+, #A-" #6.,67,.567&P:B:,'%?P,,.,67B:,%,.567 },.* 6.67B:,%,. *67B:,%,.=:,Q67B:,%,., %67B:,%,.=:,+6.F67&P:B:,'%?P,,.Q67<,. } 67B:,%,.67,..3"3| APPOINTMENTS FOR |&3*3.3 8 -6-$&%$43| 7<%@, | }8 *Q 6.67,.67,.#6._.67,. 767,.E67<,.| Q67,. |4 -33 3>3 3 3 } A@H/ 6- A!-A% / A@RPRINT MONTH\ 6- A Af9P( }(3(>:@',A>:,96-p# 6.67<,.#67@3,.z0 6-B:,!6-&P:'%?P,067<%&,.( }>:,(F A-@g*67<,.+. ?67@x,.+F(7 6.-@g$67<,.( 76 }7@x,.[ #A-""6-B:,A6-$@&P:'%?P,&P67<%&,.T [(W A-@ }s*67<,.+;67%<%,.+? P67@x,.+W(d 6.-A(67,. <67%,.>:@', }P67%,.-1| |d67%,.>:@',67%,.-0 . -+"*,)$68,-. AA 6-%68, }-6-$&'6.=:,- 56. A67,.=:,67<%,.- -(>:,>:@',Q>:A7,? -6. } 67A,.0-A4;67<,.?  -(8,A@$$67$&<$,.78,$&%$&, ( } 4(>:,>:@',QP48,*8, A @$? A-@g*67<,.+. ?67@x,.+.2#( }>:@',A>:,>:,(2 A@85 6.-67@,. %67,.267<,.+5$B6- AL }-A  A@V EXIT`(Aj 6- At )6.>:,~4Y)4yA4N })4nA@ A@SAVE MONTH A@6- A+ 6.D:67,.67,.+67,..AC }2-@16-$&)(7<%,- 2(-@$(7<,6-( A@-F:A,"Ab# }6-- A` 6-) A-A ) A@ MESSAGE$ --@) (7<,$   6-6 }-#A`A@"4X$(-@)(2 6-% A<"0XA@F 6- }% APChoose a,menu,option.,XZ**What date,do you,want to,view? >__,Xd**What date,do you,want to,edit? >__, }Xn;;Edit the,appoint-,ments for,the date,and press,ESC.,XxFinished,editing.,X Printing,current,date...,XPr }inting,month...,XError in,printing!,XSaving,month...,XDisk not,ready,error!,XDisk full,error!,X++ }Exit,without,saving,month?,(Y/N) >_,X START #A;;"OO }0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,82,125,126,752*+@@9!0'*(>>; }A9,;,;A,;,;,;,;,;,9,66;@8,;@8,;@8,;A4,;,W 6. 67, }. 67,..6.>:@0,@67,.>:@1,O6.>:A%,W6.|K"""READ FIRST DAY OF EACH MONTH,> # }A6.(-@@,":67B:,%,.> 6255136147257,366247251361@477351362472,512573514624J7 }33614625735,144725736146T255136147257,367351362472^511462473513,622573514624h733614625735,145136147257r36 }6247251361,477351362472|511462473513MAIN MENU- A!(%0-0 #@"(" }(6-@& A!0; - (((-!(% )(-(1(;#A0( -"-$%$( }. ( CCLoad/Create a month,Delete a month,Disk directory,End programA -( MAIN MENU-6(Choose an opti }on =><A(* )6-&@H* )!AP+(+AAPA @A!LOAD/CREATE A MON }TH6. load/create A. A.(Loading month...8-@1%67$&,.) . }8 @P F:A,ApA!5#(Creating new month...1-AP5 &/ 6. 67A9,. % }67,./ @P0DELETE MONTH:6.delete AD: A!( Erasing...0@3: AN!!!}LOAD/CREATE, DELETE ROUTINEX* 6-@8 A!0#(&(*(b..(&| 1-JANUARY 5-MAY 9-SEPTEMBER |l..(&| !}2-FEBRUARY 6-JUNE 10-OCTOBER |v..(&| 3-MARCH 7-JULY 11-NOVEMBER |..(&| 4-APRIL 8-AUGUST 12-DECEMBER!} |(  A >( (!(What # month to %> )!)P:,A 1 #A -" #-1!}(MONTH: / -/(What year (85-99)7:)?I!} A C 6-%'"P:',(0( Press a key>7):(=(C6-* A `4 END>  +HCONSTR!}UCT STRINGSR: 6.>:,67,.  67,..67<,.>:,:67,.>:,\3 6. 67,. 67,.*67<,.367,.f# ! }6.67<,.>:,#67,.>:,p, 6.67<,.>:@&,)67,.>:,,$z ERRORSP  (M(ERROR #F:A, ! }AT LINE F:A,%F:A,$AVP&N ((2(DISK ERROR--OPERATION ABORTED!@-AD N A! }D1:AC.$$FF1FFFCLCSSLF1LABCFDF1F2F1FF1F2FF1FUF1F1F1MYFDATDAYFIFDFJF12F12B 88DDffff>`<|fl0fF68of;888>x|f<>>``~ppppw``|l`cc>66wwcc<<<<<<<<<<<0 0 ~~`0 0`c%}cooo`?33sss~ffgggg`cc~ffwww``pp``pppc`oggssssss n~fflggg000ppp~gwggggwoggg%}ccgggccpppccggg~ffwww`ssggggggggggo>gggogsss>ggggggfl7g@`0 xx6%}c6>8pp8?%}ww<~~~<x`x`~<~~<%}0~0 ~ <~~<>~v~```~fn~>20:>~fv~~f~p~>~fv~~```~fvv ~006|vwf%}kc|fvvv~fvv~~fv~``~fn~>0888> >~~ffnn~fnn>ck>6f>>nfff~~~6~<~~<%}~x|nf8x8ffff>`<|fl0fF68of;888>x|f<09vH-}?09~yLH?09|yvH??<N P3rBWBg/<?<?9rN 09LH>09vH?09-}~yLH?09|yvH??< ?< ?< ?< N 09LH>09vH?09~yLH?09|y-}vH??9rN RP.H/<x/</<?<?9rN N^NuNV>NT=n=n =n =n.U/Y/]/- }Q?< ?9rN `X.Q/NnXJ@g>?.?.?.a\a.U/Y/]/Q?< ?9rN JngJnf-!}BWNTN^NuNV`B.J/<J/<J/<J/<J/<JBgBg/<0BgBgBgBgBgBgBgBgBgBg?9J?<?<?<N 8=@>-"}NT.g090`096yrf>>?9FN&3r``|gX|(g|)gBWNT`N^NuNVa.?<N T-$}By@`Ry@ y#(@m.P?<N T.t/</<N PJytgB?<N Ta(BW/<?<=N\\3@ y-%}@o6.r/9?9@?<?N\P3,aZ>?<&NLT>@?<>N\TB?<N Ta.|?<N T>rN-&} 09LH>09vH?09~yLH?09|yvH??< ?< ?< ?< N @>rN 3)03-'}63rN^NuNV>?9FN RT>?9FN TBW?9FN T=y|=y~09|yv=@09~yL=@.Q?9-(}FNTN^NuNVBy@`3@L y @l09L|@3L y@nB@`p y`@mBA`rAg09L|3LByB`-)}09L@29BHAH#N09B@H29@HЁй-@09B@H29@HЁй-@ n"|rN n"|r-*}NRyB yBmrRy@ y@mN^NuNV# 3 P3RByV3Z3\N #NN^NuNV3e-+}PByRByV3\N N^NuNV## .мZ#3dPByR3 V n 3\N n 0\#-,}##N#NN^NuNV# 3 3P3R3V3\N #NN^NuNV3 3--}PByR3V3\N 09N^NuNV3 3PByR3V3\N 09N^NuNV3 3PByR3-.}V3\N 09N^Nu#P"<psNBNuNV30.|Hмl-@=|` nH2n2RRn-/} nm.BNB@09N^NuNV##T## #h$#x(#B> aF3N-0}pN^NuNV>a*pN^NuNV33 3 3333333333-1} 3"#$h3(3*>N n,0 n00 n40 n80 n<0 n@0B@09N^NuNV-2}3# h>4N N^NuNV#h# l>ZN n0B@09N^NuNV33 3 33-3}333>IN N^NuNV33 3 33333>JN N^NuNV-4}>MN n0 n 0 n0 n0B@09N^NuNV3# h>NN N^NuNV3# h>#N -5}N^NuNV33 3 33>dN N^NuNV33 3 33>eN N^NuNV-6}3>fN N^NuNV3>gN N^NuNV33 >hN n 0 n0 n0 n0B@09-7}N^NuNV33 3 333>iN N^NuNV3>kN N^NuNVH *n(n >0-W?0,-8}WN T:>0-W?,0,WN T8>?NT>>?,NT<89F0G9@0F9@GoFnB@`pJL0N^NuNV-9}0.n o0.`0. N^NuNV0.n l0.`0. N^Nu# NN/9 Nu# NM/9 Nu# NA/9 Nu-:} -;}-<}a:*.FNTnew .fnt[1][ ST/FONT v.093085 | A -=}Fontable Accessory | (c)1985 Antic Publishing | written by Patrick Bass ][ Perform ][3][ Place Fonts in Drive A: ][ Read Dis->}k ][3][ Thanks for using | ST/FONT! v.093085 | | By Patrick Bass ][ Exit ]b ST Font Loader ST/FONT! _crysta-?}l_ctrl_cnl_path_file_na_alert0_alert1P_alert2|_max_len_char8x8_char8-@}x1_main _fontabl\_open_vw_set_cli_open_wi@_do_redr_do_font_clear_wL_conf-A}igu_v_bar_v_clsvw&_v_opnvwP_vs_clip_vsf_col _vsf_int R_vsf_sty _gsx1 _gsx-B}2 _iioff_iooff_pioff_pooff_vdi _crys_if _appl_in F_appl_ex _ev-C}nt_mu _form_al _fsel_in _graf_gr _graf_sh @_graf_ha _graf_mo _menu_re _wind_cr _w-D}ind_op R_wind_cl _wind_de _wind_ge _wind_se_wind_upT_rc_inten_max_min _-E}gemdos\_biosL_xbios<_menu_id_intin_gl_hbox_keycode_intout_c-F}_done,_hold._msgbuff0_i@_jB_phys_haD_handleF_hworkH_k-G}J_lL_ptsinN_ptsoutN_source_N_gl_wboxR_globalT_woldr_xoldt_yold-H}v_wworkx_work_inz_xwork_ywork_top_win_control_int_in_int_out_gl_hcha-I}_work_ou_file_ha@_ad_cB_numberF_retJ_hdeskL_gl_apidN_contrlP_addr_in-J}h_gl_wchap_file_bur_wi_handr_buttont_wdeskv_addr_oux_xdesk|_ydesk~-K}  <    2:           -L}               -M}$               *p9NN,w<=DLHDNSTARDSCSPCHDISHDNSWPDISSHSLCHARDLS1O} SC1P}REEN DISSOLVER DEMOBY FRED PINHO%%(c) 1985, ANTIC PUBLISHING INC. ]6-F:A@,&A&@0 A I1Q}(DRAWING FIRST SCREENS A`] A uA&@!+@-AYO6-F:A`,%AV$F:Aa,u61R}-F:%@,%AV$F:%@,L!(LOADING DISSOLVE ROUTINES+ A5 A`? AL(>:A%,(DRAW SEC1S}OND HIDDEN SCREEN2m(DRAWING SECOND SCREEN' A`9AYC#ApW-@@_"ci,m 1T}<7-@@#"'-,3/7 Fq @!-@@+"1,7/; M,@1U}@_,@@q,@@P7-@@#"'-,3/7 ZMAIN SCREENdA1V}+@-AV'AV9AY[6-F:A`,%AV$F:Aa,6-F:%@,%AV$F:%5@,nm1W} @X!-@-,9,@= Q-@@],i,@m x @&!-@1X}@-,@9,@= Q-@@],@i,@m A@4R-@@1Y})(@SCREEN;-@@R(@ DISSOLVES) A0)(SPIRAL DELAY VALUE 2000b_6-?:C:,<%A1Z}<%A<A <<%A<@8<A<AH<@p<,b( A0(>:A%,{(SPIRAL DELAY 1[}VALUE 6000{6-?:C:,<%A<%A<A`<<%A<@@<A<AF<A4<@,s A03(>:A%1\},SWEEP DELAY VALUE 3000s6-?:C:,<<<A0<@8<A<AH<@p<,s A03(>:A%,SWEE1]}P DELAY VALUE 9000s6-?:C:,<<<A<@@<A<AF<A4<@,_ A0?(>:A%,"CHANGES AT INC1^}REASING DELAY VALUESI A`S A`_6-A}(SPIRAL DELAY VALUE s6-?:C:,<%A<%A<<<%A1_}<@8<A<AH<@p<,} A`k'(>:A%,SWEEP DELAY VALUE a6-?:C:,<<<<@@<A<1`}AF<A4<@,k A` 6-%A!BP ,(>:A%,"@w, A-B2y1a}@-(HIT OPTION TO GO ON F:B2y,@A@$-@A $ SPIRAL DISSOLVE SUBRO1b}UTINEG;A,#A.-@A2"@67<,.>:,D G$"OO104,104,133,204,104,133,203,104,133,206,1041c},133,205,104,141,255,3,141,1,4,FF104,141,254,3,141,0,4,104,141,42,4,104,141,41,4,104,141,44,4,1046MM141,43,4,216,162,101d},169,0,168,133,207,133,208,177,205,145,203,169,1,141@MM253,3,230,207,24,165,203,105,1,133,203,165,204,105,0,133,204,24,1651e},205JKK105,1,133,205,165,206,105,0,133,206,165,204,205,42,4,240,4,144,13,176TJJ7,165,203,205,41,4,144,4,177,205,145,2031f},238,253,3,173,253,3,197,207^GG144,198,240,196,32,2,4,24,144,2,16,181,169,1,141,253,3,230,208,24hPP169,20,101,203,133,21g}03,165,204,105,0,133,204,24,169,20,101,205,133,205,165rJJ206,105,0,133,206,165,204,205,42,4,240,4,144,33,176,7,165,203,2051q}b'DOS SYSb*+DUP SYSbUAUTORUN SYSbWMENU biHELP BASbmDOC TXTb4ACFONT C b BINGO BASbJCALENDARBASb COMPUTERFNTbCRS BASb4DESK3 ACCb>NDISOLV1 BASbIDISOLV2 BASbJDUNGEONSBASb(NOOR BASb*SUMMERS LSTbH-SYSANTA BASbFuWIREBALLBAS,41|GG4,144,24,165,204,205,44,4,240,4,176,15,144,9,165,203,205,43,4,240LL2,176,4,177,205,145,203,238,253,3,173,253,3,11r}97,208,144,178,240,176,32FF2,4,24,144,2,16,159,169,1,141,253,3,230,207,56,165,203,233,1,133NN203,165,204,233,0,133,201s}4,56,165,205,233,1,133,205,165,206,233,0,133,206FF165,204,205,44,4,240,4,176,15,144,9,165,203,205,43,4,240,2,176,4KK11t}77,205,145,203,238,253,3,173,253,3,197,207,144,196,240,194,32,2,4,24LL144,2,16,177,169,1,141,253,3,230,208,56,165,203,2331u},20,133,203,165,204OO233,0,133,204,56,165,205,233,20,133,205,165,206,233,0,133,206,165,204,205FF42,4,240,4,144,33,1761v},7,165,203,205,41,4,144,24,165,204,205,44,4II240,4,176,15,144,9,165,203,205,43,4,240,2,176,4,177,205,145,203,238JJ2531w},3,173,253,3,197,208,144,178,240,176,32,2,4,202,208,161,162,0,10433104,157,22,208,157,196,2,232,224,5,208,243,96DEL1x}AY SUBROUTINE2 #Ap!-A&Ad%"+/ 2$JJ173,254,3,240,5,206,254,3,208,251,173,255,3,240,11,206,21y}55,3,169,255AA141,254,3,24,144,235,173,0,4,141,254,3,173,1,4,141,255,3,96SWEEP DISSOLVE SUBROUTINEG;A,1z}#A.-@A2"@67<,.>:,D G$OO104,104,133,204,104,133,203,104,133,206,104,133,205,104,141,255,31{},141,1,4II104,141,254,3,141,0,4,216,160,0,169,10,141,253,3,162,20,177,205,145OO203,24,165,203,105,20,133,203,165,204,1|}105,0,133,204,24,165,205,105,20,133QQ205,165,206,105,0,133,206,202,208,223,56,165,203,233,19,133,203,165,204,233&KK0,11}}33,204,56,165,205,233,19,133,205,165,206,233,0,133,206,162,20,32,20NN4,24,144,2,208,185,177,205,145,203,56,165,203,233,20,1~}133,203,165,204,233:NN0,133,204,56,165,205,233,20,133,205,165,206,233,0,133,206,202,208,223,24DPP165,203,105,21,133,2031},165,204,105,0,133,204,24,165,205,105,21,133,205,165NII206,105,0,133,206,32,2,4,206,253,3,208,187,162,0,104,104,157,22,2081}X$$157,196,2,232,224,5,208,243,96bDRAW FIRST HIDDEN SCREENlf6-F:AY,$AY.#AB-1}@L"V@C\,b/f v;-@ !"+@1,7/; --@@1}"#),- O-@@)AT5,?AK,@O O-@@1}@)A5,?ATK,@O O-@@@)AT5,?AK,@1}O O-@@@)A5,?ATK,@O _ A!-@@-,1}@1 ;ArO-@@[,@_ F At!-@ @-,@1 C,@@1}F$SS7,2,7,9,8,4,8,7,9,5,9,7,7,10,7,11,13,7,17,7,12,9,12,10,13,8,13,10,14,10,14,11MM14,12,15,12,3,12,4,12,1,13,4,13,11},14,5,14,1,15,2,15,8,15,8,17,9,15,9,17jj13,3,13,4,6,2,6,7,13,5,14,5,15,4,15,6,5,5,5,7,1,7,3,7,14,14,15,14,15,15,18,15,8,11}4,12,14,10,15,10,173339,2,3,35,3,3,35,17,2,33,12,6,40,13,6,34,14,67736,2,10,38,3,10,36,4,10,34,9,11,37,10,11,34,11,111}1133,17,10,36,2,17,37,14,17,40,15,17,37,16,17]]62,18,0,63,19,0,92,18,1,93,19,1,140,15,0,19,4,157,14,1,18,5,142,12,1,11}3,1,142,18,6,18,7 aa11,12,15,16,10,12,17,19,10,13,16,19,10,14,15,19,9,14,14,19,8,14,13,19,8,15,12,19,7,15,11,19@@9,18,1}10,19,0,2,2,4,0,3,5,8,0,4,4,8,0,5,4,9,0,6,2,8,0,7,1,8 UU175,7,8,9,8,175,9,9,9,10,188,7,9,7,11,188,6,10,6,12,188,5,10,5,11,1}173,3,12,5,14*REDEFINE CHARACTER SET4g +@.6-+F:A,&@,$AV?6-P:'AV,O6-&$AV[A1}gA>H;@(,26.hͩα͑Υ`>6-?:C:,,H#A`HE-@@!"/-1}@3"=%%A E RN%6-F:A`,%AV$F:Aa,K6-F:%@,%AV$F:%@,N$\ll8,165,1}231,231,231,255,219,255,231,16,66,231,165,231,165,231,255,255,24,161,162,228,232,240,227,227,227f__32,5,69,231,231,167,2551},255,231,40,24,60,126,66,126,219,255,255,48,0,0,0,36,36,36,255,255p^^56,153,153,153,153,153,255,153,255,64,0,0,0,0,165,2551},219,255,80,0,24,60,126,60,24,24,24zYY88,4,14,63,115,0,48,120,252,96,0,44,68,254,76,44,20,22,104,0,52,34,127,50,52,40,1041}__208,255,255,255,255,255,255,255,255,112,0,24,8,40,106,28,20,20,120,0,24,16,20,86,56,20,20>>224,0,50,36,120,112,112,81}0,80,232,0,76,36,30,14,14,10,10EE240,160,224,160,240,248,252,254,255,248,1,1,1,3,167,239,191,253HH480,255,239,231,2311},103,39,7,7,488,191,239,255,254,252,248,240,192D1:DISOLV1.BASDLS0F+,a$w$SPRCHRSPRBITSWEEPNMBZLINNMX5} !!DISSOLVE SUBROUTINE CREATORBY FRED PINHO%%(c) 1985}5, ANTIC PUBLISHING INC. <<;A,;A,;A,;@,;@,##@@K:A%(5}}GRAPHICS MODE DESIRED(0-15)16-@0; AA6-(- )!@# A- @02f(DO YOU WANT A5}:.( 1.SPIRAL DISSOLVEE( 2.SWEEP DISSOLVEZ( INPUT NUMBERf6-@P<= A6-)@*@3 5}A= @PF$(WORKING.$"@A`P;%+ @)"@)"@,16-@; ApZ! A@5} A! AdsN(@=31999 REM SPIRAL DISSOLVE FOR BIT-MAPPED MODES(GR.3-11,14-15)s(@32000 DIM SPB5}TDIS$(417)nOO(@32005 SPBTDIS$(1,85)=>:@4,7@<@,>:@4,xQQ(@32010 SPBTDIS$(86,15}70)=>:@4,7@<Ap,>:@4,RR(@32015 SPBTDIS$(171,255)=>:@4,7Aq<AU,>:@45},RR(@32020 SPBTDIS$(256,340)=>:@4,7AV<A@,>:@4,\R(@32025 SPBTDIS$(341,417)=5}>:@4,7AA<A,>:@4,\ Ap'(@ 32200 RETURN' A! A A! A5}II(@832029 REM SPIRAL DISSOLVE FOR CHARACTER MODES(0-2,12,13)(((@32030 DIM SPCHDIS$(413)OO(@5}32035 SPCHDIS$(1,85)=>:@4,7@<@,>:@4,QQ(@32040 SPCHDIS$(86,170)=>:@4,7@5}<Ap,>:@4,RR(@32045 SPCHDIS$(171,255)=>:@4,7Aq<AU,>:@4,RR(@320505} SPCHDIS$(256,340)=>:@4,7AV<A@,>:@4,\R(@32055 SPCHDIS$(341,413)=>:@4,7AA<A5},>:@4,\ Ap'(@ 32200 RETURN' Av A p A0! AR(@#32059 REM SW5}EEP DISSOLVE(ALL MODES)v(@32060 DIM SWPDIS$(189)NN(@32065 SWPDIS$(1,85)=>:@4,7@<@5},>:@4,PP(@32070 SWPDIS$(86,170)=>:@4,7@<Ap,>:@4,"uQ(@32075 SWPDIS$(175}1,189)=>:@4,7Aq<A,>:@4,[ Apu(@ 32200 RETURN,(LISTING COMPLETED.6.6-F:@5},&A(. A0@@B7tJ6-@6.(?T')@(>:,'6.=:5},^!!"AU)"@Ah- @H)!@W(& A)'- r)67<,.>:,6-%@) A@|5}#B:," A'#  6-A:,($I.(&INCORRECT RESPONSE! PLEASE TRY AGAIN!B-@AF I$5}##(LISTING ROUTINE TO DISK AS "@A`APG( D:SPRBITDS.LSTD@@5}D:SPRBITDS.LSTG$G( D:SPRCHRDS.LSTD@@D:SPRCHRDS.LSTG$G( D:SWEEPDIS.LSTD@5}@D:SWEEPDIS.LSTG$t)(@ 32099 REM DELAY ROUTINEt(@=32100 RESTORE 32110:FOR I=1026 TO 15}064:READ Z:POKE I,Z:NEXT I``(@O32110 DATA 173,254,3,240,5,206,254,3,208,251,173,255,3,240,11,206,255,3,169,2555}ZW(@F32120 DATA 141,254,3,24,144,235,173,0,4,141,254,3,173,1,4,141,255,3,96Z$77SPIRAL DISSOLVE FOR CHARACTER MO5}DES(GR.0-2,12,13): #A !-@A%"367<,.>:,7 :$OO104,104,133,204,104,133,203,104,133,206,104,5}133,205,104,141,255,3,141,1,4FF104,141,254,3,141,0,4,104,141,42,4,104,141,41,4,104,141,44,4,104MM141,43,4,216,162,10,5}169,0,168,133,207,133,208,177,205,145,203,169,1,141&MM253,3,230,207,24,165,203,105,1,133,203,165,204,105,0,133,204,24,165,5}2050KK105,1,133,205,165,206,105,0,133,206,165,204,205,42,4,240,4,144,13,176:JJ7,165,203,205,41,4,144,4,177,205,145,203,5}238,253,3,173,253,3,197,207DGG144,198,240,196,32,2,4,24,144,2,16,181,169,1,141,253,3,230,208,24NPP169,20,101,203,133,205}3,165,204,105,0,133,204,24,169,20,101,205,133,205,165XJJ206,105,0,133,206,165,204,205,42,4,240,4,144,33,176,7,165,203,205,5}41bGG4,144,24,165,204,205,44,4,240,4,176,15,144,9,165,203,205,43,4,240lLL2,176,4,177,205,145,203,238,253,3,173,253,3,195}7,208,144,178,240,176,32vFF2,4,24,144,2,16,159,169,1,141,253,3,230,207,56,165,203,233,1,133NN203,165,204,233,0,133,2045},56,165,205,233,1,133,205,165,206,233,0,133,206FF165,204,205,44,4,240,4,176,15,144,9,165,203,205,43,4,240,2,176,4KK175}7,205,145,203,238,253,3,173,253,3,197,207,144,196,240,194,32,2,4,24LL144,2,16,177,169,1,141,253,3,230,208,56,165,203,233,5}20,133,203,165,204OO233,0,133,204,56,165,205,233,20,133,205,165,206,233,0,133,206,165,204,205FF42,4,240,4,144,33,176,5}7,165,203,205,41,4,144,24,165,204,205,44,4II240,4,176,15,144,9,165,203,205,43,4,240,2,176,4,177,205,145,203,238JJ253,5}3,173,253,3,197,208,144,178,240,176,32,2,4,202,208,161,162,0,10433104,157,22,208,157,196,2,232,224,5,208,243,96**SPIR5}AL DISSOLVE FOR BIT-MAPPED MODES: #AP!-@A%"367<,.>:,7 :$OO104,104,133,204,104,133,203,15}04,133,206,104,133,205,104,141,255,3,141,1,4II104,141,254,3,141,0,4,104,141,42,4,104,141,41,4,104,133,213,104,133KK215}2,104,141,44,4,104,141,43,4,104,133,215,104,133,214,216,162,9,169,0 NN133,207,133,208,177,205,145,203,169,1,141,253,3,230,5}207,160,0,24,165,203NN105,1,133,203,165,204,105,0,133,204,24,165,205,105,1,133,205,165,206,105 NN0,133,206,177,205,1455},203,238,253,3,173,253,3,197,207,144,216,240,214,32*EE2,4,24,144,2,16,197,169,1,141,253,3,230,208,160,0,24,169,20,1014OO5}203,133,203,165,204,105,0,133,204,24,169,20,101,205,133,205,165,206,105,0>NN133,206,177,205,145,203,238,253,3,173,253,3,15}97,208,144,216,240,214,32,2HFF4,24,144,2,16,195,169,1,141,253,3,230,207,160,0,56,165,203,233,1RNN133,203,165,204,233,0,5}133,204,56,165,205,233,1,133,205,165,206,233,0,133\PP206,177,205,145,203,238,253,3,173,253,3,197,207,144,216,240,214,138,25}40,62fEE32,2,4,24,144,2,16,192,169,1,141,253,3,230,208,160,0,56,165,203pPP233,20,133,203,165,204,233,0,133,204,56,165,25}05,233,20,133,205,165,206,233zNN0,133,206,177,205,145,203,238,253,3,173,253,3,197,208,144,216,240,214,32GG2,4,202,16,15}97,173,41,4,133,203,173,42,4,133,204,173,43,4,133,205OO173,44,4,133,206,162,30,169,20,133,216,177,205,145,203,177,214,1455},212,24NN165,203,105,1,133,203,165,204,105,0,133,204,24,165,205,105,1,133,205,165MM206,105,0,133,206,56,165,212,233,15},133,212,165,213,233,0,133,213,56,165LL214,233,1,133,214,165,215,233,0,133,215,198,216,208,192,32,2,4,202,208AA182,165}2,0,104,104,157,22,208,157,196,2,232,224,5,208,243,96""SWEEP DISSOLVE FOR ALL MODES: #A !-@A%"5}367<,.>:,7 :$OO104,104,133,204,104,133,203,104,133,206,104,133,205,104,141,255,3,141,1,4II104,141,254,3,141,0,5}4,216,160,0,169,10,141,253,3,162,20,177,205,145OO203,24,165,203,105,20,133,203,165,204,105,0,133,204,24,165,205,105,20,135}3QQ205,165,206,105,0,133,206,202,208,223,56,165,203,233,19,133,203,165,204,233KK0,133,204,56,165,205,233,19,133,205,15}65,206,233,0,133,206,162,20,32,2NN4,24,144,2,208,185,177,205,145,203,56,165,203,233,20,133,203,165,204,233NN0,133,2045},56,165,205,233,20,133,205,165,206,233,0,133,206,202,208,223,24PP165,203,105,21,133,203,165,204,105,0,133,204,24,165,205,5}105,21,133,205,165$II206,105,0,133,206,32,2,4,206,253,3,208,187,162,0,104,104,157,22,208.$$157,196,2,232,224,5,208,243,5}968##+"@)"@,AB{67@F,.>:@ ,367AB,.>:@@,K67AU,.>:@@,c67A,5}.>:@@,{67A),.>:@@,L67A,.>:@,$V##+"@)"@,AP`--+"@)"@5})"@,Apj{67@X,.>:@,367A9,.>:@@,K67AR,.>:@@,c67Ab,.>:@@,{675}Au,.>:@@,t%67A),.>:@@,% Ap~{67@X,.>:@,367A9,.>:@,K67AR,.>:@5},c67Ab,.>:@,{67Au,.>:@,67A),.>:@,J #A!-@@%"+"=5}67A',.>:,@'J A  '"@'67A',.>:@p,'"@'67A',.>:@`,""5,15,5}10,30,20,60,76,76,76,6067A,.>:@,$AA+"@)"@)"@)"@)"@,A99+5}")"@)+!@* @,,A{67@2,.>:@,367@F,.>:@,K67@Y,.>:@,5}c67@u,.>:@ ,{67@,.>:@ ,c67A,.>:@,367A(,.>:@,K67AD,.>:@,c5}67AW,.>:@, A{67@2,.>:@ ,367@F,.>:@@,K67@Y,.>:@@,c67@u,.>5}:@9,{67@,.>:@9, c67A,.>:@@,367A(,.>:@@,K67AD,.>:@A,c67AW,.>:5}@A,\ #A !-@%"+"=67@7,.>:,O67@,.>:,R'\ A0 (;;24,20,10,20,45}0,40,80,80,160,192,192,192,20,10,160,160267A,.>:@,$D1:DISOLV2.BAS4]34$%ABNCDCLABDDSAVINLOADINA9} 9}Main MenuDUNGEONSBY ERNIE NEGUS%%(c) 1985, ANTIC PUBLISHING INC.9}+#B2w A#Q,1 + A0#'6-1 @P-! @@6-%@!#2S"9}4Q6-@'6-@36-@E-@@!I(S @`7|AR@#6-%@)6-C6-&@9}$+!@,c6-@%@ $+!@,i-r(o | @E<P A0B2w@.6-R:,:"9}@F6-@P @AeB2w@#6-&@5B2y@;-A(oW"@*!@e6-&@9}F+"@* * @+6-%@K'"@*%@ '6-@"P"@6-@U;6-%9}@$+"@",#!16-&@; @V-@@P Z8 -(T:,*-@. 8 9}@`_0B2w)-@@P- 0$d11;@3,;@3,;@,;@,nYAdAU9} A1AB@=6-AY6.Please Make Selectionx^^Roll Dice,Create Character,Display Character,Save Ch9}aracter,Load Character,Auto-Combat,Q @D77APAApA0APAt6.How many th9}rows?&6-AP0 @DtMain Menu,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,Q%6-&@%"@9}Ap6-'6.What kind of Die?36-Ap= @DA#U(}Die Rollsp2,3,4,6,8,10,12,20,100,Qj9}-@" '-@C6-P:H:,$,%@L( T6-%X [(j(Total=YAR@"T9}:,4-@@!O(Press trigger for menuY A APi A(}0(Enter name of Character9}4@6-A_6.Enter class of characteri @DkkMain Menu,Monster,Fighter,Paladin,Anti-Paladin,Ranger,Cavalier9},Barbarian,Bard,Cleric,Druid,Monk,NinjaA"@AAThief,Assassin,Magic User,Illusionist,QG6-&@9}"@=6.Enter Hit die. 0 for MenuG A`&&6.Combatant Level. 0 for Menu % A6-A`%% @D9}II0,Up to 1-1,1-1,1,1+,2-3+,4-5+,6-7+,8-9+,10-11+,12-13+,14-15+,16+,Q440,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17+,Q9}::0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19+,Q @@0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21+,Q9}%6-&@%"AM6. Armor Class!6-A+ @D96-&@M"@A"GGMain Men9}u,-10,-9,-8,-7,-6,-5,-4,-3,-2,-1,0,1,2,3,4,5,6,7,8,9,10,Q,:6. Bonus to hit"6-A, @D:6-&@6770,1,9}2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,198==20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,Q@B6.Defensive9} Adjustment*6-A4 @DB6-&@JK6.Damage Adjustment'6-A1 @D?6-&@K6-T9})#6-%@")0QA@^v +A @1-@@l(&@ DATA ,,9},,,,v(G.110h*-@@'AB@*&rD6.Select Character&6-0 @DD9}"@A|#&@"T (}(#A 0-@%@4"8 >6-G( Q Ap9}T(](Armor Class = .(Bonus to hit = F(Defense Adjust = ](Damage Adjust = Y-@@!0(9}Press trigger for Menu=T:,OAR@Y A Ap+ (}(Enter Filename!+ AZ9}AU@'-@@6( ǮSAVINGH-@@ZAd@&-A#@@0&9}AY1-@@8@9(}I-%@M(Q [(G.460mAB@-@9}&AB@ = (}AY@4/(Enter Filename3= A[AU@'-@@9}7( ǮLOADINGI-@@[Ad@-AC6-%6.Choose Attacker/ @DC:}"@AQ6-&@6-36.Choose Defender= @DQ"@A3# "(}%( :}Swings at 3"(#&@"((("+ #A #-@%@'"+ t A46:}-+P:+&@,',%@,%@J6-A`%A $Z6-%$@^#l-@p"t &N(Attacker is a ! :}Ap)( N(Defender has a  Armor class0:(2(Attacker must roll a basic  to hit:6-%:Q:}3(Which is modified to a  byQ(the Defender adjust of Db 6-&=(The Attacker's bonus to hit of :}_(further modifies this to a b(N66( The Attacker's Damage Adjust is Xd(( The roll is :6-P:H:}:,$@ ,%@L( and is a RZ(hitd A b (missl\-@@!3(Press trigger to Co:}ntinue@T:,RAR@\ A v!A56-Ap+6.Maximum Weapon Damage5 @Dh #A:}p-@"# /6-APE6.How many Rolls?O @Dh1,2,3,4,5,6,7,8,9,10,Qv6-#(}Die Ro: }lls1-@M6-P:H:,$,%@V( ^6-%b e(v( Total = o/(Attacker Damage Adjust of : } addedX(Attacker scores % Hit Pointse6-6@Po A  @(level  $+ #A`#-: }@%@'"+ ( Hit Die$'6-@!@'6-@!@6-@!@: }6-@!@6-@$ TT7@<@,4D*+7@<@,4:)7@<@,4:,: }A *267@<@,.D:,67@,.26.4$>*@A'B7tA*$ MONSTER ---:}10,26,25,24,23,21,20,20,20,20,19,18,17*,,-9,25,24,23,22,20,20,20,20,19,18,17,164,,-8,24,23,22,21,20,20,20,20,18,17,16,1:}5>,,-7,23,22,21,20,20,20,20,19,17,16,15,14H,,-6,22,21,20,20,20,20,19,18,16,15,14,13R,,-5,21,20,20,20,20,20,18,17,15,:}14,13,12\,,-4,20,20,20,20,20,19,17,16,14,13,12,11f,,-3,20,20,20,20,19,18,16,15,13,12,11,10p++-2,20,20,20,20,18,17,15:},14,12,11,10,9z,,-1,20,20,20,19,17,16,14,13,11,10,09,08++0,20,20,19,18,16,15,13,12,10,09,08,07++1,20,19,18,17,15,1:}4,12,11,09,08,07,06++2,19,18,17,16,14,13,11,10,08,07,06,05++3,18,17,16,15,13,12,10,09,07,06,05,04++4,17,16,15,14,:}12,11,09,08,06,05,04,03++5,16,15,14,13,11,10,08,07,05,04,03,02++6,15,14,13,12,10,09,07,06,04,03,02,01++7,14,13,12:},11,09,08,06,05,03,02,01,00++8,13,12,11,10,08,07,05,04,02,01,00,-1++9,12,11,10,09,07,06,04,03,01,00,-1,-2,,10,11,:}10,09,08,06,05,03,02,00,-1,-2,-3FIGHTERS$$-10,25,23,21,20,20,20,18,16,14 ##-9,24,22,20,20,20,19,17,15,13 ##-8:},23,21,20,20,20,18,16,14,12 ##-7,22,20,20,20,19,17,15,13,11$ ##-6,21,20,20,20,18,16,14,12,10. ##-5,20,20,20,19,17,15,1:}3,11,098 ##-4,20,20,20,18,16,14,12,10,08B ##-3,20,20,19,17,15,13,11,09,07L ##-2,20,20,18,16,14,12,10,08,06V ##-1,20,1:}9,17,15,13,11,09,07,05` ""0,20,18,16,14,12,10,08,06,04j ""1,19,17,15,13,11,09,07,05,03t ""2,18,16,14,12,10,08,06,04,02:}~ ""3,17,15,13,11,09,07,05,03,01 ""4,16,14,12,10,08,06,02,01,00 ""5,15,13,11,09,07,05,03,01,-1 ""6,14,12,10,08,06,0:}4,02,00,-2 ""7,13,11,09,07,05,03,01,-1,-3 ""8,12,10,08,06,04,02,00,-2,-4 ""9,11,09,07,05,03,01,-1,-3,-5 ##10,10,0:}8,06,04,02,00,-2,-4,-6 CLERICS -10,25,23,21,20,20,20,19 -9,24,22,20,20,20,19,18 -8,23,21,20,20,20,18,17:} -7,22,20,20,20,19,17,16 -6,21,20,20,20,18,16,15 -5,20,20,20,19,17,15,14 -4,20,20,20,18,16,14,13 -3,20:},20,19,17,15,13,12( -2,20,20,18,16,14,12,112 -1,20,19,17,15,13,11,10< 0,20,18,16,14,12,10,9F 1,19,17,15,13,11:},9,8P 2,18,16,14,12,10,8,7Z 3,17,15,13,11,9,7,6d 4,16,14,12,10,8,6,5n 5,15,13,11,9,7,5,4x 6,14,12,10,8,6,:}4,3 7,13,11,9,7,5,3,2 8,12,10,8,6,4,2,1 9,11,9,7,5,3,1,0 10,10,8,6,4,2,0,-1 THIEVES -10,26,24,2: }1,20,20,20 -9,25,23,20,20,20,19 -8,24,22,20,20,20,18 -7,23,21,20,20,19,17 -6,22,20,20,20,18,16 -5,21:!},20,20,19,17,15 -4,20,20,20,18,16,14 -3,20,20,19,17,15,13 -2,20,20,18,16,14,12 -1,20,20,17,15,13,11 :"}0,20,19,16,14,12,10" 1,20,18,15,13,11,9, 2,19,17,14,12,10,86 3,18,16,13,11,9,7@ 4,17,15,12,10,8,6J 5,16,1:#}4,11,9,7,5T 6,15,13,10,8,6,4^ 7,14,12,9,7,5,3h 8,13,11,8,6,4,2r 9,12,10,7,5,3,1| 10,11,9,6,4,2,0 MAG:$}IC USERS -10,26,24,21,20,20 -9,25,23,20,20,20 -8,24,22,20,20,19 -7,23,21,20,20,18 -6,22,20,20,19,17:%} -5,21,20,20,18,16 -4,20,20,17,15,15 -3,20,20,19,16,14 -2,20,20,18,15,13 -1,20,20,17,14,12 0,20,:&}19,16,13,11 1,20,18,15,12,10 2,19,17,14,11,9 3,18,16,13,10,8 4,17,15,12,9,7& 5,16,14,11,8,60 6,15:'},13,10,7,5: 7,14,12,9,6,4D 8,13,11,8,5,3N 9,12,10,7,4,2X 10,11,9,6,3,1 D1:DUNGEONS.8kJOYSTICK TEST BY DAVID NOOR 7+R:,"@*T:,7(NOTHING%R:,>)}@%(JOYSTICK$T:,"$(TRIGGER( @ D1:NOOR.IO7(NOTHING%R:,<W1 REM SUMMERSGILL I/O960 REM PRINT IT (PROWRITER)972 ? #2;CHR$(27);CHR$(78);CHR$(27);CHR$(65)976 ? #2;CHR$(14);" ";FI$(3);B+}CHR$(15)978 ? #2;CHR$(27);CHR$(84);"17"980 REM 982 FOR I=1 TO 40984 FOR J=1 TO 192:T=SA1+(40*J)-I990 ? #2;CHR$(27);"S019B,}2";B$SUMMERSGILL I/O960 REM PRINT IT (PROWRITER)972 ? #2;CHR$(27);CHR$(78);CHR$(27);CHR$(65)976 ? #2;CHR$(14);" ";FI$(3);@'(##FCDCLSCODEDESPSOAGC Pix(F.} @ @ @@@@ @@@ SYSOP SANTA))BY SCOTT ANTHOF/}NY AND BILL MARQUARDT (c) 1985, ANTIC PUBLISHING2#;@,#6. D1:GIFTS.DAT<&&;@,;@,;@F0},F11;@,;@,;@,;@@,Z!6.>:A%,!6.>:A`,_'AAH'AAHdF1}B  #@.AR@8 BB An6(>:A%,"-@@6(What is the ageo'-@F2}@ '( of the personp,-@@,(you are giving to q3-@@/((infants are age 0) 3F3}x!! )!AAoW6-@%+!@!,%+!@,%+!@,%+!@ ,%+!@,%+!@,c6F4}-i6-o6-#( A#@@??AA A0A@APA`ApF5}@k67@<@,.=:,767@<@,.=:,Q67@<@,.=:,k67@<@,.=:,F6}( AAGE CATEGORY MENUS/-@@,(Infants to 2 years/(7( 1 - Clothes (2 - Toys7(3 - F7}Helpful things/( for Mom & Dad%6-@/ B!  6- $6-@ @3(Pre-Schoolers (3-5 years)F8}6(/( 1 - Books(2 - Toys/( 3 - SoftwareW( 4 - Clothes3(5 - Dolls & Stuffed AnimalsA( 6 - GamesM6-@F9}W B!  6- $ %-@@"(Ages 6-9%( /( 1 - Books(2 - Toys/( 3 - Software N( 4 - DollsF:}( 5 - Games8(6 - Sports EquipmentD6-@N B!  6- $'-@@$( Ages 10-12'(0( 1 - BoF;}oks( 2 - Games0( 3 - Software^(4 - Sports Equipment,( 5 - HobbiesH(6 - Records/AV/CassetesT6-@^ B!F<}  6- $5-@@2(Junior High (Ages 13-15)5(;( 1 - Books"( 2 - Software;(3 - Sports EquipmeF=}ntF( 4 - Hobbies)(5 - EntertainmentF(6 - Records/AV/CassettesL(7 - Clothes for girls6(8 - Clothes for boyF>}sB6-@L B!  6- $p?-@@<("High School & College (Ages 16-21)?(;( 1 - Books"( 2 - SF?}oftware;(3 - Sports EquipmentQ( 4 - Hobbies5(5 - College Related MaterialsQ(6 - Records/AV/CassetesO(7 - F@}Clothes for Females9(8 - Clothes for MalesE6-@O B!  6- $X#-@@ (Adults#(lC( 1 -FA} The Arts-(2 - Sports & FitnessC(3 - EntertainmentmE( 4 - Computing2(5 - Repair & Home CraftsE(6 - CollectingFB}n1(7 - Fashion & Style'6-@1 B! q5@(# A5@@vE 6-EAqFC}ArAsAtAuAvAw%-@@"(The Arts%(K(1 - Music Performance5(2 - MusiFD}c ListeningK(3 - Arts & Crafts2(4 - Art Appreciation(6-@2 B! _@(# A5@FE}@;6-_Aq@AqPAq`Aqp0-@ @-(Music - Performance0(G (1 - Stringed InsFF}truments.( 2 - PianoG(3 - Wind InstrumentsI(4 - Percussion)(5 - Electronic56-@? B! I Ay.FG}-@@+(Music - Listening.(;( 1 - Classical!(2 - Pop.(3 - Jazz;(4 - Rock;(5 - Country WesteFH}rn'6-@1 B! ; Ay*-@@'( Arts & Crafts*(;( 1 - Painting&( 2 - Sculpting;(3 - WoFI}od Carving8(4 - Photography(( 5 - Ceramics8( 6 - DrawingK(7 - Needlecrafts+(8 - Miniatures76-@A FJ}B! K Ay$ --@@*(Sports & Fitness-(4L( 1 - Fitness5(2 - Team & Competitive SportsL(FK}3 - Outdoor Sports52(4 - Spectator Sports(6-@2 B! >_@(# A5@@;6FL}-_Ar@ArPAr`ArpH$-@@!(Fitness$(J=(1 - Weight Lifting+( 2 - Aerobics=( 3 -FM} NutritionKT( 4 - Jogging#( 5 - Walking4( 6 - Swimming@6-@J B! T AyR6-@@3(Team FN}& Competitive Sports6(T@(1 - Volleyball%( 2 - Tennis@(3 - Squash/RacquetballU1(4 - Golf ( 5 - Bowling1( 6FO} - BaseballVV( 7 - Football'(8 - Basketball6( 9 - HockeyB6-@ L B! V Ay\+-@@((OuFP}tdoor Sports+(^2( 1 - Hunting#( 2 - Fishing2( 3 - Hiking_T( 4 - Bicycling%( 5 - Boating4( 6 - Skiing@6-@FQ}J B! T Ayf$*-@@'( Entertainment*(L(1 - Eating & Drinking5(2 - Puzzles & GamesFR}L(3 - Movies/Theatre8( 4 - Reading"( 5 - Travel.6-@8 B! g@(# A5@FS}@;6-gAs@AsPAs`AspAs.-@@+(Eating & Drinking.(=(1 - Dining OutFT}(( 2 - Dining In=(3 - Bar Utensils<( 4 - Beverages,(5 - Favorite Foods<( 6 - Parties?(7 - Barbecues & PiFU}cnics+6-@5 B! ? Ay,-@@)(Puzzles & Games,(?(1 - Board Games*(2 - Card Games?FV}(3 - Pencil GamesC(4 - Jigsaw Puzzles.(5 - Puzzle ToysC(6 - Magic Tricks;;(37 - Fantasy/Role Playing:CC=7:GFW}OSUB 12120:GOTO 7900$$-@@!(Reading$(6( 1 - Fiction'(2 - Non-fiction6( 3 - PoetryD(4FX} - Politics & History0( 5 - MysteriesD(6 - Periodicals^(7 - Science Fiction-( 8 - Biography>( 9 - ClassicsJ6FY}-@ T B! ^ Ay$&-@@#( Computing&(7( 1 - Hardware"( 2 - Games7(3 - ProductiviFZ}tyV( 4 - Languages,(5 - Other Software@(6 - IncidentalsL6-@V B!  6- AyL1-@ @F[}.(Repair & Home Crafts1(`B( 1 - Cooking0(2 - Maintenance & RepairB( 3 - Gardeninga,(4 - Decorating"6-F\}@, B! j_@(# A5@@;6-_Au@AuPAu`Aupt$-@F]}@!(Cooking$(v:( 1 - Cookbooks&( 2 - Utensils:(3 - Table Itemsw=(4 - Pots & Pans*(5 - Appliances=(F^}6 - Condimentsx3( 7 - Staples6-@) B! 3 Ay~1-@ @.(Repair & Home Crafts1(=( 1F_} - Carpentry&( 2 - Plumbing=(3 - Auto MechanicsY(4 - Electrical'( 5 - Painting9( 6 - Cleaning E6-@O F`}B! Y Ay&-@@#( Gardening&(9( 1 - Clothing"( 2 - Tools9(3 - Plants & Seedsd(4 - SoFa}il Conditioners6(5 - Decorative ItemsD( 6 - BooksP6-@Z B! d Ay$'-@@$( CollectFb}ing'(1( 1 - Coins ( 2 - Stamps1( 3 - Antiques0(4 - Baseball Cards&6-@0 B!  6- AyFc},-@@)(Fashion & Style,((O( 1 - Sewing$( 2 - Cosmetics;(3 - Fragrances forO( Men & Women)[ Fd}(4 - Men's casual Clothes?(5 - Women's Casual Clothes[(6 - Women's Accessories2S(7 - Men's Accessories7(8 - MFe}agazines & BooksC6-@M B! S6- 6- $(#6 A6-@(6(List of Suggestions:2#@Ff}3# 4 B0 A0<#@F#"@ B1P#AdAU AT$$ B  BFg} 0! B $$$@ B$L-@@#:(That's all! Press any key . . .LAdAU$ F:Fh}Ad,"AUA$ A% @@:%$'@-@@"#-1-@Fi}8(*< @ '>-@@"#-1-@6(: > '\\10,1,9,3,8,5,6,9,7,7,6,9,4,13,6,9,5,11,3,15Fj},5,12,4,14,2,18,4,14,3,16,2,18,1,20,9,3,8,5$'--@@""#-)(- .'DD1,10,3,8,4,12,5,8,6,11,7,6,7,15Fk},8,12,9,8,10,5,10,14,11,10,12,4/'7712,16,13,9,14,5,14,14,15,10,16,3,16,16,17,6,17,198'-@  B B'(-@Fl}#@((GIFT SELECTIONC' -@'@ (HELPERD'+(-@#@+(for readers ofE'+(-@#Fm}@+(ANTIC MagazineL'2-@!@)-@@.(2 M'=-@@#-@!((4-@8Fn}9(= N'2-@!@)-@@.(2 V' B!@$.#-@9( #$.@-@Fo}@#-((4-@99(= @$X/qAdAU'-@@"D(Press number of choice d@Fp}@K:q)@]/46-&@H@4 @)!B! _/$l/LAdAU'-@Fq}@#L(Press any key to continue . . .m/ F:Ad,"AUB!Aq/AdAU$2 @Fr} -2(-@!(2(-+@9&B:,,((6-%@2$,3:-@@#:(Press any Key to coFs}ntinue . . .63!6-@!AdAU@3 F:Ad,"AUB1 J3 ( (List continued . . .T3$DFt}1:SYSANTA.BASFCDCLSCODEDESPSOAGC Pix(D"#DIRXDIRYFTIMSCREEPOWEPTIMPULSOC71FINFINDCHARSCSTARSCORPPDEATINXLOOYLOOXYTIMDEDECCJv}XFYFDELTADELTAXYFTOUCVP8P8GUCHSEDNDNDLNDLMOVEMOVCCO@@Jw} Jx} !"#$Jy}%&'()*+,-./01234Jz}56789: WIREBALLBY JEAN GOULET%%(c) 1985, ANTIC PUBLISHING INC.J{} A" A$P.66-R:,68,"*8,"A8 AB AL56-%@J|}!@&) AP56-V" Ap`A"@6-%@A2@@1&@@bJ}}Y"@!@0'6-36-M0@Y6-jSA16-%@&AV$+J~}!A@,?6-?:C:,<,SApt%6-%A A$P% Ap1%8,%8,"@2ApJ}V @2,6-%8,)6-%8,2@:,8,B A 0V"A@ A0O%2@A@J}@-6-%O2@$8,A0U3-%8,+"@,$@9%+"@,J}8,;1G"@2K U A ='@:,,/--&8,8,7@2=,-2@@J}-6-%@\ @:,,%8, =2C6-M A 0Y"\$( A02J}U3-%8,+"@,$@"%+"@,8,;1G"@2K U A<='@:|,,/--&8,J}8,7@2=,F-2@@-6-%@P\ @:,,%8, =2J}C6-M A 0Y"\$Z A0n) @2,6-%8,)6-%8,x??6-$+!* @9,%+ @J},%@8$+!@8,??6-$+!* @#,%+ @,%@"$+!@", @:,,$@"@J}*"*"#6-@=0@@@$  @6-%@ $ 6-(+,@w;"J}1""@:,+@:,1,; A@"A@p%6-P:H:,$@7,%@G6-P:H:,$@J}!,%@O1Z@:,f6-p A@ @:,,6-$6Y.6-$N:?&+%!@8J})% @,,Y6-$N:?&+%!@")% @,,@M1%%"@2%@2+,4@:,<6-%D6-%J}J,M$J 1%1%T @26-6 A`^ @26-6 Ah)H:,!?P6J}-6) Ar 6-6 A| @26-6 A4 @2,6-%$@:,*,4 A J}@26-6 A* @2,6-%$@:,*,$/6-N:&,6-N:&,$6-O:&,/6-O:&,' J}!6-'6-@' A 6-'6-@; 6-$6-$@2#,+6-%36-%;1 @:J},,?)P:%?P,"P:,*P:%?P,"P:,56-@? A0 Ap&"A00T@:,J},"6-@.6-@:6-H6-%AT6-: -6@P@P@i2O:'+@$+!J},%?P$+,,,@@s Aw A6-DS6-12@J}S2N$X@'@@9-@F(SCORE:J}ZBBw@&l6-%+ @,x@@b$ A p-A@@ ;2J}@@g2@A@&'@@@q Au 22@J}=6-6-)6-&@=A!A6%&@B-&@J}@:,(,2@2>,B "-1"@:,& , ,  @:,&,J}' ApL6-+@:,*@:,,&"@:,26-@L0@@b"@*"@# A p,J}@:,2,>6-J6-X6-%Ab AP$L @2,,%6-@16-@=6-@J}I6-@L$>'@'@@H?-@+-@ / ;BBw? R&-J}@&( GAME OVER \C-6@@,-@ 0 ?BBwO:,C f(-@((J}score: pM-6@@,-@ 0 ?BBwO:,C M A!0 AF:A,&@*J}+<AY]6-+F:A,%@,$AV6-F:@,%AV$F:@,AG6-@J}6-@/-@9CA6%G %6-F:A`,%AV$F:Aa,9%@@hM-@J}@([%@_ q@AR@y%@@+%@@=-@@J}J(WIREBALL\-@3@o(By Jean Goulety#A"J6-&@"6-P:'AV,26-&AV$>A`JJ}Aa3-%@"! 3112,96,98,0,6,01%@3%@41AY@4M;@2,J}76. hhhhhԢԑ`M6-?:C:,<<BsD,M-@@"/-@3"E%$@J}%I M &&70,20,105,125,105,85,105,190,13082,0,0,0,17,68,17,0,0 $$84,0,60,255,215,223,255,255,60 !!89,0,4J}0,146,40,81,40,146,40 ""96,0,65,60,105,125,105,60,65$ 124,4,16,4,16,4,16,4,16. &9@,9@,;@,26J}-@ >6-@J6-@V6-@b6-@n6-@z6-@6-@6-@8 OO6.EhhhإJ}i(˥i̢ȱT&إi(˥iԅ`Tԅ`B I-@@"$68,-( I0,0,0,0,0,0,1,0,0,0,-1,J}0,0,0,0L I-@@"$68,-( I0,0,0,0,0,0,0,0,0,0,0,0,1,-1,0V E (}AV'AV1%@@J}E%@@` u6-F:@,!6-F:@,3@E@@W-](i@J}u@j ;-AA"!% ($;102,172,230,74,0 -@@6-6@@@ J}&G6-@&O:,c2@A@2@AR@2@AA%@@  50@J} % A) 56- ^ A p6-%@6A6%&@@:,@@2F,R6-@ ^J}6-@ h @ 6-%@'!@36-@hIF YOU MAKE EXTRA SCREENS, CHANGE THE 6 TO NEW NO. 77A%J} A%PA%A&0A&A'  @:,,$ SCREEN 1 m-@@"#,@//@8J}3 =@2Q-@@ ],@i/@7m  >-@@6@+,@7/@!; >$J} SCREEN 2 ],@@'/@8@9/@8@"K/@@"]/@@ c-@@J}0@+,@?/%@@S/%@@!_/@c  $ SCREEN 3 s-@@ J}#,@//@ 3 G-@@S,@_/@s/&@@ ( ,@9&@+/@9&J}@I/@9&+&@,@ M _,@@q/@8@/@8@"/@@"2 /@J}@$< SCREEN 4F ,@@'/@@9/@@K/@@]/@@o/J}@@/@0@/@6@P ,@@'/@@9/@@K/@@J}]/@@o/@@/@0@/@6@Z ,@@'/@8@9/@8@"J}K/@@"]/@@o,@@/@)@,@@/@)@d $n SJ}CREEN 5x ]-@@@%,3/@9&I/@9&@#&W/@#&]/   $ SCREEN 6J} ],@@'/@8@9/@8@"K/@@"]/@@ ,@@'/@%J}@9/@'@ K/@@ ]/@@o/@'@/@%@ ,@@'/@J}@9/@@K/@@]/@@o/@@/@@ r/@@'/J}@@9,@(@K/@ @ ],@(@ o/@ @r$D1:WIREBALL.BASDEDECCHq