' +JJJJ ?\>m0M='+l> /+L   d]@ŵLҦ]]LF L}BBL] / X  +lΠ ` $L$ B /` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `\`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>? 24?949:4<  %%&&'''))*++++,,----...////23334556667777999:::;;;;<<====>>>????,,(8,01,(8,01,(8,,1*( ,,1*( 1,,*" 1,,*" 11,,"&&'(((())***,,.000011112223444556 88889 : << >Q@@ACOAHBIC#"02r21213002023#BBS cRWȴLIﵩWL ˵i̵igggLhhL L̾ Lb`ȱLꢍȱHH񷩷 hhLhh `H()?(hl8HIHHHHhHH݌hHhHh݌H6 ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `WLqf L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`HIDLOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!ppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-(0 @Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (LV) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  X / ED / ]ƴS0JL ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-`֠Ơ<>쳩>?<=>B&Be<<e==إ= ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d  o Xuy8VtΆ솝͢#c' ! "#3$ %)( j 六΢ɍLɍuyL'; !"#3%$)( ɛz#     ͠PϠ Ҡ16:10::"INCORRECT RANGE ERROR....":"ENTER CORRECT NUMBER OR 'ESC' TO ABORT"::ZU1qNU$(27)ġ:1006I5$"":NU$"":CP0:BN0:AS0797:49,91:8,4452000>9,44:8,91?2000H9,91:8,44I2000R9,40İ1500:IC(LL)0:10842@(N$(LL1),1)"/"1090|AW(LL1)0ĭW(LL)IC(LL)W(LL1)L(LL)L(LL1)İ1500:IC(LL)0:1084BKx17::1:"ENTER QUESTION # TO SEARCH ?":IA17:IB30:IC3:I5$"":9800:LL(I5$)1:LL0LL3001400yZU1::Z REM LENGHT <LK3:30=I5$(IC(LL)):IALK3:IC2:IB37:"LENGTH":9800:IC(LL)(I5$):IC(LL)80İ1500:IC(LL)0:1084>IC(LL)W(LL)8(LL1)W(LL)80İ1500:W(LL)0:1069?4(N$(LL1),1)"/"10835W(LL1)0ĭW(LL)W(LL1)L(LL)L(LL1)İ1500:W(LL)0:10696LL110907SR$"$"10908SR$">"SR$"<"SR$"="10849IC(LL)S:W(LL)IC(LL)801069:1090{; HORT -:LK3:20."TAB"0IALK3:IB24:IC2:I5$(W(LL)):9800:W(LL)(I5$)2W(LL)0W(LL)1#3W(LL)W(LL1)IC(LL1)L(LL)L1007 !NU$(4)İ26000:10077"LL1L(1)1:1069#:LK3:1:SR$"/"L(LL)L(LL1):W(LL)W(LL1):IC(LL)IC(LL1):1090$"VERTICAL"&IALK3:IB10:IC5:I5$(L(LL)):9800:L(LL)(I5$))L(LL)L(LL1)L(LL)300İ1500:L(LL)0:1059t, 1:IB1:IC80:I5$N$(LL):9800:N$(LL)I5$ENU$(8)LLLL1:1006YSR$(N$(LL),1)oNU$(63)ī62000NU$(6)1400N$(LL)"END"IC(LL)0:W(LL)0:L(LL)0:YTLL:LL300::NU$(27)Ă:NU$(5)LL300:: NU$(9)İ25000: "6LK1:1BIC(1)1LL1ĺ"PRINT MARKER CHARCTER"::16:1:"(ENTER '?' FOR HELP)"::ZU1:1040" QUESTION #"LL" "LL1IALK1:IB1:IC1:I5$N$(LL):9800:N$(LL)I5$:1050)IALK" ":22:1:(N$(LL1)HU$,80);:24:1:"VERT";::L(LL1)" ";::20:"TAB";::W(LL1)" ";::30:"LEN";::IC(LL1)" ";6:1:"----------------------------------------"19:1:"----------------------------------------")LK3:1:"  LK11 ZU1& LL1300: ZULL1ė:ZU0{ 1:1::"QUESTION #";::LL1" ":2:1:(N$(LL1)HU$,80) 4:1::"VERT";::L(LL1)" ";::20:"TAB";::W(LL1)" ";::30:"LEN";::IC(LL1)" ")21:1::"QUESTION #";::LL1(ZZ$(L)"-"ZZZZ(ZZ$(L1))A )ZZ$(L)"*"ZZZZ(ZZ$(L1))c *ZZ$(L)"^"ZZZZ(ZZ$(L1)) +ZZ$(L)"/"(ZZ$(L1))0ZZ0:495 ,ZZ$(L)"/"ZZZZ(ZZ$(L1)) -495 X(ZZ$(1),1)"#"ZZZZ(ZZ$(1)): ]ZZZZ(NA$((ZZ$(1)))) bZ$(L)"+"ZZZZZ/ ZZ$(L)"/"Z0ZZ0:495G ZZ$(L)"/"ZZZZZ_ ZZ$(L)"-"ZZZZZw ZZ$(L)"*"ZZZZZ ZZ$(L)"^"ZZZZZ LL1   NA$(LL)(ZZ)   D(NA$(AB))  &ZZ$(L)"+"ZZZZ(ZZ$(L1)) Z$(L7)ZZ$(L7)K$ 9 L250:ZZ$(L)""NL1:L50? V ZZ$(N1)"@"468 (ZZ$(N),1)"#"JN(NA$((ZZ$(N)))):NN2:468 JN(ZZ$(N)):NN2 JM1JN 600 L2N (ZZ$(L1),1)"#"550 Z(NA$((ZZ$(L1)))) Z 30555 100007 ,G$N$(LL):L150:ZZ$(L)"":@ -ZZ0I .JN0R 1L71a 6L2(G$)r @K$(G$,L,1) JK$"R"L(G$):440 KK$":"L(G$):440 YK$"*"K$"-"K$"+"K$"/"K$"^"K$"@"ZZ$(L71)K$:L7L72: ZK$" "440 ZNN$(300),NA$(300)+ZAP822:VER1.2|NA$"FORMS":D$(4):ZERO$"0":W(300),L(300),ZZ$(50),IC(300),IN$(20),NU$(80)6D(47082):V(47083):SS(47081):SSSS16:V67V05030039999:IM1:63000:9960216,0:""::49990                          STION FILE"3&'"(E) -SAVE FORM QUESTION FILE"[&.'"(F) -DELETE FORM QUESTION FILE"a&/'&4'"(G) -RECALL FORM ANSWER FILE"&5'"(H) -SAVE FORM ANSWER FILE"&6'"(I) -DELETE FORM ANSWER FILE"&7'&8'"(J) CREATE FORM ALIGNER" ':'" "$%&L%'34,0:::D$"PR#0"::216,0:54915x%'" ***** EASYFORM MAIN MENU *****"%'30555%'3%'"(A) CREATE A FORM"%'"(B) ENTER FORM ANSWERS"%'"(C) PRINT A FORM"%' &'"(D) -RECALL FORM QUE";: $&:1$&CPCP1:CP0I5$"":"";:9810G$&BNCPCP1:BN1k$&NU$;:CP1I5$(I5$,CP):9820u$&9810$&AS((40)256(41)(36)):AS32NU$(AS64):9880$&NU$(AS):9880%&HU$" 3)ĝ:#a&CP1NU$(13)ĝ:?#b&CP1NU$(13)CP1:I5$""S#f&NU$(13)9890f#p&NU$(8)9910{#u&NU$":"NU$";"#z&CPIC9880#&NU$(21)9940#&(NU$)32ĺ"";:9820#&I5$I5$NU$:NU$;:CPCP1:CPIC9820$&CPICāICP1IC:" " D$"CLOSE "IN$," NA$"FORMS"İ2130:6" 2110<" F"%IC19_"%IA10:IB1:I5$"HHH"k"H&IA:IBt"I&BN0z"J&"K&IC1IC1"M&(I5$HU$,IC)"R&IA:IB:CP1"\&NU$#^&CP1ĭNU$(27)NU$(8)NU$(9)NU$(5)NU$(4)NU$(6)NU$(6NA$(LL):81350!N$(LL):W(LL):L(LL):IC(LL)6!I!D$"CLOSE "IN$c!NA$"FORMS"İ2130:m! 2110s! }!l TYYT!m D$"OPEN "IN$!q D$"READ "IN$! YT! LL1YT! NA$"FORMS"ĄNA$(LL):8335! N$(LL):W(LL):L(LL):IC(LL)! H ?":IA20:IB30:IC3:I5$"":9800:LL(I5$)1:LL1(I5$)3005400R ::5200X o p20:1:"HIT ANY KEY TO CONTINUE";:TT$: NA$"FORMS"İ2120:8110 2100  D$"OPEN "IN$ D$"WRITE"IN$ YT LL1YT!NA$"FORMS"%NU$(8)LLLL2:LL0LL08NU$(6)5400UNU$(5)LL300::5200[agP23:10:"ONE MOMENT PLEASE"QLL1YTZN$(N$(LL),1)_N$">"N$"<"N$"/"İ300ns5999D 20::1:"ENTER QUESTION # TO SEARC)"/"(N$(LL),1)">"İ300:N$(LL)" = "NA$(LL);:6000:5050(N$(LL),1)"$"SR(N$(LL)):SR$(N$(LL),SR1):N$(LL)" = "NA$((SR$)):6000:5050N$(LL)20:1:"HIT 'RETURN' FOR DEFAULT"IA13:IB1:ICIC(LL):I5$NA$(LL):9800:NA$(LL)I5$W(1)LĺN$(1);" ";(4014.C36,W(1):N$(1);YZE0ĺ(ZE)"1";c*4014:"ENTER FORM DATA TO BE PRINTED OUT"YT1ıLL1YT1LL1Ă:8:1:"FORM ANSWER #"LL10:1;(N$(LL),1)"<"(N$(LL),1ZB0ZC0ĺ(27)ZC;)X(16384)716368,0GX1553000WX1414050a4014g{PR0ZB0450036,W(1)1:N$(1);PR0ĺ(27)(PR):4070(27)(ZB);:(27)(ZB)4014ZD04600L179IT 'RETURN' UNTIL ALIGNED. WHEN PAPER IS ALIGNED HIT THE 'ESC' KEY TO START PRINTING."21:1:"IF FORM IS ALREADY ALIGNED, THEN HIT THE 'ESC' KEY TWICE TO START PRINTING"15:"HIT 'RETURN' OR 'ESC' :";:L$:L$"X"ı::D$"PR#"SL:" 80N"(27)(ZB); ' (13)(4)"PR#0"-;::34,5rH2:CC$" HIT 'S' TO STOP AND 'G' TO START":39990H3:CC$"HIT 'X' TO ABORT.":39990V5:"ALIGN FORM FIRST THEN HIT THE 'RETURN' KEY TO PRINT MARKER, ADJUST PAPER IF NEEDED THEN HN$N$(LL)R (N$,1)"$"SR(N$):36,W(LL)1:SR$(N$,SR1):NA$((SR$));:3050h (N$,1)"/"3070 (N$,1)">"(N$,1)"<"İ2500:3070 (N$,1)"="İ2500:3070 36,W(LL)1 NA$(LL);    " " ZB0Ă:3095  (N$(LL),1)"<"2559 SQ);( N$;. P ZD0PR0ZB0ZE0ĺ(ZD);Y YY2w ZB0āL51L(YT1):3015 L51L(YT1).5 L5L(YY)3075 39020:LLYYYT:39020 L(LL)L5LLYT::3075 L5L(LL)Ă:3075 YYYY1  4:8,91S2000" N(NA$(LL))A N0Ĺ36,W(LL)1:ZERO$;:W N(100N.5)100c N$(N)o Q(N$){ L31Q (N$,L3,1)"."UUL3:L3Q::2540  N$N$".00":2545 ((N$,UU,Q))3N$N$"0" Q(N$) 36,W(LL)1 PLEASE DATA BEING SAVED **"&6v30095,6v6v ****** DELETE FILE ******* L7v:2:"TO DELETE A FORM FILE"::"TO DELETE HIT ";::" 5vTP995vD$;"CLOSE ";NA$o5vTP99TP0::12:"DISK FULL---USE ANOTHER INITIALIZED DISK":L110000::5vD$;"UNLOCK ";NA$:D$;"OPEN ";NA$:D$;"WRITE ";NA$5vL120:IN$(L):5vD$;"CLOSE ";NA$:D$;"LOCK ";NA$5v:106v"** ONE MOMENT 2. TO RETURN TO MAIN PROGRAM"::" ENTER SELECTION HERE--->";:L$Z4fvL$"2"IN$"":l4kvL$"1"30325w4pv303054uv(IN$)2302854zv:304804vD$;"OPEN ";NA$:D$;"READ ";NA$4vL1120:IN$(L1):IN$(L1)""IN$(L1)IN$:L120::303554v ******* START FILE ***** 3Mv:5:"ENTER FORM NAME?";:IA5:IB18:IC20:I5$"":9800:TE$I5$:I5$"":8:13\vIN$"^"TE$E4av15:1:"1. TO SAVE DATA ON CURRENT DATA DISK"::"SAVE H2u81002u ******DATA LOAD 2u8300f3Lv "::30055A1uL$(27)L220::1u11:1:" ":300551u30760:30330>2u DATA FILES ON DISK":L218000::V0guL2120:11:1:L2". "IN$(L2):IN$(L2)""Ă:30080{0lu22:1:"ENTER KEY HERE-->";:L$0quL$;:L$(27)L280::0vuL$(13)IN$IN$(L2):L280::30190:)1{u11:1:" ":13:" ":/NuD$;"OPEN ";NA$/SuD$;"READ ";NA$:L2120:IN$(L2):/XuD$;"CLOSE ";NA$/]uL2120:IN$(L2)""L220::300550bu::12:"NO .Du:2:"TO SELECT A FORM FILE"::"TO VIEW HIT THE SPACE BAR":"TO LOAD HIT THE 'RETURN' KEY":"TO GO BACK TO MENU HIT THE 'ESC' KEY"u/Iu:9:" 0-2u: LOAD FILE&-5u38000:30760:-6u: START FILEL-7u38000:30400a-8u: DELETE FILEs-9u38000:30760-:u: SAVE FILE-;u30510:: INIT-=u30555::6000: ERROR 5.Cu SELECT JOB aL(LL)0,aW(LL)0!,aIC(LL)0<,aYTYT1:YT300YT300B,aP,eKKLLYTd,eN$(KK)N$(KK1)v,eL(KK)L(KK1),eW(KK)W(KK1),eIC(KK)IC(KK1),e,eN$(YT)"",eL(YT)0,eW(YT)0,eIC(YT)0,eYTYT1,e,0u -1u38000:3002N$(L)::" "A+N"VTAB #"L(L)" HTAB #"W(L)" LENGTH #"IC(L)G+NU+N" ":" "m+NLL$"N"āR1300:s+N+N:D$"PR#0"+N+aKKYT1LL1+aN$(KK)N$(KK1)+aL(KK)L(KK1)+aW(KK)W(KK1)+aIC(KK)IC(KK1)+a+aN$(LL)"",'10000* N:B**NH1:CC$"** QUESTION FORMAT DISPLAY **":39990M*/N39000*RN11:1:"DO YOU WISH A PRINT OUT (Y/N)?";:LL$:LL$"Y"LL$"N"20050*UNL17:" ":*WNLL$"Y"ĺ:D$"PR#"SL:" 80N"*\NL1YT*zN39020*N"QUESTION #"L +N:(27)ė:11:"RE-BOOT":))b'X$""100008)e'X(X$)64L)g'X1X1310000)j'X1000,5000,4000,30001,30005,30007,30001,30005,30007,40000,37000,20000)k'X$"G"X$"H"X$"I"IM$(NA$,(NA$)1):IO$IN$)l'X$"D"X$"E"X$"F"NA$"FORMS":IM$IN$*t OPTION LETTER...";:X$?(G'X$"G"X$"H"X$"I"ĭIM$""10000m(L'X$"G"X$"H"X$"I"NA$"^"IM$:IN$IO$(O'X$"D"X$"E"X$"F"NA$"FORMS":IN$IM$)`'X$"X"ė:11:"YOU ARE ABOUT TO LOSE ALL DATA":"ENTER 'ESC' TO END & 'RTN' TO ABORT";:L$:L$(K) CHANGE SLOT, DRIVE, VOLUME"C';'"(L) DISPLAY HEADING FORMAT"T'A'"(X) END."'B'23:1::"CURRENT FORM FILE";::IM$:IM$""Ģ23:18:"EMPTY "'C':"SLOT";::SS" ";::"DRIVE";::D" ";::"VOLUME";::V;(E'21:1:"SELECT89012345678901234567890";)FOZB0405005FTL299@FU39020gFWL$(L):(L$,1)"0"İ40700:40028FYL" ..........................................................................";F\ZB040035F](27)(ZB)F_" .5";F`(27)(ZB)G UP WITH PRINTER FOR EASY ALIGNMENT OF FORMS, FOR FUTURE PROCESSING"EAH1:CC$"TURN ON YOUR PRINTER AND HIT ANY KEY":39990EB39000EC4:39:L$::L$(27)ıEDD$"PR#"SL:" 80N"FJ"123456789012345678901234567890123456789012345678901234567:L5300:LL300DvID6CC(CC$):L640CC:L6L62:L6%L61:L6%:H:CC$OD7D?768,104:769,168:770,104:771,166:772,223:773,154:774,72:775,152:776,72:777,96:GE@:19:"INSERT PAPER OR A FORM INTO THE PRINTER.IF USING A FORM, THEN LINE FORM"SSC30555C216,0:?Cd768:216,0:30530:"":38015ICX34,5C]H2:CC$" HIT 'S' TO STOP AND 'G' TO START":39990CbH3:CC$"HIT 'ESC' TO ABORT.":39990CcCgClX(16384):16368,0CmX8339020CnX88X155DqX155L300B6:IC1:I5$(SS)B1/B:"SLOT"::9800=BSS(I5$)EB12bBIA12:IB7:IC1:I5$(D)iB1B:"DRIVE"::9800BD(I5$)BĐBp:10:"**INSERT YOUR DATA DISK AND HIT ANY KEY*";:LL$Bu38500BvCzD$"LOCK "NA$",V"V",D"D",S:10000!AUxANYKEY$"R"ġ:30285?AZxAN$(13)ZZ$"&":30480JA_x30760PAA:"DRIVE, SLOT, AND VOLUME RESET "A:"HIT 'RETURN' FOR DEFAULT"A8AIA8:IB8:IC2:I5$(V)A:"VOLUME"::9800AV(I5$)A10BIA10:Iġ:30285`@7x:3:" TO CONTINUE AND SAVE THE DATA TO THE FILE BELOW HIT THE 'RETURN' KEY."@";:ANYKEY$APxANYKEY$(27)ġN ERROR HAS OCCURED **"::s?ew:::"ERROR NUMBER "Y" HAS OCCURED"::"****** PLEASE REFER TO YOUR MANUALS ****"?fw"":""?jw24:1:"HIT ANY KEY TO CONTINUE ";:LL$? x216,0:768? x54915?x10000?(x ?-xIN$""ġ:30285 @2x(IN$)2";NA$:L120:IN$(L)::D$;"CLOSE ";NA$:D$;"LOCK ";NA$>>Vw>Zw **** ERROR TRAP >[wY(222)>]wD$"PR#0"?`w::" ** A {==wH22:CC$"TO CONTINUE HIT ANY KEY":60000::L$:L$(27)ı=BwL120:IN$(L)""::=GwD$(4):D$;"OPEN ";NA$:D$;"CLOSE ";NA$=LwD$;"DELETE ";NA$8>QwD$(4):D$;"OPEN ";NA$:D$;"WRITE IN$(L1)IN$PT999*<w:D$;"CLOSE ";NA$S<wZZ$"&"PT999ZZ$"":PT0::30095<$wPT999PT0::12:"PLEASE RENAME FILE *******":IN$""::L1110000::<)w;=-w ***** INIT ":304251; w1500;w ****** CHECK FILE ;w:D$;"OPEN ";NA$:D$;"READ ";NA$:L1120:IN$(L1)<w27)L20:4:vIN$(1)""IN$(2)""IN$(3)""L20:N:vL$""IN$"":30470:vL$""Ģ11:1:" "::w30470';w11:1:" MAND HERE-->";:L$:L$;n9vL$""IN$IN$(L):IN$(L)"":L2119:IN$(L2)""IN$(L2)IN$(L21):IN$(L21)"":9vL$""ĺD$"UNLOCK"NA$:D$"OPEN"NA$:D$"WRITE"NA$:L1120:IN$(L1)::D$"CLOSE"NA$:D$"LOCK"NA$9vL$""ĺD$"DELETE"IN$:IN$"" :vL$(":R8vD$(4):D$;"OPEN ";NA$:D$;"READ ";NA$:L120:IN$(L)::D$;"CLOSE ";NA${8vL2120:IN$(L2)""L220::304258v::12:"NO FILES ON DISK ********":L2110000::8vL120:11:1:L". "IN$(L):IN$(L)""Ă:304659v20:1:"ENTER COMM'CTRL' F"::"TO SELECT HIT ANY KEY":"TO GO BACK TO MENU HIT THE 'ESC' KEY"8v9::" ":13:" COPYRIGHT 1981 BY GARY D. MALEY Z Z885,3:886,162:887,0:888,142:889,49:890,3:891,142:U$892,83:893,3:894,174:895,50:896,3:897,224:898,150:899,240:900,234:U%901,76:902,48:903,3U*V *** GARBO SOFTWARE *** ,42:PT838,238:839,49:840,3:841,238:842,83:843,3:844,76:845,48:846,3:T847,234:848,165:849,9:850,141:851,0:852,150:853,234:854,234:855,234T 856,234:857,76:858,59:859,3T"879,96:880,238:881,50:882,37U#883,238:884,84:42:809,84:810,3:cS811,142:812,50:813,3:814,234:815,234:816,174:817,0:818,150:819,228:S820,8:821,240:822,25:823,234:824,234:825,234:826,234:827,162:828,0:T829,134:830,7:831,174:832,49:833,3:834,224:835,255:836,240:837TRL E' = ABORT TO MAIN MENU""RhNRl"'CTRL F' = FIND A QUESTION OR ANSWER"R24:1::"HIT ANY KEY TO CONTINUE...";:LK$:::1006RRR797,24:798,166:799,109:800,142:801,83S802,3:803,142:804,49:805,3:806,166:807,110:808,1RS" QK2QN"'/' = CALCULATION WITH NO PRINT"8QOiQS"'ESC' = STEP THROUGH QUESTIONS & ANSWERS";oQTQV"'RETURN' = DEFAULT PAST INFORMATON"QWQX"'CTRL I' = INSERT A NEW QUESTION"QYQ]"'CTRL D' = DELETE A QUESTION"Q^Rb"'CRINTER" PıP0P51EP:"'>' = RIGHT JUSTIFY A CALCULATION"KP;vP?"'<' = LEFT JUSTIFY A CALCULATION"|P@PD"'=' = LEFT JUSTIFY NUMERICAL DATA"PEPF"'<-' = BACK STEP THROUGH QUESTIONS"PGQJ"'$' = PRINT SELECTED ANSWE:D$"OPEN PRINTER ,S"SS",D"D",V"V9OĺD$"WRITE PRINTER"QO"ĺPP$:SL:ZERO$:PRhO+ĺZB:ZC:ZD:ZE:SO,ĺD$"CLOSE PRINTER"O6ıO|ĺ:D$"OPEN PRINTER ,S"SS",D"D",V"VOĺD$"READ PRINTER"OĄPP$,SL,ZERO$,PR,ZB,ZC,ZD,ZE,SPĺ(13)(4)"CLOSE PTER ZERO REPLACEMENT ?":9800:ZERO$I5$RNíL$"C"L$"Q"L$"O"L$"E"50000]NPP$L$NíL$"Q"ZB68:PR0:ZC0:ZD0:ZE0NíL$"C"ZB30:PR0:ZC0:ZD0:ZE0NíL$"E"ZC1:ZD127:PR0:ZB0:ZE0NòNë50000ND$(4):SS6:D1:V0!OĺCLEAR DECIMAL";:9800:ZD(I5$)hM}I5$(ZE):23:1:"ENTER BACK SPACE DECIMAL ";:9800:ZE(I5$)MíL$"R"IA23:IB37:IC2:I5$(S):23:1:"ENTER RIGHT JUSTIFY SPACES ?":9800:S(I5$)'NíL$"Z"IA23:IB24:IC10:I5$ZERO$:23:1:"ENLyI5$(PR):23:1:"ENTER PRINTER BACKUP DECIMAL";:9800:PR(I5$)LzI5$(ZB):23:1:"ENTER REVERSE 1/2 SPACE DECIMAL";:9800:ZB(I5$)L{I5$(ZC):23:1:"ENTER LINE SPACING DECIMAL ";:9800:ZC(I5$)M|I5$(ZD):23:1:"ENTER DATA BUFFER "(R) RIGHT JUSTIFY SPACES ("S")"1Kgú"(X) EXIT"TKiâ18:"CURRENT PRINTER ("PP$")"vKnâ23:"ENTER SELECTION #";:L$KsíL$"N"Ė1:23:"ENTER NEW PRINTER SLOT #";:N$:(N$)8(N$)0SL(N$)KvíL$"X"50200KwíL$"O"50047KxIA23:IB37:IC3DPRINTER SELECTION & SLOT CHANGE"+JTð39990[JUú"****************************************"bJYâ6xJZú"(C) CENTRONICS"J\ú"(Q) QUME"J]ú"(E) EPSON"J^ú"(O) OTHER"Jdú"(N) NEW PRINTER SLOT ("SL")"Jeú"(Z) ZERO REPLACEMENT ("ZERO$")"!KfTWARE 1981""IHâ10:"SERIAL#"ZAP;7IJÖ34:"VER "VER:IKâ23:1:"DO YOU WISH TO CHANGE PRINTER TYPE & SLOT (Y/N)?";:L$:L$"Y"L$"N"49995ILíL$"N"ıIP×:"****************************************"IQD$(4) JS:H2:CC$"678901234567890123456789012345678901234567890123456789"=HCHH" 567890123456789012345678901234567890123456789012345678901234567890123456789";H H(27)ZE;H<òHFâ4:" **** EASYFORM ****" IGâ6:" (C) GARBO SOFc40515,G4ZC0ĺ(27)ZC:L2180:405068G9L299_G:L$(L):(L$,1)"0"İ40600:40511G>L" .........................................................................."G?39020GCGHD$"PR#0"GMG7H" 567890123456789012345256:1011,I:(3)250Č1169$ #x&214,255% :39:"*":0 30745J:(4)"RUN EASYFORM"x 32,234,3,162,2,1 73,0,224,201,76,240,7,202,15 7,128,192,16,243,2,162,20,76 ,18,212 xI952975:J:I,J: xI(952256):1010,952I