PŸ àá ÷ B¤D¤E¤I¤W¤Z¤ÂÆÌÐÒÔÎÓÙCHR12µC¤F¤P¤ÇG¤VEÒØENÄBM¤ÚA¤LINÅZZ¤DOÓÅPFÌMEM¤M¤L¤U¤N¤ÑËS¤€€€€€€ €€€€€€€€ €!€"€#€$%&€' ** GEMSETUP ** 9/86›$$Sets Gemini printer from Atari›88Jackson Beebe/807 W. Hill St/Urbana/Illinois/61801›(** INITIALIZE **›2 A<** MAIN MENU **›Fk(>:A%,"A4AF-@k( P**(" | Öåò ³®±   GEMSETUP  Ê® Âååâå |Z**(" dE%( |B|Bottom margin |† |7-@'@E( (0-16) |n11( |C|Condensed | | |x11( |D|Double strike | | |‚11( |E|Emphasized |‚ | |ŒE%( |F|Font |‘ |7-@'@E( (P/E/N) |–X( |G|PaGe length |“1-@%@8(|J-@'@X( (1-127) | **(" |H|Help | | |ª11( |I|Italics |ƒ | |´X( |L|Left margin |ˆ1-@%@8(|J-@'@X( (1-255) |¾11( |M|Mini print |¡ | |ÈC( |P|Proportional |’0-@%@C(| (1-6) |Ò**(" |Q|Quit to BASIC | | |ÜW( |R|Right margin |Š1-@%@7(|I-@'@W( (1-255) |æ00( |S|Spacing 72nds |§ | (1-127) |ðW( |T|Top line |‹1-@%@7(|I-@'@W( (1-16) |ú11( |U|Unidir print |£ | |11( |W|Wide print |„ | |11( |Z|Zero slashed |… | |**(" "Ž-@@"=(" COMMAND > O-@@"V( a@@@K:Ž)@¦, 6€.>:¦,6€4B)€4bA @N+€4C)€4c,*4 &3>:@,.6.*@-@"@D(N AJN+€4C)€4c,*4*&3>:@,.6. @-@"@D(N ATY+€4D)€4d,*4 13>:@',>:@q,96.*K-@"@O(Y A^Y+€4D)€4d,*4*13>:@',>:@r,96. K-@"@O(Y AhY+€4E)€4e,*‚4 13>:@',>:@i,96‚.*K-@"@O(‚Y ArY+€4E)€4e,*‚4*13>:@',>:@p,96‚. K-@"@O(‚Y A|d+€4F)€4f,*‘4P<3>:@',>:@f,>:@,D6‘.EV-@"@Z(‘d A†d+€4F)€4f,*‘4E<3>:@',>:@f,>:@,D6‘.NV-@"@Z(‘d Ad+€4F)€4f,*‘4N<3>:@',>:@f,>:@,D6‘.PV-@"@Z(‘d Aš€4G)€4gAp¤€4H)€4hA®Y+€4I)€4i,*ƒ4 13>:@',>:@R,96ƒ.*K-@"@O(ƒY A¸Y+€4I)€4i,*ƒ4*13>:@',>:@S,96ƒ. K-@"@O(ƒY A€4L)€4lA Ìd+€4M)€4m,*¡4 <3>:@',>:@ƒ,>:,D6¡.*V-@"@Z(¡d AÖ1+€4M)€4m,*¡4*13>:@',>:@„,àY+€4M)€4m,*¡4*13>:@',>:@r,96¡. K-@"@O(¡Y Aê€4P)€4pApôd€4Q)€4q#-@@"8( J-@@!W3>:@,a+dþ€4R)€4rAP€4S)€4sA €4T)€4tA Pd+€4U)€4u,*£4 <3>:@',>:@…,>:@,D6£.*V-@"@Z(£d A&d+€4U)€4u,*£4*<3>:@',>:@…,>:,D6£. V-@"@Z(£d A0d+€4W)€4w,*„4 <3>:@',>:@‡,>:@,D6„.*V-@"@Z(„d A:d+€4W)€4w,*„4*<3>:@',>:@‡,>:,D6„. V-@"@Z(„d ADd+€4Z)€4z,*…4 <3>:@',>:@†,>:@,D6….*V-@"@ Z(…d ANd+€4Z)€4z,*…4*<3>:@',>:@†,>:,D6…. V-@"@ Z(…d AX AWRONG INPUT›b** BOTTOM MARGIN **›lI-@@"3(NEW bottom margin E-@%@"Išv6›-A  A€6 6†-A:š,"† )†!@, Ap6 A Š\!3>:@',>:@x,>:†,3-@"@;( M-@"@R(†\ A”** PAGE LENGTH **›žI-@@"3(NEW page length E-@%@"Iš¨6›-Ap A²6 6“-A:š,"“ )“!A', Ap6 Ap¼Z 3>:@',>:@g,>:“,2-@"@:( L-@"@P(“Z AÆ** LEFT MARGIN **›ÐI-@@"3(NEW left margin E-@%@"IšÚ6›-A  Aä6 6ˆ-A:š,"ˆ @)ˆ!AU, Ap6 A îZ 3>:@',>:@w,>:ˆ,2-@"@:( L-@"@P(ˆZ Aø** PROPORTIONAL **›fŸ"@23>:@',>:@,>:,86‘. J-@"@N(‘`-@"@f(  -Ÿ"@6Ÿ-#6’. - ATŸ"!-@@">(Letter spacing P-@%@"Tš 6›-A A*6 6‰-A:š,"‰ @)‰!@, Ap6 A4F 3>:@',>:@,>:‰,2-@"@8( >6 .‘F6‘. >8 6’.=:‰,-@"@"(‰.6Ÿ-@8 AH** RIGHT MARGIN **›RI-@@"3(NEW right margin E-@%@"Iš\6›-AP Af6 6Š-A:š,"Š @)Š!AU, Ap6 APpZ 3>:@',>:@,>:Š,2-@"@:( L-@"@P(ŠZ Az** LINE SPACING **›„J-@@"4(NEW line spacing X/72 F-@%@"JšŽ6›-A  A˜< 6-A:š,6§.š( @)!A'2 Ap< A ¢Z 3>:@',>:@e,>:,2-@"@:( L-@"@P(§Z A¬** TOP LINE **›¶I-@@"3(NEW top line E-@%@"IšÀ6›-A P AÊ6 6‹-A:š,"‹ @)‹!@, Ap6 A PÔY 3>:@',>:@‚,>:‹,2-@"@9( K-@"@O(‹Y AÞ* * SUBROUTINES * *›è** CHECK FOR NUMBERS **›ò š4 ' ›ü–-@B:š,11@:š7–<–,, @H)@:š7–<–,,!@WAP  – $T-@@"5(* must be numbers * I–-@AM –P'T ›$** ERROR MESSAGE **›.P-@@"5(* WRONG numbers * I–-@AM –P$8** INSTRUCTIONS **›Bn >:A%,"AA€4AA€F-@n(#        ÈÅÌР æïò  ÇÅÍÓÅÔÕР       LI(&( Sets up GEMINI printerI( for Atari 8-bit computer VS(-("1. Set paper and turn on printer.0(S(2. Using BASIC, run GEMSETUP.`V(.(#3. Enter commands to set the type,V(# margins, and special functions.jD+(# Re-selecting functions, togglesD( them on and off.tJ(-("4. Set margins last, as they varyJ( with each type size.~N(.(#5. Program performs a form feed onN( Quit, to realign paper.ˆK(*(6. Default right margin may beK( custom set at line 1280.’o-@@#=(" push A€SAeAo @pœ** INITIALIZE **›¦€;@,°””š;@,;@,;@,‚;@,‘;@,ƒ;@,¡;@,§;@,£;@, ;@,’;@,„;@,…;@,ºK6†-6“-@f'6ˆ-@36Ÿ-?6-@K6‹-@ÄT 6. 6. 6‚. #6‘.P+6ƒ. 36¡. <6§.12D6£. L6„. T6…. ÎA• APØ3>:@',>:@d,âfF:A•,"A8(}0-@@BA@6f(* * TURN ON PRINTER * *ìXF:A•,"A8*-@@ Q(! push to begin U€X%ö ** DEFAULT RIGHT MARGIN **›K6Š-@p,3>:@',>:@,>:Š,K( change R for new default )› $€D:GEMSETUP.BAS33 P 12 P *P *–ü pS252* P *52 €2 P 12 €ðÏ8é