8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL LC! $ " " &#M8nf $ ) L! " " &J, )7(P0  ( @p !"0 *%"0"" &/) )"" &ЭL!)0I0 (Щ ߍ vŪTEMP![OMICHANGE.1 ~تLOADFILE תTEMP.1 ~ת+OMICHANGE.1e e~٪OMICHESSv@STARTIT.0n ٪MICKEY@)HIRES.PICOOD @PIE OKI92.DRVOMIOKI92.OBJ^jڪOMINEC.OBJJ_OMISTARTIT.0`~ ٪OMISTAR.OBJJaOMICONFIG.0boOMISTAR.SYSTEMcGRAPPLERDISK' &PRODOS: 2*OMIDFILE.0&a٪+OMIGRAPLD.0) p٪)OMITEMP.00 ٪-DBL.HIRES.PICC=!@ OMIEPSON.OBJJ] >dLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@LLnSOS BOOT 1.1 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!)? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8R)f 8'  )ɀ)4,- U JNT)  !N)Gi/ "4 "" " " iL X%!L!ΠΠҠ`  !"#$@~@}J@` ߩ%S @ ~`E hhhߺ0 h ߐ# ߐ ߐ ߐ 0 HϭߍLпllllhh8` QSTV،h@ihAiȱ@JJJJq@)@evȱ@Hȱ@Ah@@cee J) LxL LxJiB LxJ) GxNhHHHHL(  ްƠx@BEOD  ް(`( C)CJJJlBJ,~آ <B*IBGF08Lé'+8H <(h`@ڍL3<>=?<>CAB@?A` 1 L  <>` ڢF]PL8i m L   6< L  BLRAM' hLDLHB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`bLJCAB@=?,<ʆ>*=?BC8 é&'112`݁(݉(`}(`e`H)hJJ?(0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <((ȱ( Y'( ' f'L&`L' 'L' Y' L& Y'L'8ei` ,$`ee` `( '( (` *( ' (`hh8`8`(l&j"L  <8# ȱ)ɀ  )t& ` (Xp< @t& )mt&t&.t&w& Mt&i  ``rȱȱȱȱ0]cȱeem(ȱ(ȱ((ȱԠŠҬîʎ1DžϠl&8f ZHH)hh8JhJJJJJ j&Hk&8H) 12 (j21 h!hH h %)Ђ12H)M0 h10200I20h2 |&`L($_뿩 8!@8` MNЩUMܩ  L 5   8 0 8 `0 / x X$$%&%0`ŠӠЭ[ V7 c L '0%O '8O JmO * ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ ͍B B(8`;YYZLYLYLY"7"Y"/"ll"*# HQ$WON!-PB}OBiB ,m# m# J Qڨ)̰n]e мȱ ; ̀𩠙< iO P F V >Z SY ɘL` X _ 'P0ōҍJJJJ ɺi) ɺiLD )?      `l@Hȱ@IױHXATȱH ɯȩ׍̞5H)/@a)_ .0 :A[8@`,뎞׮Б` L` @>_)I38Ypqם`K8`@Nȱ@O@ IiNȽבN)/ȩ/N`@[ WHJjjjhA <'KI؍_JJJJح}) ) )в|J8` GpF $ ᭔ع+ؠ HH  Jh8` 䮑ٽ ٬ؠ@` ( X )8`)i пJGBJ a FإG`BH aFإG`H hHB؅F  ؅GxDE؍00C ް(`(8` L7J  G"L H  G 9ؙ` @ P8`B8` X؈ ;JHIH ILFFHGI ѭJjHIH;7IؙJJ g3HIHILJKJK`FHIG ( Ȣ؝؈JL)eKM`)` J Jͫ $0 ΚJFJL8`0C ް(`(8`ؑ@`M8`8@ؐʈI묒)8 L LةC8`؍)@ i)8zJ _ ؅F L) +&J(b ;FإGؐ/8`*J۩ ٰ`JJJJi LdH8`ͦ ٍ0  ` `ٍyٍiB0H0FG h0`שB5xED "8`  `ٽJJJJ`H͜hn)NjNjNjN. dH͜ ;٭ *Nۙ۰ڙک `Z8` d# B` . . .8۰0٭)ܝ٭*ܝ٥F٥G٭'ܝ٭(ܝ`) 8ʈ` )0ٝ)i `8`R "ꍜ NمFمG < Μ0 FGL鮑0 ٭٭ٽ8`H8`  ,0 d01 E8`100 v$0ʩGF 밽 谸 谳`12)1`0`Ȏi 0U`)8`θ` )W G JA)H ܝʈh٭ )ȱHθ`Κ8QeHI SBF0Y ٙWٙUFZSʈ {猺`8m0`,0H hi L荸Ƚθhٍ0GF8yאFG  `* ΙQ8`5IF܅G 됾`\܍]^ {8D`F` tlH)HFȍZHG[ $%܍&܍!ܢ8* J8` L ܝJ)I 'ܝF`R8i^F\G]`R5IH3H (  밯ZF[G 밠S%܈P" X)Im'܅F(܅G)܍^*܍Q 4 䭐 $H %HFFHGHG 됨`R8`)` QH_` :R(5IHH__Ѝ_@`8 e ͙_ʈ@}ȱ@oȱ@y{|rZ[_)7_I0ܢܽ \'Q*ܩu 7pqFG (ST L܅I^ mQIH` } }Y0\F]G Q_HZF[G` G8`F@ 0 e LK8`F GI8`FHGH hGhF܌ բFܽܕF芝ܝ 밶FFGG H܅I mIIHHyHȘI Lܝ` @o@ w@Ю׍_)m0JHi 뎑`C8` @ 3N@) d莽 ⭺i`0 v0GF #0 W,0 ).H hȑNWȮّNW8`ٍّNθ0NN` H h)N$% LL L L H  :pJ덯 )@፲NJOK HiKKήή IJί JФ̭JjHFIH HIGxKE ް((H hH h8`8@ȭ@LH쬒8NNO 8 ؍JL`RήʱLN.MOMEKP/MEKήLML-M O,p莭eNNO(`JNKOL H/  :P L8 gؑJ`L@ȱ@LL`BLLޢޢޢޢޢޢޢޢޢޢޢޢޢޢޢCOPR. APPLE,1983LM Mh@8nЍLޭ 0J @,,L:,L@   !"#$Ԡ͠ˠĠԠhhhhILhH),dx8 (8`@Ae f!55s+aIJK,-NOPQRSuHUSTON!' J5 s9X(K sXXK تKo`V8`no` < on sI9XX`)HJJJh`OeNeO࿰ s9XАO`@ȭ@` ON YNJKO`HHHHх܅F݅G ` ͬ 밽܅F݅G ` * % L`FGL 4܍ݍ8`FHGH 4ܙhGhF`@Bɼ>K@yٙ٩`O dIpFqG :%&N  # 4܅F܅G `J HH hh` 0 @ L\L# [Tܝ ݝ0ȩFG  0` רם__)׍_pFqG 밍 hPם8`;Zx3QTTSRWVUHEVhEhH)IWHPHHHAHHHLaVEWLӿ ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+> |a~p0xg`O~~O}`}ss`eOM>~:62.*..2.*&"*.2.*&""/GRAPPLERDISK/OMIGRAPLD.0/GRAPPLERDISK/OMITEMP.0/GRAPPLERDISK/OMICONFIG.0/GRAPPLERDISK/DBL.HIRES.PIC/GRAPPLERDISK/OMICHANGE.1%'b0 b(La GbLa  QT bL b`bbx bX`ccxbcc bX`x cX`Yc Rbap abX ybSsc RbJ abA yb =C?? â@=_? C , PRWT^_ ^_^  Eb Eb~:6x26>:1cEcU cT c0  &@DEF   %LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ ƠϠ ɘɉ ɈL :Lɍ)ې)ɮ۰ɺH h 'ĝL  LL L)'L L L'L  (L(L $ʩ $$ $L `ީ % XʩXύX X A %  % ɍNH hɛɘɉɈ $ Lc :Lcې)ɮ۰ɺ'Ɲ Lc  : X i % $ɛ$8V%֌&8V֌֠)HV)hH)hHIhդD?DRIDQD)҅; ?JDQD]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8``8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌1֍ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` *L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| L*pLuLvL{TH)p) )ph )p`HHHHUԅkvkv VxTr)p"ov=voo=vvo)? ɛ9ɍ8 xv)?r rr ɍ ɬLpLrov=voo=vvo  mxLȄȄB ÍLwPRUW xQTLwoٞo` o ?|@|2|3|x 1|X6|8|@| 7|X x ?|X` mxo詠ooyxy y xx x9HȱH {Zhhxi#xxyyxɒеLz mxԅzz Vx xLwFILE NOT FOUND)L){hyhy y x xmxo2@ {{x xnHh y  mxԅ&y&y Vx xLwDISK READ ERRORy mxyxy y xx xyxxL Ȣ Vxyxi#xxy y x mxxбyyxɒЕLFy xLw }yxxyx` mxo: =C?? 8 â@=_? C ,hhhh`U `)`xxUT`x 莽x2xx xX x1hhLyx`() ɍɛhh mxLr`o) oo``,TTTyyxxxyxx dx()Oȱ)M ȱ)ILJw Vxyyxi'xxy y x mxxxyLw xLwyЃ xLwoA@oo2 w@@w w xx wXLrzwwwx wXLyx wXLyo  H H` mxBvBv VxׅXvXv Vx xLr SELECTIONS:  y@HHHHHHHH o L6yo LzLwxxxx xy mxTU%oo*U*ooNo No No 0No% @!oo `o o o H  pho`o&o@(&ɀP& .o .o .o8jj) o&Jf&'o)'i '`o** o**)oo)J o`h h   pLu H H`h h  T Lu) Io)oL{so !oI@o oiL Lpsoi o LpsLo u oo ^uo&)ooJoIoo to  poLgtoI@o  L\too( L\tL oo` ^uoo)@T^ o) U&T`T&`red>`UUTU mx`o) o)@LUto)ooo u  toV.ooJoIooo)Lso) to)@ o  pиo8oo)@oIo L{soo(L{soZ o)  & & & & & & oo uW Rs F* JF*VJF*TJF*RJF*PJF*)p) )pLr h7h6hoo)ohhh` @)?>L)I)?I`" > >LEI I`PUPT`!%-U F 6 o pL pL ` YLʱL8:)L1L2LoJJUT`LRLR JJ U T)`UT `() "!  ɛLɈ6ɕCɍLb!" !>oL)Υ!Io * "L *" L )2h1h0 QT()LɛL [ vLb =JJH==h  < Ɋ { i <Lnɋ {8  <Lnɱ { <Lnɲ { <Lnɳ {0 <LnɛLɍo)oLo oLɛL q TUT䩠 L) F  6 zu LL 0H1H2H3H0132 PRo1TL2ULT^ W h3h << <<  LL$L #LMɳLO8鱅#$Ln+"?c~cc>xc?DDDODD~DDQEyD~GD=tt?"""O}+*3L3L3,j?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\DD?tp??pCa?x?|CCx?aC?c|xqqGGq|d~fffI. If you encounter difficulties, you can almost always resolve them by first checking the Helpful Hints section on this disk or reading your manual carefully. If not,we welcome your phone call to our Technical Department. > > WELCOME TO THE GRAPPLERDISK < < Orange Micro, Inc. welcomes you to the new printing horizons of the Grappler C and GRAPPLERDISK. A great deal of effort went into making these products as easy to use as possible堈󾱠魒堠魒嬠堲堈魒~>~|~~~6t.l&d\؂TЃLȄD+Lcd~qx>~`?~C `a|@a<pDD~DGDDDD|EyD~GO=t?*****DDt+******* #c~x??d~"""I+L3L3L3,jcycDDDDD|DEDD~OE?t?D?"""*****E~DGDtD?t=DEy~OD?D?:/O>+L?b>xDD~?tax@q@~?t?d~Gp?CxC`DD~DGDD?Dtt?Ey~GG=D?z/DDD~+"~"ccx>x#?d~D~D?t?DfffI+L3L3L3,j`|xc<xccDDDtDDEDD~D?t?D?"""E~DODtD?t}DyEq~Gd?D?:/>+"L?b>xDD~?tCq~?td~|axc?d~?D}Ey?D~D?tD"""HO+L3L3L3,j+L~"xDD~?t?ppx?<@<p~xxGGp~d~Ap`D~DGDtDtEy~D=DQ?:/DD>+"?b~cc>xc?D~DDdFDqEyD~_D=ttO+L3L3L3,j|?cxc?ccx~c"#~DD~?t`?~xxq~?tE~DDDDDt_EDD~GqO?tD?**********E~DGDtD?tDEy~_D?DQ?:/O>+ @?c>x""_DDDb"|"h"'~"""bzz" z""~d""zU~}D`|GgGqG|q|'""|rh"""r"?""" z"""DDdefffUcF|GqDqpqGq|@xD`qb" """~"""x?~" z"~""~b"Hh""~"""z~"" z""dU}a?"""CC|xx~C|x?`~CC|?CxC?""""GxGq1c?c""_3L3L3LDDDGDD|DDEyD~GD=t?"""OQ+L3L3L3,?@`|@c<cx"d~fffI+*******E~DDDDDt?qOEdD~Gy?tt?z/~+3LE~DGDtD?t|Ey~D?DQ?:/OQ>+"?c"bcx>x#>|d~?t@>q?c~xqqGGq|DE}~?tG~?a~a??C~px?p?xCxxpax|DD~DGDDtDDEyD~GQO=t?""H"DD+L3L3L3,?~`cx"d~"""I+*******E~DyDDDDt?QEDD~Gy?tt?z/~+E~DGDtD?ttEy~D?DQ?:/O}>+"?c#b?x>x?>tD~?tq?c|xxq``q~D~?td~|"""|"h""""" r z"" zx"zUUUUd"""UUUUUUUuD`qGDqDqDD""_DDLefffUggqGb"""h""""" "z"~"" z~h""~DDdUUUUU}b"|"h"'~""""z" z"x"z~d~U~}aD|q""p"""cq|~b"""x@""a~x|?"""|/h"~"~"""~z"" z"zd"""~U}D`GGDGq_|qDD""#|" z"x""h_3L3L3LefffUcFG|xGqpx`qGb"""h""""" "~"~"" z"h""~yDDdb"|bh"'~"""#z" z""z~dU~}`aD|q""x"""b"""q""~CaC~pp?x|?"/"|/h""~"""~zr" z/"d"""U}D`DGGGq~|q|"""""h" z"""~_DDD~efffUcFGqGq|qGqcq~D`qGb"""x"""b"""~#H" z "h""~DDdb"xh"'~"""'r" z~" "~dU~}aGD#"|"""`C|B@<x``~`ppAb"""Gp~Gpq|""p`~~?"?"|/h"#~"""rzz" z""pd"""U|}D`DGGGqt|q|""|~h"r""""" z"""hefffUcGGFq|qGqGq~D`qD""|"""?|qxb"""b"""h""~"""~z"~"" zh""~UUUUdUUUUU}b"|"h"'~""""xz" z"h"~dhU~}Da||LL(L]L^LrLo) p! pT14` p pS0 p p p p` pAo) p"` po) p` i)JJJJ 0) 0 pT p p r`251386980024LL L-L7L_LET p` p`f `) ` p p6` p%9 i   _` p`?LL!LxLLLT p` pA`˕ϕǕ  o)G* o)o)ɐ )K&L   `J.oo)oo)ɐ )o o` p2` o) ` pA  `0""x"|"h"""b""~"" z"""DDdefffucFc@ xGx~GqD`qq""_3L3L3LUUUUUUUub"x?h""~"""z""" z""dU}fab"|"h"'~""""zz" z""~dU~}D`|GydGq|qDD?"?"""Gq8c?c8b"~"""""xppxxp~x|?x|?p??"""|"h""""""z?"" z""D^d""zefffuggAGqD`q""_DDLUUUUUUUub"r#h""~"""z"~"" z""dU}`b"|"h"'~""""z" z"H"~dU~}Da|Gy|D|qDD"/"""Gp~`q1cb"~"""""xa~`a|G>p~~x > Helpful Hints < < Each index card in this section offers a valuable tip on the operation of the Grappler products. You will find information on product o;fghijklmC.OBJ/GRAPPLERDISK/OMINEC.OBJԅ!|!| Vx ) mx`DISK READ ERRORQ|l||||||}/GRAPPLERDISK/OMIEPSON.OBJ/GRAPPLERDISK/OMIOKI92.OBJ/GRAPPLERDISK/OMISTAR.OBJ/GRAPPLERDISK/OMINEC.OBJ/GRAPPLERDISK/OMINEC.OBJ/GRAPPLERDISK/OMINEC.OBJ/GRAPPLERDISK/OMINEXe % a 4  L LaV W x U X`] ^ xZ \ d [ X`x c X` /GRAPPLERDISK/OMIDFILE.0LL!LaLLLT p` pA`  o)ɐ )K&L   `J.oo)oo)ɐ )o o` p2` o) ` pA  `03 Helpful Hint #6 - Okidata Printers 192,193 Helpful Hint #7 - Operator Manual Updates (Use the down arrow to skip to the next card.) > > Helpful Hint #1 - "Garbage" Printing < < Any printout with strange, unwanted characters is called "garbage" printing. This is often caused when your software is set to Epson (for example) and the Grappler DIP switch set according to the Imagewriter Mode shown in the Opera{|O?|o?}OnrH?nesOnugqy~?xx7xpzC?~@W;pc~sn<7OXe % a 4  L LaV W x U X`] ^ xZ \ d [ X`x c X` /GRAPPLERDISK/OMILOADFILE.0 No addition or corrections as of this version # 01igured for imagewriter, make certain that the 192 or 193 is set for 8 bits. See also Helpful Hint #2 if white lines appear in graphics picture > > Helpful Hint #7 - Operator Manual Updates < < > > Helpful Hint #6 - Okidata Printer 192,193 < < When using the GRAPPLERDISK with either the 192 or 193, make sure that the Grappler DIP switch is in the Imagewriter Mode and the printer set for 7 bits. When using software that is confn using the GRAPPLERDISK with either the 92 or 93, make sure that the Grappler DIP switch is in the Imagewriter Mode and the printer set for 7 bits (the factory setting). See also Helpful Hint #2 if white lines appear in graphics picture.ith the Grappler C. > > Helpful Hint #5 - Okidata Printers 92,93 < < If you are using software that is designed for the Imagewriter only, you must first save the graphics picture to disk and then print using the GRAPPLERDISK. Wheon the market do not use the 9 character per inch spacing used by the Imagewriter. The standard spacing is 10 CPI. If your software is designed for the Imagewriter, the 9 CPI selection on the software will be converted to 10 CPI when printed we, however, may provide this function. Simply set your software for your specific printer and change the Grappler DIP switch to the Parallel Mode. > > Helpful Hint #4 - 9 Character Per Inch Spacing < < Generally speaking, most printers an not do the reverse line feed necessary to print superscript and subscript in the Imagewriter Mode. These printers include: Epson FX-100, FX-100+, RX-80 and LX- 80; the Star Gemini SG, SD and SR models; and Okidata 92,93, 192, and 193. Your softwarsee "Graphics/Text Switch" on page 16). If using an Okidata, you may have to change the printer DIP switch or code setting; see Helpful Hint #5 and your printer manual. > > Helpful Hint #3 - No Superscript/Subscript Printing < < Certain printers cst often, white lines appear in the graphics printout due to an incorrect Grappler DIP switch setting. See page 5 of your operators manual and double check the setting. White lines also appear if switch D on the Grappler is in the text position (tors Manual. This is incorrect. If you are setting your software to a specific parallel printer, then you must put the Grappler DIP switch in the Parallel Mode. See Manual page 5. > > Helpful Hint #2 - White Lines in Graphics Picture < < Mo?x_gCqGB|?}fE Q;w.wn]cqy|GKbNcABN}_G|w{oKn]+wOg?|co~GjO~APl~G3|wygE+yx8|G~G}of|+U*U{p`qW3Y,x?fy~gGc?}~}?}~}?}~}?}~}u߄Є}x}}x}}x}}x}ǏƏC*UB|qxo?@@?xU*U*Uju.w?8~~a?|mXlNp9f{OyO?|qq|yy{?U*Uj?x?T3Yp?fc?p9~xx|c?paqC`#N}|qq@Q;w.P'wn<~~~ |3?b~ aN}_8|s{`]+wbqqx{C~yxgO?}@ qldg_n ~qny<?~|qO7un];Ogsy~CP*~`aGsoyyY;wxLO*EqGcGo@x~qq~O~tN}@x?~Io~q9pX-y:g{O,<q?|Gq}ov`s?|q6[pccx9~ssy_7|?||pP*[}a?|GOern];w`];wx<<~p?p?p)yXxo|!.[}~?p{O;wn]Kgcs{?xacco?}#|:rc;gxC;sq<|~Cg~gAx >O@GwnY;nOGc8U*|Go{*U*U*UswqCc?@acc0bc?><~3T ~GO~ob~@GG?.U*U*x|q|?cs@o}?\_}8p?>6>~paC9pO\_Go}q {o?~`l}{_ygfso?/{{Xe % a 4  L LaV W x U X`] ^ xZ \ d [ X`x c X` /GRAPPLERDISK/LOADFILE.0ޜޜ߄ϙЄ {7o?{4waCw03:f5_0o?'{sN}?z~?|n?~?|?n?|z~?N}?|ÁÁÁÁv?|v?v?|v?v?|v?v?|v?P!cC?~O_w}?~~W-k[wూgys`ygys`ygys`ygys`y=~_<~=~_<~=~_<~=~_<~ޜ끀Ҕ߄Ȁˀřʀπ؄0{g}_?{lgg`6s0{<mg_`}_?3{g8{v}xl||<>xlw}8{x}x}x}x}x}x}x}x}pacC|lc|| wmk[wDŽDŽxxxxq}Gp}q}Gp}q}Gp}q}Gp}　τ̄X{w??y|Ap6xpL}}A_w??X{| {ds@i}y_~|?Cyads#{cu`uu`uu`uu`u`~ p߄܄?~?~?~?~gus`ugus`ugus`ugus`uৄ䀀䀀7~w0~7~w0~7~w0~7~w0~ȁρȁρȁρȁρy}Ox}y}Ox}y}Ox}y}Ox}_s{}@s{_s{}@s{_s{}@s{_s{}@s{P!cCgwPww|gW!cCwT*U+wn}n_;wn]+U*U*T*}|?U*T*j_?{?(T*U*U*U*UzU*U*U*U*U*T*}_~|zW*T*}j @wo?xW* {qX~0v<{x@C{a3vgpX/{{ps~y?}|?6|~`] |gx?ws~wgus`ugus`ugus`ugus`u?u~u?u~u?u~u?u~uɃ􃘀߄ωÄᇿ̉Є {Dw}{o}<{`{L{O@w/{{||||||||0|~sw|?wx~@?~spw7|~w7~w0~7~w0~7~w0~7~w0~ȁρȁρȁρȁρ?}~}?}~}?}~}?}~}σȃ߄Ä愳愰Є {glo|L}gO}ys`<:M}_`lo/{{@_}@_}@_}@_}_}@_}@_}@_}@P?Gy?~@y?c0~0_yy@y?W?wW{wP{W{wP{W{wP{W{wP{u`uu`uu`uu`uρ߄Є {wO_yd~wCaw0f:3e}_pO_/{{@s~_}@ss_G}@G_ss}@_s~}T*U*U*UzP~yU*U*U*U*TjW`P_*T*u@#~|?UT*Uj+x/U*U*U*Tj}r*T*U@*U+U*x?hP~~?@Ux@~A@~?Pb|@"~ PtO?q?xP~"?@_`@~~c?/@?T 8>u?|/ |x@@@a~"@6?|@*"D"} "D"xy?|p~*O?~w?A~ "Dh? ~A|| x8Wxxx/}hT*Uz>x`|_*U*Tj_>w~}?z*T*U*UP pGjp*U*"T*U|?@p/U*T* o;*T*U*Uj|+T}W*U*U"T*U*U|~p+U*U"Tj?~@*T*UjT*apjb_*U"T*U*~w~`A&|U*U*Tjh_?ex*T*U*}*z |?(U~`?U*U"T*U*h?wW*U*U*U"T*_T(pcx_*T*u?|_|(`?"T*Ub?tO@?U*U*U*Tj?xp*T*U~@ U+"T*U*U*U*U*Uj?U*U*U*U*U*U*T*}}~xU"T(#G~}k|WT*U*U*U*U_*U*U*U*U*T*{||W*T*u+p@"@q<}pe`?PTnu}>3?"h?U`T~ `"~}@xW@@nwq~0~/"tzW@*h "~+|x?p~@?p`hPA/zo@x"pP ~b~~tA~?@*}?@p?x{+D@PGh`@4~@~_:~~@_@|x?}@*@~"U*U*Uj]:wn]*W*U*U*U*U(xz|@~Q~_~w?D"D Q*} "D~?|x| xAn@t#f| T*Uzq kp@~_*U*Tj_(]__?*T*U*u|W*qWj`+U*U*T*U|~?@@~+U*Tj.}o+}/?_*T*U*Uj *_*U*U*T*U* ~~x*U*U*Tj~`*T*Uzxpx*U*T*U*}W~`/|?U*U*Tj`#Gw+T*U*P`|"E~bU*U t}@x?P: ]|}~_@?}`Q3? ~  @PzW?}~s`/P T@~"T*U*U*U*U*U_*U*U*U*U*U*T*}w~xU*T*}}_n}ox_ T*U*U*U*}+U*U*U*U*T*~~_*T*}?t} PU*xc~p{xWP0Za?@~? ?p?zPA p@@Cpp@A8~>_?`xpPz/P@?|U?||@G p`?~D xo{?|x/@|`?t~`P~/"D(Q_"@"zx|z?T: s_C~@Dx_~@/`@Q~@_T*U~hpA|p+U*Tj>o?*T*U*Uzh?@*_*U*U"T*u~?U*T*h/_>#~_"T*U*U*P/U*U*"T*U*us?~_|x/U*U*Tj||*T*U* Ux?|`@U*"T*UjO ``x`_*U*Tj_:pW}?*T*U*u?A*|G*}_`/U*U"T*U |_~`?p~+U*U*U"Tj{ @oU?S*T*U~@?U*/"T*U `_w{||_*U*U*ThPx*T*Uzhph *U"T*U*U*U*U*}+U*U*U*U*U*T*}WPxU*T*}z~}o/xW"T*U*U*U*?~/U*U*U*U*T*a2?@_*T*ujEh@}/x?"@}@/`px?@\~_??p? |?|W`ow}T~(d."`~|W@?T~_??\E?|/ D*@ _ `y/|?x"p~~P?  |?xP?A+A?ap`z~~?@+p?4 }opO@r@~ |Dj?@xh?hBs@?E"@y TO`?|` @W?u?|~/`|?|~`P?~?D"T*U*Uz?E Q"D"|g0~| ~dn?@?{_A"Dzm"D@~?x?~h]@~W|`T*Uz_`_p`|*U*Tj>?x+*T*U*U~/pWj""V*U*U*T*U?}@/U*T*?n:z_*T*U*U*?zU*U*U*T*U*u}~p/U*U*Tj?+T*Ujux?PhbW*U*T*U*px`q}W*U*Tj.@~_@o+T*U*}Ph*U`?U*U*T*U*}|Owt*U*U*U*Tj>Qn>?|_*T*U?~p@(b/U*T*U_~U*U*U*Tj~*T*U~@?h*U*~px`P@:g}~~?q@_PWp+`~|~P{7"}?^~}/|"DU*D*U*U:UnU;W*U:*}?>Ux>U*U*U*w @PjU*U*"U*~?"D(u Qj};w*U D"U U*U*U*E U*U*U*}*}?jWW.U*U*U*w_@*}U*U*"U*w~W*U"U+U*};U*E T*Q"u?w/*w;U(_"D"T*U:w;wo];W.]+P*w"T*U*u*U;UT?P*U*"D@u{~]+W**u~}+U`.QD *T*U:}Wn]+*u*U"D*U*Uj];W*T Q*U(U](U*U*U*U{/U("U{oU+Wn] *Uz(U*@(U*];~?un}+U*"]+U*U"D U*U;?/U*U"~~/U*U*U*Uo{+UTzT*U*@U*U;W*U?W(un]+U ]*U*U*"D*U*U*U;W*U* U*DU*U*U*U{_ u*}?D*u_Uz@(U*]:uj}{wU*UjWj] *U*U*D"D*u~U"DQ*U (uj_:U*U*U*}?U*uD*{_*]"D(U*];~_**U*Un_**U*U*E"D Uj}+U(U*EP*U P*D*U*U*U" U_*u.*Uz+U*U*Uj]*U*}U~]*U*D"U:]**D*U*U*UU*U"U*U*U{/UD*_*}/@(U*U*Uj]{WnU QPjU*U*D"U*w_ "D U*U* T*"E*U*U*U*U*U*U~ u/ U~?U*U*U*]{@*U*U*Q*U;?"D~*D*wnU*U""E*U*U*"D*U*U*Q_*u.@*_~/U*U*U*U_(wU*U*Q*U;_ @Q*U*w*U*@*W:PDU*u? *UnU*U*U*"u~@U*U*];wn?W@*U*U *U*P*Uj_;W*U"D|~G"DQ*u;Uz]U unD(U*U*];w.U*?W @*U*U *U D*U*U*U**"DQ*un]+(zT*];w_+(U{wUU*U*U*Uj]?w~_"U*Uz*U*P*UT*]{W "@(Q*T D(U*uW*U~Tj];un+P*w@U*U*U:wn] "U(U*EP*U (U:w. T(Q*U *}?wn]*@*]{w/t |~EU*U*U*uno]{*UDh(U*U *Uj]{wn]*UP*U((Q DQ*U*Tj};o_;Aj}oU@U*U*U*unn/uj_w*U*(U*U  U*U;wo]+*D @U*U*U"DQ*?(}/Upz "D(U*uno}o]?w.Tj"U*U*Uj];wow/T*U*ED(U*EQ"hwo_+@(}/U@/}?WU*U*U*un_;.@j]*UQ*U.];wn_+U"U*U*"U+*U*U*U*w+U*EU~~@*u~"U**U*wU*"}{.U @(w.U*U"E*U*u?U*U*z/U*U*U*un}+U*UU~Q*U*"U*w~;U*];w.U .U*U*U *U*U*U;~;U*U"U+"T*U*U*u_"]*u/*}"U?D*U*un]{w~u_;W*ED*w.U*"D(U*}?U"D*U*U"u*_jU*U*U*w/U/EQjT*D(*U*wn}W"*UnU{w*E@*w.U*U"DU*Uz+U*U*U*"T*U*D*U*U*U*U "D*E(*}w+z+U*W*U:w_*U*u ]w.U*"D*un.U* D*U*U*U"T*U*U U*U*un_+UDQz*}?"DQ*U*w*U:w_?U*}  TzW*U*"D*Uj}_*U*Q"@(U*U*("D(U"(U;w~];u**un}+UUku D*U*T*U;w_*un_+U*: U*U"(U*ujU+W*@""T"D*U*U@P*un]{W.*Uz+U D*U*U*U*wo_;w*U*w]*U T*"Q*Un}{W*" D*U:w* U~*U~]{W. U*];W T*U*U*U*WnU{T*U*U*D*"*Un}]* U.Q T*U?wU"U(_U*U*U+w.@*U{w U*U*U*U+w/U(U*@*" T*U{_*U T z];w**w~_+UX#} D"D*U:?wo];W*U**uD*U*U.];W @*Q*U "D@j;wo];U**un]+UP+n D*"E*U:+un_+D *u*U@(U*un];W* TQ*D`(U*U*U*UW*uj.U*U"T U:@*U*U*U;w?(U.]+U* ]*U*U "DQ*U*un];w*U*"xU/U*U*U*U{*D*T*U"U*U{w *?w@*U.]*U U*U*U "D"D U*U*U*U  u*]*U*U*U*]+U~?@*w_Q*]D(U*U+wnE*U{Wn]**U+U*D"D(Unw*U*U U*_*U*U*U*]W*U*Tzw_{_*UzQ*D(U*]+woU*Dun_*U"(]*U*E DQ*]{/U*U*DT*U "D*U*U*W*DTz_*/`WzG*U*U*U*]wW.U*U~U*U*"U*w_U*"D U*U*U*"T*U*U;UU"E(w_(U(U*U*Uj];UWnU jU*U*E"T*w+ U* ("T*U*U*"@(U*U*_ u.xu>_+U*U*U*U{W@(}U*U"Q*U{UDh.U*W.U*P"T "D*U*U*"D"D(j_*u.p?_n}*U*U*U*]WjU*(uU*U"*U{_+Q"*U*U*U `}?"@U*U~_*@(U:uU*U* U~}@ U*U*U;wn]{W @*U*U *U *U*U*U*U*|n~G"DU*U~o_?w~}{/Tn T Q*U*U;W*}W*@*U*U*U Q*U*"@("T "@U*un;E}D*];w~}+U*w~](U*U*U*Un]{wT*U*U*P*U @*U:w*@*U*T@U*u~ UT Uj]*Un}+*u~(U*U*U*wn}?U (U*UP*U U*u~w*U"*DU*U* uj]?wn]+@j_/UDu@U*U*U*un]W*]{w*U*E(U*U "U*U;wn]*D"U  DU*UjU@@j]?~]+@*U{/]U*U*U*U.]wn]*u.Uw*U*U*U  T*U?_+E D@(U*UT~}+(]/Up(]?UQ"E(U*Unw];w*Tj}*U Q*Uj];w~]T? T*U*U@*U*ETwn]+Aj]w.Ux.]>EQ*E*U*Un]{*Q@*]*U P*U*];w~]+T"U*U`*U*U*U*w~?U*U+w?W*U*U"(U~*U**U*w~U U;.U (w.U*U*D(Q*U*Uj}o?U*U  E~_?/U*U*U*u~+"Q~U*U "T*w~W Q*}o] *];.U u.U*U*U(Q"U*U*U*un]*U*E  U+U*U*U*U*u*U?Q*}"U;@*U*uo];U@:_{W*D@*w*U*"D(Q*UW "T*U*E"u+*U*U*U*wU:U~EQj@*u D**U:wn}U*Q*T;.U (w*U*"DQ*U*;U*U*" T*U*T*Q*U*U*U*@(DQ*};nW~*U*u*U:_;Uj Uu*U*"D*UjW*U*(U*U* U*"T(U*U*w~?D`j}*}? @*U*wj]:W~_?W*D Tzu.U*"D(Uj*E"(U*U  U*E*U*U*U*U*"U*Uj"u; T{?U*U*U*w_ *}U*U "T*wU"Dz+Uj_;W*U @ "T(Q*U*U*U(Q"U*U*Tz"};q]/U*U*U*w_*>*}u*U "T*u~w*U "D:U*U+U*@*>D*U{wWD*U?U*U*U*(U:" U*U*Un];wn]]*U**U"(U*W*U*U };\ D*U{_?w*U:o}?U:w"T*U*U*U*Uz~U*P*U*U*U""T*U*U @"T*U*U:wn];w**w?U@"D D*Q"U*U:w{}?w/U*w~U*U : U*U*U*U*U*D*U*u D*u*U:W* U*];U T*U*U*U*wnU;W*U*U~]*U T*Q*Un}. E*P@T*U{w."uP*U.U:w*D*]>W T*U*U*U*wn}T*U"U*@*U"U*]]+"E*D*Uzw+DU:U*U:u*(U: T*U*U*]:/U*U*@*U"@*U:oU*U `?$4V~Rx?}?}|{x}|?y?<x@,?g:cp0~/of?s*%|!v|@`}|~d=0N?+;TO{>/k@tt/~pmz~_}kBV/||px;8<su{@~^, \`|?xP@#}t5~oNZ~~|`If?5|?P~5P 8-@n{_O+x? @_8|sG}||x|({{_v?p~@ Bt q`Oolt\8/ev `G `pC@|~F|A>wy[~<@z?"D*U?wow*:Uj}?U(U:" T*U*U*U*Uj]wnU*U**U"*U*U*U\u?"@"D*U:w_;wn]?uj]+P*"D*U*U.U*h]*P*U**U"@(Q"~`s $8B~{%~G x@6=g}?~23wwK? _}v3mYVu}p`io48bIGtp`B |_0{%d=_lBxGV4|ws!yP?z_|/~xsp #X &LYz~a`XPC"#*}k{1y{_}AWgWz>9wC`k|~ @|~G|GL8=s}/&7+x_oWIEox}{Wx@0a~p@Vw`aQxL|?p @|o?7pyo '!0y}?'@cxAFo=U?&D~M;TZ 4z}?NueAH@pfq9oo=_N]PF`?px|wg??hr_k`?@~|~Wvgp|{AB1nS~{m@m@a$X^/ApMp~U-ykw{tk_}t;u.`@|~?/gtO?G_Eo}`[p?mu?Ct>^o5x@? wK~ 0fk^hxxOl |?~}w#|?#$Dpp U[^,x}?q- mS xM}@~KHS@ iL(?{{__Mf j@~| XKooqO'_zxWTn$xx|W|Gs@p_"`Qy?x?'|&/0 A dE@xZ?m|_g~ |x\z??Xss'7f[F~Wt H~MT|@@|k{k|whvaq'_oz0>)eI ~ p pG? 0_Do ~~}^og?(`0iypg;T{o|Oodpo~@Ap{n@N{|?r*`q{x{?_[~o{}{m|R(|'|s|/po}?$BRy?dx}~P'!@<`/z^lHeB/vS4?x@A~qyxx{hr H{~}m~`!9:R~{yo~?|?eq?~ ~}wnZw2$R02{.?~`2Wj{~?fd3:?=pW? p{w@~?tg|A!`?=t xw_W/|8 x8K~tOIn?P@$rg~?INDR1 EQU 0 INDR2 EQU 2 HOROFF EQU 4 ;HORIZONTAL PLOT OFFSET VEROFF EQU 5 TEMP0 EQU 6 TEMP1 EQU 7 KEEPX EQU 8 TEMP2 EQU 9 CLEAR EQU 10 COUNT0 EQU 11 ;TEMPORY COUNTER HBAR EQU 12 ;HORIZONTAL BAR -= #$9F VBAR EQU 13 ;VERTICALBAR | = #$FC VPHT EQU 14 ;INDICAF JSR STRING DB $03,$0E,$FF ;ETX, SO RTS ; NORM|DOUBLE|ROTATE|DOUBLE & ROTATE MRGTBL DB $8C,$05,$AF,$3F T LDA #$00 JSR OUTCHR DEY BNE SPCOUT RTS ; GRMOD AND #$7F ;ACCUMLATOR HAS THE BYTE TO BE PRINTED CMP #$03 BNE OKGRRT JSR OUTCHR OKGRRT RTS ; ;TEXT SET TXTSET JSR STRING DB $03,$02,$1E,$FF ;ETX,STX,10 CPI ;JSR STRING ;DB $1B,$36,$FF ;ESC,6 RTS GRLRFLG2 EQU $6FFE ORG $9500 JMP GRSET ;JUMP TABLE JMP GRLSET JMP GRMOD JMP TXTSET JMP GRLF ;JMP VARLF ; ; OUTCHR STA $C054 JSR OUTPUT RTS GRSET JSR STRING DB $1C,$03,$FF ;12CPI,ETX RTS ; GRLSET TAX ;X=TYPE OF DUMP LDY MRGTBL,X ;MARGIN TABLE SPCOUINTS GRAPHICS LINE FEED ; TXTSET : SET PRINTER BACK INTO TEXT MODE ; OUTPUT EQU $700C STRING EQU $7003 ;MAKE CERTAIN THIS CORREPSONDS TO THE ONE BUFF0 EQU $02 ;IN GRAPHICS SOURCE CODE BUFF1 EQU $03 BUFFER EQU $6FFA CHRBUF EQU $6FFB GRFLGS EQU $6FFF G;OKI92 PRINTER DRIVER ; GRSET : SETS GRAPHICS LINE FEED TO 7/72" ; GRLSET : SETS MARGIN AND SETS PRINTER INTO GRAPHICS MODE ; GRMOD : REVERSE THE BYTE TO CORREPOND WITH PRINTER WIRE HEADS ; VARLF : PRINTS VARIABLE LINE FEED ; GRLF : PR.OBJ/GRAPPLERDISK/NEC.DRV.OBJ|| Px ) gx`DISK READ ERRORK|g||||||}/GRAPPLERDISK/EPSON.DRV.OBJ/GRAPPLERDISK/OKI92.DRV.0/GRAPPLERDISK/STAR.DRV.OBJ/GRAPPLERDISK/NEC.DRV.OBJ/GRAPPLERDISK/NEC.DRV.OBJ/GRAPPLERDISK/NEC.DRV.OBJ/GRAPPLERDISK/NEC.DRV@/29|BjA+}3_/%_~wtW~C?|{ 9`.q x_ `~@xWx?GP{xpekz}oo/PwW 2 !2~_3_+{!8=/1?n@PjVn~_Wow??[D qy~B p~_O~@>~~{^v?.ow;|pD~|C| ~ bTE TIMES OF PLOT LEVEL EQU 15 ;LEVEL INDICATOR VAR EQU 16 VPFLAG EQU 17 INDR3 EQU 18 COUNT1 EQU 20 TITOFF EQU 21 L2KVX EQU 22 INDR4 EQU 23 INDR5 EQU 25 ;HIGHLIGHT CHAR FOR LEVEL2 TEMY0 EQU 27 ;OFFSET FOR HIGHLIGHT CHAR L2 TEMY1 EQU 28 ;LOC HIGHLIGHT CT STA VAR INC LEVEL INC LEVEL ; CLC LDY KEEPX MULT DEY LDA TITOFF ADC #16 STA TITOFF CPY #$FF BNE MULT ; JSR PESTO JMP BEGIN ; ;START LEVEL 2 ; LEV1 LDA #$05 STA INDR4+1 LDA #$40 STA INDR4 MISTK LDA #$A0 ;CLEAR NUMBER LOC STA $07DF LDA #1 HAR 3 STA $07DF LDA #2 STA KEEPX JMP LEV0 ; NUM4 CMP #180 ;#4 BNE CCR ;CHECK RETURN KEY JSR CLCSR LDA #$B4 ;CHAR 4 STA $07DF LDX #3 STX KEEPX JMP LEV0 ; CCR CMP #141 ;RETURN KEY BEQ CLEV JMP READK CLEV LDA #25 ;THE LENGTH OF VERTICAL BAR OFFSEEAR LAST HIGHLIGHT LDA #$B1 ;CHAR 1 STA $07DF LDA #0 STA KEEPX JMP LEV0 ; NUM2 CMP #178 ;#2 BNE NUM3 JSR CLCSR LDA #$B2 ;CHAR 2 STA $07DF LDX #1 STX KEEPX ;KEEPX KEEPS THE SELECTION JMP LEV0 ; NUM3 CMP #179 ;#3 BNE NUM4 JSR CLCSR LDA #$B3 ;CR CLCSR ;CLEAR HIGHLIGHT INC KEEPX LDX KEEPX JMP LEV0 ; NXCMP CMP #139 ;UP ARROW BNE NUM1 CPX #0 BEQ READK ;CAN'T MOVE UP JSR CLCSR ;CLEAR HIGHLIGHT DEC KEEPX JMP LEV0 ;CHECK INPUT NUMBER NUM1 CMP #177 ;#1 BNE NUM2 JSR CLCSR ;CL0 STA CLEAR ; JSR HLIGHT ;HIGHLIGHT THE SELECTION ; READK JSR RDKEY ;RDKEY ROUTINE ;KEY PRESSED THEN CHECK KEY VALUE KDOWN CMP #138 ;DOWN ARROW BNE NXCMP LDX KEEPX ;EQ. MOVE CURSOR DOWN CPX #3 ;DOWN UP TO 3 BEQ READK ;CAN'T MOVE DOWN JSLINE ;REWRITE ROUTINE START CSOR JMP LEV0 ;UPDATE CURSOR TLOC JMP LEV1 ;START LEVEL2 ; BEGIN LDA LEVEL ;START CMP #2 BCC LEV0 ;AT LEVEL1 BEQ TLOC ;START LEVEL2 JMP LEV2 ;START LEVEL 3 ; LEV0 LDX KEEPX UPDATE LDY #0 LDA # STA INDR2+1 LDY #0 SLINE LDA MMDAT,X ;MAIN MENU CONTENT:1 ABOUT THIS DISK STA (INDR2),Y INX INY CPY #18 BNE SLINE ;CONTINUE THE SAME LINE INC TEMP0 ;INC THE POINTER LDA TEMP0 CMP #4 ;ONLY 4 SELECTION BEQ CSOR ;GOTO CURSOR JMP NXLN ;PLOT NEXT BCC WORP1 ;PUT IN THE LINE: TYPE NUMBER, OR USE ARROWS JSR PIBOTL ;PUT IN BOTTOM LINE ; ;SHOW UP MAIN MENU LDX #0 STX TEMP0 NXLN LDY TEMP0 LDA MML,Y ;LOW BYTE OF LOCATION FOR EACH SELECT STA INDR2 LDA MMH,Y ;HIGH BYTE OF LOC TO PLOT EACH SELECTON VPFLAG JSR PLOSUB ;PLOT WINDOW LDA #$A0 STA $29 LDA #$00 STA $28 ; ;START PLOT WORDS STW LDA #1 STA $C00F ;ALTERNATE CHAR SET ON ; LDY #0 ;Y INDEX FOR TABLE CT JSR TWORD ;TOP LINE WORD ; LDY #0 WORP1 LDA CT,Y ;MAIN MENU STA $0684,Y INY CPY #16TA HOROFF ;HORIZONTAL OFFSET STA VEROFF ;VERTICAL OFFSET LDA #1 STA VPFLAG JSR PLOSUB ; STA $C054 ;MAIN MEMORY JSR TOPLN ;PLOT THE TOP LINE-MAIN MEMORY ; ;SETUP THE FIRST LEVEL BLOCK START LDA #0 STA HOROFF STA VEROFF ;VERTICAL PLOT OFFSET STA - WHEN HIT CTL-RESET GO BACK TO START LDA #$00 STA $3F2 LDA #$08 STA $3F3 EOR #$A5 STA $3F4 LDA #$A0 ;SETUP 80 COLUMN JSR $C300 ;GO TO 80 COLUMN CARD NOP STA $C055 ;AUX MEMORY NOP STA $C055 ;AUX MEMEORY JSR TOPLN ;PLOT THE TOP LINE LDA #0 SEED ON/OFF DIRLD EQU $7006 RDKEY EQU $FD1B ;KEY INPUT ROUTINE DSPLYPIX EQU $8000 ; ORG $800 ;INITIAL SET UP INIT LDA #0 STA LEVEL STA COUNT0 STA VPFLAG STA KEEPX STA TITOFF STA L2KVX LDA #13 ;13 VERTICAL BAR STA VAR STA VPHT ;RESET VECTOR SET UPHAR LEVEL2 FLHL EQU 29 ;FLAG FOR HIGHLIGHT LEVEL2 INDR6 EQU 30 KLENH EQU 32 ;LENGTH OF KEY INPUT CHAR EQU 33 STORY EQU 34 LFTOFF EQU 35 MOREY EQU $3C CONTX EQU $3D PRTLD EQU $7009 PAGE12D EQU $6FF0 PRTYPE EQU $6FFC DOSLF EQU $6FFD ;SELECT PRODOS/DOS,LINEF STA VPFLAG STA $C055 JSR PLOSUB ;WINDOW PLOT AND WINDOW ERASE SUBROUTINE STA $C054 LDA #0 STA VPFLAG JSR PLOSUB LDA KEEPX BEQ INTRO ;GO TO 'ABOUT THIS DISK' CMP #1 BEQ JJPSUP ;PROGRAM SET UP CMP #2 BNE JQUIT LDX #66 JSR PPG ;GOTO PRINT GRAPHIC JMP L2CP JQUIT JMP QUIT JJPSUP JMP JPSUP ;CHANGE FROM JSR TO JMP ; INTRO JSR CLBL ;CLEAR BOTTOM LINE JSR PBOTLN ;PUT BOTTOM LINE LDY #0 TLATD LDA $040C,Y STA $042E,Y ;TOP LINE ABOUT THIS DISK INY CPY #16 BNE TLATD LDA #0 STA TEMP0 PG2RS LDX #$A $07F0,Y INX STA $C054 LDA $040C,X STA $07F0,Y INX INY CPX #16 BCC LESC ; ;CHANGE THE TOP LINE LDY TITOFF JSR TWORD ; LDX #0 STX TITOFF ;RESET TO 0 LDY #0 PESC STA $C055 LDA ESC,X STA $07EC,Y INX STA $C054 LDA ESC,X STA $07EC,Y INX IN JMP L2RDKY ;READ KEY ;DELETE LAST LEVEL YESC JSR ESCR0 ;EARSE ROUTINE SETUP LDA #13 STA VAR JSR ESCR1 LDY #0 ; STY L2KVX LDA #$A0 STA (INDR4),Y JMP STAY ;WAS JMP START ; ;POKE ESC TO PESTO LDX #0 LDY #0 LESC STA $C054 LDA $040C,X STA $C055 STCHECK LEVEL 2 ESC KEY LDA #36 STA VAR LDA #32 STA TITOFF INC LEVEL INC LEVEL JSR PESTO ;POKE ESC TO ;PUT BLANK AT LOCATION WHICH IS SELECT 1 LDA #$A0 STA $0540 JSR AA1 ;CLEAR TOP WORD STA $C054 JMP BEGIN ; L2ESC CMP #155 BEQ YESC ;YES, ESC KEYDA #$06 STA INDR4+1 LDA #$01 STA L2KVX JMP L2CP ;UPDATE LEVEL 2 CURSOR ; L2N3 CMP #179 BNE L2CCR ;GOTO CHECK RETURN JSR CL2CR LDA #$B3 ;CHAR 3 STA $07DF LDA #$07 STA INDR4+1 LDA #$02 STA L2KVX JMP L2CP ;CHECK RETURN L2CCR CMP #141 BNE L2ESC ; L2N1 CMP #177 ;NUM 1 ? BNE L2N2 JSR CL2CR ;CLEAR CURSOR LDA #$B1 ;CHAR 1 STA $07DF LDA #$05 ;AT SELECT 1 STA INDR4+1 LDA #$00 STA L2KVX JMP L2CP ; L2N2 CMP #178 BNE L2N3 JSR CL2CR ;CLEAR LEVEL 2 CURSOR LDA #$B2 ;CHAR 2 STA $07DF LHE LOCATION OF CURSOR JMP L2CP ;UPDATE CURSOR ; NXCK1 CMP #139 ;MOVE UP ? BNE L2N1 CPX #0 BEQ L2RDKY ;GOTO WAIT LOOP JSR CL2CR ;CLEAR LEVEL 2 CURSOR DEC L2KVX ;MOVE UP CURSOR DEC INDR4+1 JMP L2CP ;UPDATE CURSOR POSITION ;CHECK LEVEL 2 INPUT NUMBERLDY #0 STY FLHL JSR HLL2 ;HIGHLIGHT FOR LEVEL2 ;READ KEY L2RDKY JSR RDKEY ;RDKEY ROUTINE YESKY LDX L2KVX ;LEVEL 2 CURSOR LOC VALUE 1 TO 3 CMP #138 BNE NXCK1 CPX #2 BEQ L2RDKY ;GOTO WAIT JSR CL2CR ;CLEAR LEVEL 2 CURSOR INC L2KVX INC INDR4+1 ;INC TUATS,X ORA #$80 STA $07D0,Y INX INY CPY #17 BNE PB0 RTS ; UATS ASC 'use the up or down arrow to scroll' ; PALH DB $05,$05,$06,$06,$07,$07,$04,$04 PALL DB $2C,$AC,$2C,$AC,$2C,$AC,$54,$D4 ; ;L2CP JSR AWHIL L2CP PALL,X STA INDR1 LDY #$1E ;30 CLLN LDA #$A0 STA $C055 STA (INDR1),Y STA $C054 STA (INDR1),Y DEY BPL CLLN INX CPX #$08 BNE CLRL1 RTS ; PBOTLN LDY #0 ;PUT BOTTOM LINE LDX #0 PB0 LDA UATS,X ORA #$80 STA $C055 STA $07D0,Y INX STA $C054 LDA P JSR RDKEY ;READ KEY CMP #139 BNE SESC JSR CLRL0 ;CLEAR LINES FOR LEVEL1 JMP DMUP ;BACK TO LAST LEVEL SESC CMP #155 ;RETURN? BNE TENDP JMP YESC ; JPD1 JMP PATD1 ; ;ROUTINE TO CLEAR 8 LINES OF LEVEL 1 CLRL0 LDX #0 CLRL1 LDA PALH,X STA INDR1+1 LDAINC PATD1+2 INC PATD2+2 PATD2 LDA ATD,X CMP #$FF BEQ TENDP ORA #$80 STA $C054 STA (INDR1),Y INY CPY #31 BEQ JGIDCO INX CPX #0 BNE PATD1 INC PATD1+2 INC PATD2+2 JMP PATD1 JGIDCO INC TEMP1 INC TEMP1 LDX TEMP1 JMP UGLN ; ;END ONE PAGE TENDNEXT PAGE JMP GETLN ;CHECK ESCAPE TO LAST LEVEL CKESC CMP #155 ;ESC? BNE DWK JMP YESC ;DELETE LAST LEVEL ; PATD0 LDY #0 LDX #0 PATD1 LDA ATD,X CMP #$FF ;PAGE TERMINATOR BEQ TENDP ;END PAGE ORA #$80 STA $C055 STA (INDR1),Y INX CPX #0 BNE PATD2 P PATD0 DWK JSR RDKEY CMP #138 ;MOVE UP BNE MUP ;TEST MOVE UP JSR CLRL0 INC TEMP0 INC TEMP0 LDA #$FF STA CONTX JMP GETLN MUP CMP #139 ;MOVE DOWN BNE CKESC LDA TEMP0 BEQ DWK JSR CLRL0 DMUP DEC TEMP0 DEC TEMP0 LDA #$FF STA CONTX ;RESET FOR FF ;PAGE 2 RESTART STX CONTX GETLN LDX TEMP0 STX TEMP1 UGLN LDA LINES,X STA PATD1+1 STA PATD2+1 INX LDA LINES,X STA PATD1+2 STA PATD2+2 ; GIDCO INC CONTX LDX CONTX CPX #8 BEQ DWK ;DONE ONE PAGE LDA PALH,X STA INDR1+1 LDA PALL,X STA INDR1 JMY CPX #6 BNE PESC RTS ; ; ATMM LDA #1 STA VPFLAG STA $C055 JSR PLOSUB STA $C054 LDA #0 STA VPFLAG JSR PLOSUB LDA KEEPX CMP #1 BEQ JPSUP0 ;GOTO PROGRAM SETUP CMP #2 BNE QUIT LDX #66 JSR PPG JMP L2CP JPSUP0 JMP JPSUP QUIT CMP #3 BEQ *+5 JMP RANH ; CLR JSR $C300 ; LDA #$00 STA $28 ;PUT CUSOR ELSEWHERE LDA #$A0 STA $29 JSR SAVCONF JMP QUIT0 ERROR LDA #$04 STA INDR1+1 LDA #$D4 STA INDR1 LDA #>ERRMSG STA INDR2 LDA #ERRMSG1 STA INDR2 LDA #SPTBL ;LOW BYTE OF SELECT PRINTER TABLE STA INDR6 LDA #SDTBL ;LOW BYTE OF SELECT DOS TBL STA INDR6 LDA #LFTBL ;LINEFEED ON/OFF TABLE STA INDR6 LDA #IDD STA INDR1 LDA #ECSBC STA INDR1 LDA #PPTBL STA INDR6 LDA # > Helpful Hint #4 - 9 Character Per Inch Spacing < < Generally speaking, most printers an not do the reverse line feed necessary to print superscript and subscript in the Imagewriter Mode. These printers include: Epson FX-100, FX-100+, RX-80 and LX- 80; the Star Gemini SG, SD and SR models; and Okidata 92,93, 192, and 193. Your softwarsee "Graphics/Text Switch" on page 16). If using an Okidata, you may have to change the printer DIP switch or code setting; see Helpful Hint #5 and your printer manual. > > Helpful Hint #3 - No Superscript/Subscript Printing < < Certain printers cst often, white lines appear in the graphics printout due to an incorrect Grappler DIP switch setting. See page 5 of your operators manual and double check the setting. White lines also appear if switch D on the Grappler is in the text position (tors Manual. This is incorrect. If you are setting your software to a specific parallel printer, then you must put the Grappler DIP switch in the Parallel Mode. See Manual page 5. > > Helpful Hint #2 - White Lines in Graphics Picture < < Mog < < Any printout with strange, unwanted characters is called "garbage" printing. This is often caused when your software is set to Epson (for example) and the Grappler DIP switch set according to the Imagewriter Mode shown in the Opera3 Helpful Hint #6 - Okidata Printers 192,193 Helpful Hint #7 - Operator Manual Updates (Use the down arrow to skip to the next card.) > > Helpful Hint #1 - "Garbage" Printinting Helpful Hint #2 - White Lines in Graphics Picture Helpful Hint #3 - No Superscript/Subscript Printing Helpful Hint #4 - 9 Character Per Inch Spacing Helpful Hint #5 - Okiidata Printers 92,9peration, printers, as well as updates to your operators manual. Every helpful hint card is designed to help you get the answers you need. A list of titles can be found on the next card. Helpful Hint #1 - "Garbage" Prin > > Helpful Hints < < Each index card in this section offers a valuable tip on the operation of the Grappler products. You will find information on product o0 ;CLEAR SCREEN LDA #$00 ;CLEAR SYSTEM BIT MAP LDY #$17 STA $BF58,Y DEY BPL *-4 ;JSR LFIN JMP SUGF GOERR JMP ERROR ; SET UP GRAPPLER FUNCTION SUGF LDA #$00 STA GRFLG2 STA GRFLGS STA PAGELD LDA #$31 STA PAGE12D ;LOAD FILE4 TO $2000 LDA #>FILE4 > > WELCOME TO THE GRAPPLERDISK < < Orange Micro, Inc. welcomes you to the new printing horizons of the Grappler C and GRAPPLERDISK. A great deal of effort went into making these products as easy to use as possible,$B1,$B1,$B1,$B1,$B1,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B2,$B3 ; FILE1 STR '/GRAPPLERDISK/GRAPLD.0' FILE2 STR '/GRAPPLERDISK/TEMP.0' FILE3 STR '/GRAPPLERDISK/CONFIG.0' FILE4 STR '/GRAPPLERDISK/TITLE.0' FILE5 STR '/GRAPPLERDISK/CHANGE.1,$61,$7F,$0F,$7E,$7F,$70,$7F,$07,$7F,$30,$78,$7F,$67,$7F DB $60,$7F,$4F,$7F,$1F,$7E,$1F,$7E,$4F,$7D,$60,$7D,$73,$73,$60,$65,$4F,$4D,$1F,$1E,$1F,$3E,$7E,$7F HBYT DB $3A,$36,$32,$2E,$2A,$2E,$2E,$32,$2E,$2A,$26,$22,$2A,$2E,$32,$2E,$2A,$26,$22,$22 LBYT DB $B1 TYA PHA LDY TIME PWIT NOP NOP DEY BNE PWIT PLA TAY RTS OPEN DB $03 FILEL DB $00 FILEH DB $00 DW $9000 REFNUM DB $00 READ DB $04 RDREF DB $00 DBUFL DB $00 DBUFH DB $00 LENGL DB $00 LENGH DB $20 DW $00 CLOSE DB $01 CLSREF DB $00 ; DATBL DB $7C,$7FNE ERROR ; LDA #>FILE3 ;LOAD FILE3 TO $6FFC-$6FFD LDX #FILE5 ;LOAD FILE4 TO $6400 LDX #FILE1 ;LOAD FILE 1 TO $7000 LDX #FILE2 ;LOAD ONG LDX #$FF TWICE LDA #$FF STA TIME JSR WAIT DEX BNE TWICE RTS FILEOP STA FILEL ;OPEN FILE STX FILEH SEI JSR $BF00 DB $C8 DW OPEN CLI RTS FILERD STA DBUFL ;READ STX DBUFH SEI LDA REFNUM STA RDREF STA CLSREF JSR $BF00 DB $CA DW READ BNE RDONE ;DELAY BEFORE PLOT THE NEXT DIAGRAM LDX #$C0 ;TIMES OF $FF JSR TWICE ; LDA #0 STA VAR LDX #$13 STX TWOP JMP TEST ; RDONE JSR $FD1B ;READ KEY THEN GO ON LDA #$A0 STA $C00D STA $C051 STA $C054 JSR $C300 JSR LFIN JMP $0800 LSTA (INDR),Y ;SOUND LDY #$FF SPK LDA $C030 LDA #$F0 STA TIME JSR WAIT LDA $C030 LDA #$80 STA TIME JSR WAIT INY CPY #$0F BNE SPK ;INC TIME ;LDA TIME ;BNE SPK ;LDA #$F0 ;STA TIME ; INC VAR INX CPX #40 BEQ DONE JMP PGRAPH ; ; ; DONE LDA TWOP X STA $36B0,X LDA #$78 STA $32B0,X LDA #$06 STA $36B0,X LDA #$3E STA $3AB0,X LDX #0 LDA #$E0 STA TIME PGRAPH LDY VAR LDA HBYT,Y STA INDR+1 LDA LBYT,Y STA INDR LDY TWOP STA $C055 LDA DATBL,X STA (INDR),Y INX STA $C054 LDA DATBL,X STA $C00C STA $C050 STA $C052 STA $C057 STA $C054 STA $C05E STA $C05F STA $C00D STA $C05E STA $C05F STA $C05E STA $C00D STA $C001 ;DELAY BEFORE ANIMATION JSR LONG JSR LONG ;THIS IS A TEST LDX #0 STX VAR STX TWOP TEST LDA #$7E STA $3AB0,H LDA #$3F STA A2H STA C3ROMMAIN STA BANKOFF JSR AUXMOVE LDX #0 ;TRANSFER FROM MAIN PG2 TO MAIN PG1 STX A1L STX A4L DEX STX A2L LDX #$40 STX A1H LDX #$5F STX A2H LDX #$20 STX A4H LDY #0 JSR MOVE STA BANKON ; ;DISPLAY PICTURE STA $C000 LDX # > Helpful Hint # > Helpful Hint #2 - White Lines in Graphics Picture < < Most often, white lines appear in the graphics printout due to an incorrect Grappler DIP switch setting. See page 5 of your operators manual and double check the setting. White lines alsoh set according to the Imagewriter Mode shown in the Operators Manual. This is incorrect. If you are setting your software to a specific parallel printer, then you must put the Grappler DIP switch in the Parallel Mode. See Manual page 5. > > > Helpful Hint #1 - "Garbage" Printing < < Any printout with strange, unwanted characters is called "garbage" printing. This is often caused when your software is set to Epson (for example) and the Grappler DIP switc3 Helpful Hint #6 - Okidata Printers 192,193 Helpful Hint #7 - Operator Manual Updates (Use the down arrow to skip to the next card.) ting Helpful Hint #2 - White Lines in Graphics Picture Helpful Hint #3 - No Superscript/Subscript Printing Helpful Hint #4 - 9 Character Per Inch Spacing Helpful Hint #5 - Okiidata Printers 92,9' peration, printers, as well as updates to your operators manual. Every helpful hint card is designed to help you get the answers you need A list of title can be found on the next card. Helpful Hint #1 - "Garbage" Prin > > Helpful Hints < < Each index card in this section offers a valuable tip on the operation of the Grappler products. You will find information on product oith the Grappler C. > > Helpful Hint #5 - Okidata Printers 92,93 < < If you are using software that is designed for the Imagewriter only, you must first save the graphics picture to disk and then print using the GRAPPLERDISK. When using the GRAPPLERDISK with either the 92 or 93, make sure that the Grappler DIP switch is in the Imagewriter Mode and the printer set for 7 bits (the factory setting). See also Helpful Hint #2 if white lines appear in graphics picture.ful Hint #2 if white lines appear in graphics picture. > > Helpful Hint #7 - Operator Manual Updates < < No addition or corrections as of this version # 01 > > Helpful Hint #6 - Okidata Printer 192,193 < < When using the GRAPPLERDISK with either the 192 or 193, make sure that the Grappler DIP switch is in the Imagewriter Mode and the printer set for 8 bits (the factory setting). See alsoHelp