@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 gLL.TKES EIERF } 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}}} HE |||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}B`7 6(ҩmi:; < =:2i4354 ?6L 6 ,}f  ? ,p? f 7?0070L B0`?>2i435< 70>A!CE-}000Ɋ?0`0 |1;:2 ҅1L': `1890 <ӥL'9`0`2m4.}3m 5`-2 ` Ҡҍ2ҩ% L-2 2ҍ ҩ% ҩ(ҢAҬ`ҍ`%/}Ң`jj)?j)`  @ ` <Ӎө0XLk&'x - -X`0}` ~` r sq  `/`EiͩkΩ͙1}kCop j`j {j`Hi͝Νh`L"UNEM:D" NURͩkL 6 np1ARRAYFILENAMEDISKFILECOUNCHOICLOOPAUSFB3} @*** DISK MENUE ***1AdAU4} @I1AdAU9 +@AR@90@7-@325}7 ""(@ alpha systems(@ presentsT(@(@7(@ 6}PROTECTION T(@ TECHNIQUES""(@  :(@(@:(@ (C) COPYRIG7}HT 1983 ;@, 2(.(" ĠՠŠӠ 2 4Y@ @2R +A8}1AAO( ӠR(**(" This package was designed to be ,,($ used by sof9}tware writers to help ++(# protect your software. For your ((( benefit, the programs on this **(" disk have:} built in instructions.))(! They also contain many comments,,($ to make them easier to understand.,(,(! Some;} are listings from the book,,($ and others are utilities to use in( protecting software++(# The Programms a<}re new designed by$$( Interstellar Software Inc.-(-(" Just type the number of the !!( program you sele=}ct from))(! the menu, then type RUN or LIST&&( when the program has loaded.=('( PRESS TO RUN MENU >}9AR@= 1;A(,;@ ,;@ ,;@,C@@U@@9_+qAR?}@AAAc!N(,(! ŠΠK( (C) COPYRIGHT 1983N(@}"T 6.D1:6.+67B:,%@,.*.*H@@T6-#K @@@K7@<@A},4FREE)B:, @@@$c6-%@"@#/@@ A-@ M!@DY6-@Dc B}@5%J6. 17@<@,4 J67@ <@ ,. &f+67@<@,.7@<@,C}S67@<@,.7@<@,_ @f( ',() "67B:,%@,., @5(U @@@D}*@@<-@@!U(ҠҠ ):AR"6-P:,: @)!@@*, E}6.,6.7$@&@<$@,+=-@@$7<,0 =67B:,%@,.7<,,0"@ *7<,4F} 067B:,%@,..-T  @H(}.( Ǡ :T(! TYPE FOR INFORMATION OR.**(" TG}O RUNNING THE PROGRAMM !/0SAR@(}8( ΧԠΠ :L-@A P S%1y +H}A 1ACAR@UB7t@dg@@dy@@2))(! I} The Programms on the Disk3++(# are new designed and error free4**(" by Interstellar Software Inc.5&&( J} Programmer: D.Train611()Newly designed in the end of Year 19847))(! Press any to begin !8%2K}AU@@G2@AT@@i2@AS@@2@AR@@L}B7h@9/-@?+A / : F:Ad,"AU@X;3 -@6M}?,A 0 3$ D:MENU.REN@N}SKFILECOUNCHOICLOOPAUSFB 12  STRINGSCREENINZTEMPNABCZZ P} F F O @A(@A6AaAbA7@' Q}11;@p,;@ ,;@,;@,+-@@ "'67,.>:,+ ''104,104,104,133,106,32 R},246,243,96"F:A,A(" @6-?:C:,<A(,a +(}-0@G0@ S}@@a0@@@: (}-@@0(ԠŮ: @b3 @C#@) T}@3 @8 (}-@@8(Ӡͭ͠ 2(2('---> formatierte Diskette in Laufw U}erk 1 V(L(A---> gib den Programm-Namen an, z.B. ıĠ V @b ((  6B: V},", 젡6 @ W37@<@,0:*7@<@,0:M 젡W W} @Q-+7@<@,0D,)+B:,!@,G 젡Q @ 67B:,%@,.>:AU, X} @@+-@@"'67,.>:,+ 255,255,0,96,255,127$$6-?:A8 richtiges ROM einstecken+(,(---> dann Π...( @b,006-?:A8<$AV< \}+%@2,$AV,@ @!+-@@b"'67,.>:,+ $$6-?:A8^ -@6@=-@` d}@06@S2@@W [ ^$?SC-F:A0,%AV$F:A1,F:A2,%AV$F:A3,OAU e}S @33F:A8,%AV$F:A9,%@AD:********.***D1:CC1 }CD[qAADRSECDRIVRREASTTUBADRADRBADRBZZCm} SECTOR SCANNER s+"An}4AA:(}=(a( ˭Ҡs@@2( (2($ THIS PROGRAM DISPLAYS To}HE CONTENTS""( OF ANY SECTOR ON A DISK.2D;@,((@($ WOULD YOU LIKE TO RUN THIS PROGRAM D<4Yp}@pA%D:MENUFn##** SET UP CALL-CIO ROUTINE **x%-A6A@"!% 104,32,83,228,96q};A(,) 6. 67A(,.)67@,.** SET DRIVE **6-@Ai** SETr} COMMAND TO READ **6-@Ap%%** SET ADDRESS TO STORE READ **F 6-C:,/Ar&+P:'AVs},$AV,FAsP:'AV,"** SET SECTOR NUMBER **,]( (%( ENTER SECTOR NUMBER )?!A ) t}S( ԠŠ] A6=&Ax&+P:'AV,$AV,=AyP:'AV,T^$$** EXECUTE CALLu}-CIO ROUTINE **h6-?:A6,- (}-( SECTOR NO:  DISPLAY1(1(&Ӡv}J.(& @Af@J A0-@(=($@0-$@0w}%@0Q-@ %@e-@@0u6-$@0%@:7<,,"AU(   (7<,  'x}Af'AR@4( (4(&B(/($ CHARACTER FOR 'EOL' IS DIy}SPLAYED B( AS A SPACE.$d( (0(" ENTER ANOTHER SECTOR TO DISPLAYd( OR PRESS TO RUN MENU z}.AdAU8 F:Ad,AUA=#F:B2y,"@#%D:MENU@ AB @ A{}D:SECTLOOK.BASYSY ADRADRBADRBZZC,0AADRFRMSEDRIVRREASTTUBADRADRBADRBZZCWWRITFROMSETOSEREPLYSTRBYTXCHECZZDISECADDRUNU}}SVV1@$@B")A`A6@@  ~}?P@@0AAA}A !  A A1 @A1AA) (}&( } à)((,)(! SECTOR USEAGE Y=USED N=UNUSED,(2(%( Ġà((<?-@}%6-%@36-@:7<,,?6-A(FO-@'6-$@%467<,.Y:G67<,.NO6-&P (}7<,Z6-'@  d;;6-@:7@<@,,%AV$@:7@<@,,30(} à PAGE 1 } FREE SECS3(**(" Y=SECTOR-USED N=SECTOR-UNUSED1(1(&Ӡ1.(& }1(-@86-$@0%-@%@8(-%@)+-@ }%@+-@),6-+$@0,%!"(( ,  (7<,  ,,(# HIT TO DI}SPLAY THE REST 5 (}2( à PAGE 2  FREE SECS5(**(" Y=SECTOR-USED N=SECTOR-UNUSED1(}1(&Ӡ1.(& 1(-@@#86-$}@0%-@&@ 8(-%@)"+-@ &@ +-@),,6-+$@0,%!"((} , 6 (7<, @ J3( (3(% THATS IT ! CHOOSE OPTION T*(*( RETURN TO PAGE 1 OF VTOC }^!!( RETURN TO VTOCER MENUh..(% END PROGRAM :RETURN TO MAIN MENU r| 42$ 43%D:MENU } A0/ (} (,( í/(,,($ (C) COPYRIGHT 1983 BY ALPHA SYSTEMS-(-(" THIS PROGR}AM WILL DISPLAY WHAT**(" SECTORS ARE USED AND UNUSED ON( DISK.:( ( (6($ WOULD YOU LIKE TO RUN THIS P}ROGRAM :4YA ' %/ (} (,( TO RUN JUST INSERT/(**(" THE DISK YOU WISH TO CHECK }THEN%(%( Ӡ AR@ Ġ D) 6. 67A(,.)67@},.N Ԡ X6-@Aib6-@Apl6-A`v=&Ax&+P:'AV,$A}V,=AyP:'AV,%% ԠӠϠŠĠF 6-C:,/Ar&+P:'AV,$AV,FAsP}:'AV,$$** EXECUTE CALL-CIO ROUTINE **6-?:A6,$1-@A(%6-@:7<,,-( 1 } ";@,"@@&&;A(,;@,;A ,` +A1AA}4(S( Ҡ٠V(` A,,($ (C) COPYRIGHT 1983 BY ALPHA SYSTEMS( (( Š}$/(/($ DISPLAY VTOC SECTORS USED OR FREE.--(% RESERVE SPACE FOR HIDDEN DIRECTORY8 ( RETURN TO MAIN MENU B}L 42 AP A` 43%D:MENUj A  @ t A A`;A(,}XX6.NJJ67B:,%@,.2}Ap@WRITEF 6-C:,/Ar&+P:'AV,$AV,FAsP:}'AV,6-A`=&Ax&+P:'AV,$AV,=AyP:'AV,6-?:A6,U (} (,( NEW} VTOC IS NOW IN PLACE /(U(! SPACE RESERVED IN SECTS 504-511.('( PRESS TO CONTINUE +.$p8 (} (5(}# ŠŠҠΠ8(z,,($ (C) COPYRIGHT 1983 BY ALPHA SYSTEMS0(0(% THIS PROGRAM WILL ALTER THE }VTOC --(% OF A BLANK FORMATTED DISK SO THAT ,,($ WHEN PROGRAMS ARE ADDED,THEY WONT --(% USE THE SECTORS RESE}RVED FOR THE ( HIDDEN DIRECTORY./(/($ Ϡ - PREPARE A NEW FORMATTED ,,($ DISK AND RUN THIS PROGRAM.N}EXT MOVE))(! YOUR PROGRAMS ONTO THE DISK AND --(% TEST IT OUT. THEN YOUR READY TO RUN --(% THE DIRECTORY HIDER PR}OGRAM. X:( ( (6($ WOULD YOU LIKE TO RUN THIS PROGRAM :b4YAl ' %@V (}2($ INSERT Y}OUR BLANK FORMATTED DISK 5(V( THEN PRESS J  $(#%-A6A@"!% 2#104,32,83,2}28,96<#$ D:VTOCER.BASYSEREPLYSTRBYTXCHECZZDISECADDRUNUP]^1 G AADRSECDRIVRREASTTUBADRADRBADRBZZCFRMSECTOSECTOSEADRAADRA} } SECTOR SCANNERK (}A-AAK( ҭ/( (/(!THIS PROGRAM SC}ANS ANY NUMBER OF (++(#SECTORS ON A DISK, CHECKING FOR BAD2(OR MISSASIGNED SECTORS.<C;@,((?(#WOULD }YOU LIKE TO RUN THIS PROGRAM CF4Y@P%D:MENUZ/ (} (+( ENTER STARTING SECTOR /d;!A} ) (1( ԠŠ; @n,( ((( ENTER ENDING SECTOR ,x;!A ) (1(} ԠŠ; A7   (-( ԠŠǠ7 A##** SET UP CALL-CIO ROUTINE **}%-A6A@"!% 104,32,83,228,9600** ROUTINE TO CHECK MISSASIGNED SECTORS ** (};A}(,;A(,) 6. 67A(,.)67@,.) 6. 67A(,.)67@,.** SET DRIVE **}6-@Ai** SET COMMAND TO READ **6-@Ap=&Ax&+P:'AV,$AV},=AyP:'AV,",%%** CALC POKES FOR FIRST READ **6: 6-C:,)6-&+P:'AV,$AV,:6-P:'AV},@J&&** CALC POKES FOR SECOND READ **T: 6-C:,)6-&+P:'AV,$AV,:6-P:'AV,^h$$** EXECU}TE CALL-CIO ROUTINE **r - A  |(( Π((( PRESS TO START OVER }% 6-=&Ax&+P:'AV,$AV,=AyP:'AV,ArAs6-}?:A6, F:Aq,@A ArAs6-?:A6, F:Aq,@A }0A6-?:A6,ArAs F:Aq,@A 0A# ( SECTOR } WAS GOOD#$*'( SECTOR  WAS *$%"( SECTOR  WAS Ġ %$D:SECTSCAN.BASY D } 1 G AADRSECDRIVRREASTTUBADRADRBADRBZZCFRMSECTOSECTOSEADRAADRA0oAADRFRMSEDRIVRREASTTUBADRADRBADRBZZCWWRITFROMSETOSEREPLYZSECNEWDINWDIQVV1V2} };@, U +A}1AA4(R( ٭U(,,($ (C) COPYRIGHT 1983 BY ALPHA SYSTEMS/(/($ THIS PROGRA}M WILL HIDE YOUR DIRECT-(--(% ORY ON A DISK SO ONLY YOUR PROGRAMS 2--(% CAN FIND IT, TO OTHERS IT DISPLAYS <--(% 70}7 FREE SECTORS. F8(5( Ǡ Ǡ Ǡ8(d,,($ THIS PROGRAM ALTERS YOUR D}ISK, AND n--(% MAKES YOUR PROGRAMS VERY HARD TO xG( CHANGE, SO !!!(D(% >> Š˭РŠ << G(}*(&( HIT FOR MORE INFO *+ (} (+( Ӡ̺͠?()( 1. FIND A FREE SPACE TO HIDE} ?( THE DIRECTORY%%( 2. COPY YOUR DIRECTORY THERE!!( 3. ALTER AND REWRITE DOS$$( 4. DELETE THE OLD DIREC}TORY%%( 5. DELETE DUP.SYS IF PRESENT++(# 6. CHANGE VTOC TO 707 FREE SECTORSV(/($ YOUR DISK SHOULD BE DONE AND }READY V(" FOR SALE. MODIFICATIONS ARE VERY ++(# HARD TO DO ON A PROTECTED DISK!! Q*(" YOUR DISK SHOULD BE SELF-BOO}TING Q(" (HAVE AN AUTORUN.SYS) AND SHOULD J ( PREVENT PROGRAM BREAKS.#(J(" ****************************''(} *ŠŠՠŠ˭*''( ****************************1()( READY TO RUN THIS PROGRAM -1(}4YA%D:MENU"X (} (5($ INSERT THE DISK YOU WISH TO PROTECT8(X( THEN PRESS '+('(} HIT TO ABORT +, A** READ VTOC **6! A !** MOVE DIRECTORY@# A0#* ALTER/REW}RITE DOSJ! A@!** DELETE OLD DIRT< AP<@3@ D:DUP.SYS^ APCHANGE V}TOC- (}-@@-( ̠Š-(-( NEW DIRECTORY STARTS AT ((( TURN COMPUTER OFF AND T}RY DISK.U(/($ THEN TURN OFF AGAIN AND TRY ANOTHERU(! DISK WITH DOS, THEN LOOK AT THIS&( DIRECTORY !&AB&}A:AR@:(  TO RUN PRESS  F:Ad,@3A ` AdAU %D:M}ENUREAD VTOC%-A6A@"!% 104,32,83,228,96&&;A(,;@,;A ,) 6.} 67A(,.)67@,.SET DRIVE$6-@Ai.6-@Ap86-A`B=&Ax}&+P:'AV,$AV,=AyP:'AV,LSET ADDRESS TO STORE READVF 6-C:,/Ar&+P:'AV,$AV},FAsP:'AV,`j$$** EXECUTE CALL-CIO ROUTINE **t6-?:A6,y??CHECK IF SPACE WAS RESERVED } BY VTOCER OPTION 2.~9#@:7A'<A',,"@/6-@t9 A&&CHECK FOR SPACE TO PUT DIRECTORY }-@t@X6@C9@:7<,,"AU*@:7%@<%@,,"AUC A Q' (})( } ٠,(Q( I CANT FIND SOME OPEN SPACE TO ##( PUT YOUR NEW DIRECTORY IN.*(*( TO RESERVE SPACE ON Y}OUR DISK ( RUN OPTION 2.I(/($ FOLLOW ITS INSTRUCTIONS,THEN RETURNI( HERE AND TRY AGAIN !:AR}@:(  PRESS TO RUN !  F:Ad,@3A&AdAU&% D:VTOCER.BAS6-+&}@,$@$'6-@6-@'Ap4>-@%6-Aa%-6-%7 A; >$ '}6-A%+&Aa,'AB& 5*@@ D:DOS.SYS5@ $** DELETE OLD DIR **}Ap'Ar'As-AaAh=&Ax&+P:'AV,$AV,=AyP:'}AV,h6-?:A6, r$;A(,XX6.N0}JJ67B:,%@,.2ApF 6-C:,/Ar}&+P:'AV,$AV,FAsP:'AV,6-A`=&Ax&+P:'AV,$AV,=AyP:'AV,}6-?:A6,$(#** MOVE SECTOR ROUTINE **2#ApP#=&Ax&+P:'AV,$AV,=AyP:'AV},n#6-?:A6,x#=&Ax&+P:'AV,$AV,=AyP:'AV,#Ap#6-?:A6,#$}D:DIRHIDER.BASY1H$IHIDELSAVE-GIVE FWRITFROMSETOSEREPLYZSECNEWDINWDIQVV1V2BtuUA000A001A002A003A004A005A006A007A00A00A01A01A01A01A01A01A01TNA01A01A01A02A02A02A02A02 }A02  } &&;@G,;@ }t,;@, <<;@p,;@ ,;@P,;A(,;A(,996./hhhhhheeh }`6.h S`SS6.Ih  JRI SII SIKL`$$6-?:C:,4 (} (4(# MOUNT OUTPUT DISK AND PRESS }RETURNH BRAdAU\!Ai!Ap@f -p=&Ax&+P:'AV,$AV,= }AyP:'AV,z6-?:C:,,5-@@5( נǠҠ ^F:Aq,@F(  } F:Aq, WHILE WRITINGZ-@A^  1(  ̠Š*-@A . 1$ 1 +@ }A1AR@ '@A'B7tA ,(@,(@ UPM-DISKCHECK  }6-@ (@ ((@ ((@ 5-@@5(@ ENTER DRIVE NO:  ) A0@ }A ) B "A$ T @)!@+-@@J(@1-4T }A0@ ^-@@4(@ TESTING DRIVE ?(@^(@  -@AU }  A % A3!-AD%  `-@@!8( Ӡ٠٠ϠР `(# ˭ }Ҡ٠ & 6-?:A6,0 !6-F:A,!6-F:A,: 6-+AV$%,'A)D 6-P:@' }%?P,N # 6-6-@0#6-A1&X )!AU6-@)6-A&b  @6-@l !@ }6-@v  -(   -(   6-6- x"A,-AP@6@H2@ }@@L n2@x A2` _%2@A@@9-@@0 }= _2@ F:Ad,AUA2` A1 8-@@!8( PRESS T }O RUN AGAIN  ''( PRESS TO RETURN TO MENU -F:B2y,"@*AdAU-$ 4F:B2y,"@* }AdAU4 A1 A2 C +AR@1A @CAA '@A }'B7tA 2(/($ ̠Š ĠҠŠ2( !!( FAST  FAST  !!(  }  !!( 294  228 * !!(  4 !!( 292  224 > !!(  } H !!( 290  222 R !!(  \ !!(  f !!( }  p !!( 286  218 z !!(   !!( 284  216  } !!(   !!( 282  214  !!(   !!( SLOW  }SLOW  $($( ŠĠ٠ $@,)(!} ĠҠҠΠ,(A'@A'B7t }AE<( Ϡź(<( ATTACH ADHESIVE TAPE FIRMLY F**(" TO YOUR DISK JACKET, SO THAT THEGM*(" ENDS OF } IT STICK OUT WHEN DISK M( IS IN YOUR DRIVE. H''( THEN SHAKE THE TAPE WHEN THE I((( PROGRAM TELLS YO!}U TO. IT WILL J**(" NOTIFY YOU WHEN BAD SECTOR IS K**(" DONE. CAN TAKE A WHILE TILL YOURL**(" GOOD AT IT. !} MT(-(" ҠŠĠҠΠT(" ϠŠĠӠ٠N+(+( HIT T!}O GO BACK TO MENUT(((( Enter DESTINATION ?^ B"A$h< @)!@2( MUST BE!} RANGE< A r 6-|b A`(&( ENTER *@ @)!A C(X( ԠŠb A`!}4 (}1(# MOUNT OUTPUT DISK AND PRESS RETURN4(<*(" TO OPERATION , HIT ANY KEY<AdAU F:A!}d,"AUA&AdAUAi 6-=&Ax&+P:'AV,$AV,=AyP:'AV!},f!F 6-C:,/Ar&+P:'AV,$AV,FAsP:'AV,z! * EXECUTE CALL-CIO ROUTINE!1 (}1(# TO AB!}ORT OPERATION , HIT ANY KEY !`(&( GENTLY PULL ON THE TAPE @( (ATTACHED TO DISK)`( SO IT JUST BARELY WRITES!}!=)(! KEEP AT IT - PROGRAM WILL =( WHEN DONE !!!AdAU!Ap@!6-?:C:,,! F:! }Aq,@A`!Ap@!6-?:C:,,! F:Ad,AUA! A!A!  ! }Ӡנġ5( ǠA6-?:C:,,!6F:Aq,@,( ̠Š6 A!W( Ϡġ:(! } Ҡ̠ĠM( TRY AGAIN!W A!+!( Ġ+ A`"AdAU! }j"K(+( CARE TO WRITE ANOTHER (Y/N) /H7@<@,4NK$" A`'$)@$"AUB! }' (>:,6-&@H$D:BADWRITE.BASA007A00A00A01A01A01A01A01A01A01TNA01A01A01A02A02A02A02A02 1 QRAADRSECDRIVRREASTTUBADRADRBADRBZZC%} 9A'AA9AR@''(}%} ˭ҠŠ ,,($ROUTINE TO CHECK IF SECTOR IS USED(((  NOTE:TO CLEAR UNUSED SECTORS(&&( %} START WITH FORMATTED DISK2&&( AND COPY YOUR FILES TO IT<%-A6A@"!% F104,32,83,228,96P%};A(,;A(,Z** CLEAR STRINGS **dQ#67@<@,.>:,:67A(<A(,.Q67@<A(%},.nJ67@<@,. 367A(<A(,.J67@<A(,.x6-@Ai6-@%}Ap7 A@-@@3(WHAT Ҡ 7=&Ax&+P:'AV,$AV,=AyP:'AV,%}F 6-C:,/Ar&+P:'AV,$AV,FAsP:'AV,6-?:A6,: 4-@@0(SECTO%}R IS Š: A*-@@*(SECTOR IS ̠KK(C PRESS TO RUN AGAIN OR T%}O MAIN MENU !F:B2y,"@%#F:B2y,"@#%D:MENU AD:CHECKSEC.BAS%}ADRSECDRIVRREASTTUBADRADRBADRBZZC$09:jACLdAUTORUN.SYS-GENERATORnA;@ ,+)}/AAAAs&&( ήӠҠx**(" ENTER COMMAND TO BOOT THE FILE%%()} AUTOMATICAL FROM DISK !Q?( FOR EXAMPLE: RUN>:@4, D:NAME.EXT>:@4,QAR@( EN)}TER ĺ +AdAU+AR@8 A8@@ D:AUTORUN.SYS-@)}Ah""A6 A@*@ @( ̠ŠCC(; PRESS TO RU)}N AGAIN OR TO RUN MAIN MENU !F:B2y,"@%#F:B2y,"@#%D:MENU A2-B:,)}@6@*@@:7<,,6-%@" $'255,255,106,6,255,6,169,80,141,0,3,169,1,141) }61,3,169,63,141,2,3,169@64,141,3,3,169,5,141,6J3,141,5,3,169,0,141^4,3,141,9,3,141,10,3h141,11,3,169,)!}12,141,8,3r32,89,228,16,1,96,162,11|189,0,5,157,0,3,20216,247,32,89,228,48,6,326,5,108,12,0,96,169,193)"}141,33,3,169,6,141,34,396,251,243,51,246,207,6""163,246,51,246,60,246,76,228!!243,172,255,6,240,9,185,234)#}6,206,255,6,160,1,96,14033,3,169,228,141,34,3169,155,160,1,96,32,32,3232,32,32,32,32,32,32,3232,)$}32,32,32,32,32,32,3232,20,226,2,227,2,106,6&224,2,225,2,180,6 D:AUTOSYS.BAS80,6@)%}ĠCLdAUTORUN.SYS-GENERATORnA;@ ,+( ef/EAADRFRMSEDRIVRREASTTUBADRADRBADRBZZCWWRITFROMSETOSEAA@A@-'}A6@@  @@9A'-(}AA9AR@! (}!(ҭҠ QQ(I ROUTINE TO MOVE A SECTOR FROM -)}ONE LOCATION TO ANOTHER** SET UP CIO CALL **%-A6A@"!% (104,32,83,228,962;A(,-*};@,<** SET DRIVE **F6-@AiP** SET COMMANDS **Z'6-@6-@'Apd-+}** GET SECTOR NUMBERS **n#( FROM Ҡ #x"( TO Ҡ "=&Ax&+P:'AV,-,}$AV,=AyP:'AV,!!* SET ADDRESS TO STORE READF 6-C:,/Ar&+P:'AV,$AV,FAsP:--}'AV, * EXECUTE CALL-CIO ROUTINE1-(" HIT RETURN TO ľ SECTOR 16-?:A6,** SET WRI-.}TE SECTOR **=&Ax&+P:'AV,$AV,=AyP:'AV,0,(! HIT RETURN TO SECTOR 0-/}Ap6-?:A6,OO(G PRESS TO RUN AGAIN OR FOR MAIN MENU !F:B2y,"-0}@%#F:B2y,"@#%D:MENU A`D:SECTRANS.BAS@L|}6C@,q <=^tAADRSECDRIVRREASTTU9A12}'AA9AR@! (}!(ҭˠ ++(# ROUTINE TO CHECK BAD SECTORS 13}5-@@5( WHAT Ҡ TO CHECK  @;A(,** SET DRIVE **6-@A14}i#** SET COMMAND TO READ **(6-@Ap-** SET SECTOR NUMBER **2=&Ax&+P:'AV,$A15}V,=AyP:'AV,7**** SET ADDRESS TO STORE SECTOR AT **<F 6-C:,/Ar&+P:'AV,$AV,FAs16}P:'AV,A##** SET UP CALL-CIO ROUTINE **F%-A6A@"!% G104,32,83,228,96K$$** EXECUT17}E CALL-CIO ROUTINE **P6-?:A6,TU** CHECK STATUS CODE **ZP6-F:Aq,"@0-@ @ F(18}SECTOR WAS ĠP Ad+-@ @ +(SECTOR WAS Ġ nMM(E PRESS TO RUN AGAIN OR 19} TO RUN MAIN MENU !xF:B2y,"@%#F:B2y,"@#%D:MENU A D:CHKBADSE.BAS1:}| 1L WILD CARDS NOT ALLOIVRREASTTU9A0,-uxAADRSECDRIVRREASTTUAA@A@A6@@@9A5<}'AA9AR@, (},( ˭РˠŠ OO(G ROUTINE TO LOCK-UP CO5=}MPUTER IF CHECKED SECTOR NOT BAD ! 3 @-@@3(WHAT Ҡ ;A(,(*5>}* SET DRIVE **26-@AiF** SET COMMAND TO READ **P6-@Apd$$** SET SECTOR NUMBER5?} TO 710 **n=&Ax&+P:'AV,$AV,=AyP:'AV,**** SET ADDRESS TO STORE SECTOR AT **F 6-C:,5@}/Ar&+P:'AV,$AV,FAsP:'AV,##** SET UP CALL-CIO ROUTINE **%-A6A@"!5A}% 104,32,83,228,96$$** EXECUTE CALL-CIO ROUTINE **6-?:A6,** CHECK STATUS CODE **6-F:Aq5B},<"@2( PROGRAM RUNS ٠< A8"AD)A98( COPY DISK Ġ,HH(5C}@ PRESS TO RUN AGAIN OR TO MAIN MENU !6F:B2y,"@%@#F:B2y,"@#%D:M5D}ENUJ A D:LOCKUP.BAS)16CAA@A@A6@@@9A45 TUAADRSECDRIVRREASTTUBADRADRBADRBZZCERAA@A4A`A6@9F}@ Ab @F @6 ]A'AA9AR@9G}K@@]Aq@ 4 (}4(&ŠϠˠĠӠ%-A6A@"!% 9H}(104,32,83,228,96<;A(,;A(,F) 6. 67A(,.)67@,.P) 6. 67A(,.)67@9I},.d** SET DRIVE **n6-@Ai** SET COMMAND TO READ **6-@Ap** INP9J}UT SECTOR NUMBER **@ Ap-@@<( WHAT Ҡ @=&Ax&+P:'AV,$AV,=9K}AyP:'AV,##SET ADDRESS TO STORE 1st READF 6-C:,/Ar&+P:'AV,$AV,FAsP:'AV,9L}&&** CALC POKES FOR SECOND READ **: 6-C:,)6-&+P:'AV,$AV,:6-P:'AV,$$** EXECUTE CALL-CIO ROUT9M}INE **6-?:A6,ArAs"6-?:A6,,0A@66-?:A6,;CF:Aq,"AD9N}9( SECTOR WAS ĠC A@** CHECK SECTOR **J5 4+  SECTOR WAS Ġ5 AT9O}** " SECTOR WAS ĠLL(D PRESS TO RUN AGAIN OR FOR MAIN MENU !F:9P}B2y,"@%#F:B2y,"@#%D:MENU A D:MISSEC.BAS 0$8wd 'UHRZEITCHICKFLADUHRCHPRUEFSUMMPRLDUUHRUHAD=R} @ d4 A "F:AT,"@4AT=S}@n;@,6-@xC +@@d1B7t@dCA%%6-F:A`,%=T}AV$F:Aa,=%@@p+%@@=AR@,,($ VBLANK-CLOCK --------------=U}$($( Please enter your Time:.(.(" Insert Time ->: XX:XX:XX-A ##@@=V}K:j)@*67@<@,.>:,2(>:,j7@<@,20)7@<@,32A =W}j)@*67@<@,.>:,2(>:,j7@<@,20)7@<@,39A # (:#67@=X}<@,.:j)@*67@<@,.>:,2(>:,j7@<@,20)7@<@,35A j=Y})@*67@<@,.>:,2(>:,j7@<@,20)7@<@,39A # (:#67@<=Z}@,.:j)@*67@<@,.>:,2(>:,j7@<@,20)7@<@,35A j)=[}@*67@<@,.>:,2(>:,j7@<@,20)7@<@,39A .( (.( Klick after=\} per Second (y/n) "AdAU,6-F:Ad,6,"@5AU"(NO, A@@-"@C@=]}#(YES- A@J AT5AdAU(5( One moment please ....^#h--A8")=^}A6%- r--@H")A%- 7-@@3A%@:7,,%@7 :(:(/=_} Please enter to start the clock !&6-F:Ad,&@A6-?:A6,AdAU=`}F +A @1ACAA(FMachine CodeHH104,173,31,208,201,3,240,27,169,=a}6,160,36,162,6,32,92,228,165,9,9,2AA133,9,169,1,133,2,169,6,133,3,169,0,133,0,96,173,49,2,201,5AA240,27,173,48,2,24,1=b}05,3,141,7,5,173,49,2,105,0,141,8,5,169HH0,141,48,2,169,5,141,49,2,173,190,2,208,10,234,234,234,234,234,234QQ234,234,=c}234,234,234,234,234,234,234,234,234,234,173,162,2,208,7,169,128,141HH11,5,208,5,169,128,141,11,5,173,25,5,201,146,208,7,1=d}69,148,141,213EE6,208,5,169,154,141,213,6,230,0,165,0,201,50,208,99,169,0,133,0HH165,1,141,31,208,238,32,5,173,32,5,2=e}01,154,208,80,169,144,141,32,5GG238,31,5,173,31,5,201,150,208,65,169,144,141,31,5,238,29,5,173,29&HH5,201,154,208,50,1=f}69,144,141,29,5,238,28,5,173,28,5,201,150,208,350HH169,144,141,28,5,238,26,5,173,26,5,201,154,208,20,169,144,141,26,5:@@=g}238,25,5,173,25,5,201,147,208,5,169,144,141,25,5,76,95,228D Displaylist and ScreendataNKK112,96,66,9,5,0,1,0,0,128,12=q}b'DOS SYSb+AUTORUN SYSb2MENU bOROMCOPY BASblSECTLOOKBASb%|VTOCER BASbSECTSCANBASb%DIRHIDERBASb6BADWRITEBASb CHECKSECBASb AUTOSYS BASb &SECTRANSBASb 1CHKBADSEBASb ;LOCKUP BASb EMISSASECBASbQVBICLOCKBASCRECHNEN CRECHNEN 8,128,128,128,128,128,128,128,180,233,237XUU229,154,128,223,144,144,154,144,144,154,144,144,222,128,128,128,128,128,128,12=r}8b%%128,128,128,128,128,128,128,128l(} time error !vt%2AU@@9-@AD= _2=s}qAdAUt%D:VBICLOCK.BASAI1:11:11rAI=t}11:11:1111:11:1111:11:1111:11:1111:1111r128,128,128,128,180,2=u}d 'UHRZEITCHICKFLADUHRCHPRUEFSUMMPRLDUUHRUHAD<