' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` P  P>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- ( _ @ ՠ@跻~!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 ~(`  d Ġ z#  uP;1ˮ41ˬ;;4441;;;33333̳!&.14ˬ4̳-;;;33̳>˭;;;<Ϳ;333333J441;;1ˮ41;;;4.4߳;33333˭4őʈ`4ˮ411;444˭;˭;;.;33333vy^$1;;3;;4Î;3;;;1;3;;;;PхӽQP4;3;3;;;3;;;;48;ȄטON;33;;4;;3;;44;3;;;;; OO;÷;3;;4;;3;;;4;33;;;;;` O;3;3;;4;313;;41;;;3;;;;λOL~]O;3;31̷<;3;3;;44;=;3;;;;;ѩL\1;;1;;144;3;3;3;;;;;3OO3;31;4;31;;44;;;3;;;;эOOO;;.44 ;;3;33;;;4dz̻333; ;;4.44;3;333;1˭4̄333ΑOO;144 ;;-;3;3ˍ;;;ϱϳ3;333;O;;4.44 ;;-;3;3γ̍;1;43;333;x;4ì14ˍ;;1ì44ˍ;ˍ;;;3;333λP`;41̳̳˳3;3;4ˍ;ˍ1;<ݿ;3;333;P,OO41ˍ;;141;;;4.44̐;3;333;4P)V4ì41;;4î44ˍ;ˍ;;4.;3;333O14-;; 4.4;3;3;14λ3;3;OO44-;; 4.7;3;3;343;3λO(1)160:(16384)12866#C::_D::12:"Pour l'assembleur":12:"-----------------":cope":::4:"Toujours avec le petit carr{!":P10:T@:16:H1:Y515550:H:HH1:H3H5AC1250:1C,Y:C,YB(1)100:(1)7:1(1)280,es sont celles"::8:"de la FORME concern{e.":::T?P8:"Et pour terminer un petit kal{idoscope":::4:"Toujours avec le petit carr{!":P10:T@:16:H1:Y515550:H:HH1:H3H5AC1250:1C,Y:C,YB(1)100:(1)7:1(1)280,avec":8:"la couleur compl{mentaire"Q;C12:D064:D:1130,70:D,C:T:68<P2:" XDRAW est en $F65D et DRAW en $F601"=P2:"Il faut mettre les coordonn{es en:":::5:"-> ABSCISSE X,Y":5:"-> ORDONNEE A"5>P2:"Attention! Les coordonn{,50z8P2:" ROT permet de faire tourner la FORME"::24:D064:10:"ROT = ";D;:1100,70:D:1100,70::T:1100,709P2:"Vous pouvez cr{er ainsi de jolis effets"::C12:C:D064:D:1130,70:D,C:T%::" XDRAW dessine comme DRAW mais 50858:D%:C,D%:6232,82:233,3::::7:1:0:" DRAW permet de tracer une forme en X,Y"::7:"Exemple: DRAW 1 AT 100 , 50":1100,50:T7:" SCALE donne la dimension de la forme"::D140:10:"SCALE = ";D;:1100,50:D:1100,50::T:1100%X ] X Z%Z ]]Z ]X%Z%Zgo~ffgvfff%Z%gfh{?""" Z%Z%]]X%Z%X%]]Z ]Z%Z%Zn?~ffgvfff%?~o """ YY]Z!Ynfvgvgw_YYw ;~g?fvgwww"  """ YY]Z! fvgvgwwYZ%no~gf"gw"  """ X X^Z!YavgvgY yn{w~vgvgwww  """   ]Z!YavgvgwYYY~?ggvgwww'  """ Y]Z!YY]Z!YYYonncvgvgwwwxo """ Y]XfnYwvgvgYYYo~~vgvgwwww """  Z    X YXYY]~yn~ffvgvgwwYnn?w{n"" Y]Z!YY]Z!YYY]?~fvgvgww """ 8`$Z!%Z%]]ZafvgvgvZ!Z!X~fs8ffvgvff  """  ?hܙXX!%Z%]]X&fvgvgvf!Z%Z~o?so{f gvf   """  >HX! f%]]Z!bvgvg]Z! Z!f~ovgvgvff """  <`,<0Z!&Z%]]Z!vgvgvZ! Z!{gcgvgvff' """  <   Z%X]Z!%Z%]]Z  Z!%~n?~gvgvgvff? """  %Ў< %X ff^fgvgv_]Z!]Z!~fogvgvgvffo """   Z%X Z X%X%X]Z ]Z!%Ze]f"fvgvgvf!!%fnof"  c%Z ]]X!%Z ]]Z  Z!%Zogofvgvgvf!?f"""  25%]]Z%Z!%ecvgvgv%]%]]wf``g~?fvgvgv """  "%X]Z%Z!%ffvgvgvg]%]]os{w~?`gvg" """  "v { fA`,4í4-4 4-4-;;;;;í˭4;;;;;E B B`4í4-4 4;;;;;;έí1˭B4 4-4-4;;;;4í1í4Ͽ;;;;;;Ā(í474 4-4-4;;;;;í14Ͽ;;;;;;@L 4˭141111414-4;;;;;;;44-4-4;;;;έ4í44;;;;;;;ęS Z 41˭1í414˭44í4-43;;;;;;1˭r u x { 1ˌ1˭1144˭14í4-4̿;;;;;; ;;.44-;;3333;;;4?߿̳̳3333x z | ~ ;;4.44;33333<1˭4߿J O 14344-;;-;33̳γ˭;ˬ;;ϳ333333FKNT;;.44-;;;333γ;˭;;4333333ÍؠóÍؠijčؠijčؠųōؠųōؠ²Ƴ³ƍؠ²Ƴ³ƍϠؠؠؠؠؠųōؠ²Ƴ³ƍؠ²Ƴ³ƍؠóÍؠóÍؠijčؠijčؠųōؠųōؠ²Ƴ³ƍؠ²Ƴ³ƍؠó 卪ӠɠؠóÍؠóÍؠijčؠijčؠųō 卍ԱԠűԱԠðñɠԱðӍ 卪 ͧ ԠӍ 占ҠԲ ҠԲԲԠűРש̠ÍҠԱ̧ ㍍Π 占ҠԲ䍠ǍҠԲԠӍРԍЍ½ŸΠ 占Ա Ա 卍 ㍪ ΍ ΍؍Р̵̱ҍҠԲ 占  ½ РѠ΍Р̰̱ؠ 占̠Š 卍̲ Ѡ̴ ǽ ٠½« ǽ٠Ѡ̵ ½ 卍̴  占  ؠǠ Ǎ%Z%Z%Z!~:{wwwww'Z%Z%o{?~?fwwwww"""  """ %Z%Z%Z!pfwwwwwwZ  Z%b8gg""" """  """  X `%Z!%Z%wwww%Z Z%vw~nwwwwww""  """  Z Z%Z!%Zfwwwww%Z Z%ofn?wwwwww"""  """ X Z%X  X X X!%X%Z%Zono{wwwwwww~o  """ Z%Z n!%Zvwwww%Z%X {~w~wwwwwwww&"  """  X X! Z Z%Z %X%Z Z%o{:fwwwwwwZ%Zhxw{ """ %X%Z!%X%X%Z!%X%Z%Z%o~fwwwwwwZ{ """ Z%Z%Z%]]Z&ffgvff^%Z%Z~?oofvffff""  """ ]X%Z%Z%]ffgvfff%X%Z~w`o~f"" ""  """ Z%Z Z%]]Z%Zfgvf^Z%]Z Zn?gfgvffff"  """ Z%Z%Z%]]Z%ffgvffZ%XZ%Z{~w~gvffff""  """  Z%Z%]]Z%X Z X]X% Z%Z%~?~gfgvffffw """  X%Zff]Z%ffgvf]Z% X%Z~gfgvffff{g  """  ϠōŠҠōΠРԍӠ占΍͍Ҡͯ͠ 卍 ϮӍԠƍԠƍϠōōϠōΠ΍΍ӍϠؠĬϠō֠ Ţō֠ Χ Ţ΍čٍǍРٍٍǫàٍӠĠ ýٍٍàԠ占٠ 占ٍٍàԫٍĠٍōРōōРŠ ٽ ō΍΍ ç ԿčРٍٍīàٍàĠ ōӠΠ ΍Ġ īϠōРōōϠò ٽҠԿԲؠ вٍٍҠ؍̠вàò 卪ֳϠӍàΠֲϠӍàֳ ōӠֳ ΍ӭ ӭ ٠ ٽҠԿ٠ ٽԱ ؽ б٠ ٠ Ҡ؍̠бàñ ߠҠ ҍŠР 卻 ŠĠ ؠ ؽ ٠ ؠàԱ ٽ٠占Ġ ٠ 占Ҡ ïҠ ï؍Ŭؠ РٍɠŠ 󍭭Ϡōīōؠ΍ÍàǠ Ԡ ፠ àǫ 󧍠ԫ٠àǫǭ 占ǭ̭č̭īĠ 占ԍРҩ ٍōӍؠ΍Ѝ΍΍Š͠ Ǎ͍ؠؠİİİİİİİİؠؠİİİİİİİİؠؠİİİİİİİİؠؠİİİİİİİİҠ°ԠƍİİİİİİİҠ°Ԡƍؠؠؠؠؠؠؠؠؠؠؠؠ Ϯ ۹ōҫ 占 占Ҡ ѠŠӍϠōӠōŠҠō΍Ϡ ī 占 ī ī 썪 卪  č 卪Ϡ ō ī 占 ī 簰             àč٠ĭϭРϬٍҠԍٍ̠ЍРٍŠ   ōϠԍРҩōӍؠ΍΍΍ҠԭͯҠҠ ㍻ 卍РҍҍҍٍĠ؍Í̠ҍ؍̠̍ЬٍЬٍ؍؍ؠàЍϠōӍؠϠōǠōǠĵ΍ϠōРҍԠǫÍàԍؠ 占Íàԭͯ٫ҠƵРƵ ҍ´ ̯ ԠĠ ŠŲà ̯ȭ ̯ȩ ̯ȍԠǠĠà ōŠ ō ōҠč Ӎ٠ŰĠ 卪 宍 卪 㰲 Ӡ Š Š Ԡ 卪 ̩ Ӡ            ҠΠ Ա 卍àԠԽԫԍРà̴ Լ ý Խ ԠԽàǠ Ǎ Š ōЍ̳ؠ 占à  àԠ Խ Š̲Š 占ҠŠ ύҠԱ̳Խ 婍ԍ̲ؠ ҽ ɬ؍ҫϬ؍ҍҩ٠ ¬©ؠԠ ̳Ҡ؍Š̳Ѝ̠ ҠԱ   ٠٠ԠԽ٠Ǡǽ٠ٽ 婍ԠŲ ̱֍ ҍ̰ؠŠ 占Ѡ̸ 占 ̹ҠԲ؍Š̸̹Ҡ̸̍  󩍠ҠԱ̸ȠčŲŠ 占ؠ٠Šؠ̱٠̸«̸ȫ؍٠̠̱؍ٍ̳̲؍ٍ̳؍ٍ̠̍ҠЍԍؠؽ ƍؠčؠƍؠīҸƍҠó ؍ŸΠӍű 捠ؠ٠ŠŠū Š  ūŠ  ū ؠÍӠҠΠÍҠؠؠԫؠԫؠؠԍūРؠ ūРΠ ū  ˮǠ  Ե ؍Ӡð Ӡð ҍԠĸōǠō ㍍Рű ōРŲ ҭ Ԡ ҍŠ Š 썍ҸƠðŸð űð ΍ŲðǠ נ ԠÍĠōԠ  Ԡ ōҠ ͍  ƍ 卍 卪 ǭ        7mI 57mI 57mI 5w---??III)---????.MI5;.MI5;.MI5????7----;.>.>VIII --???-M ->;.MI)>;.MI)>;.MI)>;.M) 5??---??VII )--???7mI)>7mI)>ۿ----???wmI;.MI5;.MI5;VIII ---????-MI;.m:?--?w)575?7----???VIII----5Ӡ΍Ԡƍ(̫ͫà°؍¬؍؍ؠàЍ͠占̫̍ͫ٠РōϠԍō°ӠİӠ͠ӠаΫӍŠ Խ Խа̠占Ѝа̫ЫؠÍР͍̠à°؍¬؍؍ ЍӍ͠ 占ؠӫ 占ؠ 占ؠͫÍ͍à͍؍ͫàٍͫ؍ؠΠ ӍŠɍٍɠ٠ Ĭ؍Ҭؠ Ь؍аؠ 占Ӭؠ ؍Ѡв Ҡղ ЍЍàְàЫְؠЫ٠ӍӠؠРͬ؍à͍°؍؍¬؍àͫ°؍؍ؠàЍؠвͬ؍Ҭؠ ɍЫ ÍàҍҠ ҫàҫҠղ ЍŠΠ à 占PPPPPPPPPPPPPPPPPPPPPPP%)-159=!%)-159="&*.26:>"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPP( TLb c Lib c b c,VL,W c c,Tl6 -cL,T,0`&/b0c $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048?? Í`H0H b`bzbbhxcb|cbʈ c b c &c0 -c -c,Uc@dJ&(Mb -c /b`+ Na L*****(*******(*(C ,`<b={>c?dةB8Cc? a?L4a<ȥ<р((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP  $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?  TE MOTTE * SENILLE 86100 CHATELLERAULT"::" UTILISEZ LE BULLETIN DE COMMANDE JOINT A VOTRE DISQUETTE. MERCI!":" SI VOUS POSSEDEZ UNE CARTE BLEUE, TELE-PHONEZ AU 49 93 66 66"::11::"EXPEDITION IMMEDIATE":780d:8COM-MENTAIRES DE SES PROGRAMMES ET ROUTINES DANS LE NUMERO ";::NU;::" DE ";::"TREMPLIN MICRO":1:" VOUS OBTIENDREZ FACILEMENT CE NUMERO ENLE DEMANDANT A L'ADRESSE SUIVANTE: * TREMPLIN MICRO LA PETI94~783,41:784,63:785,32:786,237:787,253:788,200:789,196:790,96:791,144:792,244:793,32:794,251:795,218:796,96:::11:" BONJOUR ET MERCI! "::e" CETTE DISQUETTE NE VOUS RENDRA VRAIMENTSERVICE QUE SI VOUS POUVEZ LIRE LES D'UNE LIGNE,ADRL.DEMO;58 - ETAT DES COMMUTATIONS,TESTZ58 - TABULATIONS IW,TABIWx58 - IW.LISTER,IW.LISTER~:768,32:769,190:770,222:771,32:772,123:773,221:774,32:775,253:776,229:777,133:778,96:779,160:780,0:781,177:782,Jgh`'~ @a\c|u{ea)ߑՠȱо`__ ~```__ ~```_` ``````HJhx,T,U&M`&,T(``````(``_`8)``H)&JJ&&h' &' &' f&')'`~|xp`@? I)>7mI->?w-m575?7----???VII )---5????NI)?-?->->->7---->???IIIJ ?--???----;7->7->IIJ >-M????----5????->IIJI7-????.----????NI-7II)--????.MI)>.>ߛ--??.>.5II ????7m)M7575757575IImI)>7mI)>7mI)>7mI)>7mI)>7mI->?;.-- 5;?VII mI 57mI 57mI 57mI 57mI 5??-M-??w-IIm m)>7m m)>7m m)>7m m)>7m m)>7m m)>;---;VII )M 57mI5wm)?w5-;mI57mI5۷III-M 5?m 5ۿm184":ENTREE9:D$"BSAVE image.PAI,A8912,L8184"::"Sauve une image"N$".PAI,A8192":ENTREE6:D$"BLOAD"N$".IMP,A8192"::"Charge le graphique N$ X49246,0:49239,0:49234,0:49232,0::"Affiche la double haute r{solution :49233,0:49238,0:49247,0::"Retour @ la page texte C D$"BSAVE image.IMP,A8192,L8e et affiche DESSIN.2P dPR$:1657,80::ENTREE3:700:C8$:"Imprime DESSIN.2 nN$"DESSIN.3":12:36,36:N$:500:600:"Charge et affiche DESSIN.3 xENTREE13,33:ENTREE14,0:PR$:1657,80::ENTREE:700:C8$:"Imprime DESSIN.3 M D$"BLOAD$"PR#1":C8$:D$"BLOAD COPIE.DHGR.EPS,A"ENTREEw FN$"DESSIN.1":12:36,36:N$:500:600:"Charge et affiche DESSIN.1 PENTREE13,33:ENTREE14,255:PR$:1657,80::ENTREE:700:C8$:"Imprime DESSIN.1 ZN$"DESSIN.2":12:36,36:N$:500:600:"Charg********************************************* 7(104)64Ĺ103,1:104,64:16384,0:(4)"RUN DEMO.PROG"/ <ENTREE2048:D$(4):C8$D$"PR#3"(13):PR$DE= ******************************************************y* ** Impression double haute r{solution - DEMONSTRATION *(* V.2* 2*********   (4)"PR#1"2(27)"(010,020,035,050,070.8(9);(1):DESACTIVE LA COMMANDE CTRL-I DE LA CARTE SERIE (ELLE DEVIENT CTRL-A) I15((9)I;:-(1);(9)2(4)"PR#0"7(4)"RUN MENU" S DR1,(EX256): LGXHVADR2,(EXSX)((EXSX)256)256: FIN DE LA LIGNE DANS EXLADR3,((EXSX)256): PARTIE HAUTE EXHADR4,CY: LONGUEUR EN Y DANS LGYADR5,CYYB: FININV = DERNIERE LIGNE A INVERSERINVERT7: APPEL INVERT.SY MEV//E ET MEV-AUX.1XX(X7):PGXX2(XX2)IXX(XX2)7X7XXc49237,0:PGĹ49236,0qXX279ı{,XX,B649236,0: S/P SEPARE ADRESSE PARTIE HAUTE ET PARTIE BASSESXXB:SYYB1:EXCXADR,EX(EX256)256: LGXLA400 INVERSE LE RECTANGLEQ XB56:YB21:CX47:CY37:400:T1200:T:400l INVERSE TOUT L'ECRAN XB559:YB191:CX0:CY0 400 S/P INVERSION (49249)127ĉ:::TEST POMME OUVERTE 109 S/P PARTAGE DES POINTS A AFFICHER EN55:250:X: 2EME HORIZONTALEK _B4055:X100:250:B: LE DERNIER COTEa m INVERSE LE ROND{ nXB50: LONGUEUR EN X xYB25: LONGUEUR EN Y CX245: PREMIER POINT A INVERSER EN X CY83: PREMIER POINT A INVERSER EN Y 400:T1200:T:070.510+ PX270210(J):B9610(J)x S250: S/P SELECTION DES POINTS PAIRS ET IMPAIRS EN MEV//E OU EN MEV-AUX UJ Z DESSIN DU RECTANGLE \X50100:B40:250:X: UNE HORIZONTALE ]B4055:X50:250:B: UNE VERTICALE ^X50100:BN EFFACE L'ECRANY ADR24560:INVERT24576: ADRESSES $5FF0 ET $6000 DEBUT DE INVERT.SYSi #(4)"PR#3" (62450: EFFACE L'ECRAN AVEC LA DERNIERE COULEUR UTILISEE )49236,0:49234,0: ACCES MEV//E ET FULL HIRES < DESSIN DU CERCLE A3 FJ80COLONNES "ON"? 49153,0: 80STORE "ON" ECRITURE EN MEV-AUXt 49156,0: RAMWRT ECRITURE EN MEMOIRE PRINCIPALE 49154,0:RAMRD LECTURE EN MEMOIRE PRINCIPALE 49236,0: PAGE2 A ZERO = ACCES MEV//E :49237,0: PAGE2 A UN = ACCES MEV-AUX, O 5 (4)"PR#3"::10:10:"UN INSTANT S.V.P......"k (4)"BLOADINVERT.SYS": ROUTINE CHARGEE EN $6000 A(49246): ANNONCIATEUR 3 DEBRANCHE A(49232): MODE TEXTE A ZERO (GR)A(49239): MODE HAUTE RESOLUTION "ON" A(49165): AFF.       $"CLOSE" D$"NOMONCO"-:C2769:D$(4)( sPA0:XD1:D$"MONCO"U xD$"OPEN T.ADRESSE":D$"WRITE T.ADRESSE" }"INS":"Pour LISA, inutile avec MERLIN "GBAS_HI = *" I023:" HEX "; J07:C2,(X):XX1:C1: : PAPA1:PA1ĺ"GBAS_LO = *":140 D"FAIT.T.ADRESSE! (21)):T:16302,0:16303,0:"Retour en TEXT(10:"PATIENCE, JE CONSTRUIS LA TABLE"2D116384:D2D1192<I0191:0,IFD1I,(39)PD2I,(38)Zd768,169:770,76:771,218:772,253 nC1768  ҤңҤ΢ҤŢҤ̰ԠҤң  ( (` X  % "   f % % " %ɠɛФ,% ('%` "FAIT.ADRESSE (21)':/:Z(10:"PATIENCE, JE CONSTRUIS LA TABLE"p2D12432:D2D1192<I0191:0,IFD1I,(39)PD2I,(38)Zd(4)"BSAVE ADRESSE,A$980,L384" dD$(4):G$(34):33,30>iD$"OPEN IWL":D$"WRITE IWL"n"PRINTCHR$(4)"G$"PR#1"G$":PRINTCHR$(9)"G$"70N"G$":PRINTCHR$(27)"G$"E"G$";CHR$(27)"G$"L015"G$":LIST 1,60000 :PRINTCHR$(4)"G$"PR#0"G$s(4)"CLOSE":T": 30 35,24:32,0:33,40:34,05 :R145,150,155> 110R (4)"RUN MENU"X 0Yd(4)"BLOAD SPIRECADRE"pi:12:"ESCAPE POUR TERMINER LA DEMONSTRATION":16368,0:16384,128:16368,0yn768s34,10:32,10:33,20:35,20x10:}:"<1> ENCORE"::"<2> MENU DISQUETTE"::"<3> TERMINE "; R$:R(R$)48:R1R31 ,37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP  ,VL,W ,Tl6 - L,T,0` $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/L0L;LL8 =C?? Í`H0H `zhʈ  & 0 -  - ,U @ J&(M - /( TL Li&/0  ]]XfZ!%]evgvg%] X]oow~vgvgvgv """  " ]]n%Z!%]]vgvgv%]%]]~?~ggvgvgv """  "'*]Z X!%X]X%Z!%X%]]Z~f~cvgvgvg^ """  "QTW\] X X fffgvgv'%]%]]now{vgvgvgvo """  "*&Z Z %X Z X! ] X]Z%Z!n fvgvgvg]X%bgfow~n  "@p]Z%Z! ]]X%X!%]%]]Z%?{wwfvgvgvg]n~nf"  " LY%]YYafvgvgvYYffffgo~fvgvff """  ""L#Np Q%Y%]YYg`gvgvgvfYY~o{gvf& """  "" **& LY fYYYfvgvgYY Yggvgvgvff """  "">J f]YYYvgvgvYYY?{gfgvgvff """  ""LN(%]YYY%]YY YY%n~fgvgvgvf^o"""  ""fʐpL  ]  ffgvgvYYYY~g~wvgvgvfff~ """  ""e%X XY  X  X YY%]Y>fvgvgvfYY}`f{of ""   ]YYY XY  YY%]ognfvgvgvfYf??  ""L@%]]Z%Z%Z%mfvgvgw%]%]]w`nf~g?gvgwww """  """ J%]]Z%Z%Zhcvgvgww] Z%nfp{w?rgwww """  """&٥@eX]Z Z%Z%]fvgvgZ%]Z ] gf`ow~vgvgwwwn """  """@׭@f ]]f%Z%Z%]]vgvgw%]Z%]]g~fgvgwww """  """̢)]Z Z%Z%] X%Z%Z%XZ ]]Zeg{wfvgvgww^&"  """A@] X%X%X X X X%Z%]Z%]]jo~vgvgwww~"""  """0 X X X X X X X XZ ]]Z%Z%vfvgvgww]Z%`fg~g """" "]Z X%X%]]Z%Z%Z%XZ ]]Z%~?fvgvgww]Z{n~w{ """1penZ!%Z%Z%ZaffgvffZ!Z!nf{gvffff """  """ ety(%(-(Z!%Z%Z%_affgvff^!X%Z{?ofuffff """  """ +=152!%XfZ%Z!fgvf%Z! Z!>f?~gfgvfffff"""  """ full%:pZ!fZ%Z%Z!fgvf&Z!%Z fgfgvffff"""  """ 200:nue %Z%X%Z %X%Z%Z  Z!%Z~gffgvfff!~o  """ 0  l!%Z X%X X X X%Z!%Z!%og~?fgvffffg&"  """ $=""  X X X X X X X %Z!%Z%Z`ffgvfff!%Z}?`~?f """ ablet or%X Z%X!%X X Z %X!%Z?w~ffgvfff!Z%ogg """ onti           4;< 4.44;3;3ί4443;3;3;Oȭ4˳;; 4.44;3;3;<44Ͽ3;3;3;OȠ a4˭1;4ˮ441;4ˬ414-;;3;3;3λ,O 1;;4˷̳ͳ3;3;ˮ444;3;3;3;;;141˭;;1144/;; 4˰;3;3;34ϳ[OH0;;144;;4ˮ114-;;3;3;3-P"OJ1334;3;;3;33;;3;333λ333;O(O3;334;3;3;33;;3;333;ʩ;3;3;3;3.;3;33;13ϳ3;333;`)O13;<4;3;3.;3;3γ<;;3;Ͽ3;333;_ X4@l1134;13;4;3;3;33߿Ͽ;3;333λe Comput;113̳/;3;;3;13<;3;333;11;;111;3;34;;3;3313;̿uUiI ;34;;3;34;3;3;3;34߿Ͻ;3;333T 4/;;-4.4;3;;;44333Ͽ3;;;;" 44-;;-4.4;3;;;˭4;;;;; 80 4˭;74.44;3;;ή444Ͽ3;;;;;ܓ" "4˷;-4.44;3;;λ444Ͽ3;;;;;1pen1ˬ1;4ˬ411;1ˮ444-;;3;;;;λety(%(-(4114111ˮ444-;3;;;;;+=152111111144/;;-4ˆ;3;;;;ˬ1full%:p;441ˬ;;4ˬ144-;;Ͻ;3;;;;˭4ܿ200:nue 1-4-4 4˷;33334ˌ4˭4773̳33330  lˍ1ˬ-4-4;333344˭4?߿̳3333$=""1ˬ41-4 4˳;333ˍ44˭ϳ333333ablet or1˭4-4-4 4-;333γˍ41ˬ4Ͽ333333onti1í11ˍ144˭4ˍ4ˍ4˭-߽;33333˭141111414<;333333߿ 1111111ˍ4˭4-4-4;33333<4˭4̼S41˭44144ˌ41˭4-4;333334Ͽ           30)9 }768,165:769,6:770,32:771,237:772,253:773,96K (4)"PR#1":m (9)((CO$))"N":APPLE 2C I1(CO$):6,((CO$,I,1)):768: :(4)"PR#0" d:Di7:"NOMBRE DE LIGNES PAR PAGE ";NP:NP66NP72105n9:"NOMBRE DE LIGNES A EDITER PAR PAGE ";NE:NENP105sNSNPNE:NENE2 xCODE$(27)"c"(29)"A@":I1NE:CO$CO$"@@"::CO$CO$"C@":I1NS:CO$CO$"@@"::CO$CO$"A@"( c X '(%% "% &( %`% ((% %` 48:2068,140N:2095,(40N)2:(16N):2062= N21110 2062:22:3:"<1> MENU DE DISQUETTE <2> TERMINE ";:198:R$::R$"1"ĺ(4)"RUN MENU" R$"2"ĺ(21):: 135 16368,0:16384,128,127:16368,0::N=d:=e X)  b  & %`Xi(4)"PR#3"::2049,61n10:3:"<1> 40 COLONNES <2> 80 COLONNES ";:198:150:N(16384)48sN1N2130x6,160:2062:6,32: EFFACEMENT DU CADRE ANTERIEUR EVENTUEL- }NN  z#?? Ԡ ̠ נӱԱӮӠР Ю͠ ̮Ϡ! Š" Ԡ ҠҴ̠ Ҳϴ̠ Ҵ̮Ӡ ̮Ϡ̮͠ Ԡ Ӯ͠" Ӡ ՠ Ӡ Š ԮӠ ԮӠ ԮӠ  ׮Ϡ׮͠ŠŮŠ Ӡ Ӡ! Š ŠϠԱұԲұԮҠұɮϠɮ ԮԮŠ ϮǠϮŠŮҮӮӠӮӠӠϱ !Š"ӠŮͱήɠ!ήР! ŮҮӠ ԮŠ ՠȮϠӠ ˠ Ů͠ŠΠϠ٭ŠMMES SOIENTSPECIFIQUES A PRODOS OU AU DOS 3.3: VOIRTREMPLIN MICRO.":780:x 198:16368,0:16384,128,127:16368,0X1: :G$::"POUR UTILISATION, VOIR ARTICLE"::"& FICHIER(S) CORRESPONDANT(S).":811)*:G$::"POUR UTILISATION, VOIR A:" Cette disquette n'est pas PROTEGEE et il est prudent d'en faire IMMEDIATEMENT une bonne copie."::" LE NUMERO PLACE AU DEBUT DE CHAQUE LI- GNE DU MENU RENVOIE A LA PAGE CORRESPON-DANTE DE TREMPLIN MICRO."J::"IL ARRIVE QUE CERTAINS PROGRA÷ŠؠƱƳƷƠčō ҍĠð̍ҍҍ̍̍ȍ̠̍̍̍ȍ̠̍ȍ̍Ҡ̍ȍĠƍǍȍӍ ħӪŠؠƷŷō֠Ӡ ӯ ŪӠؠƍֳÍֲ؍àӠֲֳٍ̠ĠٍٍӍŪҠ٠ ̧ ˍ٠βٍ٠̠ ſàŠ΍Р ħ ٍؠȍŬ؍ˍЍѠōàٍٍР֠ԭ ҿàűά خֱ̩٠ ōҠˠ Ս̩٠ ԍԠű ͯ ҍР ͯōƍ٠ȍҠӍؠ̍٠ȍٍٍűҠҠ ΰ ō٠̍ؠȍŬ؍ˍŠ٠βҍٍЍɍԠű ͯōӠֱɍԠűؠ خűð ō Ԫ̠ӠȠӠ̠ӠȠӠ٠ӠβӠˠӠ Ū̍٠ȍҠӠؠ̍٠ȍ̍ ٍ֠ƵҮ ٍǠŶΰ ҬҲ̠ ōȠ űؠð Ū ̠ưҮ ҍȠƱҮ ̠ƲҮ ҍȠƳҮ ٠ƴ`+ Ǡʠ ħ ħ    <ȥ<c?dةB8Cc? a?L4a<ȥ< E"::"& FICHIER(S) CORRESPONDANT(S).":811{*:G$::"POUR UTILISATION, VOIR ARTICLE"::"& UTILISER LA FACE ."+1:20:"ASIC ETOUR MENU ";:16368,0:X$:G$4X$"B"ė:D$"CATALOG":>X$"R"ĬH811RTICLE"::"& UTILISER LA FACE ."a+1:20:"ASIC ETOUR MENU ";:16368,0:X$:G$~4X$"B"ė:D$"CATALOG":>X$"R"ĬH811D$"CATALOG":>X$"R"ĬH81116368,0X1:+ :G$::"POUR UTILISATION, VOIR ARTICL  % )i)( J,S,UӅ( )" s ɀ,,T)" sɀ,,Q`z(`Š 2ڠŠ "ZEROS BARRES (000)"' (27)"X"N "SOULIGNE ET ZEROS BARRES (000)"\ (27)"c"l (4)"PR#0" INDICE"  &(14)- 0"LETTRE MIXTE"3 :A D(27)"z"W N"LETTRE EN-TETE"] Xk b(27)"c"| l(27)"L030" v(27)"X" "* O P T I O N S *" (27)"L008"  "TEXTE SOULIGNE"  (27)"Y" (27)"D";(0);(1)ESSE" | (27)"y"; "BROUILLON COMPRESSE INDICE"A L (14)m "BROUILLON COMPRESSE MIXTE"s  (27)"z" "BROUILLON COMPRESSE EN-TETE" (27)"c" (27)"L008" (27)"m" "LETTRE"  (27)"y" "LETTRE7)"X":"IMPRIMANTE SCRIBE"( (27)"c"9 (27)"L008"J "BROUILLON"P ^ (27)"y"v "BROUILLON INDICE"|  "(14) ,"BROUILLON MIXTE" 6 @(27)"z" J"BROUILLON EN-TETE" T ^(15) h(27)"Q" r"BROUILLON COMPR255:13:9::" BRANCHEZ L'IMPRIMANTE ":9 23:A$h ::13:7:" PROGRAMME DE DEMONSTRATION " 16:12:" SUR L'IMPRIMANTE ": 22:16::" "::W$ * TITRE * : (13):(4)"PR#1":(27)"c":(14):(27)"L011"(2m * SCRIBE DEMO * := J-P ARNAUD JUIN 1986C(:I2:Q<:vF4:10:"* < SCRIBE > DEMO *"P:195Z23:I621:2:I:"*":d2:3:I137:"*";:n2:I15:39:"*":x34,66:I3931:I:"*";:-      @` 0@MICROTREMPLIN APPLETREMPLIN MICROD15U15Z15D14U14Z14D13U13Z13D12U12Z12D11U11Z11D10U10Z10D9U9Z9D8U8Z8D7U7Z7D6U6Z6D5U5Z5D4U4Z4D3U3Z3D2U2Z2D1U1Z1D0U0Z0LDAzB qClBIPJ@KB@KS@Cߕٕӕ͕Ǖݕוѕ˕ŕەՕϕɕÕNMH @ ,90,220,90,190,90,190,50,230,50$250,130:260,50260,130@ 30:260:2656 I1N:X:Y:X1,Y1X,Y:X1X:Y1Y::Z 250,50250,130:260,50260,130`  40,130,40,50,80,50,80,90,40,90,90,130,90,50,130,50,130,90,90,90,130,90,130,130 180,70,180,50,140,50,140,130,180,130,180,90,155,90,230,130,190,130,190:"PRESSEZ UNE TOUCHE S.V.P.":R 198:16368,0:16384,128,127:16368,0:: I1(T$):511I,((T$,I,1))128::72,0:144 220::155 230,64:3 X140:Y1130:N5:260 X190:Y1130:N7:260 X1180:Y170:260 X1230:Y11 LA LIGNE DE TEXTE";:220:) 22:958f 235:16297,0:16299,0:16301,0:16304,0:822:220: 24:"<1> MENU DISQUETTE <2> FIN DE TRAVAIL ";:R$ R$"1"R$"2"Ģ23::195 2048,0:103,1:104,8:R$"1"ĺ:D$"RUN MENU" : 22:ETRE OUVERTE EN BAS DE LA PAGE HGR2 EFFACE 4 ZONES DE LA MEMOIRE:":v XX1:X160,165,170,175,180 T$"A50.A77 D823G":225 T$"AD0.AF7 D823G":225 T$"B50.B77 D823G":225 T$"BD0.BF7 D823G":225 24:"ON RETROUVE ICI dD$(4)::(21):Ui(104)96Ĺ104,96:103,1:24576,0:D$"RUN HGR2.DEMO4L"jnD$"BLOAD HGR4L"ss768x1:220}I20002039:I,160:220:"DEPART PROGRAMME: ";::(104)256(103):100,130215::U 9:"LA FENOFFSET& D$"BSAVE OFFSET1 ,A0 , L8"7 D$"NOMON C"g :"FAITES MAINTENANT 'RUN TEST2.SAUVEUR1'"(I)I: KB49152:KS49168? Collecte les chaines activese Regroupe descripteurs et chaines| D$"BRUN SAUVEUR1" D$"MON C" Sauve le fichier VARIABLES D$"BSAVE VARIABLES1 ,A "(4)256(5)" ,L "(8)256(9) Sauve le fichier $"APPLE":A$$ (B$"TREMPLIN ":B$8 2C$"SOUPLE":C$K <BC$B$C$:BC$a FC$(15,2):I015 PC$(I):C$(I,0)"Z"C$:C$(I,1)"U"C$:C$(I,2)"D"C$ ZJ02:1J15:C$(I,J);::: d nC$"MICRO":C$ xBC$B$C$:BC$ NM(12):I112:NMh************************=* TEST1.SAUVEUR1 *[* par Yvan KOENIG *y*----------------------**----------------------**----------------------*************************DOS 3.3  :D$(4) A    ? Ll 2=(104)96Ĺ104,96:103,1:24576,0:(4)"RUN HGR4L.ES"C Q16301,0tI14:R:JRR39:J,160::(T$"LES QUATRE LIGNES-TEXTE DE LA PAGE HGR 2"2:I14:R:X0:JRR39:XX1:J,((T$,X,1))128::< 2640,2768,2896,3024 NM(I):* :"UNE TOUCHE POUR CONTINUER"D KS,0:KB,128:KS,0:q I015:J02:115J:C$(I,J);:::: A$,B$,C$,D$,BC$,KB,KS,C$(.),NM(.) SONT BIEN RECUPERES.D Charge le fichier VARIABLES< ((4)"BLOAD VARIABLES1"Z 2Charge le fichier OFFSETs <(4)"BLOAD OFFSET1" FPlace les descripteurs PAjuste les pointeurs Z(4)"BLOAD SAUVEUR1" d(4)"NOMON C": n926 xA$:B$:C$:BC$:I112:************************=* TEST2.SAUVEUR1 *[* par YVAN KOENIG *y*----------------------**----------------------**----------------------*************************DOS 3.3  :(4)"MON C"   占 占ÍЍӠ àЩ٠ ٍЩ٠ ύР ٍЫӫàЩ٠Щ٠ ύؠ ؍ٍЩ٠ ɍҫؠҠ 占Рī ѠҠɍӠŠ΍ҠٍٍЩ٠ ҠҠ 占ѠٲҠЩٍɠŠ 占ٍЩٍ̠Š 占ٍҠЩ٠ 占ѠŠ 占ٍ٠̠ à àЍР àٱ 占àЫٱؠЫٲؠҫ Šٳ ΍РҍѠٱ ɬ ٳЩ٠ àҍҠ ٍЩ٠ ɍàҫҫЍ̠٠ 占ɠ٠ 占ٍЩ٠ セ ΍РčŠ٠ ΍РӠ ٠Р ؠЫ٠Щ٠ 퍠ؠ 占ٍЩ٠ ㍠Ѝٍ 占ѠҠ͠Ҡ ؠҫ ΍٠ҍؠҫٱؠī Š٠Π 占͍ؠͫРؠЫҠؠ«ŠͱР  Ѡ͠ ͱҠҠ 㽠ƍӠҠҠ ÍРĠōҠƠĠƠ°ǠŴղijŠŲÍŠҠǠ 㪪Ϡԍ°͠а΍Π̠àč̠Šƍ̠͠  ÍĠĠōРƠ͠Π ԍ 򺍪 Ұ Ӭ ˨˨ ̢ ˨˨ Ұ̳ 򺍪 Ӎ Ұ 󺍪 ұ Ӭ ˨˨ ̢ ˨˨ Ԭ̸ 󺍪 Ӭ ԍ ұ ϠˍԠƍϠԍˠұōˠҰ΍΍ϠԍǠōǠ΍ ԍ ፪ ٮ Ԡ Ԭ ˠĠ             ********************************************* <103,1:104,64:16384,0:(4)"RUN DEMO.PROG"= ******************************************************y* ** Impression double haute r{solution - DEMONSTRATION *(* * 2*********,40:::I123:I:""::32,39::Q 723:"<1> MENU DISQUE <2> TERMINE ";:R$q <R$"1"ĉ:::D$"RUN MENU" AR$"2"Ģ22::55 F::* (21):D$(4)::D$"BLOAD DEFIL.LM"cT$"1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZabcd":769,0uT$;:768:4022:"VTAB (1-23) -> ";V$:V$""45V(V$):V1V2325#769,V1:V:20(16368,0:25-D$"PR#3":809:$ 232,37:33  8stȄ `>o?piBukjCuk<=L,G ijlk 󅟆nmLVȱȱeȱe(ӊ0ȱ ie枦ş 0FȱAȱ<ȱȱŰ+H8oȑoȥpphei ӥe枦`8kikjimo ӥ  : (Hȱ(((h( ɀ`:; S c`^ :23:"<1> ENCORE <2> MENU DE LA DISQUETTE <3> TERMINE POUR AUJOURD'HUI ";:R$:20:R$s :R$"1"Ľ:100 R$"2"ĺ(4)"RUN MENU" R$"3"245ISIE DE "N" MOTS": I1N:"> ";M$(I): 768,M$(0) I1N:M$(I):P :23:"$(I)" ";::195' IDN:C$(I)" ";:_ 22:::"PRESSEZ UNE TOUCHE S.V.P";::"> ";:R$:q R$(27)ĺ:~ X3155 N50 "NOMBRE ? ";N:M$(N) :"SAISIE DE "N" MOTS": I1N:"> ";M$(I): 768,M$(0) I1N:M$(I):A$(I)(65((1)26))"000":H IDN:B$(I)(65((1)26))"100":r IDN:C$(I)(65((1)26))"200":| 198 ::XX1:X165,170,175 768,A$(0):180 768,B$(0):185 768,C$(0):190 IDN:A$(I)" ";::195 IDN:Be taper dans le d{sordre."h s:"La cloche vous indiquera le d{but de chaque tri (quelques secondes)." xPOUR TRIER SUR Xe LETTRE, FAIRE UN POKE 26,X-1 ($1A) ET CHANGER $366:A0 00 PAR $366: A4 1A ] }D0 N150 A$(N),B$(N),C$(N) IDN:3d(769)190(790)176ĺ(4)"BLOAD TRI.1.0"Gi(4)"PR#3":: n12:"La machine va successivement trier 150 faux mots rang{s dans trois tableaux: - A$(, B$(, C$(... puis elle vous invitera @ fournir le nombre de mots que vous allez vous-mem     128,144,206,173,97,192,201,128,144,249,44,16,192,176,194,96$"1"ĺ:(4)"RUN MENU"+ R$"2"ĺ:1353 :P I768830:R%:I,R%:: 169,23,133,6,165,6,32,193,251,160,0,177,40,72,200,177,40,136,145,40,200,200,192,40,208,245,136,104,145,40,165,7,32; 168,252,198,6,16,221,173,0,192,201,155,240,16,201,<d:(21)::155i7,32GnI1242:J1382:I:J:"S";::}s17::" UNE TOUCHE ARRETE LE DEFILEMENT "x19:"POMME OUVERTE LE RELANCE : ESCAPE = FIN "}1:768:22:" <1> MENU DISQUETTE <2> TERMINE ";:R$ R    8` Viiݠ*  Hh0 L`"SAISIE DE "N" MOTS": I1N:"> ";M$(I): 768,M$(0) I1N:M$(I):P :23:" . '(` ( `` 93:R$"1"Č768:1200 R$"2"ĺ(4)"RUN MENU"A R$"3"160I :0U ::Jd(21):,n(4)"BLOADXDRAW.LM":768Fx198:R$::16301,022:958:"Le meme avec DRAW au lieu de XDRAW ";:R$865,01:826,3:768198:R$::16301,022:"<1> ENCORE <2> MENU DISQUETTE <3> FIN ";:R$ :826,225:865,  ,96,32,193,251,164,8,169,160,145,40,200,196,9,208,247,230,6,165,6,197,7,208,234,96I7,230,6,165,6,197,7,208,234,96:FENETREITERMINE ";:198:R$, 1::R$"1"ė:110H R$"2"ĺ(4)"RUN MENU"Y R$"3"210a : 198:16368,0:16384,128,127:16368,0:1: I768813:R%:I,R%::R 169,23,133,6,165,6,32,193,251,165,7,160,39,145,40,136,16,251,198,6,16,238ENETRE ";R$+ V2(R$):V21V1V2231702 1M 7,C:768:REMPLISSAGEo 6,V1:7,V1V2:8,H1:9,H1H2 UN POKE 797,32 (ESPACE INVERSE) FERAIT UNE FENETRE EN MODE INVERSE 807:FENETRE 235 23:"":24:5:"<1> ENCORE <2> MENU <3> 0 R$(9)CC128:140- C63CC64P 12:"HTAB FENETRE (0-38) ";R$m H1(R$):H10H138140 14:"LARGEUR FENETRE ";R$ H2(R$):H21H1H239150 16:"VTAB FENETRE (0-22) ";R$ V1(R$):V10V122160 18:"HAUTEUR FSd:(21):i240qn"REMPLISSAGE D'ECRAN ET FENETRE ------------------------------ par ARGOS"s8:"CARACTERE DE REMPLISSAGE ";:C$:C$x10:"CTRL-I POUR MODE INVERSE ";:R$:R$(9)Ğ:C$: }:C(C$):C63R$(9)CC64:14f  R  ,`_ A Heh ]L(HR (TH. GAUTHIER),INVERT.BAS?45 - FENETRE HGR2,HGR2.DEMO4Lk48 - DEFILEMENT D'UNE LIGNE,DEFIL.DEMO49 - DEFILEMENT DE L'ECRAN,DEFILEMENT50 - FENETRES 40 COLONNES,FENARGOS.BAS52 - MINUSCULES=CAPITALES,MINCAP.DEM53 - AFFICHAGE LM,TRI.1.DEMO5 28 - XDRAW (AMUSETTES),XDRAW.DEMO^ 30 - TREIZE (JEU DE LETTRES),TREIZE| 36 - CADRE-SOURIS,CDRSRS 37 - TITRE MYSTERIEUX,TITRE 38 - OUVREZ LE RIDEAU,RIDBAS 40 - EFFETS SPECIAUX (SPIRALE),SPIRBAS42 - INVERSION FFE-LM (APRES GREFFE),GREFFE.LM1R 12 - EPSON DOUBLE HAUTE RESOLUTION,DEMO.PROG 22 - DEMO IMPRIMANTE SCRIBE,SCRIBE DEMO 23 - SAUVEUR DE VARIABLES (TEST1),TEST1.SAUVEUR1 24 - SAUVEUR DE VARIABLES (TEST2),TEST2.SAUVEUR1 25 - TRI RAPIDEDS)"INFOS"690( dB$(VDS)"*"800D eB$(VDS)"PRODOS"810L f:h h23:(4)"RUN"B$(VDS)r r:: | PAGE INFOS GENERALES,INFOS " 3 - GRAPHISME.DEMO, M. CHAVELLI",GRAPH.DEMO " 6 - TOKENS APPLESOFT, NESTOR",TOKENS 10 - GRE0:V:A$(VSD):K141Ģ22:350F ,K136K139VV1:VDVD1:180] 6K149K138VV1 @NSPS0VRD1VD1:SSP:190 JVND1SVD1:180 T260 ^35,24:34,21:22::T$;:"SELECTION -> PAGE "((A$(VDS),2))" "B$(VDS) cB$(V23:T$" UTILISEZ LES FLECHES - RETURN POUR RUN";:V::35,22K R0:S0T V:b S0230} RR1:A$(R):RSP210 240 RR1:A$(R):RN230 :31:15:"FIN=CTRL-C": V:768,A$(VSD) K(16384) K128270 "16368, 2d:(12);(21):::D$(4):G$(7):V3:DV1YiNUMERO10: NUMERO DE LA DISQUETTEznI110:T$T$"----"::SP19x370N30:A$(N),B$(N):660N25R1N:A$(R),B$(R):" DISQUETTE DE TREMPLIN MICRO NUMERO "NU" "T$:34,2?           :$*** MOTS DE 13 LETTRES ****:INTERLOCUTEUR,CONFERENCIERE,DEMYSTIFIANTE,FRAGILISATION,GALEOPITHEQUE,GIGANTOMACHIE,HELICICULTUREnt demand{ fait per- dre un point"Vv:" - P{nalit{ identique pour toute erreur"{:" - TAPER pour annuler la partie."20:I110:"____";::22:T$" PRESSEZ UNE TOUCHE SVP ":RV1:575198:16384,128,127:16368,0::** PRESENTATION ***"b:g::T$" ":1:T$:3:T$:2:" T R E I Z E ";::29:"REGLE DU JEU":3:29:"------------"l:"OBJET: Trouver un mot de 13 lettres qui ------ est fourni dans le d{sordre."%q::" - Tout renseigneme&&232,A(A256)256:233,(A256),+20:U5*** SOUS-PROGRAMMES ***[::?22:958:23:(41(T$))2::T$::RVRV0:DK12000::22:958:23:3:"Tapez si vous connaissez le mot"INE0:N9E4SX:]*I1CH:M$:*I113:L$(I)(M$,I,1):aI1311:J((1)I1):M$(I)L$(J):L$(J)L$(I):I113:L$(I)(M$,I,1):M(I)1: :*** INSTALLATION DE LA ****** FONTE (30 CARACTERES) ***:!(4)"BLOAD TREIZE.FONTE,A",A(I))64:N9E4NDE,B*DD21:33559:\*** CHOIX ET TRAITEMENT ****** DU MOT (13 LETTRES) ***:CH1((1)NM)V(768):VNMVĹ768,1:769,CH:500K1V:(768K)CH480:769V,CH:768,V1 :OUR CETTE FOIS ";:R$)R$"1"Ľ:110AR$"0"Ģ22::385K::wT$"MAUVAISE REPONSE":575:PEPE1:215}:*** S O L U T I O N ***:21:958:"MOT ENTIER ";T$:T$M$ī405515D9:B10I113:E0:N(L$::"SCORE:";::" ";:PTĺ" TRES MAUVAIS ("PT" POINT)":385p mPT10PT6ĺPT" POINTS (BON RESULTAT)":385 rPT10ĺPT" POINTS (EXCELLENT RESULTAT)":385 w" A VOUS DE JUGER! ("PT" POINT";:PT1ĺ"S"; |")"23:"<1> ENCORE <0> TERMINE P575:215# @I113:M$(I)L$330. E:405 JM$(I)L$(NU)D21I12:N(L$)64:590:NDE,80:D21NU12:NDE,10:M$(I)"":L$(NU)"":M(I)0:TRTR1:TR13215 OTR13405 T: Y*** FIN DE LA PARTIE *** ^: cPT13PE= h21:958IRSDR27 IRSDR28, IRSDR29O D21I12:DRD,45:M(I)0:215` "(R$)1315 'L$(R$,1):L$"A"L$"Z"315 ,NU((R$,(R$)1)):NU1NU13315 1L$(NU)""T$"LETTRE DEJA TROUVEE":575:215 6320 ;T$"ERREUR DE SAISIE":ment: ";::0;::" (ou RANG + LETTRE) ";R$K R$"SOL"PEPE13TR:430[ R$"T"425j R$""215{ R$"0"290 RS13T$"PLUS DE RENSEIGNEMENT":575:215 RSRS1 I113:M$(I)L$(RS)260 M(I)PEPE1:270  240 YX,XA I2426521:I,XI,Y:I2,XI2,Y:0:I1,XI1,Y:3:G :j *** LETTRES MELANGEES ***p :} D9:B80 I113:E0:N(M$(I))64:590 NDE,B DD21: : *** ET MAINTENANT,JOUONS *** :, 21:1:"Renseigne d:(21)::768,09i163841476:A16384:545:610\n:NM7:NOMBRE DE MOTS EN DATAusL$(13),M$(13),M(13)~x480}:3:1:0:*** CASES POUR LE MOT ***:X3:Y270,0279,0279,300,300,0 X,X276,X276,YX,     MES."3:" Cette TABLE contient en tete le nombre":" de formes puis leurs adresses relatives":6:"La TABLE est ainsi relogeable."4:" Vous allez voir ce qu'on peut faire":6:"avec un simple petit carr{...":T5 1,0,4,0,45,54,63,36,0:C8atre ":5:"directions avec ou sans tra\{."1:" Chaque octet de la FORME est divis{":"en 3 sections, chacune {tant un vecteur":"Le dernier octet ne contient que des 0."2:"Plusieurs formes peuvent etre regroup{es";::8:"dans une TABLE DE FORacer n'importe":"quelle courbe @ partir de son {quation."b.X014.08:X20,(X)50100::T/:P4:7:"Les formes haute r{solution":7:"---------------------------"+0:3:"Une FORME est une suite de vecteurs":5:"de d{placement dans les qu> ABSCISSE X,Y":5:"-> ORDONNEE A":P2,5:"Une autre adresse bien utile!":"HFIND en $F5CB est l'inverse de HPOSN":"Il nous redonne abscisse et ordonn{e ":P2:5:"-> ABSCISSE $E0,$E1":5:"-> ORDONNEE $E2":T:-:::7:"HPLOT permet aussi de trY1 TO X2,Y2 TO..."U((1)8:(1)280,(1)160(1)280,(1)160:(16384)12840g)16368,0:68*:5:"La routine HLIN est en $F53A":"Elle trace une ligne du dernier point":"tra\{ (donc qui est pass{ par HPOSN)":5:"au point:"'+::5:"- @ partir de l'abscisse Y,X":10:"et de l'ordonn{e A:"&:"->L'adresse de d{but de ligne ($26/$27)":"->HMASK ($30)":"->HCOLOR1 ($1C)":"->Le num{ro d'OCTET dans la ligne ($E5)":T':::"HPLOT permet aussi de tra\er des lignes"::9:"HPLOT X1,mps...":TM!::8:"L'instruction HPLOT permet":12:"de tra\er un point"v"(1)280,(1)160:(16384)12834#16368,0:68$P2:"La routine HPLOT se situe en $F457":L87,244,7:P27%" En $F411 se trouve la routine HPOSN":"qui calcule fixer la couleur":TM:C07:C:0,0:3082:15,23:"HCOLOR = ";C;:T:68:P2:"La routine HCOLOR se situe en $F6F0":"Chargez le code de la couleur dans X":L240,246,9:P2  7:"Vous pouvez aussi charger":"directement $E4 pour gagner du te:"qui n'est pas affich{e"rP2:"-> Ecriture PAGE 1: POKE230,32 ":6:"En assembleur: LDA #$20":21:"STA $E6":"-> Ecriture PAGE 2: POKE230,64 ":6:"En assembleur: LDA #$40":21:"STA $E6":P5:T:6:"L'instruction HCOLOR permet":10:"deoccupe l'espace m{moire:"::" $4000 / $5FF7... 16384 / 24567" :"On peut afficher une PAGE sans l'effacer"::" Pour la PAGE 1: POKE -16300,0 ($C054)":" Pour la PAGE 2: POKE -16299,0 ($C055)"::T:P65:"On peut aussi {crire sur la PAGE":10R2":11:"affiche la PAGE 2":5:"Celle-ci n'a pas de mode mixte"p " (du moins pas avec la PAGE 1 du TEXTE)" 5:"" :" La page 1 occupe l'espace m{moire:"::" $2000 / $3FF7... 8192 / 16375"@ :" La page 2 sembleur: JSR $F3E2>";:TH 4:"Pour couvrir la totalit{ de l'{cran"p 7:"il faut faire un POKE-16302,0" 3:"" 4:"Pour revenir en mixte POKE-16301,0";:TA ::"De la meme mani}re l'instruction HG 20,11:"du":20:"--"C 8,18:"Graphisme Haute R{solution"r 8:"--------------------------":T:P16: 5:"L'instruction BASIC HGR affiche" 5:"et efface la PAGE 1 en laissant" 7:"4 lignes de texte en bas..." 5:".>.>7mI)>7---??III)MI5;.MI5;.MI7m ??7---7mI)>7mI)>۷III)>.>.>.>.>.MI5;.---???III -M????m m)>7m m)>7m m)>7m m)>7m m)>7m m)>IIII ---????.MI5;.MI5;.MI5;.MI5;.MI5;.MI5;VIII --???mI 57mI 557mI 57mI 57----???III )---????.MI757--->??757mI)>7----???III)---????.MI757--5??757575III ---????-MI;.>.MI?7mI-57mI 5;w----???VII )MI5;.MI5;.MI5????.---5;.MI5;.MI5;.MI5;VIII-75757575757?I II)>.>.@1A|NqJi PKHf---????.MI5;.MI5;----5????wmI)>7mI)>7mI)>۷III)--???7mI57mI5????.---7mI)>7mI)>7----???III ---????-MI;.>.>.>.MI)>?---??III)--???7mI)7mI 57mI   ,200,230,8,208,2,230,9,208,227,132,24,96I:72,0:144:49283,0:49283,0jmLa ligne pr{c{dente est inutile si l'on supprime le changement de nomsr115(w165,6,166,7,32,65,249,96,162,0,134,24,169,208,133,8,133,9,160,0,161,8,201,128,144,14,230,24,165,24,197,25,240,15,201,107,240,11,160,255128:220T::#YRoutines LM<^I768819:R:I,R:cCopie de $D000-FFFF (ROM) en m{moire auxiliaire et lecture de cette zone commut{e sur la m{moire vive (annul{ par un RESET)hA$"D000 ";CODE$ Il suffit de taper + ou - pour aller en AVANT ou en ARR) d:(21):9i340:Fin de programme avec CTRL-C Tn350:Vers routines LMs:" POINTS D'ENTREE DES ROUTINES APPLESOFT "::34,3 x"La table commence @ l'adresse $D000 et le num{ro de code de chaque routine est compris entre $80 & $EA     7,6,170,200,177,6,134,6,133,7,208,190[ 22:"<1> MENU DISQUETTE <2> TERMINE ";:198:R$i 8,0:9,0 ::R$"1"ĺ(4)"RUN MENU" R$"2"150I7: I768841:R%:I,R%:: 165,103,133,6,165,104,133,7,160,0,177,6,208,1,96,160,4,177,6,240,39,201,126,176,32,201,64,208,2,169,97,201,92,208,2,169,99,201,124,208,2,169,117% 201,123,144,2,169,101,201,97,144,4,41,223,145,6,200,208,213,160,0,17!d::(8)77(9)77İ135mi"toto a {t{ le premier @ aller o| \a po-":"sait un s{rieux probl}me."~n::105,120s(8)77(9)77150x22:"tapez call 768, puis RUN ou LIST"}198:16368,0:16384,128,127:16368,0 8,77:9,7  X   'L(Z('_( f%Ѕ(&L( % " #$!L" 4 A`Ѕ ɀk  `