' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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,&"_]` L/浍굺L  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff 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 iõ`  \ 濭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`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp 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- ( D Ϡ@跻~!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 (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`:D$"BRUN ";F$;",A";CO;",S";SL;",D";D:CACO28:NC(CA)1:CBCA12NC:I1NC:S(CA1II)256(CAII)CA:L(S):CNI:L22L22&J0L:CV%(J,I)(SJ):P(SJ):::&AP0ī5470'::5::"S";::"AVE NEW GLOSSARY FILE"::5::"A";::"DD %100:K27ı*%K("D")F$FT$:5365E%K("S")F$F4$:5365j%K("O")İ45:K27F$A$:5365v%K27ı%64477:5335%:::"NOW LOADING CHARACTERS INTO WORKSPACE...":5368::700:%F$F1$BI0%F$F2$BI1&"LOADING "F$RITER GLOSSARY FILES CAN BE"::"SAVED BUT NOT LOADED. PRESS ANY KEY "::"TO CONTINUE...";:100:$FT$F1$:ID5ID8FT$F2$$:5::"D";::"EFAULT: ";FT$::5::"S";::"TART FROM SCRATCH: ";F4$::5::"O";::"THER FILE"::5::"ESCAPE":400:5000##K("/")İ5500:5000=#K("D")İ5600:5000W# K("R")İ5700:5000q#K("U")İ5800:5000#64477:5060#P::D$"CATALOG,S";SL;",D";D::"< PRESS ANY KEY FOR MENU >";:100::AP1İ7020:#s700:#c$:AP1ė:"APPLEWRIVE ";D;" SLOT ";SL::5::"L";::"OAD FILE";:22::"D";::"ELETE"::5::"S";::"AVE FILE";:22::"R";::"ENAME"::5::"ESCAPE";::22::"U";::"NLOCK/LOCK""100:K27ı"K("C")İ5200:5000"K("L")İ5300:5000 #K("S")İ5E: PRINTS:";:38:"CODE TABLE:":A160:"-";::!fI1NC:5:I;:16:(I159);:I$"25T"I$"1S"(I159)I$"S";:33:(16384)127ĺ:INC::4740!zJ0CV%(0,I):CV%(J,I)",";:::!D$"PR#0":"34,16::5::"C";::"ATALOG";:22::"/";::"DOW IN MEMORY."::"INPUT FILE: "F$::NC" CHARS.":ID3ĺI$"132F";:WI400w B0:I$"1S";:I1NC:BCV%(0,I)WIĺ:B02! BBCV%(0,I):(I159);::I$"S":I$"80F"::A160:"-";:::"REFERENCE WHEN PKASO";:39:"SUPERFONT":" NUMBER: YOU TYP250:150:K27ī4000-INCČ64477:4070r:D$"PR#1":(I31)" ";:I$"1S"(I31);I$"S":D$"PR#0":4070hD$"PR#1":I$"D":D$"PR#0":I ::"HIT ANY KEY TO INTERRUPT...":D$"PR#1":WI480:I$"80F";:I$"E"::"PKASO (TM) SPECIAL CHARACTERS N%(0,I):P,CV%(J,I):PP1::::::5:"E";::"NTIRE FILE";::22::"S";::"INGLE CHARS"::5::"D";::"UMP SCREEN";:22::"ESCAPE":100:K27ıK("E")İ4500:4000K("D")ĺ:4200:4000K("S")407064477:402000:LCV%(0,CN):24:"LENGTH "L:L21L214 L1ı I1L:XII1:VCV%(I,CN):Y6202:(V128)15:VV2256(V127):X,Y::: CA,NC1:CBCA12NC:PCB:I1NC:CA1II,(PCA)256((PCA)256):CAII,((PCA)256):P,CV%(0,I):PP1:J1CVK("N")LCV%(0,CN) ::"LENGTH IS "L" BYTES":CV%(0,CN)L::I1L:XII1:V0:Y6202:VVV(X,Y)0)(X,Y)5SP0):I21V0B :V", ";:CV%(I,CN)V::3500:2020T EF0CNNC1:NCCNV ::ED0:EF0: 15:I521:0,39I::) 27b::20:"WAIT"::&fNR1ī2250ZEF0ė::"NO CHANGES MADE...":200:EF1:23882146:L0:X3912:Y6202:X,Y)15L(X1)2:X1:Y20 ::::L0NR1LL LCV%(0,CN)ĺ"SHORTEN FROM "CV%(0,CN)" TO "L;:" BYTES (";:450:100:O"SPCC:Y6X38XX2:YY2<>A$"K"SPCC:X38XX2eCA$","SPCC:Y19X38XX2:YY2HA$"I"SPCC:Y6YY2MA$"N"SPCC:Y19X1XX2:YY2RA$"M"SPCC:Y19YY2WA$" "CC15CC:EF0\A$"*"İ2700a2040"X1XX2+A$"W"Y6X1XX2:YY2BA$"D"X38XX2cA$"R"Y6X38XX2:YY2y A$"E"Y6YY2%A$"C"Y19X38XX2:YY2*A$"X"Y19YY2/A$"U"SPCC:Y6X1XX2:YY24A$"J"SPCC:X1XX29A$":"RETURN":7:"Z X C";:19:"N M ,";:27::"B/W: ";::"SPACE"::CC0:X1:Y20:SXX:SYY:SPX,Y)CC:20,25:SP:SX,SY:X,Y)5SPX,Y):SXX:SYY5:X,Y:100:K132150K272200A$(K):EF1:A$"Z"X1Y19YY2:XX2  A$"SK27EF1:2388eINCCNNC1:NCCN:CV%(0,CN)0::::"ADDING NEW CHARACTER...":2700:200:2033tCNI:3000e:7:"W E R";:19:"U I O";:27::"CLEAR: ";::"*"::"MOVE: ";::"S";:11:"D";::" DRAW: ";::"J";:23:"K";::" DONE: ";:0)(Q0)PK%(PK)R48:PKPK162PK%(PK)48((OV%Q100)R10):PK%(PK1)4422(OF2):PKPK2:OV%3K2PK%(PK)51:PK%(PK1)44:PKPK26F6xK1İ79006OV%127PK%(PK)9:PKPK1:7710:7OV%9PK%(PK)9:PK%(PK1)57:PK%(PK2)66:PKPK3:YOUR FILE WILL SOON BE"::"TOO LARGE. PLEASE SAVE THIS FILE AND"::"START ANOTHER. "5PK1950İ100:K27PCPC1:7020:71005PCPC1:7020:74005K1İ79005Q(OV%100):Q0PK%(PK)Q48:PKPK16(R((OV%Q100)10):(R(J,AC):OF2İ7800::7650X47700::K2PK%(PK)51:PK%(PK1)44:PK%(PK2)50:PKPK44PK%(PK1)93:PK%(PK)13:PKPK1:76704K2PK%(PK)3:PK%(PK1)2:PKPK24WP0PK%(PK)22:PKPK1e5PK%(PK)13:PKPK1:PK1950ė:64477::"WARNING!...GS:PKPK2:PK%(PK)48:PK%(PK1)48:PKPK2:OV%48(LE10):7820:OV%48LE10(LE10):7820:7600k3~GS03PK%(PK)126:PK%(PK1)91:PKPK2:OV%71GS:7710:OV%48:7710:OV%48:7710:OV%48(LE10):7710:OV%48LE10(LE10):77104J1LE:OV%CV%PK%(PK1)91:PKPK2:OV%75:7700:OV%LE256(LE256):7700:OV%LE256:7700:7600o2LPK%(PK)3:PKPK1:76002QPK%(PK)126:PK%(PK1)83:PKPK2:PK%(PK)51:PK%(PK1)44:PKPK2:76002[GS12:75302`GS12:75552eGS0b3jPK%(PK)27:PK%(PK1)71D5K2:7455 1KID:ID8K3a1LECV%(0,AC):PK%(PK)AC31:PKPK1:WP0PK%(PK)22:PKPK11!K(OF3)47465,7500,7515,7525,7480,7505,7520,75501)PK%(PK)27:PK%(PK1)75:PKPK2:OV%LE256(LE256):7800:OV%LE256:7800:7600S28PK%(PK)126:K("I")İ1000:7100.0K("N")İ7200:7100?064477:7125v0 ::5:"START NEW FILE (";:450:100:K("Y")ı0*45:AF$A$:PK0:PC0:7020:034,160250:150:K27ı0ACI:ACNCČ64477:74100ID4K1:7455 1ID6ID10ID9I:"I-RES DISPLAY";:22::"N";::"EW FILE"::5::"P";::"RINT CHARS";:22::"ESCAPE":s/100:K27AP0::/K("E")İ7400:7020:7100/K("D")İ5000:7100/K("H")İ6000:7090/K("P")İ4000:7100/K("C")İ840:71000CHAR HEIGHT: ";::7BI;" BIT";::" CHAR REF: ";::CR1ĺ"LETTER":\.CR0ĺ"NUMBER":e.780o.7020[/34,16::5::"E";::"NTER CHARS";:22::"C";::"HANGE SPECS"::5::"D";::"OS COMMANDS";:22::"I";::"NSTRUCTIONS"::5::"H";: PRINTER TYPE: ";::PR$(ID):::" GLOSSARY FILE: ";::AF$::-" # CHARS: ";::PC;:18::"FILE SIZE: ";::PK;::" BYTES"::" OUTPUT FORMAT: ";:OF2Ğ:"APPLE II";::" APPLE ///":-OF3ĺ"APPLE II ";::"APPLE ///"::F." INCČ64477:60608,X250X20:YY25:Y173Y25:,LCV%(0,I):J1L:XX1:VCV%(J,I):K07:3(V128):VV2256(V127):X,YK:::XX5:6060,::,XI(0):AP1:7090F-l255::::7:"APPLE WRITER GLOSSARY FILE":I140:"_";:::" "OCK"::100:K27ı:+K("L")K("U")Č64477:5800P+45:IK::K27ıy+I("U")ĺD$"UNLOCK"A$",S"SL",D"D:+D$"LOCK"A$",S"SL",D"D:+p250:200:200::::3:0,0:62454:X20:Y25:0:1,11,190278,190278,11,1+150:K276150,ʺ::"DELETING "A$:D$"DELETE"A$",S"SL",D"D:]*D:"ENTER PRESENT FILE NAME: ";:50:K27ı*IPP$A$:::"ENTER NEW FILE NAME: ";:50:K27ı*S::"RENAMING "PP$", "A$:D$"RENAME"PP$","A$",S"SL",D"D:+::5::"U";::"NLOCK";:22::"L";::K("D")İ5560:200:3)K("S")İ5570:200:D)64477:5520c)11::" ";::100:K27ı)K49K50Č64477:5560)11:(K);:DK48:)27::" ";::100:K27ı)K49K55Č64477:5570)27:(K);:SLK48:)45:K27ı-*L",D"D:D$"OPEN"AF$",S"SL",D"DX(@D$"WRITE"AF$:J0PK1:(PK%(J));::D$"CLOSE"AF$:h(^45:K27ı(_::"SAVING "A$:D$"BSAVE";A$;",A"CO",L";PCO;",S";SL;",D";D:700:(|::5::"D";::"RIVE ";D;:22::"S";::"LOT ";SL;(100:K27ı)TO EXISTING FILE""'100:K27ı;'K("S")SA0:5408T'K("A")SA1:5406e'64477:5402u'45:K27ı'AF$A$' AF$""PC0ı'!::"WRITING "AF$:SA1ĺD$"APPEND"AF$",S"SL",D"D:5440("D$"OPEN"AF$",S"SL",D"D:D$"DELETE"AF$",S"S "G9,5:TW |G18400n G:PD$::"LEAVE THE PRINTER IN:":::"1";::" - NORMAL CHARACTER SET MODE, OR" DH::"2";::" - DOWNLOADED CHARACTER SET MODE" H:A$::PA$:A$"1"ĺSC$:PD$:3100 IA$"2"ĺDC$ pIPD$:.!I:"PRINT A SAMPLE AEASE..."$CDC$I$"M'":SC$I$"M$"<CDL$I$"M-"I$"MI"S\DTPCA1:PA$:DL$;`fD9,5:TWnDI0NC1$EL(A(TP)CA):L8L8EA128LEI$;(I32)"BH";PFJ1L:I$;(JCAA(TP));"B";:FL8āJL8:I$"0B";: GTPTP2::I$"4B"@L(A(TP)CA):L11L113?":" @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^"f?:"ONE MOMENT PLEASE ...";?DL$I$"M%A":DC$I$"M2":SC$I$"M0"?9,5:TW@TPCA1:KNC1:KCN%KCN%t@:PA$:I0K4/STEP 2.":GM?"PRESS ";::"1";::" IF YOUR PRINTER'S A 92 OR 93,"O?:"OR PRESS ";::"2";::" IF YOU'RE USING AN 84:":"";A$:CN%95(A$"2")32R?:"YOUR PRINTER'S DOWNLOADED CHARACTERS":"ARE FORMED AS 7-DOT-HIGH PATTERNS."v\?:CN%63ĺ"NI0K":L(A(TP)CA):L9L9.:A128LM`;DL$;I$;(I32)"B";I$;"1B";o18400>3100>DOWNLOAD-OKI H?:"DOWNLOAD TO OKIDATA 92/93, 8;:7TPTP2:x71840027DOWNLOAD-STAR10X}@8:"DOWNLOAD TO GEMINI STAR 10X/15X SERIES."::"ONE MOMENT PLEASE..."8DC$I$"M$"I$"1B":SC$I$"M$"I$"0B"9DL$I$"M*"I$"1B"l9TPCA19PA$:KNC1:K96K9699,5:TW:FLIP4:ENT PLEASE..."23DC$I$"M%"I$"2B":SC$I$"M0"J3DL$I$"M&"I$"0B"VX4TPCA1i4PA$:I0NC1 5L(A(TP)CA):L11L115A128L5DL$;I$;(I32)"B";I$;(I32)"B";I$;(A)"B";L6J1L:I$;(JCAA(TP));"B";:6L11āJL11:I$"0B"INTER ON-LINE.";:A$:&0DT012900K81::"DOWNLOAD TO WHICH DEVICE?"p1:I1ND::I;::" - "DD$(I):2"-->";:A$:DT(A$):DT1DTND3100d2DT13000,14300,16100,172002DOWNLOAD-EPSON,3:"DOWNLOAD TO EPSON FX SERIES."::"ONE MOM00,FO$""ĺ:G$:11200/,FG11600,11900>P-PKASOSAVEc-D$"BSAVE"SO$",A"P2",L"CL",D"OS$m.3100|.APPLEWRITER II SAVE.19800D/3100/ DOWNLOAD 0A$"3"210000NC135000p0((16256SLOT16)16)5ĺG$"PLEASE PUT PR:::"WARNING! ! !":M(222)::M0M15ĺ"APPLESOFT ONERR CODE #";M:9050e"::" WITH FILES INTACT";:100:700:500-100,EPSON/GRAFTRAX,APPLE DMP,OK82/83,IDS B/W,CENTRONICS,NEC OR C.ITOH,IDS COLOR PRISM,OK92/93t;!STAR GEM.10X/15X;! 173,101,200,133,6,96;`":5:"INTERNAL SPECIAL CHARACTERS ARE NOT"::"AVAILABLE ON THE CENTRONICS 739."::38400:216,0:K<(#: CHARS.8HI":F3$"SPECIAL CHARS.VARIABLE":F4$"NULLCHAR":AF$"NONE SAVED":I1MAX:PR$(I)::PK%(2047):CV%(21,96):ID78800:!I768773:!N:I,N:I:!X(53247):X(49408):!768:X(6):!X44ID4:IAID:!^;! EPSON MX-70,OLD EPSON MXBI)91OV%NV%:94!CO8.540961:PCO:I$(9):D$(4):MAX11:SL6:D1:CR1:AP0:OF2:NR1:255:ID(49663):IAID:ID1IDMAXĺD$"RUNERROR"99!PR$(MAX)9>!ID11ID3:IA39u!ID5ID8BI1}:!F$"NONE LOADED":F1$"SPECIAL CHARS.7HI":F2$"SPECIALV%NV%1(1BI):OV%OV%64C8OV%32NV%NV%2(2BI):OV%OV%32l8OV%16NV%NV%4(4BI):OV%OV%168OV%8NV%NV%8(8BI):OV%OV%88OV%4NV%NV%16(16BI):OV%OV%48"OV%2NV%NV%32(32BI):OV%OV%29,OV%1NV%NV%64(64&7OV%13PK%(PK)9:PKPK1:7710:R7OV%22WP0PK%(PK)9:PKPK1:7710:~7OV%0PK%(PK)9:PK%(PK1)66:PKPK2:7(K2)(OV%3)PK%(PK)3:PK%(PK1)3:PKPK2:7PK%(PK)OV%:PKPK1:7NV%0:OV%128NV%1:OV%OV%1288OV%64NPICTURE":9 +R"OR A MEDIUM PICTURE. THE ACTUAL SIZE":d 0R"OF THE PICTURE DEPENDS UPON WHICH": 5R"PRINTER YOU HAVE. CHOOSING A MEDIUM": :R"PICTURE ADDS 2 TO THE 'H' COMMAND.": bR"ENTER S OR M FOR PICTURE SIZE OR 'ESC'"!gR"FOR THE PREVIND YOU WILL RETURN TO THE MAIN MENU."6>D$"PR#"SLOTW>I$;X0%","Y0%","X1%","Y1%"W">I$;1SZ%RT%IVD%JST%WF%","VX%","HX%","DNS%"H"?D$"PR#0"?R R * * * STANDARD SIZES QUESTIONRR2000 &R"YOU MAY PRINT EITHER A SMALL ;15000>,> * * * DUMP THE PICTURE2><>2000h>"THE PICTURE YOU HAVE CHOSEN IS NOW":>"BEING SENT TO THE PRINTER. IF YOU WISH":>"TO STOP THE DUMP, JUST HIT THE SPACE":>"BAR. THE PICTURE WILL STOP BEING SENT,":%>"A;:"L";:%;"EFT WINDOW";:203;:"B";:I;"OTTOM WINDOW":W$;:"R";:o);"IGHT WINDOW";:20.;:"ESC";:3;" TO PREVIOUS MENU"`;A$j;(A$)27ı;MC$"PLRTB":3000;MC%15200;MC%51000,52000,53000,54000,55000RINTING. THE WINDOW":D:"SIZE MUST BE SET BEFORE THE PICTURE":r:"IS PRINTED. A FULL HI-RES SCREEN IS"::"280 POINTS WIDE BY 192 POINTS HIGH.":I139:"_";:::::"P";:;"ICK FULL/WINDOW";:20;:"T";: ;"OP WINDOW":" x7A$7(A$)27ı,7MC$"ID":3000<7MC%14200Q7MC%41000,42000\714000b:~: * * * WINDOWING MENU::2000:"YOU MAY PRINT THE FULL PICTURE IN THE"::"HI-RES SCREEN OR YOU MAY WINDOW OUT A"::"SECTION FOR PINVERSE OR":96"DIRECT PRINTING OF A PICTURE. THE":j6"OTHER IS TO CHOOSE THE DOT DENSITY YOUR":6"PRINTER USES."7I139:"_";:::7:"I";:7"NVERSE/DIRECT";:207:"D";:#7"ENSITY":(720::"ESC";:-7" TO MENU@320::"ESC";:%E3" TO MENU"-3A$=3(A$)27ıP3MC$"RC":3000`3MC%13200u3MC%31000,3200031300066 * * * FORMAT MENU6620006"THERE ARE TWO WAYS TO AFFECT THE PRINT": 6"FORMAT. ONE IS TO CHOOSE NG":/2"OPTIONS OFFERED BY PKASO/U. ONE":`2"IS ROTATION OF THE PICTURE ON THE PAGE.":2"THE OTHER IS CENTERING OR LEFT":2"JUSTIFYING ON THE PAGE."+3I139:"_";:::,3:"R";:13"OTATION";:2063:"C";:;3"ENTERING":/"ERTICAL EXPANSION";:20.b/20::"ESC";:Gg/" TO PREVIOUS MENU"O/A$_/(A$)27ıs/MC$"SVH":3000/MC%122000MC%21000,22000,23000 01200022 * * * POSITION MENU2220002"THERE ARE TWO PICTURE POSITIONIERROR TRAP&216,0:%&G$::U&:"THIS OPERATION DID NOT GO AS EXPECTED.":&l:"PLEASE CHECK YOUR DISKETTES AND "::"START THE OPERATION AGAIN."&Н:"PRESS ANY KEY:";:A$::40000&43100P/::" INPUT FILE: "SI$::" FORMAT: "FI$" DRIVE: "SL${%u:" OUTPUT FILE: "SO$::" FORMAT: "FO$" DRIVE: "OS$%u:" ";:NC1Ğ%\vCL$:%v34,12:%:G$" ";::"PLEASE LOAD A CHARACTER SET FIRST. ":::%I01500::3100 &@ID "FI$:"CHARACTER SET."::35003$QZ01500::E$RA$"4"3100U$vRNC135000$R"PRESENT CHARACTERS NOW BEING LOADED"$R"INTO THE PKASO/U ON-BOARD MEMORY."$R6,SLOT$RD$"BRUN UBCHARS,A$300"$RD$"BLOAD TWIGL,A$300"$R3100;%0u34,2OWNLOAD FEATURE."F#~O::"* LOADS CHARACTER SETS INTO THE PKASO/U":#O::"RETURN";::" TO CONTINUE, "::"ESCAPE";::" TO GO BACK TO MAIN PKASO MENU."#PD$"BLOADTWIGL,A$300"#xPA$::A$(27)ĺD$"RUNMENU,D1"#P:!$@QG$:SI$" IS NOT A VALTRANSFERS CHARACTER SETS FROM OTHER":" SOFTWARE SYSTEMS TO PKASO FORMAT."{"N::"* TRANSFERS PKASO CHARACTERS TO DISK""N" FOR USE WITH OTHER SOFTWARE.""LO::"* DOWNLOADS CHARACTER SETS TO YOUR"#VO" PRINTER - IF YOUR PRINTER HAS THE":" DLPHABET?":::"Y";::" TO PRINT -->:";:A$:o!8JA$"Y"ĺPA$::I329632:J031:(JI);::::I15::x!KPD$!dK3100!K !XM:G$"THIS OPTION NOT SUPPORTED.":20900:!M:::::" PKASO CHARACTER CONVERSION ROUTINE ":K" N::"* .":10oǺ"ENTER F OR W FOR FULL/WINDOW OR 'ESC'"R0tǺ"FOR THE PREVIOUS MENU. ->"Z0ǾA$j0ǭ(A$)27ı0ǭA$"F"WF%0:510000ǭA$"W"WF%192:510000ǫ511000 ˲0%˲ * * * LEFT EDGE QUESTION0*˲04˰20001>˺"THE LEFT SIDE OF THE HI-RE/WINDOW QUESTION/BDz /Lǰ2000O/VǺ"YOU MAY PRINT A FULL HI-RES SCREEN OR":/[Ǻ"YOU MAY PRINT A SECTION OF IT KNOWN AS":/`Ǻ"A WINDOW. USE THE 'W' COMMAND TO PICK":/eǺ"A WINDOW. CHOOSING TO PRINT A WINDOW":0jǺ"ADDS 192 TO THE 'H' COMMANDOSING LOW DENSITY":D.B"ADDS 128 TO OPTION 2 OF THE 'H' COMMAND."q.G"ENTER H OR L FOR DENSITY OR 'ESC' FOR".L"THE PREVIOUS MENU. ->";.tA$.~(A$)27ı.A$"H"DNS%0:42000.A$"L"DNS%128:42000.42100.8Dz/=Dz * * * FULLA$"D"IVD%32:41000 -41100&-D- * * * DENSITY QUESTIONJ-T-$2000-."MOST PRINTERS HAVE 2 GRAPHICS DENSITIES":-3"WHICH DETERMINE HOW CLOSE THE DOTS ARE":-8"PRINTED TOGETHER. YOU CAN CHOOSE HIGH":.="OR LOW DENSITY. CHOS IS AND IS KNOWN AS DIRECT.":N,d"INVERSE IS THE STANDARD WAY TO PRINT.":z,i"DIRECT ADDS 32 TO THE 'H' COMMAND.":,n"ENTER I OR D FOR INVERSE/DIRECT OR",s"'ESC' FOR PREVIOUS MENU. ->";,A$,(A$)27ı,A$"I"IVD%0:41000-0004+F"THERE ARE TWO WAYS TO PRINT THE DOTS OF":a+K"THE HI-RES SCREEN. ONE IS TO PRINT":+P"EACH WHITE DOT AS BLACK. THIS IS KNOWN":+U"AS INVERSE. THE OTHER IS TO PRINT THE":+Z"BLACK DOTS AS BLACK AND LEAVE THE WHITE":,_"DOTS ATO THE":*<}"'H' COMMAND.":N*A}"ENTER L OR C FOR JUSTIFICATION OR 'ESC'"p*F}"FOR THE PREVIOUS MENU. ->";x*d}A$*n}(A$)27ı*x}A$"C"JST%0:32000*}A$"L"JST%16:32000*}32100*(*- * * * INVERSE/DIRECT QUESTION*2+<220004)}"THE PICTURE MAY BE PRINTED STARTING AT":d)#}"THE LEFT MARGIN OR IT MAY BE CENTERED.":)(}"IF YOU CHOOSE LEFT JUSTIFICATION, IT":)-}"WILL PLACE THE PICTURE AT THE FAR":)2}"LEFT EDGE OF THE PAPER.": *7}"LEFT JUSTIFICATION ADDS 16 YOUR CHOICE OR 'ESC'"A(my"TO RETURN TO THE PREVIOUS MENU. ->";I(|yA$Y(y(A$)27ır(yA$"A"RT%0:31000(yA$"B"RT%8:31000(yA$"C"RT%12:31000(yA$"D"RT%4:31000(y31100(} (} * * * JUSTIFICATION QUESTION( })}PAPER. THE FOLLOWING":G'Jy"ARE YOUR CHOICES AND THEIR AFFECTS ON":`'Oy"THE 'H' COMMAND":'Ty" A. 0 DEGS (+ 0)"'Yy" B. 90 DEGS (+ 8)"'^y" C. 180 DEGS (+12)"'cy" D. 270 DEGS (+ 4)"(hy:"ENTER LETTER OFZ(A%0)(A%255)23000)&dZHX%A%:23000/&yN&y * * * ROTATION QUESTIONT&"y^&,y2000&6y"THE PICTURE MAY BE PRINTED SUCH THAT IT":&;y"IS ROTATED 0, 90, 180, OR 270 DEGREES.":&@y"THIS MAY BE USED TO FIT A LARGER":'Ey"PICTURE ON YOUR "PICTURE TOO WIDE, IT WILL BE CUT OFF AT":R%Z"RIGHT MARGIN BY THE PKASO/U.":~%2Z"ENTER 0-255 FOLLOWED BY FOR"%5Z"HORIZONTAL EXPANSION OR 'ESC' FOR THE"%7Z"PREVIOUS MENU. ->";%$Y"YOU TO MAKE THE PRINTED POINTS OF THE":l$Z"PICTURE WIDER. ROTATING THE PICTURE":$Z"DOES NOT AFFECT THE DIRECTION THAT THE":$ Z"DOTS ARE STRETCHED. 0 OR 1 CAUSES NO":$Z"HORIZONTAL EXPANSION. IF YOU MAKE THE":,%ZXPANSION OR 'ESC' FOR THE"4#OV"PREVIOUS MENU. ->";<#TVA$L#^V(A$)27ık#cVA$;:"";B$:A$A$B$:4000#rV(A%0)(A%255)22000#|VVX%A%:22000#Y #Y * * * HORIZONTAL EXPANSION QUESTION #Y #Y2000$Y"THE HORIZONTAL EXPANSION OPRINTED POINTS OF THE":G"V"PICTURE TALLER. ROTATING THE PICTURE":w"V"DOES NOT AFFECT THE DIRECTION THAT THE":""V"DOTS ARE STRETCHED. 0 OR 1 CAUSES NO":"'V"VERTICAL EXPANSION.":"JV"ENTER 0-255 FOLLOWED BY FOR"#MV"VERTICAL EOUS MENU. ->";!lRA$&!vR(A$)27ıK!RA$"S"SZ%0:VX%0:HX%0:21000p!RA$"M"SZ%2:VX%0:HX%0:21000{!R21100!U!U * * * VERTICAL EXPANSION QUESTION !U!V2000!V"THE VERTICAL EXPANSION OPTION ALLOWS":"V"YOU TO MAKE THE תժժժժՁȀĈժ՚ժժf 0@3f3fLժժժժժժժ՚: '40 KS OUT TO .0625.":N:I$"2SYOU CAN ALSO USE THE OTHER CHARACTER SET"I$"S"zI$"2SOR EVEN MIX THE TWO SETS:"I$"S":I$"S THE SUM "I$"6SO"I$"2S2N"I$"6S,"I$"S FOR ";"(1 "I$"6SD"I$"2S N "I$"6SD"I$"S 5) IS 110"I$"E"D$"PR#0"HURIC ACID IS H"I$"6S"(34);I$"SSO"I$"6S$"I$"S.":y"VOLUME OF A SPHERE = "I$"6S."I$"S/"I$"6S#:"I$"SR"I$"6S-"I$"S.":"FOR WHAT ANGLE DOES SIN "I$"6SR"I$"S = 1?":"A "I$"6SF"I$"S B IF AND ONLY IF B "I$"6SD"I$"S 7.":"4"I$"6SP,"I$"S WOR:I$"80F":Ah"THIS IS HOW SPECIAL CHARACTERS CAN BE USED:":Gw{|"HIT "I$"6SB"I$"SS TO STOP A BASIC LISTING.":"THE SIGNAL IS 27.5 VOLTS "I$"6S="I$"S1.0.":"THE TEMPERATURE IS PRESENTLY 54"I$"6S;"I$"SF.":2"THE FORMULA FOR SULPI3257:(I);:I%,I$"S";:I$"6S"<1I5882:(I);:IG6I$"S"~;::"FILE LOADED INTO APPLE'S MEMORY CONTAINS:":@ SET SPECIAL CHARACTER MODEEI$"2S";OI3261:(I);:ITI$"S";:I$"2S"YI6290:(I);:I^I$"S" c:D$"PR#"SLOT::I$"80FINTERACTIVE STRUCTURES INC. PRESENTS"::" A SPECIAL CHARACTER DEMONSTRATION"::"PRODUCED BY THE PKASO (TM) INTERFACE"::"FILE LOADED INTO PKASO/U'S MEMORY CONTAINS:": SET SPECIAL CHARACTER MODEI$"6S";'E 6, 7, OR 8 DOTS":+"IN HEIGHTH."::1b:"* * * LOADING CHAR SET IN ON-BOARD RAM"D$"BRUN SPECIAL CHARS."VDR"HI,A$8800":"* * * LOADING CHAR SET IN APPLE MEMORY":D$"BRUN UBCHARS,A$300"D$"BRUN FONT.BYTE,A$8800"  ;A$:4000-8Z׭(A%0)(A%Y0%)(A%191)55000?8dY1%A%:550000U8dY1%A%:55000O 191 BUT MUST BE GREATER":J7׺"THAT OR EQUAL TO THE TOP SIDE OF THE":b7 ׺"HI-RES WINDOW.":72׺"ENTER 0-191 FOR BOTTOM WINDOW OR 'ESC'"77׺"FOR THE PREVIOUS MENU. ->";76rӭ(A%0)(A%Y1%)54000P6|Y0%A%:54000V6ֲz6ֲ * * * BOTTOM WINDOW QUESTION6ֲ6ְ20006ֺ"THE BOTTOM SIDE OF THE HI-RES WINDOW IS":6ֺ"Y1 IN THE 'W' COMMAND. IT MAY BE ANY":7׺"NUMBER FROM 0 T ANY":65Ӻ"NUMBER FROM 0 TO 191 BUT MUST BE LESS":g5Ӻ"THAT OR EQUAL TO THE BOTTOM SIDE OF THE":5"Ӻ"HI-RES WINDOW.":5JӺ"ENTER 0-279 FOR TOP WINDOW OR 'ESC'"5OӺ"FOR THE PREVIOUS MENU. ->";5TI(16368)5YI(16384):I128541056^ӭI16384):I12853105,4vϭI155I(16368):=4{τ"";A$:4000a4ϭ(A%0)(A%X0%)(A%279)53000s4X1%A%:53000y4Ҳ4Ҳ * * * TOP WINDOW QUESTION4Ҳ4Ӱ20004Ӻ"THE TOP SIDE OF THE HI-RES WINDOW IS":5Ӻ"Y1 IN THE 'W' COMMAND. IT MAY BE'W' COMMAND. IT MAY BE ANY":P30Ϻ"NUMBER FROM 0 TO 279 BUT MUST BE GREATER":35Ϻ"THAT OR EQUAL TO THE LEFT SIDE OF THE":3:Ϻ"HI-RES WINDOW.":3bϺ"ENTER 0-279 FOR RIGHT WINDOW OR 'ESC'"3gϺ"FOR THE PREVIOUS MENU. ->";3lI(16368)4qI(";2I(16368)/2I(16384):I12852105H2˭I155I(16368):Y2˄"";A$:4000t2˭(A%0)(A%X1%)520002X0%A%:520002ϲ2 ϲ * * * RIGHT WINDOW QUESTION2ϲ2ϰ20002&Ϻ"THE RIGHT SIDE OF THE HI-RES WINDOW IS":3+Ϻ"X2 IN THE S WINDOW IS":=1C˺"X1 IN THE 'W' COMMAND. IT MAY BE ANY":l1H˺"NUMBER FROM 0 TO 279 BUT MUST BE LESS":1M˺"THAT OR EQUAL TO THE RIGHT SIDE OF THE":1R˺"HI-RES WINDOW.":1z˺"ENTER 0-279 FOR LEFT WINDOW OR 'ESC'"2˺"FOR THE PREVIOUS MENU. ->ժժժժժՎժժՆܪf|yc@fcCGժժժժժժժժՆOLOSժժժժժժժժժժߪժժvg?xpg ժժժתժˈɈߪժժժ̰ժժժժժժتժժժժժժ՞ժժժժժՆ̀תժՎߪ?f|ys@?vcgOժժժժժժժժՎժժժժժժժժժժժ8wgO?|pgLתժժժժȏǏժժժժժժժժժܪժժժժժժ՚ժժժժժՃȀߪժՎת0~ @3>f ժժժժժժժժՎժꯝժժժժժժժժժXFaL@@aNժժժժժժժժժժժժժ֪ժժժժժժՏ𠀸պժժժժժՃȸĘժ՞ժ~ xa@3~cGժժժժժժժ՚ժՏժժժժժժժܪժժ͇ɇXFaLx@aOتժժժժժժժߪժժժժժժתժժժժժժՃպժժժժժժ՚ժժߪժժȈFaL @aMتժժժժժߪժժߪժժժժժժתժ̼ߪժժժժժՃ֪ժժժժժպժժ?~ xs@?~0sgOժժժժժժժՁպljχժժժժժժՎЉժժתժժLjvgO?~|pgLتժߪժժժߪ؆ժժܪժժժժժժժժ܁תժժժժժՁܪժժժժժժպժժ< xc@>`cCժժժժժպժժՃպ͈ɏܪժժժתժժՃժתժժժɀvg?~xpg تժתժժժގߪժժتժժժժժժժժ߃ժժժժժժՁتժժժժժתժժժժժժժ՚ժժՇψψߪժժժުժժߪժժժɏǏժժժժժ׎ժתժժ تժժժժժժժժ׃ժժժժժժՁ                     Q"U*U(U*w~?+W*U+*UQ* D  T*U*w.U+j] (}?w*U;uoU*U*"D*U~T@j]{~jk8@P*E*(U:u?w*U+:E*U*  D *T*U*wn_;`}hW~/W*}+toU"U*U"D P*UT*}U;T @@**un}:o U Q"@( U*U*unU @(U*w}+w~U*woU+U *unU+U("*Un? P:]+U|TD*U U*unn];un]"D*D *U*U:u*U @* U* hU];w Q"u;U "D*Uj}?wkzo] @"@*]:Uj}`uw*}j?W*U*U*U:wT"?}_ /T:U*U D*U@"D(U*]:u/ T~.j*U*U*U{?wn/*|jG~]8@~]*Uj] @ U*U*Uj] U:+|_*U*U*U*U*W*]z_+/|w]>U?_;U*U*u`}"@ @Q*U*uj} hU?.Tp_*U*U*U*U:|#}?_(q*_;U*U{(U"E U"U**U*U*UzTz*T*U*U*U*U*U U*U*}  |U~z.U*U*U*uo?@zh?u/*p"D Q*U*U*U? UW+|*U*U*U*U*U*Uj};wTz/|]~w~?w~]+U*U*Uz(Q"@*_~U*QbU"@*U*U*U*U@(U~/"(U*U*U*U*U*U*U*}?u~? ]u_W(u~/UU*U*u~?(` /U8@{Q"@U*T U*U;Tz"U*U*U*E*U*U*U~]*{*+uo_(WTk]{W8q~/UU*U UnP?U U**D(U*@*Uj].;u**U*U "U*U+U*U; un~n:wo_;Uj]*@*U* T"|"E*U:Uun_?wn}wn;U*P*U**U*U;U UzTz*UUn_?j]*U*DP*:DU*"Un]o]:U*xW*U(  T(U*U*U:.*@j8~/Un*U*(];U*U*U*D P*u~}  *U*P*Uj]{_:W*`_*D*T*U*U*U;j(wn:n];wn]:W*U+@"_*U*U*U*UT*Q(*U U*]:wn{w*U*U "D * U*]:U :W (wjU*U*U?W*U"T(UjTP:@h]{h;E "DU*U"U*];~}?.]*U*."T("DP*U*]+u*P8~}{w/U*u+];U*U*UP*U@P;wU*@ SAL{yW5#!1BCSSSSSCB1!#5Wy˘fC!4VgͼgV4!CfB߼gE# 2CTevveTC2 #Egܺe24EgxxgE42e߾yhWF65%$$$%56FWhyܪwD"3Uw̻wU3"Dwɸutttu`߽yWF55FWyݪU23Ef̻fE32UB:ޫV32Df˺fD23V۹uSB11BSu&ϽzzzzzݪwE"3Uv˺vU3"Ew۹ucRB10 01BRcu`x߼g52CevveC25gܹeC!#5FWhxxhWF5#!Ce @̚gE"2Te˺eT2"Eg캗uS2 $5FFVWWWVFF5$ 2Su@*U U*]:wn{w*U*U "D * U*]:U :W (wjU*U*U?W*U"T(UjTP:@h]{h;E "DU*U"U*];~}?.]*U*."T("DP*U*]+u*P8~}{w/U*u+];U*U*UP*U@P;wU*@ (T*A: Uj}/wo~];W**@*U*"U*U*E(U{u>~o] u~};WjU* w*@Q* _U*U*U;ETn}{Ujwn}+U*U+U* "D*U:w*QzwP TP/Tj}{w*U"p@*UP z DU*TjU~]+U*x]*U "E*U*U*U;/@:Pn(o};Un]{w*U*T U*U*U*U"E U*];W`"TQ*@ Uj}{o];W*_*U"U*U*U*Uk u~Az/U:wn]+W*]*U*D*U*U"@"TQ*U(TjU;wn]?w*U*U**"@*"Q*U*]+U :w*(zw/U*u.U;U*U*T*U;tU**wj}+@Q*"UjU{nU+U*xU"E**D **U*Uzw.u~xw(wn}?w.U*t(U;U*U*UP*ww*P"T*U{wn;wn];UQ"E@(U*U*U*U U*UtoUU+U.U"(Q;W* U:w~}{T P_h}?W*t@Q"U U*U;wo];U*U+U "D( U*U*U (*unU*U*] U*U;w.U"@ U*w~_ ;n_+U D*UjU(/ U~] Ujn]**U*U*}w.U P~?q?Ut*U*T*UpUQ"U*u*U{/(z*\z_+U*U*U*]]*?hP~`~?88W*U*}T*U*U*u(Uj*|W*U*U*U*U*]*Un_{ j tU?Wn]{/]W*U*U*U uoU@T*U*U*u(Un}_*@w.U**U*U*}P~@?w*}*U*U.@( @("*U*U*Ujun}w~_ \*U*U*U*T*U*U*U*}~_}_p u;W~_z~]:U*U*U*Ukzuu}/E DD**U*U>U~n_*|+U*]*U*T*U*U:unU_Pt??w~U~U:U*U*U*U:D:w*"U`T@**T*U*U*U{/E  T*U*E*U*D(U"U:U{w/Q~_~*U?WTz_+U"U "Uz?jU`/|_*> D D U*U*UnP~}{U T*U*U**T*U*U*U*}?w~*@*uu+U~WzU{;U*U*U"U*P.uU(AD*U*Ej@*U{n}o]**Q*U*E"D*U*W*]*uo ]?A~h}_;w*n]+U E* }"U(U*unUU?]{oU;Et*U+"D*U*U~U*U~P (}@U{{W T*U"T*~TQ*U*@(Uzwwn]+Ux_*U*@U*U*U*uo;(U{h?]{w]+U*T*un]*u*U"E**@jU+*UjP(U:u~wn]+`*U"T"D*U*W*]:u~?(]{Aj?~}{wn]*w* w*U*U*U*E*U@ ͼxxgfVVUEEEEEUVVfgxx˪wfUDC3""""3CDUfwBݼxwgVUED444333444DEUVgwxܻvfUTC32""!!!!""23CTUfvͽ̻wfUD33""33DUfwʺ`ͼxxxgggggggxxx̻wfUTD3""""3DTUfwB<ͻxgVUD3#""#3DUVgx˺vvveeeeeeevvv&ͽ̻wfUD43""34DUfw˺`xݼxgVUD43##""""##34DUVgxܻwveTTCC322222223CCTTevw!B̫wfVED3#""#3DEVfw˺wveeTTTDCCCDTTTeevw@  txtvvyIfF swy8wgwxhh7h0f`yiyw6Ȍhsxh<sk̆IEgaytgI`tkʻxxgeb8u4xssȻgyxsD89xc7cxIsh8x7ʘ8$7Wdhw@s|pwxT@IVwxwxx緎yvqh9xpaS5siwwgt vu9yW07yf7@lv˺1v!HywS fGLwFp ̊wSg˩qbFslsܦw1uh0kfxc˷ |p8YD:;jgzx3IiyQsLfȆYs̹1#`~Lpȳ6̸I˼˧tFr30zzhYxUS"26>xFl˼ܷwvsug!,ghy̛̝wsu8̶̺cyg(|W{ic˸Hwvfw7?lg8lq&xXܛ̻#HˇBܼ˙#̙fwywxʼEX˚dh8w|0 ǦC˜̞kgˆdVӇ w|5ۄƜ̷njC˗2 ΘFi̧͇̽w˄Iܸ0|sȌy|xwxˊ̬sʙʘT1#}3::W"NOW WE'LL STRETCH THE PICTURE OUT USING"\"A CTRL-I 32,1,3 H COMMAND."afI$"32,1,3H"kI$"E"::"NOW WE'LL STRETCH THEI01000:I:16302,0FD$"BLOADWINSTON CHURCHILL.PIC,A$2000"WD$"PR#"SLOTcI$"N";"INTERACTIVE STRUCTURES INC. PRESENTS":" WINDOWED AND ASPECTED GRAPHICS": "PRODUCED BY THE PKASO (TM) INTERFACE"::,*"THIS IS48H" GI$"E"\ L"THIS PICTURE IS PRINTED BY USING A 10 IN OPTION 1 OF THE 'H' COMMAND."i VI$"10H"t `I$"E" eD$"PR#0" j: :18:"PKASO/U (TM) HI-RES SCREEN PRINT":"DEMONSTRATION LOADS A PICTURE FROM DISK":"AND THEN PRINTS IT."  HIRES GRAPHICS"::"PRODUCED BY THE PKASO (TM) INTERFACE" :::"THIS PICTURE IS PRINTED BY USING A 0 IN OPTION 1 OF THE 'H' COMMAND." )I$"0H" .:::: 3"THIS PICTURE IS PRINTED BY USING A 48 IN OPTION 1 OF THE 'H' COMMAND." =I$" :18:"PKASO/U (TM) HI-RES SCREEN PRINT":"DEMONSTRATION LOADS A PICTURE FROM DISK":"AND THEN PRINTS IT." I01000:I :16302,0 D$"BLOAD GRAPH,A$2000" D$"PR#"SLOT I$"N";> "INTERACTIVE STRUCTURES INC. PRESENTS"::" NTERACTIVE STRUCTURES INC. PRESENTS"::" LORES GRAPHICS"::"PRODUCED BY THE PKASO (TM) INTERFACE"z dI$"10D" nD$"BLOADLONUT" sD$"PR#"SLOT x DUMP PICTURE }I$"10D" SKIP TO TOP OF FORM I$"E" D$"PR#0" :o"::"DISK, THEN PRINTS IT."^ 2((16256SLOT16)16)5Ģ22:"PLEASE TURN ON PRINTER":50o 7I01000:I AD$"BLOADLOBALL" F SELECT LORES GRAPHICS WITH NO TEXT K16304,0:16300,0:16302,0:16298,0 PD$"PR#"SLOT UI$"N";m Z"I  16384348162I$(9):D$(4):SLOT0YSLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)#((FE15FE32)(FF32))25 (:18:"PKASO/U (TM) LO-RES SCREEN PRINT "::"DEMONSTRATION LOADS A PICTURE FROM     "THE PICTURE INDEPENDENTLY OF THE SIZE.":[/"VERTICAL EXPANSION CONTROLS THE HEIGHT":/"AND HORIZONTAL CONTROLS WIDTH.":C/I139:"_";:::D/:"S";:I/"TANDARD SIZES";:20N/:"H";:S/"ORIZONTAL EXPANSION":X/:"V";:]27ıp+A$"1"PG%0:110006z+A$"2"PG%1:11000A+11100G.`. * * * SIZING MENUf.p.2000."THE PKASO/U ALLOWS YOU TO PRINT TWO":/"DIFFERENT STANDARD PICTURE SIZES. YOU":/"MAY ALSO SET THE HEIGHT AND WIDTH OF":+ /AGES'.":7+"EACH PAGE IS A BLOCK OF MEMORY WHERE":e +"A PICTURE CAN BE STORED. YOU LOADED":%+"THE PAGES AT THE BEGINNING OF THE":*+"PROGRAM. NOW YOU MAY PRINT EITHER ONE.":/+::"ENTER 1, 2, OR 'ESC' FOR MENU ";\+A$f+(A$)I%0:A$A$" ":A%05I%I%1:C$(A$,I%,1)^((C$"0")(C$"9"))(C$" ")A%1mI%44030(C$"")(C$" ")A%1(A%0)A%((A$,3))g** * * * PAGE QUESTION+ +2000 +"THE APPLE ][ HAS TWO HIRES 'P,"X1%","Y1%"W"$I139:"_";::* 036 a * * * CHECK VALIDITY OF MENU CHOICEg q MC%0 I1(MC$) A$(MC$,I,1)MC%I  X(0): CLEAN UP OLD STRINGS  * * * CHECK VALIDITY OF MENU CHOICE6000MC%7ĺ:D$"RUN MENU"(700.S * * * PRESENT COMMAND DISPLAYYw:12:"PRESENT COMMANDS"" DUMP: ";::"CTRL-I";:PG%SZ%RT%IVD%JST%WF%","VX%","HX%","DNS%"H"" WINDOW: ";::"CTRL-I";: X0%","Y0%"H:"P";:+M"OSITION PICTURE";:209R:"D";:NW"UMP PICTURE":\\:"M";:va"AIN DEMO MENU";:20f:"ESC";:k" TO BASIC"A$(A$)27ė:MC$"HSPFWDM":3000MC%900MC%11000,12000,13000,14000,15000,1ANATION WILL BE":B"GIVEN. PRESS THE FIRST LETTER OF YOUR":Q"CHOICE."i I139:"_";:::w :"H";:%"I-RES SCREEN #";:20*:"F";:/"ORMAT PRINTING":4:"S";:9"IZE OF PICTURE";:20>:"W";:C"INDOWING":lF$A$v.D$"BLOAD"F$",A$4000"4W"HIT TO CONTINUE";A$]t * * * MAIN MENUz2000"THESE ARE THE MAIN CATEGORIES OF HI-RES":"SCREEN DUMP OPTIONS. AS YOU CHOOSE EACH""ONE, A DETAILED EXPLDISK.":# "OUR PICTURES ARE:":9 " A. GRAPH"U " B. CHURCHILL": "ENTER LETTER OF YOUR CHOICE OR INSERT" "YOUR OWN DISK AND ENTER FILENAME TO BE" "LOAD ->";A$ X(A$"A")((A$)0)F$F1$:630 bA$"B"F$F2$:6300:HX%0:DNS%0:X0%0:Y0%0:X1%279:Y1%1910 T  * * * LOAD UP HI-RES SCREENSZ c :3 "THERE ARE TWO HI-RES PICTURES ALREADY": "ON THE DEMO DISK. YOU MAY LOAD AND USE": "THESE OR YOU MAY LOAD A PICTURE FROM": "ANOTHER "THE COMMANDS YOU HAVE SET UP.":P "WHEN YOU HAVE SET UP THE COMMANDS AS":} "YOU WISHED, JUST PRINT THE PICTURE!": "HIT TO CONTINUE";A$ , 1 * * * VARIABLE INITIALIZATION 6* @PG%0:SZ%0:RT%0:IVD%0:JST%0:WF%0:VX%EARN ABOUT THE MANY OPTIONS THE":O "PKASO/U HAS TO OFFER WHEN YOU PRINT":p "HI-RESOLUTION GRAPHICS.": "USE THE MENUS TO CHANGE THE VARIOUS": "OPTIONS OF THE 'H' AND 'W' COMMANDS.": "THE TOP LINES OF YOUR SCREEN WILL SHOW":" CK INTERFACE ID5 xSLOTSLOT1:SLOT7ĺD$"RUNERROR"e {FE(16130SLOT256):FF(16129SLOT256) }((FE15FE32)(FF32))120 * * * EXPLAIN PURPOSE OF PROGRAM :3 "THE PURPOSE OF THIS PROGRAM IS TO HELP":" "YOU LA0  * *1 * * * HIRES DUMP TRAINER9( *R2 * FOR THE PKASO/U j< * PAG 10/22/83rF *zP *e24576: ADDRESS = $6000i D$=CTRL-D : I$=CTRL-InD$(4):I$(9):SLOT0:F1$"GRAPH":F2$"WINSTON CHURCHILL.PIC" s CHE                z#<  ԮĠ ҠӠӲ Р ǮѠ  ̠ϮĠ ϮĮ ̠Ӯɠ̠Ӯɠ̠Ӯɠ ԮŠ ̠ Ԡ Ƞ" Π̮à! ̠ Ҡ" ҭӠԠ  ϮҠIJĠ!6"ҠԮ̠ ӠЮ̠2Ϡ׮Р ЮР  ҠŠΠ ̠ҠϠ ҠӠԠРԠӠ  ϠҠή̠7ՠӠРϠӠРϠԮנϠ ٠ŠDT*@ U:wn{o};UU@Q*U*U*U @*Uh]/j];Wn];UnU *U+U*@*U;w.U{P @~An?w*Ut U*UU*U*w~;w*];WQ*T (U*U*U*UPzjU*P*t?(U*UP U?w. U*wn_;/zwo?wD(U*U:} (u~] \~nU*U*U*Uj}_P?}}_(Wj/U.U*U*"T ~"U*U*]:/U_+h_*Q*U*Uj}/U:j_?QW:U*W*U*u/*T*U*U*w. Uj~_+|?W*U*U*U*U*U+Wn*/|j?U>\}W*U*U*U8_ P*U*U:w (Uj+pW*U**U*U*}w} }UwjUW*}w.U*UnP.u~_|@ D*U*U*UjUn](T*U*U*Q*E*U*U*U*}_P*u+U @:}Wn}{+U*U**U*@.h@U}/E*qT"T*U*U*u~U~/~U*\*U*U*U*U*U*U*w*}_ |+?WzW~/]{W*U*j_z(uWw"QD D(U*E*U*U"U:/U U*U*U*U"U*"U*u/U/(W.}}?Uz+U"U*U*]?* }b+U8TnD T*D*U*Pj]U U*U*U U*U*U*U;W*}?n(w*h j_ Uz"Pz+U"U U*U{?@.](}U(>@*U*Uj@*]:on]* }*U*E"D(U:un];w }A~;Wn]zw*P*U:W(U"U(p E*U*Unh]{{~]*@.U*U"T*U*wj*U~U?~{ }{W*P*U "T*zD"U*@(U;u?.U:xW*Q*E*D(*U*U?w~;@Ux]{+u*]*]*U*U*D P"T.}_+ Q*U*PU:wn]:Ux*U*E"T(U*U*U+u~?~h_;~_*u*U*U*U*u*U*U(U U:u/8"T*U(U*un{]+W.]* U(U*E@("U(U*W*U h(Uj{w U*u];U *TP*Uj?@ D@zo]T` @(Q"U*]*U:wn_;W.U+:E(Q*D(Q"U*U*n];8z{Ghz~?W*U+}oU*U*U*TP:u.Th+. U**T*}{~]@*TQ"D"U*U*uUPUz]:_?nU+U *u.]+U"D(Q*u~+U~P(t?Q{+W0*UT(UU*u~o_?wnU D*U"*U*U*U.U@ Pt;D*U;u uo];U" Un?*hu;_*A"U*U*Un} U?*DP?U*U*U*U:#P#o_ ~]*?};U*U:@Q*x"D(U*U:Wj? UW*D`w*U*U*U:w+U~/@zUW(@~*U*U*} @|?"DU*U*U*]; U*E|o]*u*U*U*U*un_{"E~/|u]>U~w];U*U*U.z*U(8"TU*U*Uj}(U:.E|]*U*U*U*U*wn]"+|?w_>Wn_+_;U*U;T{?@p*D(U*U*U*U{ T{W*EU*U*U*U*U*U*U*U+}D(|"}{UW{woU*U*U*wn@?*@~_z?*E U"UQ*U*U*] U{w"D*U*w*U*U*U*Uj_+_@||#|}/]z_~?U+U*U*z(U"}w_*U*\ UDQ*U *U*w"@Uju; (U*U*U*U*U*U*Uj]+u~/(Ej/UU/U U*U*w~n?@*@(Qzx?U8 ]{UQ*E*U* @:w~?U*@(U*U*U*U*U*U*Un]+w~{ Ez_z/@(Uj}{W u~/U*U*U*U~?P;Ut{w*U>                      PKASO (TM) IN SLOT 1GDEMO FOR SUPER-RES (TM) PLOT SYSTEMUSES MACHINE LANGUAGE ROUTINE TO COMPOSE DOT IMAGESIN AN 8-HIGH BY N-WIDE BUFFER (ONE PASS OF THE PRINT HEAD)32767::5 I$=CTRL-I; D$=CTRL-D I$(9):D$(4GRAPHICS"::"BY THE PKASO (TM) INTERFACE." U::"CALCULATION OF THE POINTS WILL TAKE"::"ABOUT 30 SECONDS PER ROW."::"HIT ANY KEY TO INTERRUPT": ZBI0:F.2:FM.002:WI480 nD$"PR#1" oI$"N"; sI$"G": GET NORMAL SPACINGs xI$"66F":):MAX115 CHECK TO SEE WHICH PRINTER IS OUT THERE; A V (HI94096:D.001 <PM IS PHASE MODULATION PARAMETER - TRY -.001, +.001, ETC. =FM IS FREQUENCY MODULATION - TRY .001, ETC. FF.2:PM0:FM.001:D0:BI1+ R:"SUPER-RES (TM)                                                                                                                                        4D14DA4DC3333334DD3322HHH t   00 H :hɠ:`  } t @e e вhhh` j` ` j )8 `)JJJJLpAPH $BPB #(-27@@ :@@ @A& !1.  AcUIA   *L0&wwww'3{{{kooootTTT8TTT@@LP`(TTT( TTT88DDD8 "IUU" >< >@@@> " "    @ > >  0HH0 "!a!- } >> >ccc>  @|@xHH <  "_UK"99mmmmEE8DDD8 EE)) 4T  $NTINUE>"::" WITH FILES INTACT";:100:700:500FORE SENDING"::"IT TO PKASO/U MEMORY."200:cA81ĺ::Z HA88ĺD$"RUN AUTO"c 610DEMO"' A72ĺD$"RUNHIRES DUMP DEMO"M A65ĺD$"RUN ASPECT.WINDOW DEMO"p A68ĺD$"RUN HIRES DUMP.UTIL" A71ĺD$"RUNGRAY SCALE" A77ĺD$"RUNDOLLAR" A87ĺD$"RUNSINE PATTERN" %A83ĺD$"RUNSPECIAL CHAR DEMO" *A69ĺD$"RUN CHARREATE SPECIAL CHARACTERS"I :". CONVERT/DOWNLOAD SPECIAL CHARACTERS" :"TYPE THE FIRST LETTER OF YOUR CHOICE,":"'Q' TO QUIT, OR 'X' FOR AN AUTO DEMO.";::" ";: (16384)128715 16368,0:A(16384)  A76ĺD$"RUNLORES DUMP O - HIRES"2 :". DUMPER - HIRES DUMP TRAINER"c :". GRAY SCALE CHART - HALFTONE GRAPHICS" :". MONEY - HALFTONE GRAPHICS PICTURE" :". WAVE PATTERN - SUPERRES GRAPHICS" :". SPECIAL CHAR DEMO - VARIOUS USES" :". EDIT OR Ce! PKASO DEMONSTRATION DISK9 D$(4)::16368,0DX MENUJb}l:"******** MAIN SELECTION MENU ********":v:". LORES DUMP DEMO - BALL & DONUT PICS":". HIRES DUMP DEMO - VARIOUS DUMP TYPES" :". ASPECT/WINDOW DUMP DEM     鍍8Ϥeȱe8Υq J( @  |srqx Xʽ(8i0ieȱe8i芑0ʊ`=9E` eȱeѐ8)`8(E`I1` h8  " LOAD SECOND PICTURE/ ,D$"BLOADLONUT"@ D$"PR#"SLOTU  DUMP PICTUREb I$"10D"~  SKIP TO TOP OF FORM I$"E" &D$"PR#0" X::D$"RUN MENU"LORES GRAPHICS WITH NO TEXTG 16304,0:16300,0:16302,0:16298,0X D$"PR#"SLOTd I$"N"; "INTERACTIVE STRUCTURES INC. PRESENTS"::" LORES GRAPHICS"::"PRODUCED BY THE PKASO (TM) INTERFACE" DUMP THE PICTURE I$"10D"DEMONSTRATION LOADS A PICTURE FROM"::"DISK, THEN PRINTS IT."m 5 CHECK $C090 TO SEE IF PRINTER IS READY 7((16256SLOT16)16)5Ģ22:"PLEASE TURN ON PRINTER":55 <I01000:I Z LOAD FIRST PICTURE dD$"BLOADLOBALL" SELECT  I$=CTRL-I; D$=CTRL-D9 I$(9):D$(4):SLOT0T CHECK INTERFACE ID{SLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)((FE15FE32)(FF32))20> 2:18:"PKASO/U (TM) LO-RES SCREEN PRINT "::"   |x Xʽ(8ii`3is{ '1;EOYcmw$.8BL      D| TTT$DTT((|  NOW ON SCREEN 1."::"TYPE 'PR#1' 'RETURN' 'CTRL-I H'"::"TO PRINT IT."Y XA$:::XE ON THE CENTRONICS 739":4ID2ĺI$"E" >D$"PR#0";6H::D$"RUN MENU"?:5"SINE PATTERN USES SPECIAL CHARACTERS,":"A FEATURE NOT INCLUDED ON THE CENTRONICS 739.":"AVAILABLE ON THE CENTRONICS 739":CCS 739":HE CENTRONICS 739.":"AVAILABL6I$;XC%","II%"P"; @IC EINCREMENT TO NEXT VERTICAL LOCATIONc FIF ITS 8, PRINT THE BUFFER JIIII1:II8II2:I$",,1P"I$",,136P" OCLEAR BUFFER IF WE JUST PRINTED IT JJD:DDPM:FFFM (16384)128300 *16368,0:I$"G"I$"S"G I$"11U";; II WILL BE VERTICAL LOCATION, 2 THRU 7 THIS CAN GO UP TO 0-TO-7 FOR PRINTERS WITH 8-DOT GRAPHICS FORMAT ,XC0:XI0:I0900 1V((JI)F)1013 2XCXCV:XCWII900 4XC%XC:II%9II 5PUT THE POINT AT Y=II, X=XC "INTERACTIVE STRUCTURES INC. PRESENTS"::" SUPER-RES (TM) GRAPHICS"::"PRODUCED BY THE PKASO (TM) INTERFACE" I$"80F" II2 SELECT BUFFER ON THE PKASO/U BOARD I$",,130P" CLEAR THE BUFFER I$",,136P" GET GRAPHICS SPACINHjh*Hh$J`HHHH % d eȱe2 H J J hJh hf *F  % Мhhhh`HE 'H' COMMAND."%  DUMP PICTURE2 I$"10H"N  SKIP TO TOP OF FORMY I$"E"g &D$"PR#0"} X::D$"RUN MENU"ECOMMAND." DUMP PICTURE* I$"0H"8 :::: "THIS PICTURE IS PRINTED BY USING A 48 IN OPTION 1 OF THE 'H' COMMAND." " DUMP PICTURE ,I$"48H" T NEW PAGE ^I$"E" r"THIS PICTURE IS PRINTED BY USING A 10 IN OPTION 1 OF TTO PAGE 1% dD$"BLOAD GRAPH,A$2000"6 D$"PR#"SLOTB I$"N"; "INTERACTIVE STRUCTURES INC. PRESENTS"::" HIRES GRAPHICS"::"PRODUCED BY THE PKASO (TM) INTERFACE" :::"THIS PICTURE IS PRINTED BY USING A 0 IN OPTION 1 OF THE 'H' MONSTRATION LOADS A PICTURE FROM DISK":"AND THEN PRINTS IT."l 5 CHECK $C090 TO SEE IF PRINTER IS READY 7((16256SLOT16)16)5Ģ22:"PLEASE TURN ON PRINTER":55 <I01000:I F HGR WITH NO TEXT Z:16302,0 _ LOAD PICTURE IN I$=CTRL-I; D$=CTRL-D9 I$(9):D$(4):SLOT0T CHECK INTERFACE ID{SLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)((FE15FE32)(FF32))20= 2:18:"PKASO/U (TM) HI-RES SCREEN PRINT":"DE    TO *"::5:"PKASO(TM) ";::"SUPERFONT";::" CHARACTERS":780:::" PRESS ";::"F";::"IRST LETTER FOR MENU OPTIONS" J:" PRESS ";::"ESCAPE";::" FOR A PREVIOUS MENU"::" PRESS ";::"RETURN";::" WHEN ENTERING DATA"::O O?"ARE YOU USI:150 I(A$)+ I0Č64477:250:1501 B I1500::T I12000:: :7:"TYPE CHARACTERS BY ";:CR1ĺ"LETTER":ED1ĺ CR0ĺ"NUMBER":ED1ĺ 11:"FOLLOWED BY ";::"RETURN"::ED1ĺ :19:z ,::13:"* WELCOME " ";:(K);:601 FK13ĺ(K);:A$A$(K):607 HE d16368,0\ n(16384)128110x x16368,O:K(16384): 50:K27ı CR1(A$)1Č64477:250:150 (A$)0ī150 CR1I(A$)31:195 (A$,1)"0"(A$,1)"9"Č64477:2504 CHAR DESIGN 11/16C 8.54096:64096: ONERR GOTO 9000 d8500:F$F4$:5370:WP0:300-::"ENTER FILENAME: ";2A$""<100:K27ı=(K8K15)70?(A$)0Č64477:60@(A$)1A$"":68AA$(A$,(A$)1) D(K);:     @ ؘL K 80N2`@0 إ3"#6$% " B j"76983 jΘ ? ɍ 󭧙3"#6`~ )? `ҠҠĺ4:AFU"U W+X EXPANDED WINDOWED PICTUREab"NOW WE'LL EXPAND THE SIZE OF THE PICTURE USING"l"THE SAME WINDOW AND A CTRL-I 224,4,6 H COMMAND."I$"224,4,6H"I$"E"(#I$"E"#D$"PR#0"#'::D$"RUN MENWINDOWED PICTUREA "WE CAN ALSO PRINT A CUT-OUT OF THE SCREEN"o "USING THE WINDOW COMMAND. WE'LL USE A" "CTRL-I 105,70,175,145 W TO WINDOW THE" "PICTURE AND A CTRL-I 224 H TO DUMP IT." & 0I$"105,70,175,145W"I$"224H" :: SA CTRL-I 32,1,3 H COMMAND."! T2 hI$"32,1,3H"A rI$"E"::G M S f  TALL PICTURE "NOW WE'LL STRETCH THE PICTURE THE OTHER WAY" "USING A CTRL-I 32,2,1 H COMMAND."  I$"32,2,1H" I$"E"::      # DUMP A REGULAR PICTURE] "THIS IS A NORMAL WINSTON CHURCHILL PICTURE PRINTED" "USING A CTRL-I 32 H COMMAND." I$"32H" :: ' ) + , DUMP A WIDE PICTURE 6"NOW WE'LL STRETCH THE PICTURE OUT USING" @"O PAGE 13 dD$"BLOADWINSTON CHURCHILL.PIC,A$2000"D D$"PR#"SLOTP I$"N";~ "INTERACTIVE STRUCTURES INC. PRESENTS": " WINDOWED AND ASPECTED GRAPHICS": "PRODUCED BY THE PKASO (TM) INTERFACE" :: * * * PICTURE DUMPSONSTRATION LOADS A PICTURE FROM DISK":"AND THEN PRINTS IT."k 5 CHECK $C090 TO SEE IF PRINTER IS READY 7((16256SLOT16)16)5Ģ22:"PLEASE TURN ON PRINTER":55 <I01000:I F HGR WITH NO TEXT Z:16302,0 _ LOAD PICTURE INT I$=CTRL-I; D$=CTRL-D9 I$(9):D$(4):SLOT0T CHECK INTERFACE ID{SLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)((FE15FE32)(FF32))20< 2:18:"PKASO/U (TM) HI-RES SCREEN PRINT":"DEM     16:I1MAXFV:H::(I64);::"-"PR$(I);:VV1:V23V16:H21L]100:K27ı~K65K65MAX1Č64477:925IAK65:IDIA1:7020::::3::"S";::"CREEN ONLY";::18:"P";::"RINTER AND SCREEN"100:K27ı::A$D")İ5000:810:850!dAP1880EfK("C")BIBI:700:810:850igK("N")NRNR:700:810:850hK("R")CRCR:700:810:850pK("C")BI(BI0):7020:810:850uK("R")CR(CR0):7020:810:85064477:850 34,16::H1:V"NO";::" YES"5NR1ĺ"NO ";::"YES":M I140:"_";:::w*34,16:::5::"R";::"EFERENCE":95::"D";::"OS FOR FILE";:22::AP1830;"N";::"ULL CHARS"::5:>:"ESCAPE"::H810R100:K27ıaK("" # CHARS: ";::NC;:18::" FILE SIZE: ";::PCO;::" BYTES":u" CHAR HEIGHT: ";::VDR;" BIT ";::" CHAR REFERENCE BY: ";:CR0Ğ:"NUMBER";::" LETTER":CR1ĺ"NUMBER ";::"LETTER"::" NULL CHARACTERS: ";:NR0Ğ:000:700:500%lK("C")İ840:500>vK("P")İ4000:500\K("I")İ1000:255:500vK("L")İ10000:50064477:550::9::"* PKASO CHAR DESIGN *"::780:" PRINTER TYPE: ";::CN$::D" PKASO CHAR FILE: ";::F$:::5::"C";::"HANGE SPECS";:22::"I";::"NSTRUCTIONS":5::"ESCAPE";::" TO BASIC";:22::"L";::"OAD TO PKASO/U"&100:K27ī4000I(0):K("E")İ2000:700:500DK("D")İ5000:500XK("H")İ6000:700:500 bK("A")İ7ID YOU REMEMBER TO SAVE YOUR WORK(";:450:100:K("Y")ĉ::38400:216,0:U 500{ :"Y";::"/";::"N";::")?":;34,16::5::"E";::"DIT CHARS";:22::"P";::"RINT CHARS"::5::"D";::"OS COMMANDS";:22::"H";::"I-RES DISPLAY"::NG APPLEWRITER //E (";: GOSUB 450: GOSUB100: IF K = ASC ("Y") THENWP = NOT WP T::"WOULD YOU LIKE MORE INSTRUCTIONS (";:450:780 h:11:"COPYRIGHT 1980-83"::7:"INTERACTIVE STRUCTURES INC.";:100:K("Y")İ1000:500 700:500L ::"D Lإ3x"y#z6{$% " B ;"76983 j  ɍ x3y"z#{6`O )? `ҠϠΠРĺI I$"G"; : "STATISTICAL GRAY SCALE PATTERNS"E I04X I$;"80,128G";` A$g Is I$"G";y  :I$"80F":I$"E" D$"PR#0" :D$"RUN MENU" B$(GA$,I1,1) J041 J0A$A$B$D J0A$A$" "K JR Ia ,I$;80"G";i 6A$u @I$"G";{ J XA$"" b"FIXED GRAY SCALE PATTERNS" vI015:B$(GA$,I1,1):J04:A$A$B$:J:I I04 I$;80"G"; A$ UCED BY THE PKASO (TM) INTERFACE"::+ }t "THE BLOCKS IN THESE BANDS CORRESPOND TO GRAY LEVELS 0 THROUGH 15."z "THE SMALL BLOCKS ARE EACH 1 PIXEL OF THE FIXED GRAY SCALE LEVELS." : SET UP DATA FOR INDIVIDUAL PIXELS I015 SCALE DEMONSTRATION"E 5 CHECK $C090 TO SEE IF PRINTER IS READY 7((16256SLOT16)16)5Ģ22:"PLEASE TURN ON PRINTER":55 F:D$"PR#"SLOT: nI$"N"I$"80F"% x"INTERACTIVE STRUCTURES INC. PRESENTS"::" GRAY SCALE"::"PROD I$=CTRL-I; D$=CTRL-DP I$(9):D$(4):SLOT0:GA$"0123456789JKLMNO"j CHECK INTERFACE IDSLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)((FE15FE32)(FF32))20 2:18:"PKASO/U (TM) GRAY    912:Y6202:X,Y)15L(X1)2:X1:Y20H ::::L0NR1LL LCV%(0,CN)ĺ"SHORTEN FROM "CV%(0,CN)" TO "L;:" BYTES (";:450:100:K("N")LCV%(0,CN) ::"LENGTH IS "L" BYTES":CV%(0,CN)L::I1L:XII1:V0:Y6202:VVV(X,Y)"I"SPCC:Y6YY2=MA$"N"SPCC:Y19X1XX2:YY2[RA$"M"SPCC:Y19YY2uWA$" "CC15CC:EF0\A$"*"İ2700a2040b::20:"WAIT"::fNR1ī2250EF0ė::"NO CHANGES MADE...":200:EF1:2388-2146:L0:X3E"Y6YY2.%A$"C"Y19X38XX2:YY2E*A$"X"Y19YY2l/A$"U"SPCC:Y6X1XX2:YY24A$"J"SPCC:X1XX29A$"O"SPCC:Y6X38XX2:YY2>A$"K"SPCC:X38XX2CA$","SPCC:Y19X38XX2:YY2HA$:20,25:SP:SX,SY:X,Y)5SPX,Y):SXX:SYYK5:X,Y:100:K132150ZK272200A$(K):EF1:A$"Z"X1Y19YY2:XX2 A$"S"X1XX2A$"W"Y6X1XX2:YY2A$"D"X38XX2A$"R"Y6X38XX2:YY2  A$"I:3000:7:"W E R";:19:"U I O";:27::"CLEAR: ";::"*"::"MOVE: ";::"S";:11:"D";::" DRAW: ";::"J";:23:"K";::" DONE: ";::"RETURN":7:"Z X C";:19:"N M ,";:27::"B/W: ";::"SPACE"::CC0:X1:Y20:SXX:SYY:SPX,Y)/CC"PLEASE LOAD A FILE BEFORE EDITING...":200:o:::10:0,394:0,3922:24,2619:24,2621:20,24:20,262700:34,20::ED1:250:150:K27EF1:2388INCCNNC1:NCCN:CV%(0,CN)0::::"ADDING NEW CHARACTER...":2700:200:2033CNENS"::D$"OPEN"A$",S"SL",D"DGVD$"READ"A$:AS$:AS$"$"İ1150:1160`jAS$"%"İ1150:1110otAS$:1110~100:K321150D$"CLOSE"A$:D$"PR#1":I$"I";I$"66F";:xI$"80F";I$"80N":D$"PR#0":.F$"NONE LOADED"ė::64477:"P.HELP":AP1A$"APW.HELP"<K("S")AP0İ1100:700:]K("S")AP1İ1100:7020:$K("P")AP1İ1300:1100:1400:700:.K("P")AP1İ1300:1100:1400:7020:864477:1030L::"ALWAYS PRESS SPACE TO CONTINUE WITH HELP SCRE >   !" !1.  !3-!!    $7777;??776/:******  &(0******""" !?3! ><        $$ 1 ? ???? ?33?  > <$$ !?5+ ## ## *  $$ wx Xʽ(8ii`3is{ '1;EOYcmw )3=G      ">***"** >   CHECK $C090 TO SEE IF PRINTER IS READY k ((16256SLOT16)16)5Ģ22:"PLEASE TURN ON PRINTER":140 D$"PR#"SLOT:I$"N"I$"80F" ASSEMBLY ROUTINE PRINTS PICTURE D$"BLOAD PRDOL" 4096 I$"G":D$"PR#0" ,D$"RUNMENU":"INTERFACE GRAY SCALE IMAGE DEMO."T (:"ASSEMBLY ROUTINE LOADS AT ADDRESS 4096.z 2:"PICTURE OCCUPIES 8192-16383." <:"FIRST WE'LL LOAD IT INTO MEMORY." F LOAD UP PICTURE DATA PD$"BLOAD DOLLAR DATA" Z:"NOW WE'LL PRINT IT."(  I$=CTRL-I; D$=CTRL-D9 I$(9):D$(4):SLOT0T CHECK INTERFACE ID {SLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)((FE15FE32)(FF32))20:3:"INTERACTIVE STRUCTURES PKASO (TM)"$ #  0)(X,Y)5SP0):I21V0CB :V", ";:CV%(I,CN)V::3500:2020[T EF0CNNC1:NCCNoV ::ED0:EF0: 15:I521:0,39I:: 2700:LCV%(0,CN):24:"LENGTH "L:L21L21 L1ı I1L:XII1:VCV%(I,CN):Y6202:(V128)15:VV$ x@@@ >@@ :@@ @A& !1.  AcUIA   *L0&wwww'3{{{kooootTTT8TTT@@LP`(TTT( TTT88DDD8 "IUU" >< >@@@> " "    @ > >  0HH0 "!a!- } >> >ccc>  @|@xHH <  "_UK" ))EE EE)) 4T  $HH$vx Xʽ(8ii`3is{ '1;EOYcmw )3=G      D| TTT$DTT((|NU"L4ID2ĺI$"E"&>D$"PR#0";<H::D$"RUN MENU"E:5"SINE PATTERN USES SPECIAL CHARACTERS,":"A FEATURE NOT INCLUDED ON THE CENTRONICS 739.":"AVAILABLE ON THE CENTRONICS 739"::FIF ITS 8, PRINT THE BUFFERKJIIII1:II8II2:" !";:BIĺ(34)"#";sOCLEAR BUFFER IF WE JUST PRINTED ITTII2ĺ:CLJJD:DDPM:FFFM (16384)128300*16368,0:I$"G"I$"S"4ID2ĺI$"E">D$"PR#0";H::D$"RUN MEHERE, THEN COMPUTE THE ENTIRE ROW?,XC0:XI0:PO,II:I0900V1V((JI)F)1013o2XCXCV:XCWII9004CALL THE SET-POINT ROUTINE5PUT THE POINT AT Y=II, X=XC6XL,A(XC):XH,XC256:SP@IEINCREMENT TO NEXT VERTICAL LOCATION8,0:I$"G"I$"S"!4ID2ĺI$"E"0>D$"PR#0";FH::D$"RUN MENU"IN2S":260bI$"1S"xCLEAR THE BUFFERCLII WILL BE VERTICAL LOCATION, 2 THRU 7THIS CAN GO UP TO 0-TO-7 FOR PRINTERS WITH 8-DOT GRAPHICS FORMAT!POKE IT AT Y=II, X=XC# 6I$;XC%","II%"P";* @IS EINCREMENT TO NEXT VERTICAL LOCATIONs FIF ITS 8, PRINT THE BUFFER JIIII1:II8II2:I$",,1P"I$",,136P" OCLEAR BUFFER IF WE JUST PRINTED IT JJD:DDPM:FFFM (16384)128300*1636, II WILL BE VERTICAL LOCATION, 2 THRU 7r THIS CAN GO UP TO 0-TO-7 FOR PRINTERS WITH 8-DOT GRAPHICS FORMAT ,XC0:XI0:I0900 .COMPUTE THE MATH FUNCTION 1V((JI)F)1013 2XCXCV:XCWII900 4XC%XC:II%9II 5PUT THE POINT RUCTURES INC. PRESENTS"::" SUPER-RES (TM) GRAPHICS"::"PRODUCED BY THE PKASO (TM) INTERFACE"q I$"80F"z II2 SELECT BUFFER ON THE PKASO/U BOARD I$",,130P" CLEAR THE BUFFER I$",,136P" GET GRAPHICS SPACING I$"11U";THE PKASO/U (TM) INTERFACE." U::"CALCULATION OF THE POINTS WILL TAKE"::"ABOUT 30 SECONDS PER ROW."::"HIT ANY KEY TO INTERRUPT": ZBI0:F.2:FM.002:WI480 nD$"PR#"S oI$"N"; sI$"G": GET NORMAL SPACINGd xI$"80F":"INTERACTIVE STFE(16130S256):FF(16129S256)E ((FE15FE32)FF32)20 <PM IS PHASE MODULATION PARAMETER - TRY -.001, +.001, ETC. =FM IS FREQUENCY MODULATION - TRY .001, ETC. FF.2:PM0:FM.001:D0:BI1 R:"SUPER-RES (TM) GRAPHICS"::"BY H)PKASO/U (TM) SUPER RES DEMO 11/83X USES BASIC ROUTINE TO COMPOSE DOT IMAGES IN A 6-HIGH BY N-WIDE BUFFER (ONE PASS OF THE PRINT HEAD) 32767::5 I$=CTRL-I; D$=CTRL-D I$(9):D$(4):S0SS1:S7ĺD$"RUNERROR"&      $ x@@@ >@@ :@@ @A& !1.  AcUIAA  *L0訨pPP@ppp < >@@@> " "    @ > >  `` a!- """" <~~< <~~<  @|@>$$10 ^"PRINTHEAD. TO USE SPECIAL CHARACTERS,":n h"YOUR PRINTHEAD MUST BE 6, 7, OR 8 DOTS": r"IN HEIGHTH."::  LOAD UP THE SPECIAL CHAR SET, TRANSFER IT TO ON-BOARD RAM, AND LOAD UP THE SECOND SPECIAL CHAR SET :"* * * LO): $CF91 OF O.B. RAM# D$"PR#0"> (VDR6)(VDR8)500y , PKASO/U NOT CONFIG'ED FOR 6, 7, OR 8 DOT HI GRAPHICS 6:5 @(7)"YOUR PKASO/U IS NOT CONFIGURED PROPERLY": J"TO USE SPECIAL CHARACTERS DUE TO THE": T"VERTICAL DOT RESOLUT(16129SLOT256)3 ((FE15FE32)(FF32))20 :5:"SPECIAL CHARACTER DEMO TO SHOW THE"::"VARIOUS USES OF SPECIAL CHARACTERS.": CHOOSE THE PROPER SPECIAL CHAR SET FOR THE PRINTER BEING USED D$"PR#"SLOT I$"G" VDR(12399 #PKASO (TM) SPECIAL CHAR DEMO.11/83934816V I$=CTRL-I; D$=CTRL-Dq D$(4):I$(9):SLOT0 CHECK INTERFACE IDSLOTSLOT1:SLOT7ĺD$"RUNERROR"FE(16130SLOT256):FF(16129SLOT256) FE(16130SLOT256):FF     5000#64477:5060l#P::D$"CATALOG,S";SL;",D";D::"< PRESS ANY KEY FOR MENU >";:100::AP1İ7020:w#s700:}##:AP1ė:"APPLEWRITER GLOSSARY FILES CAN BE"::"SAVED BUT NOT LOADED. PRESS ANY KEY "::"TO CONTINUE...";:100:$FT$F";::"ENAME"::5::"ESCAPE";::22::"U";::"NLOCK/LOCK"N"100:K27ıh"K("C")İ5200:5000"K("L")İ5300:5000"K("S")İ5400:5000"K("/")İ5500:5000"K("D")İ5600:5000" K("R")İ5700:5000#K("U")İ5800:"S";:33:(16384)127ĺ:INC::4740L!zJ0CV%(0,I):CV%(J,I)",";:::\!D$"PR#0":="34,16::5::"C";::"ATALOG";:22::"/";::"DRIVE ";D;" SLOT ";SL::5::"L";::"OAD FILE";:22::"D";::"ELETE"::5::"S";::"AVE FILE";:22::"R)WIĺ:B0 BBCV%(0,I):(I159);::I$"S":I$"80F"::A160:"-";:::"REFERENCE WHEN PKASO";:39:"SUPERFONT":" NUMBER: YOU TYPE: PRINTS:";:38:"CODE TABLE:":A160:"-";::&!fI1NC:5:I;:16:(I159);:I$"25T"I$"1S"(I159)I$4070&hD$"PR#1":I$"D":D$"PR#0":::"HIT ANY KEY TO INTERRUPT...":D$"PR#1":WI480:I$"80F";:I$"E"::"PKASO (TM) SPECIAL CHARACTERS NOW IN MEMORY."::"INPUT FILE: "F$::NC" CHARS.":ID3ĺI$"132F";:WI400 B0:I$"1S";:I1NC:BCV%(0,I;::"UMP SCREEN";:22::"ESCAPE":5100:K27ıOK("E")İ4500:4000kK("D")ĺ:4200:4000~K("S")407064477:4020250:150:K27ī4000INCČ64477:4070:D$"PR#1":(I31)" ";:I$"1S"(I31);I$"S":D$"PR#0":2256(V127):X,Y::: CA,NC1:CBCA12NC:PCB:I1NC:CA1II,(PCA)256((PCA)256):CAII,((PCA)256):P,CV%(0,I):PP1:J1CV%(0,I):P,CV%(J,I):PP1:::$:::5:"E";::"NTIRE FILE";::22::"S";::"INGLE CHARS"::5::"D"?|`AAA 0 PP@__/ ?  pPPpWPPpWQQqOAAAcOAAA>WQQAAWPPP@GAIIo~$CG@@@?G@>GAAAOHHHxGAMB}OHHL{yIIIOO@@G@@x|C$$Cx xCGIQaAAAA@ """:*k*.qRt%G7IE"hhp>cAAc>"">  @GIQAAOOIIIyIIO|{IIOOOIIo`GOP`OII{IIO666667"A66666A"`@MHHxEx Xʽ(8ii`_ $-6?HQZclu~ )2;DMV_hqz %.7@IR[dmv}}}hphp""   FIRMWARE."::< "PLEASE ALSO BE SURE THE INTERFACE IS":` *"NOT IN SLOT 0 OF YOUR APPLE."8bI14:(7);:I8:"* * * * * OOOOPS!"B::"WE CANNOT RUN THE DEMOS WITHOUT"::"A PKASO/U CARD IN YOUR COMPUTER."::"PLEASE CHECK THE LARGE CHIP ON YOUR": "INTERFACE CARD. THE LABEL MUST SPECIFY": "PKASO/U  I("U")ĺD$"UNLOCK"A$",S"SL",D"D:B+D$"LOCK"A$",S"SL",D"D:+p250:200:200::::3:0,0:62454:X20:Y25:0:1,11,190278,190278,11,1+150:K276150+INCČ64477:6060+X250X20:YY25:Y173Y25:F,LCV%(0,I):J1L:XX10:K27ı>*IPP$A$:::"ENTER NEW FILE NAME: ";:50:K27ı}*S::"RENAMING "PP$", "A$:D$"RENAME"PP$","A$",S"SL",D"D:*::5::"U";::"NLOCK";:22::"L";::"OCK"::100:K27ı*K("L")K("U")Č64477:5800*45:IK::K27ı%+::100:K27ı+)K49K50Č64477:5560C)11:(K);:DK48:b)27::" ";::100:K27ı~)K49K55Č64477:5570)27:(K);:SLK48:)45:K27ı)::"DELETING "A$:D$"DELETE"A$",S"SL",D"D: *D:"ENTER PRESENT FILE NAME: ";:5F$:(^45:K27ı](_::"SAVING "A$:D$"BSAVE";A$;",A"CO",L";PCO;",S";SL;",D";D:700:(|::5::"D";::"RIVE ";D;:22::"S";::"LOT ";SL;(100:K27ı(K("D")İ5560:200:(K("S")İ5570:200:(64477:5520)11::" ";'64477:5402!'45:K27ı,'AF$A$?' AF$""PC0ı|'!::"WRITING "AF$:SA1ĺD$"APPEND"AF$",S"SL",D"D:5440'"D$"OPEN"AF$",S"SL",D"D:D$"DELETE"AF$",S"SL",D"D:D$"OPEN"AF$",S"SL",D"D(@D$"WRITE"AF$:J0PK1:(PK%(J));::D$"CLOSE"AA1II)256(CAII)CA:L(S):CNI:L22L22Y&J0L:CV%(J,I)(SJ):P(SJ):::i&AP0ī5470&::5::"S";::"AVE NEW GLOSSARY FILE"::5::"A";::"DD TO EXISTING FILE"&100:K27ı&K("S")SA0:5408'K("A")SA1:54067:5335L%:::"NOW LOADING CHARACTERS INTO WORKSPACE...":5368::700:]%F$F1$BI0n%F$F2$BI1%"LOADING "F$:D$"BRUN ";F$;",A";CO;",S";SL;",D";D:CACO28:NC(CA)1:CBCA12NC%"CONVERTING TO WORKABLE FORMAT..."0&I1NC:S(C1$~$:5::"D";::"EFAULT: ";FT$::5::"S";::"TART FROM SCRATCH: ";F4$::5::"O";::"THER FILE"::5::"ESCAPE":$100:K27ı$K("D")F$FT$:5365$K("S")F$F4$:5365$K("O")İ45:K27F$A$:5365$K27ı%6447>AAAA>/8 p8ff~~8x8ph  ?Hh  ____   ~/_?HH?II6>AAc"Ac>>IIk"?HHh >AIo.AAAA~6cA >AA>HHx0>IE>LN{12{IIo&@@@@~~|~~|cwwcpxxpCGMYqa~~ff`>:*k*.!R$%B6iE"hp>cAAc>T8(8T> 8p`>MY>1!cGMy1"cII6 4dz{IIOF?iIO``O_p`6II60xIK~<6667>>0`emx0Lx Xʽ(8ii`_ $-6?HQZclu~ )2;DMV_hqz %.7@IR[dmvzzzhphp>    [d:16302,0:4:X(7)/0,0:62454:7j0,00,191279,191279,00,0:1,01,191:278,0278,191v,I050^X((1)(1)(1)(1))69:Y((1)(1)(1)(1))47hD(1).5XD,YXD,Y:X,YDX,YDK &:"YOUR HIRES PICTURE IS2LPK%(PK)3:PKPK1:7600f2QPK%(PK)126:PK%(PK1)83:PKPK2:PK%(PK)51:PK%(PK1)44:PKPK2:7600v2[GS12:75302`GS12:75552eGS03jPK%(PK)27:PK%(PK1)71GS:PKPK2:PK%(PK)48:PK%(PK1)48:PKPK2:OV%48(LE10):7820:OV%48LE10(LE1K)22:PKPK1E1!K(OF3)47465,7500,7515,7525,7480,7505,7520,75501)PK%(PK)27:PK%(PK1)75:PKPK2:OV%LE256(LE256):7800:OV%LE256:7800:760018PK%(PK)126:PK%(PK1)91:PKPK2:OV%75:7700:OV%LE256(LE256):7700:OV%LE256:7700:7600EW FILE (";:450:100:K("Y")ıC0*45:AF$A$:PK0:PC0:7020:N034,16d0250:150:K27ı0ACI:ACNCČ64477:74100ID4K1:74550ID6ID10ID9ID5K2:74550KID:ID8K3 1LECV%(0,AC):PK%(PK)AC31:PKPK1:WP0PK%(PCAPE":/100:K27AP0::?/K("E")İ7400:7020:7100Y/K("D")İ5000:7100s/K("H")İ6000:7090/K("P")İ4000:7100/K("C")İ840:7100/K("I")İ1000:7100/K("N")İ7200:7100/64477:7125"0 ::5:"START NUMBER":.780.7020/34,16::5::"E";::"NTER CHARS";:22::"C";::"HANGE SPECS"::5::"D";::"OS COMMANDS";:22::"I";::"NSTRUCTIONS"::5::"H";::"I-RES DISPLAY";:22::"N";::"EW FILE"::5::"P";::"RINT CHARS";:22::"ESARS: ";::PC;:18::"FILE SIZE: ";::PK;::" BYTES"::" OUTPUT FORMAT: ";:OF2Ğ:"APPLE II";::" APPLE ///":-OF3ĺ"APPLE II ";::"APPLE ///"::-" CHAR HEIGHT: ";::7BI;" BIT";::" CHAR REF: ";::CR1ĺ"LETTER":.CR0ĺ"N:VCV%(J,I):K07:3(V128):VV2256(V127):X,YK:::XX5:6060P,::f,XI(0):AP1:7090,l255::::7:"APPLE WRITER GLOSSARY FILE":I140:"_";:::" PRINTER TYPE: ";::PR$(ID):::" GLOSSARY FILE: ";::AF$::x-" # CHx Xʽ(8ii`_   !#%')+-/13579;=?ACEGIKMOQSUWY[]_acegikmoqsuwy{}(4)"RUNVISIPLOT INSTRUCTIONS" (4)"BSAVEVISIPLOT.DRIVER,A$4000,L$E3"I X(4)"LOCKVISIPLOT.DRIVER" ::"VISIPLOT SETUP COMPLETE.":"PLEASE INSERT YOUR PKASO DISK IN DRIVE 1": ::"WOULD YOU LIKE INSTRUCTIONS FOR USE?";:"";A$ (A$,1)"Y"ĺ:(4)"RUN MENU"  IT IN DRIVE 1."9 ::"THIS WILL RENAME YOUR PRESENT"c :"'VISIPLOT.DRIVER' TO 'OLDDRIVER'" :"AND INSTALL THE PKASO DRIVER INSTEAD." ::"PRESS RETURN WHEN READY:";A$ ,(4)"VERIFY INIT,D1" (4)"RENAMEVISIPLOT.DRIVER,OLDDRIVER"*V$".1.1"7 ::"READING THE PKASO VISIPLOT DRIVER"U :"FROM FILE PKASO.D";V$x :"ON THE PKASO DEMO DISK..." (4)"BLOAD PKASO.D"V$",A$4000" ::"PLEASE REMOVE THE WRITE-PROTECT TAB" :"FROM YOUR VISIPLOT DISK," :"AND INSERTd::7/27/832n:"INTERACTIVE STRUCTURES"Px:"PKASO (TM) INTERFACE"p:"VISIPLOT SETUP ROUTINE":"WHICH VERSION OF VISIPLOT DO YOU HAVE?"::"1 - VISIPLOT 1.0"::"2 - VISIPLOT 1.1 OR GREATER"::"SELECT 1 OR 2:";A$ V$"":A$"2"    2):PKPK2:OV%3K2PK%(PK)51:PK%(PK1)44:PKPK2<6FL6xK1İ7900s6OV%127PK%(PK)9:PKPK1:7710:6OV%9PK%(PK)9:PK%(PK1)57:PK%(PK2)66:PKPK3:6OV%13PK%(PK)9:PKPK1:7710:6OV%22WP0PK%(PK)9:PKPK1:7710:* "=5PK1950İ100:K27PCPC1:7020:7100U5PCPC1:7020:7400e5K1İ79005Q(OV%100):Q0PK%(PK)Q48:PKPK15(R((OV%Q100)10):(R0)(Q0)PK%(PK)R48:PKPK1662PK%(PK)48((OV%Q100)R10):PK%(PK1)4422(OFPK4.4PK%(PK1)93:PK%(PK)13:PKPK1:7670U4K2PK%(PK)3:PK%(PK1)2:PKPK2s4WP0PK%(PK)22:PKPK15PK%(PK)13:PKPK1:PK1950ė:64477::"WARNING!...YOUR FILE WILL SOON BE"::"TOO LARGE. PLEASE SAVE THIS FILE AND"::"START ANOTHER.0):7820:76003~GS03PK%(PK)126:PK%(PK1)91:PKPK2:OV%71GS:7710:OV%48:7710:OV%48:7710:OV%48(LE10):7710:OV%48LE10(LE10):77103J1LE:OV%CV%(J,AC):OF2İ7800::765047700::K2PK%(PK)51:PK%(PK1)44:PK%(PK2)50:PKϥ ULS!Ȧ` ȱHeȱeh(Ȅ e υ υ`舄 ϥ !HH!Ȧ  Ȑhh`R !1!<1 iR`n1 l7010@Pı#JI$;TC;"T";:@(#RDY(((49296)16)5):8Pĺ2"HAVE BEEN EXECUTED YOU WILL BE RETURNED"T"TO THE MAIN VISIPLOT MENU."g Pİ7000:290rI$"E"D$"PR#0"":D$"RUN MENU"XPı]" (PRESS ANY KEY TO CONTINUE...)":16368,0b(16384)127Ĺ16368,0:::::::TYPE:":!C$"I10H ":L"YOU MAY COMBINE SEVERAL COMMANDS:":qC$"IH "C$"IE "C$"IH ":"THIS PRODUCES NORMAL PRINT, SPACES ";:Pĺ"TO THE NEXT PAGE, THEN PRINTS AGAIN.":"AFTER ALL OF YOUR PRINTER COMMANDS ";:3 "REMEMBER TO TYPE THE "C$"I LEAD-IN ";:PĺZ "CHARACTER BEFORE THE COMMAND.":f 7000:} :"C. EXAMPLES": "TO PRODUCE A NORMAL PRINT ";:Pĺ "OF YOUR GRAPHICS, TYPE:": C$"IH ":"TO PRODUCE A LARGER PRINT, IN VISIPLOT.":P "CHOOSE ";::"PRINT";::" AND YOU WILL BE ASKED ";:Pĺ "TO ENTER A PRINTER COMMAND, SUCH AS":"THE ";::"H";::" COMMAND FOR A HI-RES PRINT.": "HERE YOU TYPE ANY PKASO COMMAND ";:Pĺ "FOLLOWED BY A .": ";- }"AND RENAMED TO 'VISIPLOT.DRIVER'":] "THIS PROCEDURE IS DONE BY RUNNING";:Pĺ "'VISIPLOT SETUP' ON THE DEMO DISK.": 7000 :"B. USAGE": "THE PKASO SYSTEM WORKS DIRECTLY ";:Pĺ "FROM THE ";::"PRINT";::" OPTIONĺ, gPĺI$"80F"I$"80N":C$I$"1SB"I$"S"D h(ID7)C$""V i"A. SETUP": n"THE PKASO DRIVER FOR VISIPLOT IS ";:Pĺ s"SUPPLIED ON THE PKASO DEMO DISK" u"THE FILE IS NAMED 'PKASO.D'": x"IT MUST BE COPIED TO YOUR VISIPLOT DISK6F" (:> <TC17:8000:"VISIPLOT PRINTER DRIVER FOR THE"m FTC20:8000:"INTERACTIVE STRUCTURES INC." PTC13:8000:"PKASO (TM) SERIES PRINTER INTERFACE CARD" ZTC27:8000:"NOVEMBER 1981": ]C$"" d"INSTRUCTIONS FOR USE" fPB! D$(4):I$(9):ID(49663)/ 9000:P0LR$"ON ":RDYR$"OFF ":::"YOUR PRINTER IS "R$". "::"PRINT THE INSTRUCTIONS?";:"";A$A$(A$,1):A$"Y"409000:RDY12D$"PR#1"P1:(4)"BRUNSPECIAL CHARS.7HI" I$"6     )::M0M15ĺ"APPLESOFT ONERR CODE #";M:9050I;P#"DOS ONERR CODE #";M;Z#::"CONSULT YOUR APPLE MANUALS FOR DETAILS":21:""::" WITH FILES INTACT";:100:700:500.<'F$"NONE LOADED"Č64477::"PLEASE LOAD A FILE BE!F$"NONE LOADED":VDR5VDR9F1$"SPECIAL CHARS."(VDR)"HI"o:t"A(12289):B(16384SOLT256):14295,0:w"(((12306)105)((12305)69))ĺD$"RUNHELLO":NOT CONFIGD:{"I014:CN$CN$((12304I))::"/;(#::::"WARNING! ! !":M(2221:25599!SOLT0:CV%(21,96)D9>!SOLTSOLT1:SOLT7ĺD$"RUNERROR"t9C!FE(16130SOLT256):FF(16129SOLT256)9H!((FE15FE32)(FF32))85109J!D$"PR#"SOLT::D$"PR#0"9M!VDR(12399):$CF91 OF O.B. RAM9R!F4$"NULLCHAR":AF$"NONE SAVED"@:7OV%0PK%(PK)9:PK%(PK1)66:PKPK2:]7(K2)(OV%3)PK%(PK)3:PK%(PK1)3:PKPK2:w7PK%(PK)OV%:PKPK1:7NV%0:OV%128NV%1:OV%OV%1287OV%64NV%NV%1(1BI):OV%OV%647OV%32NV%NV%2(2BI):OV%OV%328OV%16NV%3ĺ:D$"RUN CON1.BAS"' (A$)27ė:1 2200CANFIGURED PKASO/U.":D >"THE BOARD WHICH IS PRESENTLY INSTALLED":t H"IS NOT CONFIGURED. PLEASE REMOVE YOUR": R"DISK, FLIP IT OVER, AND PRESS THE": \" KEY TO CONFIGURE OR PRESS": f" TO EXIT TO BASIC."; A$ (A$)1TERFACE CARD."[ 6CN$""ĺ::"YOUR PKASO/U IS CONFIGURED FOR":::CN$;::" PRINTING." @:::"";:Y$ :(4)"RUN MENU"  I14:(7);:I :"* * * * * ERROR!!!" :: 4"YOU MUST HAVE A CO(((12306)105)((12305)69))2000J FI014:CN$CN$((12304I)):s d:"PKASO/U (TM) SOFTWARE DISKETTE." :"INTERACTIVE STRUCTURES INC." ,::"THIS DISK CONTAINS PROGRAMS TO "::"DEMONSTRATE THE CAPABILITIES OF THE"::"PKASO/U (TM) IN4! PKASO DEMONSTRATION DISK9 D$(4)::16368,0R CHECK INTERFACE IDySLOTSLOT1:SLOT7ĺD$"RUN ERROR"FE(16130SLOT256):FF(16129SLOT256)((FE15FE32)(FF32))202A(12289):B(16384SLOT256):14295,0% <" "F$A$$ :D$"BRUN"F$",A$8800"W :"INSERT APPLEWRITER DISK - HIT 'RETURN'";A$f (7);::{ D$"BRUNTEDITOR"INLY.":: T "DO NOT USE THIS PROGRAM WITH APPLEWRITER ][, //E, OR ///."::Z "IF YOU WISH TO LOAD A SPECIAL CHARACTER":"FILE, ENTER 'Y'";:A$: A$"Y"230 :"ENTER FILENAME TO LOAD IF NOT "F$;:" ";A$ A$A$" ":(A$,1)PID(49663):(ID1)(IDMAX)ĺD$"RUNERROR"G ZF$"SPECIAL CHARS.7HI"q d(ID5)(ID8)F$"SPECIAL CHARS.8HI" nD$"PR#1" xI$"80F" 1145,254: COMMAND TILDA D$"PR#0" :5 ID8230 "THIS PROGRAM APPLIES TO APPLEWRITER 1.0 O| PKASO (TM) IN SLOT 1`:(5):(10):"THIS PROGRAM APPLIES TO APPLEWRITER 1.0 ONLY." SPECIAL CHARACTER SET LOADER( USE FOR PRINTING ONLY2 I$=CTRL-I; D$=CTRL-D<34815:I$(9):D$(4):MAX11F CHECK INTERFACE ID,  CLOSE"A$:*D$"PR#1":I$"I";I$"66F";:KxI$"80F";I$"80N":D$"PR#0":F$"NONE LOADED"ė::64477:"PLEASE LOAD A FILE BEFORE EDITING...":200::::10:0,394:0,3922:24,2619:24,2621:20,24:20,262700:34,20::ED1:250:150:("P")AP1İ1300:1100:1400:7020:5864477:1030L::"ALWAYS PRESS SPACE TO CONTINUE WITH HELP SCREENS"::D$"OPEN"A$",S"SL",D"DVD$"READ"A$:AS$:AS$"$"İ1150:1160jAS$"%"İ1150:1110tAS$:1110~100:K321150 D$"7020:P:::3::"S";::"CREEN ONLY";::18:"P";::"RINTER AND SCREEN"a100:K27ı::A$"P.HELP":AP1A$"APW.HELP"K("S")AP0İ1100:700:K("S")AP1İ1100:7020:$K("P")AP1İ1300:1100:1400:700:$.K850-zK("O")OF2(OF2):7020:810:850JK("P")İ900:810:850Z64477:850y34,16::H1:V16:I1MAXV:H::(I64);::"-"PR$(I);:VV1:V23V16:H21100:K27ıK65K65MAX1Č64477:925IAK65:IDIA1: H810R100:K27ı9aK("D")İ5000:810:850GdAP1880kfK("C")BIBI:700:810:850gK("N")NRNR:700:810:850hK("R")CRCR:700:810:850pK("C")BI(BI0):7020:810:850uK("R")CR(CR0):7020:810: I140:"_";:::\*34,16:::5::"C";::"HAR HEIGHT";:22::"R";::"EFERENCE":+5::"P";::"RINTER TYPE";:22::"O";::"UTPUT FORMAT":95::"D";::"OS FOR FILE";:22::AP1830;"N";::"ULL CHARS"::5:>:"ESCAPE"::"7 BIT ";::" 8 BIT":=BI1ĺ"7 BIT ";::"8 BIT "::|" CHAR REFERENCE: ";:CR0Ğ:"NUMBER";::" LETTER":CR1ĺ"NUMBER ";::"LETTER"::" NULL CHARACTERS: ";:NR0Ğ:"NO";::" YES"NR1ĺ"NO ";::"YES"::255:50064477:550::9::"* PKASO CHAR DESIGN *"::780:" PRINTER TYPE: ";::PR$(ID):::" PKASO CHAR FILE: ";::F$:::" # CHARS: ";::NC;:18::" FILE SIZE: ";::PCO;::" BYTES":" CHAR HEIGHT: ";:BI0Ğ:PPLE WRITER";:22::"ESCAPE";::" TO BASIC"A&100:K27ī400f0I(0):K("E")İ2000:700:500DK("D")İ5000:500XK("H")İ6000:700:500bK("A")İ7000:700:500lK("C")İ840:500vK("P")İ4000:500 K("I")İ1000500, :"Y";::"/";::"N";::")?": 34,16::5::"E";::"DIT CHARS";:22::"P";::"RINT CHARS"::5::"D";::"OS COMMANDS";:22::"H";::"I-RES DISPLAY"::5::"C";::"HANGE SPECS";:22::"I";::"NSTRUCTIONS":-5::"A";::"8 T::"WOULD YOU LIKE MORE INSTRUCTIONS (";:450:780 h:::13:"COPYRIGHT 1982"::7:"INTERACTIVE STRUCTURES INC.";:100:K("Y")İ1000:500 700:500 ::"DID YOU REMEMBER TO SAVE YOUR WORK(";:450:100:K("Y")ĉ::38400:216,0: ARACTERS":780:::" PRESS ";::"F";::"IRST LETTER FOR MENU OPTIONS" J:" PRESS ";::"ESCAPE";::" FOR A PREVIOUS MENU"::" PRESS ";::"RETURN";::" WHEN ENTERING DATA":: O"ARE YOU USING APPLEWRITER //E (";:450:100:K("Y")WPWP77:250:150 # I1500::] :7:"TYPE CHARACTERS BY ";:CR1ĺ"LETTER":ED1ĺz CR0ĺ"NUMBER":ED1ĺ 11:"FOLLOWED BY ";::"RETURN"::ED1ĺ :19:I ,::13:"* WELCOME TO *"::5:"PKASO(TM) ";::"SUPERFONT";::" CHK);:A$A$(K):60 H& d16368,0= n(16384)128110Y x16368,O:K(16384):i 50:K27ı CR1(A$)1Č64477:250:150 (A$)0ī150 CR1I(A$)31:195 (A$,1)"0"(A$,1)"9"Č64477:250:150 I(A$) I0Č6444$ 8.54096:64096:9000E8500:F$F4$:5370:WP0:300b-::"ENTER FILENAME: ";l2A$""}<100:K27ı=(K8K15)70?(A$)0Č64477:60@(A$)1A$"":68AA$(A$,(A$)1)D(K);:" ";:(K);:60 FK13ĺ(!! ! ! ! ! !!!!!!!!!