CRUNCH REPLACE   ̯  ߩ   Ϸз SCRATCH VIEW C  ߩ   Ϸ    NEW FILE NAME?   ̯                                                                                                                                                                                       (SUCH AS GRAFIX FACTORY ITSELF)                                                                                                 @ANCEL ACCEPT ̯ ̯ JWW,J*J*J*J*J̴KWW%u]WUu]Wzu]WUu]WU޲)]\*J*J*J*J+Umۤ*J*J֤*J*JJWW,J}w~w}w~]\ݹt'-tܝjJ}=+Zu%uru-K2W%ntߥ)J   ̯     ̯       COPY MODIFY   ̯                                                                                  SUCH AS... C ARDS & DICE                     *J*J*Ju)J                                                                             *uMu_'r[de|5֖d+*)]\+>*J*J*J*J)]\*J*J*J*J+>)]\+**J*J*J*J)]\*J*J*J*J)u)]\)u+*Y+>)u+*Y+>)u+*Y+>)]\Y+>)u+*Y+>)ue)J                                                                                   ߜ         ߜ      Jw*JΤKd7:+2ʶ{durΤKd+:/-+*+:,m\JΤKd+:*+:/-*J+*)J  ̯        ߒ ߒ    ߒ       R CO H. WESTERWEEL d*J[w)uuJY)mߤ+Zʤur[ZWUu]WUu]WUu]WUu]WUWW%Uu]WUu]WUu]WUu]WU޲)]\*J*J*J*J*J-*J*J*J*J)]\*J*J*J*J*J-*J*J*J*J)]\+*7r=Β'^)ru)J                                                                                                              I         J\Y+2d*J\Y+2d*J\*J*Jurd*J*JJ,J%J̲)rJ̲)]\Y+2du+-WY*JfJ*J*JWW,J*J*J]d-%J̲)r]d-)r]d-u,J\Y+2dJU)J    A     ̯                                                       *Jʤ*J*J*J*JWW,J*J*J*JJ)]\*J̵J\-KRԵ-KRԵ-KRԵ-KRWW,RԵ-KRԵ-KRԵ-KRԻ)J        ߜ        ߩ            ϷА     PYRAMID     ̯                ߚ        ϷВ Ϸз OLD FILE LIBRARY OLD NEW ̯  ̯    REVERSE ADVANCE   ̯                          ̯       CREATED BY... MA                                     PRESENTING... THE BASIC PROGRAMMERS'       Ϸ А                                          Ϸ А      A     Ӑ                                                                  CATALOGUED INTO T HE OPERATING    MENU LIBRARY. THI S OPERATING MENU    CAN BE USED DIREC TLY TO RE-EDIT   WW%v^ew-s=v^*Jֲ)]\]J*J*J*J*Ju*J*J*J*JJWW%n%ϒ7MszJv]{ur]d*J*J*J*Jk*uۤ*J*J*J*J)]\Y*J*J*J*J+Zʤur]ZWUu]WUu]WUu]WUu]WUWU)J   ENTERS THE GRAPHI CS CHARACTERS    AND COLOR AND REV ERSE ON/OFF DATA    VIA THE KEYBOARD AND USES THE                           ߒ ߒ                            ruwIϒyw\se֒JWW%n*J*J*J*Jur]d*J*J*J*Jk*uۤ9|ݗszJsޗ-z=]\WJuW5u_yz^*J+Zʤur]v*J*J*J*J*JWW%J*J*J*J*Jֲ)]\VUu]WUu]WUu]WUu]WU_%)J   TO PATCH TOGETHER  TITLE PAGE AND    INSTRUCTION TEXT SCREENS WITH    OPTION MENUS AND GAME OR UTILI  Ϸ  5   ABOUT OPTIMIZING BASIC PROGRAMS    BY USING THE 'GRA FIX FACTORY'  NG'    BASIC PROGRAMMING  TECHNIQUES THAT    I PROPOSE TO DESC RIBE IN A SERIES   ̯  IN SELF CREATED B ASIC PROGRAMS BY    USING THE SHORT B ASIC SUBROUTINE    SUPPLIED WITH THE  PROGRAM. SUCH   ur]\JuWJw]yw^vJk*uۤ*J*J*J*J)]\Y*J*J*J*J+Zʤur]v)sU~dUt{UWW%Jr:Jw\w^vJ*Jֲ)]\]J*J*J*J*Ju*J*J*J*JJWW%խu]WUu]WUu]WUu]WUuUur]T)J   OR COPY SCREENS T O OTHER DISKS.    THE MENU CAN ALSO  BE USED TO    SCRATCH SCREENS O R CRUNCH THEM TO  Ϸ  3   FINISHED 'GRAF IX FACTORY'    SCREENS ARE SAVED  TO DISK AND       CURSOR KEYS TO PO SITION AND EDIT    THE SCREEN INPUT.    ̯                           ߒ ߒ ߒ           ߜ         Ϸ А      ߒ                   TY    SCREENS (WHICH CA N BE ANIMATED IF    DESIRED). EXAMPLE S FOLLOW...   ̯  UTILITY PACKAGE.     IN THE SERIES I PLAN TO GIVE    STEP BY STEP DOCU MENTATION ON HOW    uu=r]e{J{-JWW%n*J*J*J*Jur]d*J*J*J*Jk*uۤfJz'Uu_7>J{Y)s7M]\Wt)w.J|s9+Zʤur]v*J*J*J*J*JWW%J*J*J*J*Jֲ)]\VUu]WUu]WUu]WUu]WUd)J   SCREENS CAN EVEN BE ANIMATED AT    RESPECTABLE SPEED S USING THE    'MEMORY RESIDENT COMPILED STRI  Ϸ  4   DOWN LOADING SPEE D.    THE SCREENS CA N EASILY BE USED      NON-EDITABLE FORM AT FOR MINIMUM    MEMORY OCCUPATION  AND MAXIMUM   ̯  11 F160:145:1707 KF11DD110:130::175:100b PSQ$6)" HIT ANY KEY TO CONTINUE... "v UGT$:GT$""85 ZGT$"":105 _160:145:170:F12175 dGT$:GT$""100 iGT$""GT$""100 nGT$""F1F11:F117F11:GT ' SQ$""-:IF1$(17),FF$(23),CU(38)"":Z139:Z$Z$" "::Z$""Z$:53280,4:53281,15145:TT$"  ":RR$"   ":BB$" "#LL$" ":TB112:T1$T1$TT$:B1$B1$BB$::RL171  ߐ ¦     ߐ ¦ ̯    ¦   ˜ ߩ ¦ ̯  •    Ϸ  2   GRAFIX FACTORY SP ECIFICATIONS    THE UTILITY REQUI RES NO EXTRA     SEQUENCES OR MACH INE CODE...    (TO GO FORWARDS P RESS CRSR DOWN)    (TO GO BACKWARDS PRESS CRSR UP) ̯     THIS DISK IS INTE NDED TO SHOW THE    EXTENT TO WHICH A  BASIC PROGRAMER     ߜ      ߜ      ߩ     W.~s-g*W.~s-g-U---rʤJ,K*J*J_*J)J œ  ý     (C)1989 M.H. WESTERWEEL œ    ý  Ð î     î   Ðý  ý      œ   THE GRAFIX  FACTORY ý  R/TEXT SCREEN 2  CR/TEXT SCREEN 33  CR/TEXT SCREEN 4J  CR/TEXT SCREEN 5a  CR/TEXT SCREEN 6t  CR/PROMPT 3A  CR/MOD4 GFI  CR/GF OPT MENU ! CR/PROMPT 4A & CR/7 STUD 2 + CR/CASINO CRAPS 0 CR/HUSTLERS BLUF5 $"" sGT$""F1F11:F11F11Z xF170,95,95,95,95,95,70,95,95,70,95,95,95,70,95,95,95` } ""T1$""R1$""B1$L1$ ""T2$""R2$""B2$L2$ ""T3$""R3$""B3$L3$: "";:ZZ0:Z124:Z$:ZZZZ40% 1023Z (R1$R1$RR$:L1$L1$LL$::T2$(T1$,70)(T1$,2)c -T3$(T2$,70)(T2$,2):R2$(R1$,4)(R1$,80) 2R3$(R2$,4)(R2$,80):B2$(B1$,2)(B1$,70) 7B3$(B2$,2)(B2$,70):L2$(L1$,4)(L1$,80) <L3$(L2$,4)(L2$,80) AF1117:F1$(F1)::F¦   ý   ѐѐѐѐѐѐѐѐѐ ѐѐѐѐѐѐѐѐѐ llmm,V]ZWUu]WUu]WUu]WUuUur]wJf/*J*J*J)J  HARDWARE SUCH AS A JOYSTICK OR A    MOUSE NOR DOES IT  REQUIRE AWKWARD    'SOFTWARE WEDGES' . ONE SIMPLY  #  \Y*J*J*J*J+Zʤur]v*I{Y)udY|w-s9)WW%s7Jʝ7|9}Yk*uۤ*J*J*J*J)]\Y*J*J*J*J+Zʤur]v*I{Y)udItݷ|JWW%|󒲧M|))zYfJk*uku]WUu]WUe)J CAN CUSTOM-DESIGN  HIGH QUALITY    AND FAST ACTION G RAPHICS WITHOUT    THE BOTHER OF COM PLICATED POKE     Ϸ А   GRAFIX FACTORY ... DEMO DISK  ̯    1   THE CONCEPT ý                     œ  ý           œ      ý    QCR/PROMPT 5A: CR/MAGIC PYRAMID*? CR/3D DEMO 2AD CR/TANGLED TUBES'Uz*srԤ]]$Jt)Uu\JugeJյRLM]wZJu^Jw\yRvKT9)|Wu]ש-JjYRLMgy){:J]$Jt)Ur7eudMrާJU٩RLM\{=|I{e)JWI3U)J Z,160:55295ZZ,4::Z$"":2023,160:56295,4+ a 8,8,8,"0:"F1$(F1)",S,R":FF123:8,F2$:8,F3$ FF$F2$F3$:FF$(FF)FF$::8: "";:FF123:""FF$(FF):: SQ$"USE CRSR UP/DOWN TO GO BACK & FORTH":  CR/DEMO INTRO  C î  î î   ý  Ð      œ  î                                                                                                                                         ߐߐ ¦ ̯    ˜ ߐߐ ¦     • ߐߐߐ ¦ ̯    ߐѐѐѐѐѐѐѐѐѐ ѐѐѐѐѐѐѐѐѐ   Ϸ Зî Ϸ  – ¦ ϷFI$",S,R":SF123:8,S1$:8,S2$8 'SF$(SF)S1$S2$::8> ':V * PRINT SCREEN FILE *53281,SU:53280,BO:"";:ZZ0:Z124:CA$Z$:ZZZZ40 *1023ZZ,160:55295ZZ,BO::CA$Z$"":2023,160 +56295,BO:"";:SF123:""SF$(SF)::R֭U)J@ANCEL ACCEPT ̯ ̯ JWW,J*J*J*J*J̴KWW%u]WUu]Wzu]WUu]WU޲)]\*J*J*J*J+Umۤ*J*J֤*J*JJWW,J}w~w}w~]\ݹt'-tܝjJ}=+Zu%uru-K2W%ntU)J   ̯     ̯       COPY MODIFY   ̯ϷВ Ϸз OLD FILE LIBRARY OLD NEW ̯  ̯    REVERSE ADVANCE   ̯                            œ      œ       œ      î                                                 ʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʺ)J                                                                ߐ ¦     – ߐߐߐߖ ¦ ̯    š ߐߐ ¦     œ ߐߐߜ ¦ ̯    š ¦ Ϸ   œ  ¦ ϷЁ     ߐ ¦ ϷЕ     ߐ ¦  SHADOW BOX WIRE FRAME FANCY WIRE FRAME CR/DOODLE * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * % INITIALIZE "GF/SCREEN LOADER"_SF$(23):CA$"":SU15:BO4:Z139:Z$Z$" "::""eZ:_: CALL "GF/SCREEN LOADER"dFI$"CR/DOODLE":10000nGT$:GT$""110x11000:110': ': READ/LOAD FI$ (SCREEN FILE) '8,8,8,"0:"      CRUNCH REPLACE   ̯  ߩ   Ϸз SCRATCH VIEW C  ߩ   Ϸ    NEW FILE NAME?   ̯       ߜ    ߜ       ߩ        ԕ~Ե-KR̲+\*JVg2l)J   (C)1989 M.H. WESTERWEEL œ î  î  ý ý  ý ý                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           ʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʛ5urʚ)J                                                                                                                                                                        T I T L E  -  ?               (S1$,1):CO$(L1$,1):S22138:S2$SC$(S1,S2)$SC$(S1,S2)"":L2$(S2$,2)9$L2$L1$S1$S1$(S2$,1):1045_$L1$L2$:VR$(L2$,1):OC$(L2$,1)$VR$RV$OC$CO$S1$S1$S2$:RV$VR$:CO$OC$:1045$VR$RV$1030$RV$VR$:S1$S1$VR$$ I$"CR/"FI$:" CRUNCHING... ";FI$:8,8,8,"0:"FI$",S,W"M"S1$"":S2$"":S1123:S1$SC$(S1,1):SC$(S1,1)"":L1$(S1$,2)"RV$(L1$,1):CO$(L1$,1):S2219:S2$SC$(S1,S2)"SC$(S1,S2)"":L2$(S2$,2):L2$L1$S1$S1$(S2$,1):990"L1$                                                                ï                                                 ]uUur]uUur]uUur]uUur]uUur]uUur]uUur]uUur]uUur]uUur]uUur]{)J                                                                                                                                                                                                                                                                                                                                                                                                CO$OC$1040$ CO$OC$:S1$S1$OC$%S1$S1$(S2$,1)?%:8,SX$:8,S1$:CRCR2:CR$(CR1)SX$:SX$"":CR$(CR)S1$w%S1$""::8:590:GL$(LG)FI$:830:F2$FI$:CR0:120dt9橺oR:Tӷ'yj)9}|i|+U)JL2$:VR$(L2$,1):OC$(L2$,1) #VR$RV$OC$CO$S1$S1$S2$:RV$VR$:CO$OC$:9901#VR$RV$975I#RV$VR$:S1$S1$VR$Z#OC$CO$985r#CO$OC$:S1$S1$OC$#S1$S1$(S2$,1)#:SX$S1$:S1$SC$(S1,20):SC$(S1,20)"":L1$(S1$,2)#RV$                                                                                                                                                                                                                                                                                                                                                                                                                                                                          P A G E ?                                         GT$RT$235 GT$""TTTT1:TT6TT6:260JGT$""TTTT1:TT1TT0:355:180gGT$RT$GL$(FL)"*"235xGT$RT$270(SQ$,8);:GXG2G1:""GL$(GX): FLG2TT1:(SQ$,7TT)""GL$(FL):235RO1:R$(1)TG0:G GT$""""30)"OLD":1400GT$RT$G21:G16:340L""11)"ADVANCE"wGT$:GT$RT$GT$""GT$""185GT$RT$GL$(G1)"*"G1G16:G2G15:340:185GT$""210GT$""TT1:"REVERSEADVANCE": W- n8,8,8,"0:CR/GF MENU,S,R":S1123:8,S1$:8,S2$Y sS1$(S1)S1$S2$:S1$"":S2$""::8:590 xPA1:SQ1:RL1:QX1:SX1:RX1:RV$"":CO$"":HC$" ":CH$" " }CY$SC$(1,1):"";:S1123:""S1$(S1):SQ$" USE CRSR & RETURN TO E Y$SC$(1,1):CH$SC$(1,1): fBO4:BA15:CA4:CX0:585:590:"";, k(FI$,3)"CR/"885X pCR1462:""CR$(CR);CR$(CR1)::890 uS1123:"";:S2138:SC$(S1,S2);::"": zF2$FI$:RO0910 SQ$"";:RO895,900,895,900,895,905,900" (FI$,3)"CR/"CR146:8,CR$(CR)::810,%S1123:S2138:8,SC$(S1,S2)::W*8:RO4RO1GL$(LG)FI$:830:825e/RO1825415,8,15:15,"S0:"DN$:15,"R0:"DN$"="FI$:15:FI$DN$9F2$FI$:>8,8,8,"0:DUMMY NAME,S,W":GLAGE COLLECTION ... PLEASE HOLD ":TH(0)870:735 PA1:735.PA2:7654jQSSQ:(SQ$,SX)(RL$,RX)CY$(SQ$,SQ)(RL$,RL)CX$SXSQ:QXQS:RXRL:PA750,755CY$SC$(QX,RX):760CY$CH$:SC$(QX,RX)CY$(SQ$,SQ)(2023,160:56295,CAX]PC$:PC$""775:605+bGPD((PC$)):GP10605WgGP675,645,630,660,690,690,695,705,700klPC$(137)120tq605vSQ1SQ22640{SQSQ1:740RL1RL37655RLRL1:740SQ2SQ240"NF$"9")520&(FI$)15NF$;:FI$FI$NF$:(FI$)15"?";KNF$:NF$RT$(FI$)16" ":]!NF$DL$555&FI$""FI$(FI$,(FI$)1):"? ";:FI$""520+(NF$"/"NF$":")NF$" "5350NF$"A"NF$"Z"5405535),3)"CR/"120GL$(FL)F2$FI$GL$(FL):845]590:"...INSERT NEW DISK & PRESS"RT$" C TO COPY ";FI$rC$:C$"C"475785:"...INSERT ORIGINAL DISK & PRESS RETURN"RR$:RR$RT$485590:120(GL$(FL),CANCELACCEPT"|GT$:GT$RT$GT$""380.GT$""360EGT$RT$CA$"A":iRO460,400,915,495,445,425,570(GL$(FL),3)"CR/"120510:FX$FI$:LG54120360:CA$"C"120GL$(FL)F2$FI$GL$(FL):845870:6T$:GT14:GT$(CU$,GT,1)TGGT:GT49:GT$RT$RO2360:CA$"C"120JGT$RT$395X"TG0275p'TG300,310,320,330,RORO2:RO1RO113356RORO2:RO6RO6;335@RORO1:RO1RO1E335JRORO1:RO6RO6260340:185$"REVERSEADVANCE"OGT$:GT$RT$GT$""GT$""215vGT$RT$G1G16:G2G15:340:215GT$"""REVERSE":180GT$""TT1:"REVERSEADVANCE":260GT$:GT$""GT$""NTER COMMANDS ".CA$"C"(RO7RO2)CA$"":LGLG1C""35)"NEW"dGT$:GT$RT$GT$""145GT$RT$510:RO7:360:CA$"C"120GT$RT$CA$"A"570GT$""""30)"OLDNEW":165GT$:GT$RT$GT$""165 !" F2:SAVE, F4:GAR/COL, F5:PAINT, F7:PLOT":910 (LL>H      ת  {h "h   _ GHL? ת  'AUSE KEY HIT, IT TO CONTINUE..  ת {h "h   GHL? {h "h     h     xGHL+?  )  116:D2:D(D2)7::DD135138:D(DD)8:? <DD141:D2:D(D2)10: A 157,29,17,145,18,146,5,28,30,31,129,144,149,150,151,152,153,154,155 F 156,158,159,1,2,3,4,6,7,8,9,10,11,12,13,14,15,16,19,20,21,22,23,24,25! K 26,27,34,44,58,59,128,130,13 :CY$" ":RT$(13):CL$""j RL$"":SQ$"" BO4:BA15:CA4:CX0:PA1:OP$(SQ$,16)"COPY" OP$OP$"MODIFY"RT$"CRUNCHREPLACE"RT$"SCRATCHVIEW"6 #R$(1)u n Π W GHLLɠ ]  6 GHLM` s 6 GHLL] W  ] "W  LL SsWgvJU+YdI}lM/vu-SKݭe]K}eJKܙ+WYlM/vu-SKݭeSK}eJKܙ+WY{Ou'T5ݒu5Kiw}kYRZ[+-5jJLw5ysuJu)J  ' W     '  = W  L GH t {H " GHLKc 6 Z c LKH  H   GHLK תLJGH '   ] "    {W "W   GHLLW  'G`Ha`IaJ"GH GHLL`IaJG ]  6 GHLIGH B   ת ] U W A c U ] A W LU c  M : ] < W 6 ] W  xGHLI ] U W A c U ] A W LU c A W  c MZ;GH   * = * + $ H    6 ɠ c < W c 제 ] i W /GHLG제  = d W GHLG제  = d c ] U W A c U ] < W &GHL!H A ]  6 GHL59#758#,5###58#25###58#6O##6O<#=OE#6O<#)O###O<#QO###O<# E GH  @080003300200055019000440070006605800  תh    GHL?  6 ( c  6  B((  ' ( GH  Z c k "  c  c Z ] 6 GHL%@  ת  - Z W   , k    ,  W   ,  W  ת 6 ( c  61,132,133,134,139,140,141,142,143,147,148_ PBO4:BA15:CA4:CX0:585:590:BL$" "z U" SETTING UP... " Z8,8,8,"0:GF/DIR,S,R":GL154:8,GL$(GL) _GL$(GL)"*"LGLG1 d:8 iFI$"CR/GF INTRO":850:870:W11500: (SQ$,16)"COPY":R$(2)(SQ$,16)(RL$,11)"MODIFY"{ (R$(3)SQ$"CRUNCH":R$(4)SQ$(RL$,11)"REPLACE" -R$(5)SQ$"SCRATCH":R$(6)SQ$(RL$,11)"VIEW":CU$"" 2DD1255:D(DD)9::DD16:D2:D(D2)DD:# 7DD ! PROGRAM: GRAPHICS FACTORYD AUTHOR : MARCO H. WESTERWEELg (C)1989, ALL RIGHTS RESERVED HAAKSBERGEN, THE NETHERLANDS: "":SC$(23,38),S1$(23),GL$(54),CR$(46),D(255):DL$(20) Z$" " H xGIHJGH GHLoM`IaJGH  ]    xGHLL] ]  n S P]    LL`IaJGH GHLM  ] "`IaJ GH  `IaJGH  GHLlM    ת 6 ɠ c LL]  ת  ת 6 Z c GH GH GH H   M?Z  GHLJ GH t {H " {H " GH t {H " {H " {H " {W " GHL9Kc 6 Z c LK  ~GHL9K {w "w    GHLKH     GHLH 6 c GH B   ת K B  M : ] < W GHLBI W  c M/< ]  6 GHLIB   , B "B   $ H  B " ]  6 L c ] < W  ] W  xGHLmH GH  'GIHJ0GH  ] ( W L  6  g     (  GH  'GIHJ$GH  (  6 - c  6 # c  6 c  =  c GH ~GIHJGH GHLqG 6  c  .BYTE K " N "  ! # ,X ,X ,Y (X)()Y,Y n "  # (( (q "  $ ,X ,X ,Y ,X)),Y,Y ) t " 6 ( c 6  B(q ( ]  6 L g GH    GHLyE(  q ( ]  6 L g GH ) : t (  G W ( c (  GHL-( W K c  i ]  6 GHL . 제 ] i W GHL'. 제 W 제 c i W  B윩제  = d U W GHLi. 제  8  E E GH _H H   &CODE    H   B  = d ] GHL+   = d ] GHL, i W 제 c W  = c윩제 ]  6 L g 제  = d = 제 ]  6 L g 제  8  8 : 윩  E 8 :  W = i ]  6 Li M : ]  6 GHL)  W  c ]  6 GHLL*U ]  W L   ]  6    = W L  6 L c A ]  6 GHL* M : ]  = W ] L c  W c A ]  6  ]  6  6 W  g ;0 G W L  ] 6    6 W  g ; H " U W  c MZ;H    ? " 6 c A W  B  3  c M/( W 2 c  6EFINE LABEL POST-FIX CHARACTER (ET FO HL2 ( W 7 c 7 ]  6 GHLb3  ILENAME ($ FOR DIR) :  6 Π c ML] Z Z   GHL)3 Z  'GIHJ$GH GHL_3Z H  MJL2LO4  NTER EX START ADDRESS :  6 Π c  6 ɠ c ML] H HL0 6 砜 c ؠ ] W GHL0 Ӡ ] W GHL 1 W ݠ c LP0 W ⠜ c LP0i ]  6 GHL71 F ] i W GHLT1 F W F c i W  BFF  = d U W GHL1 F  8  GH &DATA   G W   H   &VOID   G W ( c ( ] 6 GHLE/E E  nGIHJGH  PE ( W K c 제  = d U W GHL/GH E  T   ת L/GH E    = *- 제  c Q H  M: W c LD+  6 제 c i ]  6 GHL-  6 제 c i W  B윩제  = d U W &GHLE- 제  8  GH _H H   &CODE    H   &DATA   G W   H   &VOID       6 W G  c Mf;  VH  E " ]  6 GHL+  ZH  E " MD+  ~GHLA+E   : i ] n W &GHL{+  OO MANY LABELS!  ת i ]  6 GHL+ 6 c Lx, 6 c i W     : ? "  ת  IT Œ TO CONTINUE  ת 6 c  6  B {H "H      c    YNW "   ( W    ) ?  W    W " {H " 6 ( c W  n   B(W (  GH H   } W ̼ G W ]   6 L g GH H  H " ]  } W ̼ c  GHL};  0000H    _H   ]  } W ̼ c ]  6 W ]  c 0 G W L  ] 6     H     ' W     '  N W  LP c  < c P W c P W U c 7 ]  6 GHLN:  ~  c ]  6 L c GH t {e " GHL~: W < c e     '  c  GHL7  M,L6  =ABEL-FILE FORMAT: ABEL,HEX <> ABEL,HEX <> ....  ת  NDING WITH ,<>  ת  NTER FILENAME :  6 Π c ML] b b   GHLf8  GH GH GH b   ,S,R   M R ;) : ( 6 Π c ML] T `IaJGH GHL5 T   GHL6   ;T " M6   EO YOU WANT TO ENTER USER LABELS FROM EYBOARD, ISK OR OT AT ALL   KDNW " M>H    GHL6 ( ]  6 GHL6   H   GHL3  M: W P c  NTER EX END ADDRESS :  6 Π c  6 ɠ c ML] H H   GHL44  M: ]  6 L< c  #UTPUT TO CREEN, RINTER OR ISK   SPDW " M>H    GHL4 ( _H H   &CODE    H   &DATA   G W   H   &VOID   G W ( c (  GHL82( W K c F GH GH GH    NPUT FROM EMORY OR ISK   MDW " M>H    G = d U ]     ; ANGEROUS LABEL!  ת   6 砜 c i ]  6 GHL"0 6 c  6 c  6 ⠜ c i ]  6 Lݠ c W ؠ c ⠜ ] ݠ W L  W ̼ c  = d Ӡ c Ӡ ] W G l9 F @9ʥ:ʆ@ ȅ9 ȅ: iiLc LL-hi9hi: -l9@:9@`LGHL0 HJLHGJII GHL> : K KiAȩ(j8i(Lc EH83-4. hE` : 8Lr : H hLq\ 8\ s0 mzA{B`   L;E"#L$8$8 G( ` ;8 8 IiL^hi9hi: ^l9 F @K9ʥ:ʩʆ@K9:`Lhh l9 #K0Lਆ@9:` F 9:`GHLLF  K+, K`L.-.hh @:9` iG ȱ iH 8GHPI`@8LK@WXΐ@WX`KK0'i,i X W  ` L-iXп`GL GH ;E`ABz{`Lhi9hi: l99:z{,    F d ] 6  ]  6  GHL( W c M/  8  E E GH _H E  n ( c H   &DATA  H   &CODE   H   &VOID  GHL(E ( ]  6  g PE L)A ]  6    6 A c    c  ] 6 &GHL0& W  c M/ (P W  c MZ;GH   ;  ת GH   * = $ H   ת GH   ;  ת   B " M :GH  3   ~GHL"_ ]  6 GHL"B   ת M>U ] < W GHL!7 ]  6 GHL>#GH ' GH #    "; , GEN BY -502.  ת GH #    ;  ת  6  c  6 ( c i W  M : 6 A c L M*)U ] A W LU c M>U ] < W GHL 7 ]  6 GHLA!GH ' ת MA#P W U c  6 K c M9 M, ת  ASS 2 ....  ת M-K ]  6 GHL! MGL" M%  ? "2 ]  6 GH  RITAINS BEST MAG WITH A DISK STUCK ON IT.  ת  AX n W   LABELS, GH ]   YTES FREE.  ת 6 d c M@2_ ]  6 GHLGH  G _ W L g GH  LGH GH GH < `9GH9`:`GHLLF : EE` : H mhL : L 8L{6`7xztȄx`6`wqȄu` DLHH|H7l4h@w  v R J z s1u /ȅ:/1ȱ/2 B pl9hhl9hi9hi:L ~99: $ % L $ % L LShi9hi: F Xl9 F   {^`΅@9: l9LnEfoLSnEfobL{ Ly Lg  LW f MaɁ =m  آ  0 HJJJJ0 0 h) 0L2Hd(D`v$@  ` PASS 6:- WRITING EQUATES SECTIONKK00$00 ?8@(­      88? @ M8(  F , 8 Lp  ֩ `  F ASS 4:- SORTING LABELS  @ ? ?8@( ) 8垥埰ii8°`8 8  8? @ `  & Mɣ Şş )  8? @ 8L5LCŞ93 #L穦EʆE"#L ߽ȹ E ELG 21LEL ` 1324/V8YWKZX4xWXKW7XE΅@<LGLLhi9hi: l9 F 9i ȥ:i F 9:`L^] W L X`8x43 W4X8   Yȱ ZȥYKL-YK^I8e ELc8 K^eWeXڥ^L8334Y3Zȑ383K34KL 3 3ZYeWYȱYeXYLEʵVEWZZ X[ WZ``` J GI p GH`pGH` =0 =0 = =0 =0 =¥n %jjiL[nEfoaLjnEfoaL+nEfoaL    `K_ EI8e34 8\]8-.K K_LL5_\ \3]4 _`EKʵ e  hHhGx4GIȥHI7X` : j GHx4 y 7X` : H mhLE : H h j GHx4 7X`G&H`GIHJG&HGeIGHeJH`GIHJG&HG&HLv WFHfG eIeJI&JWGH` ȱ/KȥG8/ȥH/Ȑ)LE/ȅIY/ȅJZX X8IY m@` F W Lg F W Ls Ls L. hi9hi: . l9 : a F f bc F dep`L^ hi9hi: ^ l9 : i F n jk F lm` F E  ȱ ȱ E` F HH mhhL F  W83ȱ X4WX WȩWE X W W83X4W 'B?L`tt{ ת:JDb>ALn:e LS F  Gȱ H` F  Iȱ J` F G ȥH `GIHJ`   L F  L F  L @GʥHʆ@`@HG ;LOW BYTE#>TEXT ;HIGH BYTESTROUT;;WAIT FOR A WHILEPAUSE;;CLEAR SCREEN AND FINISH#CLEARCHROUT";,TEXT$93,"HELLO WORLD",06;@PAUSE#0J#0TP1^hP1r|P1ޒyΒw)s7u+~RNm{)J+)JR%MNSe]IVVr\*T+YSgMR75T+YReJR79ԭOOד?^{=ԥ+Oײ=JRy>ԥ+WS_]Ե}wJԥ+WS=]JR}u5Ӕ+NR;UԴWKӔ+Ns-9JRUJԭ[ݓe+7:ԭ[ݲo)R+kvIڲ'3;TIڒ'6oՔVܵu)J & M Ы Şş  )?L, 0# $ LpMJJJH(  > hJ , X J) J , Y L ee(H PASS 7:- WRITING SOURCE CODE ; `HJJJJ - h) iiȑii ȱ` PASS 5:- FINDING INTERNAL LABELS   `     ȱ   <  ii8°8`  i i  F #@HH   hh@ʘʥ9ʥ:ʩ*ʆ@` F #@HH hh8@L L W LcL(hi9hi: (l9Lhi9hi: l9Lhi9hi: l9Lhi9hi: l9L F #@L0@ K= W @8 @ nK L  c =EK0`@8  00' 0"' 0 0  GH`GH`EʆEGH` HXG EȔ E` 83-G4.H`EʆEGH`GGH`8 GH` GH`LH ^q]$ h E E `EʆEк" KEuO EVʈ _EW X X We Z [ [ `LXHHEG`EH78GuG`HGEuI8u`LH GEHHJI舘ueGƥG`3\4]13 248\ ]7 JZ v K` Gq/GȥHq/H`8IGGJHH`JEHWJ 8IIJJH XY&X&Y8XGYHXY&I&JIGJHW 8XYL`G%IGH%JH`GIGHJH`GIGHIH`8GGHH`G8IHJ0ELI8GJH08?G8IHJ04)I8GJH0'HJ!GIH XW W`L hi9hi:  l9 : E9:E9u9:i:`99`:`9Kȱ99i9K`:K` : x4GaȄpbf b7X` : H h  x4f %bbaG7X` : e x4GȱGHG7X` : GHHH @`@JI@` L :  F HG` :  F JI` :  F GHL :  F  L F L F L F LԻ bHcG` bJcI` @eʥdʥcʥf %bʥa@`L5@af bcdep@`@in jkl 2078 BASIC 64 V1.02 lL Xd깗9kx'̼g|     $ + 3 : D K T Z ` g s     J v  a  7 B v x/&6LWbP_z ';]n~ ;LISTING1;;EQUATES(CLEAR$932STROUT$AB1E<CHROUT$FFD2F;P;LOCATE CODE AT START OF BASICZ$0801d;n;SET UP BASIC PROGRAMx; '10 SYS 2061'LINK10,0$9E,"2061",0LINK0,0;;CLEAR SCREEN AND PRINT MESSAGE#0 h7p hȑ h heȑe(ii8  8 h@?ȑ` ??@` PASS 3:- READING LABELS  HHHHhhhheeJj)ȱŞ ȱ  NTER START LOCATION OF CHARACTER"," INFORMATION (OR BITMAP DATA)l " :";:A$" ":SM16384A$"4096 " SM49152SM32767A$"36864" A$"";:1,0:1,A$:1::CM(A$):(A$,1)"$"26 A$(A$,2):A$""10' H1(A$):V((A$,             . U            . M         RETURN       .ANM. D                          . T       : CTRL-S  -#-H,   #  . E         . O   -               .   ޜ(215)1287025:0,0,79,24:%(" ILE EADER/RINTER/ONVERTER BY OHN ROOKSHANK "2100<F0:0,0,39,24:&P" ILE EADER/RINTER/ONVERTER "Z" BY  ) =    =   =       # =   1 - 9        OBS! N        CTRL-     . O               CTRL-                    1  9      . L      . (C         .)CENTRERAD TEXT OCH 'E'K  ''  ''    .) D                 .E CTRL- (CTRL-*, CTRL3)       : K:. D         . G      . =  . I     -        . F         : POKE 5205,1     .UNDERSTRYKNINGARO                    .LADDA OCH SPARA TEXTF7 = L. M           RETURN. S    ''   ''   ()     .F8 = S. F  F7.FORMATERINGSKOMMANDOND        A  DP-80  E MX-80 : PRINT#4,CHR$(27)+CHR$(56)(M       OPEN4,4    PRINT#  .) M          S   RUN.RADAVST]NDS        $"40 COLUMNS""" 6: HANGE TO "W$A" 7: EAD DISK DIRECTORY"Y" 8: XIT PROGRAM"(2816)32(2817)163" OADING EADER....":"READER.ML",B0,P2816:" "3249,0:3250,4:3031,21:3251,0:2825,24          S                     . D                        . G     O                    . M                '/'.'FOOTER'F     ''       ''      .V[NTAW  OHN ROOKSHANK "7d"  ELECT NE:"Xn" 1: EAD FILE TO SCREEN"xx" 2: END FILE TO PRINTER"" 3: XPAND FILE TO PRINTER"" 4: XPAND FILE TO DISK"" 5: EAD PROGRAM S" W(215):W$"80 COLUMNS":W128W . E  , , ,                    CTRL-    . O            CTRL-1.TEXTHUVUDETB  ''             . D  o              . S    ,   3 . "CTRL-A:CHANGE CASE9 "CTRL-B:CHANGE BACKGROUNDL"CTRL-E:ERASEu"CTRL-H:HUNT FOR STRING (WORDS,ETC)"CTRL-I:INSERT MODE.  (5) =    (75) =     (5) =    (64) =  (2) =  = '' =  (   ) () =     ASCII (   . M   : CTRL-               . S                 . D          . D     . D             CTRL- (  CTRL-*          CTRL-3  ). S          . (F         8. V          ''       : CTRL-1M      S            . D               2:15:4:XDS(I$:I$"1"I$"8"230WI(I$):I300,400,410,500,290,270,560,260_20h:W128&:0:"":5:"WITCH MONITOR TO 40 COLUMN MODE!":705:"":0:"WITCH MONITOR TO 80 COLUMN MODE!": 2                           . D                 ''      . S   C   CP-80,  %=68=85872S  --SPEEDSCRIPT MANUALP                  CTRL-       CTRL-*     . H                     'N ' (  )      SHIFT-CTRL-. D          .CTRL- INFOGAI                   CTRL-. N    . S                CTRL-. T    .CTRL- FINNO               . N     CTRL-          CTRL-    . F                  .CTRL- UTSKRIFTO    C                 C        ()      (). M            CTRL-           . CTRL-     . M       ,                         0    . V      CTRL         .MARK\RF\RFLYTTNINGM  (CRSR)              =   .CTRL-, CTRL-  H       . D         . N       . D         CTRL-  CTRL-          8 LUI#L7 ͽ6L)A[)IJJ` 87 ͽ6`PEEDCRIPT BY HARLES RANNONUFFER LEAREDUFFER ULLELETE (,,): RE YOU SURE? (/): RASE (,,): CTRL- = R  .CTRL- = F  (H)CTRL- = I.CTRL- = R . (K )CTRL- = B    .CTRL- = S   .CTRL- = ]   .CTRL- = V  (  ,  BASIC)CTRL- = K    .CTRL       .D             F1 - F6. V                       : F1 = F    . F3 = F                CTRL-3. I           CTRL              .KOMMANDONAR              . 1) S         INST . D                 CTRL- . N     . D                              'H :'   . M        . N     RETURN            . F       CTRL- . D       . O         CTRL-. O             #4      SHIFT       CTRL-. D         . O               . D     RETURN       . A           CTRL-  .CTRL-O                        . F      . O                . O                .HOME       ' '   . O    HOME            CTRL-   CTRL-               CTRL- . D           CTRL-  CTRL-. I         ,   . S     (),Β TO EXITEY:AVE:APE TOPPEDERIFY RRORO ERRORS ԒAPE OR ĒISK?OAD:ERIFY:RESS Β$0O OOMO TEXT IN BUFFER.EVICE #ECOND. DDR. #RINTINGEXT SHEET, ΒUNT FOR:OT OUNDC  7181x X Щ- = F      .CTRL-4 = V       .CTRL- = DOS   ( WEDGE). ( =  )CTRL- = (  CTRL-*   CTRL-3) +                   .CLR . F5 = F     .D  : ,     . O           ,   : F2 = F    . F4 = F     . F5 = F                (  ) 2) S          (  ).REDIGERINGSKOMMANDONCTRL- = B         .CTRL- = B  .CTRL- = R  .   2061 g L 3467  ((̺47ॴ``e{ze~}褴 $ % {~`(Åĩ؅  Р)(눱) 'ȄÈei<(  H h7 ͽ6  L L/0180* &/.0/.0/.0/.0 //L!/ 08//001LS1`8Ѝ  X V `&m'm8eϐ P V ` Pm )L'2 L2  V s`  V L M V D T hh`2 *@:0:̿L̿,  V , LV  V H  hL) 8&' PLI"2͓戌 Ι8ei  &2 h 5͖ 8"    L L8 0  & h   VL L &''ͽL L &'ƜƜL 8ee8&'姅L+&'L x ܩЩЍX`: !ЍLL1ꭍ) Ƞ V &I& &I& @WPEDERIFY RRORO ERRORS ԒAPE OR ĒISK?OAD:ERIFY:RESS ΒISK COMMAND:$O OOMO TEXT IN BUFFER.RINT TO: ӒCREEN OR ĒISK?RINT TO FILENAME:RINTING... NSERT NEXT SHEET, PRESS Ѝ x V `8&'hh`&'`8&Ie'Iem  V `mmЩ  &Э8 8`  * 89&e:'8 垅 埅 #8    ) N ] 9 9m 9:i:L  0 G  j  j_ jL5` ) GC8  J8 j LVE8  8 LyU I LV# 7 ͽ6 LV jLV 8 &' 8&'m=i L `8 ύ8&' &'`8&'`&'`&'L &'&L &'Ɯ  `8e&i'L & `L L L LL8ei %8Lȱ`8ei %8Lȱ=Lj H)hW L  ` > M  V L   M `%Li(ÅL`&' Ɯ朑` ` &  $  s d V ` U V `' LH)Jh)?`&&I&  )L &_ &L m&'ЅЩ  &L &ȱ&&Ȋ&`&)? &I@&L )@ )) I `KH@ LV L)6 k V 80Ս t V 800  `  L 1 V 3  $ &' L  V L 7 V 3 )  V LxЍ!Щ1 X` V  ? V sL  `  N ݢ    `  & h  0 `  `m `) =1:LKݢ ΙLʊ HHHH`8eiL` WALRTBSNHF-LȩL L   L%S  L%P  L%L &-'.`8&-'. A -&.' L&Ӎ    .L[ L[) ̾𧥧 L[ `  V 3CΒUNT FOR:OT OUNDEPLACE WITH: PEEDCRIPT%  2061 n#n# 7 Li &C'DFG   DGॴ``e'&e褴 R$W$΋Ύ`(Åĩ؅   `  L*   V H h)  L*   Q L*   L* `8&' &'`&'L  L &i'i8 P &L I` V Y`  V ;)A^;)IJJ;;` N 8   7 ͽ6 `PEEDCRIPT 3.2 BY HARLES RANNONUFFER LEAREDUFFER ULLELETE (,,): RE YOU SURE? (/): RASE (,,): Β TO EXITRESS FORMAT KEY:AVE:APE TOP& e&&'i'L &'L 8 L )`)L&'Ɯ. !?`.!?ƜL Ƨ L Ls &'L &.!?''ͽL & .!?L   V ML L&'L ћ 朥ͽ#e&i'8&&''L  V ``̺0& =    _ hhLLj) =1: )ʽW LC8PJ8 LE8H h _) F H h & 8&'&i'i&' L } } L ʊ HH H H`#    6 B P S+P ov lk' 4z G 8&'   2061 n#n# 7 Li &C'DFG  '' DGॴ``e'&e褴 $$΋Ύ`(Åĩ؅    Р,  )(눱) 'Ȅ; È;e  L N   q ] ` N ͠ q L 8 q D T hh` 1E @F :#G :0m :n E o  LE m  N E q m LE N  q ] H  8 hL 89 ;: ; N  :: L :L 9: L 8ee89;:;;;L9:L xܩЩ|ЍX`:  !ЍLL1ꭍ) N  q 9I9 9I9 @W  LS   6  L L H)hhhLh` 80* & .  .  .  . L! 8   LS `8  N 4 q  `9&m :'m 8 & 'e  N , q  ` ` `Lz g p L  N U q H h) { L - L L`89 ;: ;  9 :` 9 :L 9:    LLe&e'8 垅 埅8&垍 '埍 #8    ` ) SV D"д͞ `  ` ` N  q 8 ,E ȩWE Ȍ  E    υ Lx p$Z e! ̤  Lb,n!  8   L   ) ` , , ), L 9:. !?`.!? L ;; L ;LO  9 :L 9.!?:: L :: L 9 .!?L N :+'8  N  q   n" 1 3 0 T`  j` m T` jp$ j` ) Gݭ Υ Lʊ HHHH`8 eiL `WALRTBSNHF@P?XMIGJ 2;EOYcm| ;9i :i 9: Li ; ; Li ʊ HhHd Hc H`'    f o z   , 7 P, a{! O1   89 : 8  ; ; 9 : 8 9 : LȢ)? Lȱ:Lȱ Gj L8m   7 9: L  hh L   L N  q 8 ߩE q  N  8   `    i ( L i(ÅL  `   9   :8 `;<; ` ` 6   $i ύ Ѝ  L  ]  9 : & q  ` N  q   7 9: L  N  q L N  q  ) N ՠ q LxЩ!1X` E   q ]L  `  + ݢ       H h7 ͽLP  L L 9 : `89& :' 2 9 : L'Ӎ    ; ; 2LA LA;)  ;E ԅLA E ` N  q     )L ' m  m  9: & 'Щ4 #6L 9ȱ99Ȋ9`9)? 9I@9Lg ;)?;$; p @;`NHDP HH8  ) Lxhh ` N Lq Lx o$   )LZ N G q L 9 L N 9` 8 89ȑ9  g g L N 9L  m  m hhL9&m :'m 8 & ' ` m   m  ` I `d q ɓ)Y` N { q L 7 Li 9 ͙  Υ  Lȱ  8ei    18.   n! 3 B ͜  8 ; ;86    o$ Li L8 0 T  o# 1 3 T T T  2  q  `89 ;: ;hh`9&:'`89Ie& :Ie' & ' & '8 m   N I q  ` m m Щ4 #6Э & ' 8 垅 埅 #8    ` p 8   )ȩ L  L  L  L  L L p$Lȩ L  L  L  L  L  L ȘH h `  m"̖ Lȱ`  n#̗ L Lȱ= L H )h m   i L `8 ; ;   89 ;: ;  9 :`89 ;: ;` 9 :`9:L 9:9L 9:  `8e9i:L 9 ` :: 9 e99:i:L  9 :L   LL & N ՠ q 8 L E  L 9:  P ]   6 e;i< ; <8; 9 <: ` N ߠ q  `# N  q 8 E  L 89 ;: ;e  e q  `HHH ݬ Lrq$9 N  q  ExLf E Li ' LH)J;h)?;`q$99I9q$Iq$  )Lr 9q$_ p 9Li  H h _) N H9  8h ] 9 89 ;:A HdqSYS-47 NYTTOT6_47x0LADDA SPEEDSCRPTTRYCK F7 OCH ANGE FILNAMNET :"DISKINFO.SPD - ELLER - MANUAL.SPD$G.FACTORY DEMOCR/DEMO INTROCR/TEXT SCREEN 2CR/TEXT SCREEN 3 CR/TEXT SCREEN 4CR/TEXT SCREEN 5CR/TEXT SCREEN 6CR/3D DEMO 2KORDBEHANDLING: SPEEDSCRIPT 3.2SPEEDSCRIPT 3.0 SPEEDSCRIPT----------------SPEEDSCRIPT 128----------------SPEEDSCRIPTINS CR/MAGIC PYRAMIDCR/HUSTLERS BLUFCR/MOD4 GFI CR/GF OPT MENUCR/PROMPT 3ACR/PROMPT 4ACR/PROMPT 5A CR/7 STUD 2K FILOMVANDLING:   SPD 3.0 CONVERT VISA FILER:(128) FILE READ 40/80  READER.ML  CR/CASINO CRAPSCR/TANGLED TUBESDATABAS: HASHBASE128T! DEMOFILE.HASH KLAR: 93-11-25 K GRAFISK BILD: CHAS.CHAPLIN.128 PROGRAMMERING: BANKS AND MEMORYML->ASSEMBLER: SPEEDY UNASM SYS PUBLIC  DOMAIN  DISKETT#47  C64 / C128 SYS PD/C64, C128K LISTING1---------------- REVASM 64G REVASM 128SDESIGNA SK[RMAR: GRAPHICS FACTORYSHADOW BOX PETER KARLSSON  ULLERS[TER  710 40 FR\VI  SWEDEN KWIRE FRAMEFANCY WIRE FRAMECR/GF INTROCR/GF MENUGF/SCREEN LOADERGF/DIRCR/DOODLE----------------KK   2061 n#n# 7 Li &C'DFG   DGॴ``e'&e褴 R$W$΋Ύ`(Åĩ؅    Р,  )(눱) 'Ȅ; È;e  q  `HHH ݬ Lrq$9 N  q  ExLf E Li ' LH)J;h)?;`q$99I9q$Iq$  )Lr 9q$_ p 9Li  H h _) N H9  8h ] 9 89 ;:  m   i L `8 ; ;   89 ;: ;  9 :`89 ;: ;` 9 :`9:L 9:9L 9:  `8e9i:L 9 ` :: 9 e99:i:L  9 :L   q  `89 ;: ;hh`9&:'`89Ie& :Ie' & ' & '8 m   N I q  ` m m Щ4 #6Э & ' 8 垅 埅 #8    ` p 8   L 9 L N 9` 8 89ȑ9  g g L N 9L  m  m hhL9&m :'m 8 & ' ` m   m  ` I `d q ɓ)Y` N { q L 7 Li 9LP  L L 9 : `89& :' 2 9 : L'Ӎ    ; ; 2LA LA;)  ;E ԅLA E ` N  q     )L ' q   7 9: L  N  q L N  q  ) N ՠ q LxЍ Ѝ!Щ1X` E   q ]L  `  + ݢ       H h7 ͽ m  m  9: & 'Щ4 #6L 9ȱ99Ȋ9`9)? 9I@9Lg ;)?;$; p @;`KB:P HH8  )  TLxhh ` N Lq Lx o$ Ѝ  )Lh N G q ͙  Υ  Lȱ  8ei    18.   n! 3 B ͜  8 ; ;86    o$ Li L8 0 T  o# 1 3 T T T  2 )ȩ L  L  L  L  L L p$Lȩ L  L  L  L  L  L ȘH h `  m"̖ Lȱ`  n#̗ L Lȱ= L H )hi ( L i(ÅL  `   9   :8 `;<; ` ` 6   $i ύ Ѝ  L  ]  9 : & q  L N  ;9i :i 9: Li ; ; Li ʊ HhHd Hc H`'    f o z   , 7 P, a{! O1   89 : 8  ; ; 9 : 8 9 :  8   L   ) ` , , ), L 9:. !?`.!? L ;; L ;LO  9 :L 9.!?:: L :: L 9 .!?L N : `Lz g p L  N U q H h) { L - L L`89 ;: ;  9 :` 9 :L 9:    LLe&e'8 垅 埅8&垍 '埍 #8    `:: L :L 9: L 8ee89;:;;;L9:L xܩЩ|ЍX`:  !ЍLL1ꭍ) N  q 9I9 9I9 @W  LS   L N   q ] ` N ͠ q L 8 q D T hh` 1E @F :#G :0m :n E o  LE m  N E q m LE N  q ] H  8 hL 89 ;: ; N 6  L L H)hhhLh` 80* & .  .  .  . L! 8   LS `8  N 4 q  `9&m :'m 8 & 'e  N , q  ` ` ) SV D"Pд N m q 80P LF N  q 8 ,E ȩWE Ȍ  E  N | q 80L   Lx p$Z e! ̤  Lb,n! +'8  N  q   n" 1 3 0 T`  j` m T` jp$ j` ) Gݭ Υ Lʊ HHHH`8 eiL `WALRTBSNHF@P?XMIGJ 2;EOYcm| LȢ)? Lȱ:Lȱ Gj L8m   7 9: L  hh L   L N  q 8 ߩE q  N  8   `     9&e:'8 垅 埅 #8    ) N ] 9 9m 9:i:L  0 G  j  j_ jL5` ) GC8  J8 j LVE8  8 LyU I # 7 ͽ6 LV jLV  PEDERIFY RRORO ERRORS ԒAPE OR ĒISK?OAD:ERIFY:RESS ΒISK COMMAND:$O OOMO TEXT IN BUFFER.RINT TO: ӒCREEN,ĒISK,ВRINTER?EVICE NUMBER?ECONDARY DDRESS #?RINT TO FILENAME:RINTING... NSERT NEXT SHEET, PRESS    7181x X Щ 55 55555 5ύ 5Ѝ555  ! ! S8S8  " / L&P'Q$%T TQ%祴``e'Q&Pe%$褴 5   `;<; ` ` y .& 5) 5* i 3 4 5LU 2 5`ة ݬ L_ )  ' q& ޠ4  o% =x LS & /L & 5D '4 L&H)J;h)?;`   !!![!!!!T"#$#$c%%%%&_(8((!T")**!U+(0#*"02$$I1$z0:' 8)5*5 85 5;5 5; )5*5 R85)5*5m555i5 RL `85 5;5 5; 55 558) 5;* 5; 5) 5*`8)5 . !?` .!? 5LH";;  LM!;L" 5) 5*LU ) .!?**5L!**5L!  .!?L!5r55s5 !3 5`8) 5;* 5;hh`)&*'`8)Ie&v5 !L" " %L"`8)5;*5; 5)5*` 5) 5*LU )*  555Ld$L?$e&e'85垅5埅8&垍v5'埍w5 85v555w55`5L$5 $  L!5 %  5 ` $ $    5LH"8ee8);*;;;L%)*LU ' &   !  P ' h& 'w h&`O ` @?)  ' !  '` ' L) " q3   I  R I  ) @W ' \!L'S `0 `  ` ~' ihh`( 5k5 F5 k5F5 /L& 3  ( 5 555 LE0 3  (8) 5;* 5; )* 55LE0 3  ( 5 5 )LE0 3 Lr0 R 3  )  H5 $  LL & N ՠ q 8 L E  L 9:  P ]   6 e;i< ; <8; 9 <: ` N ߠ q  `# N  q 8 E  L 89 ;: ;e  e;)A[;)IJJ;;` N 8   7 ͽ6 `PEEDCRIPT 3.0 BY HARLES RANNONUFFER LEAREDUFFER ULLELETE (,,): RE YOU SURE? (/): RASE (,,): Β TO EXITRESS FORMAT KEY:AVE:APE TOP?ΒUNT FOR:OT OUNDEPLACE WITH: PEEDCRIPT   2061 g L 3467  ((̺47ॴ``e{ze~}褴 $ % {~`(Åĩ؅  РQ%`Hh,`ՠ 2`P$`$A` ' 55}' ) }'Ȅ;  );ei5 Ll55)`P ` 555) 555*8 5 )  I I R )L  _ ! L5H ih _) Y H 5 $h H h  R8)5;*5;)i5*i5)* U LLʊ HH H H`( ;*5;`5)5*`)*LU )*)LU )*    `8e)i*LU   ` **5  e))*i*LU 5)5*LU 558 5 55 RL!!!)! `!!)! .&LR)**Ie'w5&x5'y5z5&{5'8w5ms55 03 5`r5s5v5mr5r5w5ms5s5 x5&y5'z5{585垅5埅 85v555w55` " ! "8r5r5s5s5`L,$ ! " ! "L# " <3  )H ih) " !L" " R ! !L$55 %  LU 5m55m5 5hhLc%)&m5*'m585&5' 5m555m55`5I5LiK3  ɓ)Y` R b3  o%Li  /L  **5L!*L!)*  ' U"L'P ' %L' U Li)l5*m5`8)&l5v5*'m5w5 "l5)m5* RL& ɠ3  ~')F5)F5G5)G5 mF5 G5 PǍ}' RLiFH Rh 5 '  ' !  ' )5; .5 q& ) ';F5 q& 5L'F5 q& ihL~HH =hh 2 `  & D) () .&Li  ` } pRESS `$ '( /C)  ) ) ) ) )H )h ( ) L) L) H)hhhL)h`n5o5p5q58 0* &n5.o5n5.o5n5.o5n5  I@ L !;)?;$; p @;`KB:P5HH ;+5  -L-hh5`85555` 4LL- &T9 /5)L, .4  ))5S[5D"Pм T4  )80P5L+ x4  ~'5,F5ȩWF5Ȍ55F5 6 1 -5͂5 ;-85;5;53}5 |55 ;-5 ()  .& iLLg,8550 -}5TT8 - 1 - - -555(5! ;+ 4  ) I+ |5TT7 - 1550 -` ~55 +` . )~5L:. )5L:. )5L:. )5L:. )5L:.5ȘH ;-h5` 6/|5 S7|5L:. ` 6/}5 S8}5L:. 6/L:. =5L, )H5)h5 :.L).Ȣ )?8 9LS+V9 :LS+  *L/8 /  V955U5 ; ; 565e;i<5;5<8;5)5<*5 U ` Ơ4 5`% Р4  ~'5F555Li8)5;*5;k55e)&e*'85垅5埅 8555555/55 %u D  X3 5`SS  128  C  B B  B  DELETE (S,W,P): A  ? (Y/N):ERASE ALL TEXTERASE (S,W,P):   P   :S: S:V  I >R   :EXIT SS I M& B K *%=68=85872S  --SPEEDSCRIPT MANUALP                  CTRL-      "CTRL-A:CHANGE CASE9 "CTRL-B:CHANGE BACKGROUNDL"CTRL-E:ERASEu"CTRL-H:HUNT FOR STRING (WORDS,ETC)"CTRL-I:INSERT MODE."CTRL-K:CLEAR BUFFER"CTRL-L:CHANGE LETTERING COLOUR"CTRL-P:PRINT (ASSUMES 1525 PRINTER) "" "F1:NEXT WORD) "F2:PREVIOUS WORD@ "F3:NEXT SENTENCE[ !"F4:PREVIOUS SENTENCEs ""F5:NEXT PARAGRAPH #"F6:PREVIOUS PARAGRAPH $"F7:LOAD %"F8:SAVE &"CURSER UP:PREVIOUS SENTENCE '"CURSER DOWN:NEXT SENTENCE ("CLR/HO4d" PEEDCRIPT ILE ONVERSION ROGRAM "=n410Xx"NPUT FILE NAME";I$gI$""120"UTPUT FILE NAME";O$"ĒISK, ӒCREEN, ВRINTER, ͒ODEM, ϒTHER"A$:A$""160DV(A$"T")2(A$"M")3(A$"S")4(A$"P").o5 n5n5L)n5 o58n5n5o5o5p5q5L)p5`8r55t5s55u5 t5 4 5`)&mt5*'mu585&5'e 5 4 5` t5m55u5m55)*5&5' LU    Ȋ `F5 `  )? /5 c4  )80LS+5 I+    L-}5|555U9+~5 55+6 5 55̊5~55 L-%T65555  ΋55L,58ei5 -5 -8.55TT5m55 -` +U9 +`5) *K.K. ΋5L_/ʊ 5.H(H_.H^.H`85eiLg, 5`WALRTBSNHF@P?XMIGJ....../ //>/.....X//.ȩ5L:. )5L:. )5q55L:. )5q55L:. )5L:.5L:. U9L:.ȩ5L: )* LS+55hh L], h` ' (  'Li 4  ~' F5 * ' ( 3   ~' '5` 05 P1 05 u1 RL0Li( 4  ~'5LiF555Li)*)5  ̵5)m5)*i*LU T 0 * 2 +5  +_ +L1`5)5 *C85TJ8~5 +5L2E85T8~5 L<2U5I5#5 ;+ 55 (5L255 +L25;)A[;)IJJ;;` x =8 55 55de8   : L:V : B F D  C :$N  N   . P  : ,  ,

 ?D   ?S  #?P     : P  .....I  ,  H :N 8(A$"D"):SA7DDV0"EVICE NUMBER";DV:"ECONDARY ADDRESS";SA_"HICH CONVERSION:""1) PEEDCRIPT TO OMMODORE ""2) PEEDCRIPT TO RUE ""3) OMMODORE TO PEEDCRIPT"P$:P$"1"P$"3"230 ADR"CTRL-R:RECALL BUFFER' "CTRL-V:VERIFYI "CTRL-X:TRANSPOSE CHARACTERSf "CTRL-Z:END OF DOCUMENT "CTRL-4:DISK DIRECTORY "CTRL-^:SEND DOS COMMAND "CTRL-\:ENTER FORMAT KEY :: "HIT ANY KEY TO CONTINUE" A$:A$""29:ME:ERASE ALL )"BACKARROW:BACKSPACEG *"CTRL-BACK-ARROW:DELETE CHARACTERQ +::x -"DEFAULT VALUES ARE LEFT MARGIN 5 ."RT.MARGIN:75;BOTTOM:58; /"HIT ANY KEY TO LOAD SPEEDSCRIPT" 0S$:S$""48 1"SPEEDSCRIPT",8 24d"   \ $p9\ ] ۈ LK L X  ` F7-C  F1-Q  Ȍ Ȍ  L  $p ݭ    ș  @@ ******************************* ** CHARLIE CHAPLIN GRAPHIC ** ** BY FRANK C. TETLER ** *******************************@0,2:1,1:4,1:1,18A,35,13050,200:,40,15547,17570,190100,185115,155120,125120 ,67,157,1:,96,16082,16368,15668,15875,16070,161:,95,14090,145B,75,14085,14590,14595,15095,15580,15570,15273,14785,14577,140:,85,150:,115,95,5,15,350,90:,115,8055,80 PASS    mj*Jm+2ʝw-t>J)r[dOd*J*)rd]m,rnJ%J)jur[d*J̲Ms\={*J\+*+2ʺWs,J-uJ*J*J*Jm+2ʝ7U{ys)r[dOd*)]̲*J,J;NӴ;NӴ;NӴ;NWW%NӴ;NӲ)J    œ   œ œ      ý œ      ý      œ        œ       œ      œ     œ    î         JUST FOR TH E FUN OF IT                       BET CHECK >CALL RAISE FOLD    BANKRO LL C64 9625      C64     5 5 K 5      Ӑ                            ̯       Ϸ  Ϸ   Ϸд 6  8Ϸ   Ϸд 5̯  ̯   Ϸ  Ϸ   7Ϸ  Ϸд12   ̯11  Ϸд 3̯   ̯  2̯     BET  500  DON'T PASS   RESULT 500  GAMBLE    BANK  12500  COLLECT     CONTINUE      M > FGHL OO MANY LABELS! M m  M 6GHL ߩL \Lλ ߩL \ >   I M ?GHLE   I M 6GHLg  >R \L > R M o ߩ   R M o ߩ &DATA m ީ w &VOID m ީ . \\ GHL. > \   M 6GHL7 R M > /GHLP R >R \ >   ݩ > /GHL   ! wGH w &ý  œ œ  œ œ  œ œ  œ œ  œ œ   ý   ý ý l6ͳl6ͳl6ͳl)J LKګک h D ^l[  M/ / ߩ M: 6 @  M@ / ߩ MG 6 @ % 褐 ߩ \ ߩ \ D-502. A YMBOLIC DISASSEMBLER, OP> GH  I,R,ILHGH ߩGH ߩGH ߩ w ,S,W F  I,I,I,S ͩ  GHLH m "IT _ TO PAUSE, UN/TOP TO ABORT. M m LL DONE!! M mGH !IGH !I  > \ ǩ M ?GHL KL ힵ ( M 6GHL ,˩ M >  \( M VGHL`GH V  ~ w M w M m L粩 w ީ1 M . \. M 6GHL ߩ. \GH V  ~ w M\  ~ ; M wG7 \ ߩ. \ > \\  ! \  !GH w &CODE m w &DATA m ީ w &VOID m ީ : \: M VGHL: >7 \ w w GIHJGH  \  =  \򩀠  ީC \C M FGHL"L@ >= \ ʩ w $ F w F   ީF \ wC M o ߩGH  w F  F  ! F 򩌠   \ M ?GHL    ! wGH w ީ. \ w &DATA m ߩ w &CODE m @ ߩ w &VOID m @ GHLi w. M o L M ? ߩF M ? @ ݩ  O \ $ w F  ݩ = \ M ?GHL ȩ@ M = M = \= >I \ M ? ߩF M ? @ ݩ  O \ V w F O M ?GHL Z w F h  GHL w M   ! 4   ߩ w 4⩘  ߩI >  M  \ w (ɩ= >I \L ߩR \ M 6GHLG ߩR \ >   ݩ > FGHL|   !GH w &CODE m w CODE m w &DATA m ީ w &VOID m ީ . \. M ?GHLY w w GIHJGH  . > \򩤠  ݩ > 6GHLGH w M w M m LGH w M =ڭQ0:(45)(46)25682:"BASIC 128 V1.00%$&'$&&'&%%.LڭYRIGHT 1989 .ILLETT. M m _ HAREWARE PROGRAM BROUGHT TO YOU BY Տ, RITAINS BEST MAG WITH A DISK STUCK ON IT. M m AX M > 8 LABELS, MGH 8 YTES FREE. M m ߩ \ M 6GHLGH ߩ ߩ GHL ߩ \ ߩ \ ASS 1 .... M m  M /GHL( ߩ \L- 㸩 M >  \ ̩ M" > 6GHLL]% M ?GHLGH !I m ^ > \ ߩ \ ( m ASS 2 .... M m  M /H ߩ GH M m h  GHL M /GHL w M m ̩ M" > 6GHL% M ?GHL[GH !I GH b  ~ "; , GEN BY -502. M m GH b  ~ ; M m  ߩ\= M > F ߩ= M" > 6 @ GHL+L ɩGH w M  = $ M w M m \ >= \ ɩGH ; M m GH * = $ M w M m GH ; M m ȩGH ߩ  ( ߩȩGH ߩ  (@ >= \F M ?GHL> M= > = M / ݩ ݩ = \ M ?GHL ȩGH ߩ  (@ M = M = \ M ? ߩF M ? @ GHLlL= >I \ w w F  ! F ߩ \򩀠  ީC \C M 6GHL   ީF \򩌠   \ M ?GHL` ȩF M ?GHL~ @ >= \F M ?GHL߹ M= > = M /  mGHL NTER EX VALUE : M ߩd \ ߩg \ d٩ w IJGH GHL w mGHL1 LC =ABEL-FILE FORMAT: ABEL,HEX <> ABEL,HEX <> .... M m NDING WITH ,<> M m NT  \. > !R L ߩ. \ \\  011112221112. M o ߩGH ; \GH @.F###F&#HF&##F&#-F###FF###F&#@%##*%K#J%K#*%K#+%###%K#P%###%K# ?GH @M;###;D#G;D#?;D#/;###;D#3;###;D#N$###$L#I *- M   M 8  ; ANGEROUS LABEL! M m  ߩU \ M 6GHL& ߩL \ ߩL \ ߩX \ M [ \L >^ \X M[ > . ީL \򩘠  a \a MI > ?GHL ߩU \ ^ ML > ? L;ǩ% M ?GHLLǩGH ߩGH ߩGH ߩ w ,P,R F  I,I,I,S ͩ  GHL GH # K K w  F < ߩ w  F < ީ P  \ ." \ >n \ > \ % M  w &VOID m ީ . \\ GHL. > \ 8 GH ߩGH ߩGH  I,I,I NPUT FROM EMORY OR ISK M MD >̩ w  mGHLn . >% \% M ?GHL ILENAME ($ FOR DIR) : M  ݩ = \  ߩO \ = >q \ 0123456789ABCDEFq M .} ީ q M o ߩGH w F q M .} ީq \ GHL 0000 w F  = M .} ީq \q M\ d٩ w w mGHL (ɩ= M " \ #UTPUT TO CREEN, RINTER OR ISK M SPD >̩ w  mGHL? . > \ M 6GHL ILENAME : M ߩd \ d٩ w w mGHL ;NCL  M ݩ o w + : F m IT Œ TO CONTINUE M m ߩz \  K w  m ݩz \  YN  ( M w M ) ?  M w  F K ߩ. \ w \ w\ WANT TO ENTER USER LABELS FROM EYBOARD, ISK OR OT AT ALL M KDN >̩ w  mGHL . M ?GHL- . M ?GHL9 NTER ABEL (ET TO END) : M< ߩd \ d٩ w IJGH GHL w  M m w  tGHL ߩ. \ \. > !R \ GH  \ } \ 쩀 \  M ?GHL: m - M > 8 , M w M , M} > 8 , M > 8 m ߩ. \ER FILENAME : M ߩd \ d٩ w w mGHL GH ߩGH ߩ GH ߩ w ,S,R F  I,I,I,S ͩ  GHL; GH X  ߩ w m @ ߩ w m @ GHLǩ GH !I $L#?$L#0$###$L#R$###$L# ?GH @#S##UST#:#Z#UST#'S##UST#XS[##S##CAB#CAB#WAV#CAB#(A##CAB#4AY#CAB# ?GH @75##758#>59#758#,5###58#25###58#6O##6O<#=OE#6O<#)O###O<#QO###O<# ?GH @0800033002000550190004400700066058003330020GHL a MI > /GHLῩL >[ \LFL >X \LF M 6GHL  M > /GHL  > \ > 88  ݩ > /GHLU 8  !GH w &CODE m w &DATA m ީ ?GHLȩܠ  ީ@ \n M n \ GH # K GHLȩn >" \ w  F < ީ@ \n M n \ ߩ= \ ߩq \ w  w  ߩGH < ߩ0 t \= M ݩt > t M / d \ d٩ w w mGHL w  \ NTER EX END ADDRESS : M ߩd \ ߩg  = M t \0 ߩq > q M / ݩ o 0 ߩt > t M / ݩ o F  >= \ ɩ w  F ߩw \ >   ީ= \ ʩ w w F  F  UDE TANDARD HEX OUTPUT, EX IN EMS, OR O HEX AT ALL M SRN >̩. >( \ 6EFINE LABEL POST-FIX CHARACTER (ET FOR ;) : M( ߩd \ d٩ w IJGH GHLv w mGHL  ; EO YOU  ߩGH w mGHL \Lp̩ w M  M m K w _ tGHLL m 'AUSE KEY HIT, IT TO CONTINUE.. M m K w [GHL. K w  t ߩ w  t @ GHLK )  ff0 fce`efc`hL{ޥcɐH-;<hL7L GȱH` IȱJ` GȥH`GIHJ`cGeHf`jGlHm` L Lߦ}GH ʆ}`} HG}`} JI}` 0L HG` HG` JI`  >  \ M >  \ >= \ ɩGH * = * + $ M w M m m ߩ \GH ߩGH ߩGH ߩ w  I,I,I,S ͩ  GHL/ GH # K K GH # K K K K G eGfH` eIfJ`}8+}c tݦ}cgh %d f e`L}c h dgqe fi}`}j o knl mi}` Lo L{ L{L?hi;hi< ?l; c h de fgq`Lohi;hi< ol; 055501900044007000660 ?GH @08000330020055501900044007000660080003300200;5501900044007000660 ?GH @0800333000005550190044:0070006002820333002005550190044:007006670 ?GH @280033300200555019000440070006602800333002005 w mGHLx٩ w o{%+[ %1 \R M > OGHLթ  ݩ > 6GH8HO;<h 7q`Hi;<hL7c tݥdkgnhoqcjelfm`chIh`e fɀ L8eeff`cFh`f0`H?<*B0E4H hݍ;ݍ< 7L LةLLשLLѩLLЩLL^שLLΩ LLש LީL H;<h 7Lc eL֩ w , F w $ F w F M 䩌 \n M" > 6 ߩn M > 6 @ GHL L֩ M /GHL שGH w M m n M >  \ M >  \ ȩn M" > V ߩn M > 6 @ GHLGL{שn M JI`GH`IJ`HG`JI`  efc`  lmj`cef`jlm`cfe`jml` $%$cqȱ$h d$g$f$e` $%$jȱ$o k$n$m$l` $%c tݥc$h %dȑ$g$f$e$` HLةc ߩ \LP٩h  GHL K w  mGHLP٩ w  F < ߩ w  F < ߩ P 8GH # K GHL-٩c ߩ \LP٩ w M w [GHL mLMةGH !I  M K  j o kl mn` HH hhLLhi;hi< l; H;< Nhe;; ?GHLx٩g M ?GHL#۩Ԡ  @ ?GHLxL#۩ w w F w MLm -LLl[ݭ"^F%-5Uo=ߩGH  [GHLө\  ߩ w. M o ߩGH  4 \ ߩ: \ t: M@ 䩃 \ ߩ. \@ \ M. > o ߩt  !\  ߩGH BASIC 128 V1.00, 1985 T. HELBIG$q Lթ  \ M >  \ M" > FGHL  M 6GHL  M ?GHLLG ߩ \ w M > FGHLJ ߩ \GH w M m w ȩn M" > ?GHL֩@ >= \ ʩ M /GH 7LN ,.$LyL ``Lxl0Lע 7 y L H{;<h 7zuaۅ5bۅ6 c c caۅ9bۅ:_ۅ3`ۅ4   ~} H;w<h 7Lvhhl;hi;hi<;;qۍq܍ `Lhi;hi< l;;"<#=>, M  ;<`LLhi;hi< l;GH;<h 7  )ĭ,=>LL(hi;hi< (l;  H";<h 7 L(,o %kkjHT;<hL78fmel`PI ``cjeelfempfe` oEhpcH;<h 7L cjxeYfZIiYIiZ0^l^m_Ii^Ii_0DKFZfY e^e_p+^&_0KfEm0ef`IieIif`YZ oEhpcH!$%H;U<hL7H;U<hL78$8H;<h 7 G( `H;V<h 78H;<h 78 IiLhi;hi< l; }K;< ʩ ʆ}K;<`Lhh l; K0L}; <=`LLhi;hi< Ll; GH` 0  GH`GH`LHGLNG 853e64fc8USۅeVTۅfcfdcfghq`GHt;<h 7GH`8H;<h 7GH` GH`H;z<h 7`r_$H͍;<h 7LN HD;<h};< ʆ}ȅ;ȅ<iiLALLhi;hi< l;} <;}`LGHHn;<hL7 ᪥GH`L ᪵GH` @ߥHJLGLIK 0ߥGHH>;l<hL7 ' [ۅ; \ۅ< GH  L GH;<hL7HX;V<hL7Lhi;hi< l; ;iȥ=: 808`GH;<hL7H ;<h 7H ;<h 7  G;H<`(0 ;LLhi;hi< l; Lo~  =>" ", L  L(8= N=C>D` R MH;V<hL7~ ;<h 7L oEhpcH';<h 7L`z(z {|H;<hL7H G LNHJJJJ h) ii0`H?Gʊ)7H;J<h 7&KKȢ K)(KLNLHT;Z<hL7HGJjj` 00' 0"' 0  ;<`GHLTLL|hi;hi< |l; FLWLhi;hi< l; ( L KG`HG ;ȱ;`K e;;fK}F i;Ȣ i<  7}~ L=i;>i<`85364 _` }HA;d<h 7}L ɪSR?IT(Lhhh~f~g )(L(L hhh}}} }}}   (142)6""_" * HASH BASE 128 V2.0 * "(" "2" * WRITTEN & PROGRAMMED BY * "<" "F" * STEVEN PAUL BURGESS * $%HM;<h 7L0101|`L01 L L   `v@.`v.`H G L ?REDO FROM START ~ȱȱ~` Y85ȱZ6YZYȩY~ ""HASH BASE 128 V2.0"<" ̯"Z" "c"""Ϸ "" WRITTEN BY STEVEN BURGESS"" ̯"" hGhG`$%H ~~$h`H~ ~$% $$h`KaHaHI8e568^_834K KaLLa^^5_6ha`~Kʽ************* *GETKEY ROUTINE*1 ****************7 :H TI$"000000"h  TI5(TI5)1,X,Y," ",1  TI60(TI60) 1,X,Y," ",0 KE$:KE$"" 460  ****** *MENU* ****** : DI$"" &X19:Y24 0 :}eGG` {~{|~` {) G eGGȱ{)eGGH` 8C N?ȩȩȩ` 8~ʽ%ʽ$ʽ~@?$`H5^6_95:68^_h`85Y6ITY"v0...DELETE ENTIRE FILE"4107" KE$"0"KE$"9" 640E"K(KE$):w" FI0 (K1 K8 K9) W2:750:500" FI1 (K1) W1:750:500" K6 PR0" K7 PR1" K 1070,2240,2420,2930,3240,3660,4170,5520,665 `; < ; ȱ; ;i;<`LS6g H٦G` ` ) I;J< 7Lo I;J< @ߦIʊ 7Lo $%Hy;<h 7L H;<hL7L6hi;hi< 6l;H} L| ~o ;``~ʆ~$%$GH`QۅRۅ8SKTK`~~`~ʽʽʽ~`{rKO{uZ߮ꕦm=kک^ʕmeKOTkTK]e)J hhh} 0}hhwhhɇɈm8HH L=H-GL@ )HfGgL L,,,,, ,, , ,,, ,,,lLZ\~ʆ[ʆY~HGʆcH;<h 7Lo GH` $%H;T<hL7L  D WHICH YOU ARE "0&"WISHING TO ACCESS DOES NOT EXIST. YOU "`&"CANNOT THEREFORE ACCESS IT "&""&4,""&"SORRY, BUT AS YOU HAVE NOT ENTER 930.D (S$)1 (S$)NF 1800 /NFC(S$):2/X"THE FIELD CHOSEN IS:"A$(0,FC1)_/b"INPUT NEW VALUE:":L15:X20:Y2:1930q/lA$(0,FC1)S$|/v 1700//************/*GET STRING*/************/S$"":X1X:Y1Y0CH$"AB "(t"CREATE FILE"(~""G("PLEASE ENTER NUMBER OF FIELDSFIELDS"w(:"01 02 03 04 05 06 07 08 09 10"(::::::"^ ^ ^ ^ ^ ^ ^ ^ ^ ^"("MOVE CURSOR USING < AND > KEYS"("PRESS R XX1:19900 *************** 1*HASH EQUATION* 1 ***************&1*:.14H0X1>L1 (T$(0)):HH((T$(0),L,1)):i1HHH(T$(0))z1RHH255(HT)1\H(H)1f1p************* REM*INSERT DATA*1z********)2"CREATE FILE" *<""-*F:"NUMBER OF FIELDS=";(D4)4?*PNF(D4)4 :l*Z"MAXIMUM POSSIBLE NUMBER OF RECORDS:";*d NF10 NR500*n NF9 NR650*x NF8 NR750* NF7 NR800* NF6 NR900* NF5 NR1ECORDS"2""23F0 NF1)3 :A$(0,F)":":X16:YF5:L2333 1930@3 T$(F)S$F3$ ]3. 2060'HASH EQUATI{38 2160'INSERT INTO TABLE3B :"ANOTHER RECORD (Y/N)"3L X20:Y24:4103V KE$"Y" KE$"N" 238030# K0 6460# 500#%#*********4#*WARNING*C#*********N# :840T#k# N$: W(N$) 830|#* (N$)1#4 (N$)1 #>L1 5:A$:A$::410:#H1#R""$\"SORRA$(NR,NF):T$(NF):PO(NR),410 ,"E,,1,5,5,"PLEASE WAIT:FORMATTING TABLE":S1 300::%|,6L1 NR:A$(L,NF)"0":4,1:4,8::FRHT1:&:4,1,@,J%,T"",^"CREATE FILE:FIELD NAME ENTRY",h"HERE IS NO FILE IN MEMORY"9%"THEREFORE YOU CANNOT MANIPULATE, SAVE i%"OR PRINT IT. IT DOES NOT EXIST "%""%3%""&"SORRY, BUT THE RECOR-F0 NF1-F15)A$(0,F).1.X20:Y24:"ARE THERE ANY ERRORS (Y/N)?":.410X. KE$"Y"KE$"N" 1770i. KE$"N" o..F0 NF1.F15)A$(0,F).&.0"WHICH FIELD HAS AN ERROR (1-"NF")?".:X35:Y1NF:L2:1ED A ""'"FILENAME, IT IS IMPOSSIBLE FOR YOU TO "R'"LOAD OR SAVE A FILE. SELECT OPTION 4 "'$"",-1'.*************'8*CREATE FILE*'B*************'L:'V'`0,1:4,1:5,2'j"CDEFGHIJKLMNOPQRSTUVWXYZ 1234567890.+-\=?!#$%&'()@*^/[]"DI$0&%0410i0 KE$(20) (S$)0 S$(S$,(S$)1):1,X,Y," ":XX1: 19900 KE$(13) (S$)0 0 (CH$,KE$)0 19900 (S$)L 19900S$S$KE$01,X1,Y1,S$:ETURN TO MAKE CHOICE")"";:0D)"^")4106) KE$(13) 1310U) KE$"." KE$"," 1210p)"";:0D)"^") KE$"." DD4) KE$"," DD4) D0 D0)  D36 D36) 1210))(""*****1I02 A$(H,0)""L0 NF1:A$(H,L)T$(L)::I1:`2 A$(H,NF)"0" A$(H,NF)(FR):L0 NF1:A$(FR,L)T$(L)::FRFR1:I12 I1 H(A$(H,NF)): 219022PO(100)220,1:4,1:5,22""2"ADD R000* NF4 NR1250+ NF3 NR1500$+ NF2 NR17509+ NF1 NR2000A+NRR+HTNR10100_+OTNRHT|+"HASH TABLE STRUCTURE:"+"---------------------"+"HASH TABLE:"HT" RECORDS"+"OVERFLOW TABLE:"OT" RECORDS"+` KE$"N" FI1:3j 22404t ***************4~ *AMEND RECORDS*-4 ***************34 :94 S4 ""h4 "AMEND RECORDS"4 ""4 FO04 :"ENTER "A$(0,0)" OF RECORD YOU WISH TO Y, BUT THERE IS ALREADY A FILE "C$f"LOADED INTO THE COMPUTER. YOU MUST s$p"FIRST DELETE THIS ONE TO CONTINUE. "$z""$2$"" %"SORRY, BUT T " -rF0 (NF1)b-|"ENTER FIELDNAME"F1": ";:X20:Y4:L15t-1930'STRING-A$(0,F)S$--:FI1-"FIELD NAMES ARE AS FOLLOWS:"-"---------------------------" EVEN AFTER READING">H "THIS, THEN YOU COULD HAVE A PRETTY LONG"+?R "WAIT. FOR SELECTIVE VIEWING, CHOOSE THE"M?\ "SEARCH OPTION ON THE MENU."S?f |?p "ARE YOU SURE YOU WISH TO PROCEED?"?z X20:Y24:410? KE$"Y"KE$"N" 3450? KE$ (H,L):7 "ENTER FIELD TO AMEND ("B"-"NF")"8 "ENTER 0 TO END"(8 L2:X19:Y24:193088 S$"0" X8 (S$)B (S$)NF 2790^8 t8 S$"1" 28808 R(S$):"CURRENT VALUE:"A$(H,R1)8" "ENTER NEW VALUE"8, X5:Y10:L24 @8 KE$" " @BFL1:@L********@V*SEARCH*@`******** AjTA0:P0:R0@At::"":"SEARCH":"":pA~:"ENTER AS MUCH INFORMATION AS YOU KNOW "A"ABOUT THE RECORD. IF YOU ONLY KNOW PART":"OF A FIELD OR AREN 0,0)" OF RECORD YOU WISH TO DELETE:" : X5:Y10:L24:1930 : T$(0)S$:20608: A$(H,0)S$ FO1S: FO0 H(A$(H,NF))m: H0 FO1 3010: H0 FO0 W3:750:: : L0 NF1: A$(0,L)":"16)A$(H,L)::."B"PRESS ANY KEY TO BEGIN"BX20:Y24:410:B CL0 NF1:A$(0,L)":":C"IF YOU DO NOT WISH TO ENTER THE FIELD TYPE 0 AND PRESS RETURN, OTHERWISE ENTERTHE INFORMATION YOU KNOW AND TRY TO ENTER THE "A$(0,0)"."CX16:Y0:YOU SURE (Y/N)?";X X20:Y24:410 "CAN TAKE A CONSIDERABLE AMOUNT OF TIME."C> "THE PROCESS CAN ONLY BE STOPPED IF AND"p>* "WHEN A RECORD IS FOUND. IF NO RECORDS">4 "HAVE BEEN ENTERED AND YOU INADVERTANTLY">> "SELECT THIS OPTION, "DO YOU WISH TO AMEND THE ";A$(0,0);" FIELD?":B2"7 NF1 S$"1" 282057 X20:Y24:410R7 KE$"Y"KE$"N"27207 KE$"Y" L0 NF1:T$(L)A$(H,L):A$(H,L)""::B1:S$"1": 28207 7 L0 NF1:L1":"A$(0,L)":"17)A$"N" ? ? %? L1 NR? %? FL0: A$(L,0)"" 3570@ FL1 3550@ @ &#@ ,@ &:S@ E0 NF1:A$(0,E)":"16)A$(L,E)Y@_@{@"PRESS SPACE TO ABORT"@$"PRESS ANY OTHER KEY TO CONTINUE"@.X20:Y24:410:193086 A$(H,R1)S$: 2750 9@ R(S$):"CURRENT VALUE:"T$(R1)"9J "ENTER NEW VALUE":9T X5:Y10:L24:1930T9^ T$(0)S$: 2060:2160_9h 2750e9r |9| ""9 "DELETE RECORD"9 ""9 FO09 :"ENTER "A$('T SURE THEN MISS IT":"OUT. IF YOU INCLUDE THE FULL":A$(0,0);B" OF THE RECORD THEN THE"?B"TIME TAKEN FOR THE SEARCH TO COMPLETE"lB"WILL BE VERY VERY SHORT. IF, HOWEVER,"B"YOU DO NOT KNOW THIS DATA, THE TIME TAKEN WILL BE VERY LONG ""; "IS THIS THE RECORD YOU WISH TO DELETE? "N; ""a;& X20:Y24:410;0 KE$"Y" KE$"N" 3110;: KE$"Y" 3150;D H(A$(H,NF)):FO0: 3010;N : "ARE L22CQ0 NF1:YQ:1930:T$(Q)S$: S$"0" T$(Q)""CX16::%D L0 NF1: T$(L)"" TATA1$DDT$(0)"" &:"AS YOU HAVE NOT ENTERED THE":A$(0,0)" OF THE RECORD IT WILL":"TAKE QUITE A WHILE TO SEARCH SO YOU HAD BETTER GO AN ""< = "PLEASE NOTE THAT THIS ROUTINE DOES NOT"2= "ALLOW YOU TO ACCESS SPECIFIC RECORDS"_= "SELECTIVELY. IT SIMPLY SCANS THROUGH "= "THE ENTIRE TABLE PRINTING OUT ALL THE"= "RECORDS WHICH CONTAIN ANY DATA. AS THE""0" 4080:ExH(A$(H,NF)):P0: 3900ER0:P0:%ES1 NRFL0 NF1"F A$(S,0)"" P1: 4020>F A$(S,L)T$(L) PP1LF4,2:4,1RFlF TAP PO(R)S:RR1vFP0:F4080FF PR1 F R0 "THERE 5P "";/6Z "IS THIS THE RECORD YOU WISH TO AMEND Y/N"`6d "";s6n X20:Y24:4106x KE$"Y"KE$"N" 26706 KE$"N"H(A$(H,NF)):FO0: 25407 NF1 : L> PQ2 4,NL$;LH%:LR PS1 C60: C40L\NPC(NF2):RN0LfNP(NP)MpPN(R)NPMzFAPN(PN):"MPN(PN)7M FA0 PNPN1FML11 PNUML21 NPfML30 NF1mM%M4,A$(0,L3);15(A$(0,L3)))" : ";5);A$(P ****GT*PRINT MENU*G^************Gh:GrG| PT0 PT2H PS0 PS1H PP0 PP1$H PQ0 PQ1;H""MH"PRINT MENU"cH""|H:"1...SEARCH+PRINTH:"2...RETURN TO MAIN MENU"H:" (49)(27)S|NL$NL$(107)(3)SS****************S*LOAD SAVE MENU*S****************TT DE0 DE8-T""CT"LOAD/SAVE MENU"\T""sT:"1...LOAD FILE"T:"2...SAVE FILE"T ****NB:NL:"IF A CODE FOR AN ACTION IS":"27,43,55 : THEN YOU ENTER IT AS FOLLOWS"MOV" THE COMPUTER WILL PROMPT YOU AND AT EACH PROMPT YOU ENTER ONE OF THE VALUES"YO`"E.G."Oj:"CODE1>:27":"CODE2>:43":"CODE3>:55":"CODE4>:-1":Ot "ELITE "I& PP3 "CONDENSED"I0:"7...ENTER PRINTER CODES"J:::"ENTER OPTION"JDX20:Y24:410:JN (KE$)1 (KE$)7 4420YJX KE$"3"PT1PT2: 4260wJb KE$"3"PT2PT1:4260Jl KE$"4"PS1PS2: 4260Jv KE$"(KE$)1 (KE$)5 5710Ub KE$"3" DE1 DE8: 5570Ul KE$"1" FI1 W1:750: 5520Vv KE$"2" FI0 W2:750: 55206V KE$"3" DE8 DE9: 5570XV KE$"3" DE9 DE1: 5570uV KE$"4" 6070: 5520V KE$"5" V"ENTER CODE FOR ELITE PITCH":Q1P P:"CODE"Q">:PX10:YQ1:L3P(1930P2CO(S$) Q< CO1 5200$QFEL$EL$(CO):QQ12QP CO1\QZ"ENTER CODE FOR CONDENSED PITCH":Q1bQdtQn:"CODE"Q">:QxX10:YQ1:L3Q1930Q210K*************K4K*PRINT OUT FOUND ITEMS*#L R0 "THERE ARE NO MATCHES : PRESS ANY KEY":X20:Y24:&:410:@L***********************IL 4,4^L PP1 4,PI$;sL  PP2 4,EL$;L* PP3 4,CO$;L4 PQ1 4,DR$; ARE NO MATCHES : PRESS ANY KEY":X20:Y24:&:410:F"I HAVE FOUND"R" MATCHES""G"PRESS ANY KEY TO VIEW THEM"8GX20:Y24:&:410IG"L0 R1:YG,S0 NF1G6A$(0,S)":"16)A$(PO(L),S)::"PRESS ANY KEY":410:G@GJ******** NLQ/DOUBLE CHARACTERS":Q1RR":"CODE"Q">:R,X10:YQ1:L3R61930R@CO(S$)SJ CO1 5200STNL$NL$(CO):QQ1(S^ CO1.ShSrPI$(27)(80):EL$(27)(77):CO$(27)(33)(4):DR$(27)(120)(48):NL$(27)(120)O(RN),L3)MM4,:4MRNRN1M RNR L1PN:L2NPM:&)N PT2 4,(12);::"INSERT NEW PAGE AND PRESS ANY KEY":410:BN PT1 4,(12);:MN:4:SNlN$*******************N.*ENTER PRINT CODES*N8***************3...";:PT1 "FANFOLD ": "SINGLE SHEET"H PT1 PS1I:"4...";:PS1 "A4":I PS2 "A5"OI:"5...";: PQ1 "DRAFT ":qI PQ2 "DOUBLE STRIKE/NLQ"I:"6...";: PP1 "PICA "I PP2:"3...DEVICE:";T DE1 "CASSETTE"T DE8 "DISK (8)"T DE9 "DISK (9)"U:"4...FILE NAME:";%U& FI$"" "NOT YET ENTERED"9U0 FI$"" FI$ZU::"5...RETURN TO MAIN MENU"rUD:"SELECT OPTION"UNX20:Y24:410UX :"ALWAYS ENTER -1 TO END A CODE."O~:"PRESS ANY KEY"OX20:Y24:410OP"ENTER CODE FOR PICA PITCH":Q1P)P:"CODE"Q">::-RX10:YQ1:L37R1930DRCO(S$)WR CO1 5200oRDR$DR$(CO):QQ1}R CO1R"ENTER CODE FOR $"Y" 6540] KE$"N" ]"":"ARE YOU SURE YOU ARE ABSOLUTELY SURE?"]410] KE$"N" KE$"Y" 6580 ^ KE$"N" 5^"":"DELETING FILE":`^"":"FILE DELETED "^"PRESS ANY KEY TO RE XXX8XXX20:Y14:L10X1,0,14,"ENTER NEW FILENAME:":1930XFI$S$:X*LOAD*X%Y"PREPARE DEVICE "DE" AND PRESS ANY KEY"0YFL$""CYX20:Y24:410WYFL$FI$".HASH"zY DE8 DE9 FL$FL$",S,R"Y8,DE 1:8,(FT);:15,"U2";8;0;OT;OSd>8:15:dHdR""d\"HANGE ISK AME"df""ep"Ҡנˠ"ezX5:Y6:L16:1930@e (S$)18 S$S$(160): 7300KeDN$S$~e"Ҡנ .." "_^5)"1:NITIALISE ISK"_h5)"2:ALIDATE ISK"_r5)"3:CRATCH ILE"_|5)"4:ETRIEVE CRATCHED ILE"`5)"5:IRECTORY"0`5)"6:HANGE ISK AME"H`5)"7:AST ORMAT"[`5)"8:ORMAT"`5)"9:EAD RROR HAN :FI1Z~ZFL$""Z" PLEASE WAIT : FORMATTING TABLE":L1 500::%[L1 NR:A$(L,NF)"0":4,2:4,1::&[FL$FI$".HASH"9[ DE8 DE9 FL$FL$",S,R"[ DE1 DS0 ""DS$:"PRESS ANY KEY":X20:Y24:410:8: ~f15,8,15,"I":15f::f410:f$f.""f8"Ԡ"fB"" gL"LEASE NOTE THAT THIS ROUTINE CAN ONLY"9gV"BE USED ON DISKS WHICH HAVE, AT SOME"hg`"TIME OR ANOTHER, BEEN FORMATTED FOR USE"  (KE$)48 (KE$)57 6940a (KE$)65 (KE$)67 6910a KE$"C" DI$"":(142):a& KE$"1" 15,8,15:15,"I":15 b0 KE$"2" ;b: KE$"5" ""::"PRESS ANY KEY":410wbD KE$"9" "":DS$:"PRESS ANY KEY":X20:Y20: \(8\2\<********************\F*DELETE ENTIRE FILE*\P********************\Z:\d""]n"DELETE ENTIRE FILE"4]x""V]:"ARE YOU ABSOLUTELY SURE?"i]X20:Y24:410] KE$"N" KE WX20:Y24:410W 8,DE,1,FI$".HASH,S,W"W DE1 DS0 ""DS$:"PRESS ANY KEY":X20:Y24:410:8:X 8,OTX*8,HTX48,NF%X>8,FR.XH8,R>XRL0 NF1MX\8,A$(0,L)SXfbXpL0 R1rXzS0 NF1X8,A$(PO(L),S) vc|ccM$" "c 8110c F8 SD255 TD0 c:"HAT TYPE OF FILE WAS IT?" d "1..SEQ":"2..PRG":"3..USR":"4..REL" dX20:Y24:410Ad  (KE$)1 (KE$)4 7190Sd*FT(KE$)128d415,"B-P";8;(32F31) TURN TO MAIN MENU"^410::^****************^* DISK UTILITY *^****************_DI$"":(14)_"0,3:4,3:5,2 _,(_6:A_@""Z_J"ˠ٠"_T" ,0,FL$Y$ DE1 DS0 ""DS$:"PRESS ANY KEY":X20:Y24:410:8:Y.8,OT/Z8"READING:FORMAT DATA":" "9ZB8,HTCZL8,NFMZV8,FRVZ`8,RcZjNROTHTZtA$(NR,NF):T$(NF):PO(NR) :X5:Y7:L5:1930e (S$)2 S$S$(160)"2A"e (S$)1 S$S$(32)(160)"2A"e (S$)5 S$S$(160): 7350eID$S$f8,8,8,"#":15,8,15%f15,"U1";8;0;18;09f15,"B-P";8;144Hf8,DN$;ID$^f15,"U2";8;0;18;0if8:15 NEL & ISK TATUS"`5)"0:ROTECT ILE ROM RASURE"`5)"A:NPROTECT ILE"`5)"B:HANGE ILENAME"a5)"C:ETURN O "5a""Ia"NTER PTION"]a""paX20:Y24:410a [L0 NF1["READING:FIELD DATA":" "[8,A$(0,L):[L40 R1\S40 NF1\8,T$(S4)e\"READING:DATA":" "k\ {\2060:2160\!gj"ON 1541 DISK DRIVE AND HAVE NOT SINCE "gt"BEEN REFORMATTED FOR ANOTHER DRIVE."g~" N ORDER TO FORMAT A BRAND NEW DISK"h"OR A DISK FROM ANOTHER COMPUTER SYSTEM"Ah"PLEASE USE THE OPTION ."bh:"O YOU WISH TO CONTINUE"uh 410:bN KE$"3" 7080bX KE$"4" 7130bb KE$"6" 7240bl KE$"7" 7460bv KE$"8" 7770b KE$"0" 7780 c KE$"A" 7920c KE$"B" 8060*c 66500c"ENTER FILENAME:":X20:Y0:L16:1930ec(S$)pc:DS$=ILE":"PRESS ANY KEY":X20:Y24:410:n0 8170n: gܛi%seJUm&JJmk*ioe'J]z)ir]mnsjn7r:JiK5˓Yӓ'Yӓ.N%*S));g:NܝgNNyr*k)tRzR+zV)s)oUs)J*ioK3wY){7&Ju)J! ;8;0;18;0i(15,"B-P";8;162i28,ID$i<15,"U2";8;0;18;0iF8:15::15,8,15,"I":15:iPX20:Y24:410:iZI$"A2":7630:idjnM$"Ԡ"jx81105j F8 SD255 TD0 8:15:Qj15,"B-P";8;(32F31)1\j#8,T$ijT! KK00$00KK01$01KK20$20(KK22$222KK23$23<KK27$27FKK2C$2CPKK30$30ZKK39$39dKK3B$3BnKK41$41xKK44$44KK45$45KK47$47KK49$49KK4C$4CKK4D$4DKK50$50KK51$51KK52$52KK53$53KK54$54KK55$55! RROR \1.95 JAMES HERBERT THE MAGIC COTTAGE NEL HORROR \3.95 JAMES HERBERT THE SPEAR NEL HORROR \1.95 JAMES HERBERT THE JONAH NEL HORROR \1.95 SUE TOWNSEND ADRIAN MOLE SECRET DIAR METHUEN HUMOUR \1.95 DAVID NOBBS REGGIE PERRIN III PENGUIN HUMOUR \1.25 JEF!|k15,"B-P";8;(32F31)1k"#8,T$k,TY(T$)k6 (TY64)127 (TY64)132 " Š":X20:Y24:410:8:15:k@TYTY64kJT$(TY)lT15,"B-P";8;(32F31)1%l^8,T$;HKK3B00,XRKK51\!F7KK0DF759KK434F(KK54,X)KK2067 7968KK20((KK54,X)2KK5453<(KK52,X)F84PKK464FZKK4142d83n#$43x90KK3024,YKK0E4F10059KK3B0083KK54KK5055KK4142!8,8,8,"#":15,8,15m15,"U1";8;0;TD;SDm15,"B-P";8;0m#8,TR$:#8,SE$:OTTD:OSSD:TD(TR$):SD(SE$)n F1 8:15,"B-P";8;(32F31)4:L1 16:#8,A$:FC$FC$A$:#n FD$FC$ 82501n FC$""::n& SD255 TD0 8:15:"NO SUCH F!X20:Y24:410h KE$"N"KE$"Y" 7590h KE$"N" hI$""hh"":"NTER DISKNAME"hX5:Y7:L16:1930hFD$S$"i:"NTER .D":X5:Y13:L5:1930-iID$S$?i (FD$","I$)Wi8,8,8,"#":15,8,15mi15,"U1"!KK58$58KK87$87KK88$88KK9E$9EKKA2$A2"KKB0$B0,KKB1$B16KK0E63$0E63@KK0F9D$0F9DJKK0FA7$0FA7TKK2020$2020^KK2041$2041hKK2044$2044rKK204F$204F|KK2053$2053KK2244$2244KK3024$3024KK3127$3127KK3924$3! 900 100 5 110 12 AUTHOR TITLE PUBLISHER TYPE PRICE P.G WODEHOUSE A DAMSEL IN DISTRESS PENGUIN HUMOUR \2.95 STEPHEN KING THE BACHMAN BOOKS NEL HORROR \4.95 SUE TOWNSEND ADRIAN MOLE GROWING P METHUEN HUMOUR \1.95 JAMES HERBERT THE SURVIVOR NEL HO!Y(T$)j TY127 TY132 "ĠŠ":X20:Y24:410:8:15:jTYTY64jT$(TY)j15,"B-P";8;(32F31)1j8,T$;k15,"U2";8;0;OT,OSk8:15:k2kM$"Ԡ"KK4120HKK2044RKK0EE4\#$4Ef84pKK454Dz8383(KK47,X)KK" 41206 KK2044@ KK49J KK5349T ^ h KKA801r 35| 67 KK4145 82 (KKA2,X) 67 82 79 KK54,X 34 (KK3B,X)  KK5401 KK58& 840 : KK39D 51N KK4822X KK4Cb KK204Fl 87v 79 82 KK2244" @D-47 YTTO ====== PEEDSCRIPT ETTA [R EN AV DE MEST ANV[NDA OCH SPRIDDA FRIA ORDBEHANDLARNA TILL 64/128. ] DISKETTEN LIGGER FYRA VERSIONER: N 19-BLOCKS 64-VERSION (INGET VERSIONSNUMMER), TILL DETTA H[NVISAR ALLA S SOM FINNS I MANUALFILEN" ,  . E   3.0   3.2,   C64:. D    C128-   80-              . F              ( C128-    ..   ".B   M  E                                  .S UA  E  -   (         ...) 64  RA 128 Y       . D         C64-  C128- .G  F E           . R         . S  "00KK0E9EKKA800,Y35KK0EA26084KK5884KK202059KK574FKK5942 84 KK00 $ . (KK23),Y8 KK4554,XB L 84V KK2020` 59j t #$47~ KK5942 84 KK00 210 KK5453,Y 82 79 KK54,X " KK30 KK01,X 59 (KK50,X) (KK55,X) 83 KKB1 35 KK0F57 KK0F57 (KKB0,X) 35 KK0F5D* KK0F5D844 (KK50,X)> (KK88),YH R KK8901,X\ f p (KK9E,X)z KK0F9D 114 (KK87,X) 124 (KK9E,X)", SE NEDAN. N VERSION 3.0 OCH EN 3.2, B]DA F\R 64:AN. ESSUTOM FINNS EN 128-VERSION F\R 80-KOLUMNERSL[GET VILKEN [R MYCKET TREVLIG ATT ARBETA MED. \RDELEN [R ATT ALLA PROGRAMMEN ANV[NDER SAMMA TANGENTFUNKTIONER (I 128-VERSIONEN KAN DU F.\. [VEN SL"  -   ESC).M .SPD D       (  )     S . D          ,  POKE:       19-   .SPD 3.0 C D" ).RA 64  RA 128 Y       . D         C64-  C128- .G  F E           . R         . S  #] P] INSERT-L[GE MED ). ANUAL. ENNA FIL INNEH]LLER INSTRUKTIONER (P] SVENSKA) F\R ANV[NDNINGEN AV PEEDSCRIPT. ENNA KAN APPLICERAS P] ALLA BIFOGADE VERSIONER, MEN :SEN G[LLER SOM N[MNT ENDAST 19-BLOCKSVERSIONEN. 3.0 ONVERT ETTA" 220 59  KK00 59( 872 (KK49,X)< 84F KK4F46P 82Z KK0EE4KK2041d 87n x #$4C KK00 KK0EEF KK0EEFKK4150,Y KK53,X KK00 250 59 4 (KK3B,X) 67 KK4145 82 KK4353 82" KK45, KKKKK# [R ETT OMVANDLINGSPROGRAM SOM OMVANDLAR FILER FR]N OCH TILL DESSA TRE FORMAT: PEEDSCRIPT, ETSCII (64/128 STANDARD) OCH RUE (ANV[NDS AV ALLA ANDRA DATORER). HARLIE HAPLIN TT LITET EXEMPEL P] VAD MAN KAN ]STADKOMMA MED 128:ANS GRAFIKKOMM# T AV SAMMA F\RFATTARE SOM SKREV URBO OUCH P] -08, ARCO . ESTERWEEL. ASHASE 128 N DATABAS F\R 128. EN [R AVSEDD F\R 40 KOLUMNER, MEN KAN K\RAS I 80-KOLUMNER MED SM] F\R[NDRINGAR (SE TILL ATT S[TTA BAKGRUNDSF[RGEN, D] PROGRAMMET SKRIVER MEKKKK#ANDON. ANKS AND EMORY TT LITET PROGRAM SOM GER EN ENKEL \VERBLICK \VER HUR DU SKA ST[LLA PEKARNA BEROENDE P] VAR DU PLACERAR SK[RMMINNET OCH VAR DU HAR TECKENUPPS[TTNINGEN. PEEDY NSM N SNABB DE-ASSEMBLERARE (OMVANDLAR PROGRAMKOD TILL ASSEMD SVART F[RG...)SM 64 OCH EVSM 128 TTERLIGARE PROGRAM F\R DETTA [NDAM]L. ET FINA [R ATT DET FINNS I B]DE 64- OCH 128-VERSION. RAPHIC ACTORY TT PROGRAM F\R ATT DESIGNA SK[RMAR I TECKENGRAFIK. EKOMMENDERAS ENDAST F\R DEN T]LAMODIGE. KRIVEKKKK#BLERTEXT). EVSM 64 OCH EVSM 128 TTERLIGARE PROGRAM F\R DETTA [NDAM]L. ET FINA [R ATT DET FINNS I B]DE 64- OCH 128-VERSION. RAPHIC ACTORY TT PROGRAM F\R ATT DESIGNA SK[RMAR I TECKENGRAFIK. EKOMMENDERAS ENDAST F\R DEN T]LAMODIGE. KRIVEK