:mely ---- oeilibd `vei ,mzybxd i`ceey itk `l dcil iiywae ,xkip xegi`a igkepd dxfrl izeitivy `id jkl daiqd .mihrn ip` oiicre ,eynnzd `l oezird zpkda gny iziid .invra rixknd eaex z` oikn z` envr lr lhep did edyin m` daxda xecn zaizka wtzqn iziid ip`e ,dpkdd mizirle ,ipkhd uerid zpit ,wiqiiad .ycegd zpkez znx z` cixedl dvex ippi` ,z`f mr cgi .xegi`a e`ivedl iztcrd okle ,oezird ddeab `id mrtd oezird znx ,e`xizy itk .mincewd zepeilbd lkn zegt `l licbdl ul`p ip` ,ztqep dxfr zlawl cr dyelyl edpynl cg` oeilib oia xrtd z` zeieaiigzd mb il yiy meyn ,miyceg .zetqep zepeilbl y`xn mliyy in lky oaenk eze`l i`kf didie ,rbtii `l mitqep `ed .exear mliy `edy mihwqic xtqn .xzei jex` onf ipt lr mlawi heyt zipkh dxfr zlawa jxev xxerzny dxwna z`vl oizndl zexyt` oi`e ,dtegc mkzeyxl cner oiicr ip` ,oeilibd yceg jldna `l) 08-417685 oetlha .(xanaep 60 letkiya dywzn ip` :ztqep dira ,mkl recia ,mwlg .yceg lka mihwqic dxw xak miniieqn miycega .miiccv-ec ip` mpne` .miccv 100-k ltkyl izvl`py j` mihwqic ippek ipy ly zkxrna ynzyn `yepa .zeplaqe onf yxec xacd z`f lka ip` .il xefrl elkezy deewn ip` df mziaa ltkyl mipken eidiy miacpzn ytgn .mixg`d oecrend ixagl mihwqic lka ltkyi cg` lk m` didi xzeia gepd ixag zxyr oia evteiy mihwqic 10 mrt xag lk .eixebn xefi`l miaexwd oecrend ywazn jka xefrl oiipernd oecren -n lgd) 08-417685 oetlha il` xywzdl .(xanvca 1 wiqiia eaxeh zty ?mrtd oeiliba dne itk ,`ed deelipd xn`nd .zghaend ici lr ozipy xzeia hxetnd ,d`xpd xecn jkl sqepa .mlera edylk oecren fkxn .mbiydl cvike ,miwgyn lr ycg .ray x`an ec`ipl wxa `ed ycgd xecnd `ll mrtd mb epze` xi`yn epi` oxe` mrp zety `yepa mrtd ,illk ipkh xn`n epixecn lk ly mnewn cwtp `l .zepkiz .milibxd .mklekl mirp ielia .edf uiaepiax laei :TURBO BASIC - ycegd zpkez ------------------------- zg` `id izrcly ,dpkez mi`ian ep` mrtd -exwinl exvepy xzeia ze`pd zexivid cg` `id wiqiia-eaxehd zty .edylk aygn m` .wiqiia ly xzeia miwfgd mihwl`icd gipdl xiaq ,wiqiiaa zepkizn dpdp dz` xzei ynzydl dvxz `l zencwzn zepkezly ,df wxt jxevl.oyid wiqiia ix`h`a .wiqiia-eaxehl qgiizn a"h xeviwd zepekzd lk lr xvw xaqdl ycwen df wxt wpxt ,dyrnl .a"h ly zerecid `ived `l ,a"h z` azky ,iwqaexhqe` lr siwn xaqd lk ,izrici ahinl ,weyl .zeycg zecaer zelbzn mrt icn .ezcear dycg dpekz mzilib m` .eqqdz l` ,okl .ciin epl ericed ,a"h ly zpkezk a"h z` uitd iwqaexhqe` wpxt `ly dpkez - 'xeaivd yekx' :xnelk) PD okn xg`l .(da yeniyd xear melyz yxcp ix`h` iaygnl GFA BASIC z` azke ayiizd ix`h` lra mixikn mz` m` ,ab` jxc .ST enir eyr ,ST BASIC-a oiicr ynzynd ST zepkizd zetyn zg` idefy el elbe ,cqg wpxt ly GFA wiqiia .xzeia zerexbd iaygnl hxcphqd meik `id iwqaexhqe` zvtend ,dlibx zixgqn dpkez idef .ST znbcdl .MICHTRON zxag ici lr mlera oiivp m` witqi ,ST BASIC-a mivewd ly zeletka lthl gilvn epi` df wiqiiay owez xacdy okzi) dn meyn 1.18125 mkl d`xp ile` .(xzei zencwzn ze`qxiba 18.9 mb j` ,ea lwzidl xicpy xtqn edfy .ely zeiziirae zenly zeletk md 37.8-e ly zhxetn dxiwql xefgp - eppiiprle .a"h :zerxd zeycgd - lk mcew ---------------------- `id zixwird dlabind .zeax opi` od dpi` a"h .mipyid 400/800 iaygn ilral yeniyd d`xpk `id jkl daiqd .mdilr dvx ROM-d oexkifl zgzn `vnpd RAM oexkifa ilra md dl` miaygn .dlrtdd zkxrn ly i`z miniiw `l mdae ,xzeid lkl 48K .dlrtdd zkxrn oexkifl zgzn RAM oexkif miaygnl mb a"h ly dqxib biydl ozip ,ATARI MONITOR oezird iiepnl ,dl` miiepnl xignd .ipei oeiliba xkfedy gelyn llek ,cala bpilxhq zexil 2 `ed j` ,a"h ly ef dqxib izi`x `l .l`xyil oexkif xzei zkxev `idy gipdl xiaq a"h-d zliag ,dn meyn .libxd a"h xy`n azek dz` m` .mihwqic ipy zqlk`n efd ,dl` miaygn lr mb uexl zaiigd dpkez zegtl ,oyid wiqiia ix`h`l cnvizy i`ck .ef dqxb lr mitqep mihxt epl eidiy cr .zehlwd iynzynl zniiw zxg` dira j` ,zhlwl a"h z` xiardl mpn` ,epglvd lr xaecn !!zewc 7 `ed dpirhd onf dcear yxec xliitnewd .cala yxtnd .cala mihwqica elbxzdy mkipian el`l :dphw dira cer DOS-d oia mitekz mibelic rval a"h .dyibd z` zepyl jxev yi ,wiqiial B divte`y xac ly eyexit .hwqicdn orhp ,zlhazn ('bcixhxwl dxfg) qecd ly oerhl ul`iz ,qecl xaer dz` m` :xnelk dirad .hwqicdn a"h z` ycgn okn xg`l meyn ,zi`xp `idy itk dxeng dk dpi` wlgk zeniiw qecd zeivwpet aexy .a"h-n ilxbhpi` zeynzynd zepkez zeniiw :dpexg` dirae mb ynzyn mday miniieqn oexkif i`za opi` ode ,zehrn od dl` zeipkez .a"h .a"h lr zevx ,zeyw opi` dl`d zelabind ,exkif iynzyn aexl daxda miyw miigd dyrnle oi` ,lynl IBM-l ;ix`h` mpi`y miaygnd IBM iynzyne ,mi'bcixhxw e` milewnyx zty lk mr ef dxeva cearl milibx .zepkiz mipzyn a"h ztya mixqg ,ziyi` ,il d`xpk j` ,lwqt zty oepbiqa ,miinewn gilvi m` `l` ,lkd yexcl ozip `ly mr wiqiia zty xevil mkipian edyin .dl`k mipzyn :a"h zepekz - dcearle -------------------- yibxzy okzi ,ligzn zpkzn dz` m` .db`c l` .'y`xl lrn' xaer o`k oeicdy xecnd `ed miligznl wiqiiad xecn oze`a wqer ely igkepd wxtd .jxear zepexzid mdne ,dk cr ecnlpy zeivwpet lk epiievi cizra .a"h ztya odly a"h oial ixewnd wiqiiad oia milcadd ulnen .zernyn jkl didz mday zenewna xaqei zrky meyn ,`exwl jiyndl z`f lka .jaygna a"h z` oiwzdl cvik yi .a"h mr zhlw elaiw milewnyxd ilra dlibxd dxeva zhlwd mr aygnd z` lirtdl dtydy ick ,(START zvigl ick jez) .oexkifl orhiz iycegd hwqicd lr elaiw mippekd ilra :a"h-d zliagl mikiiyd mivaw dyely .RUNTIME.COM ,COMPILER.COM ,TURBO.EXE ivaw z` liknd ,xg` hwqicl mwizrdl yi TURBO.EXE ly eny z` zepyle ,DOS z` zeakl yi okn xg`l .AUTORUN.SYS-l ycgd hwqicd xy`k ycgn elirtdle aygnd zpkez :al eniy .1 'qn opeka `vnp wiqiiad z` ihnehe` ote`a zlhan a"h-d lr uegll uegp df oi` okle ,ixewnd lk mxbii `l ik m` ,dlrtdd onfa OPTION .xeztkd uglii m` mb wfp zexidna wiqiia zipkez lk uixn a"h jxeve ,ixewnd wiqiiad xy`n 3 it dlecb .ixewnd wiqiiadn oexkif zegt ,dpekn ztyl zipkez lk mbxzn xliitnewd qgia 10-15 it `id reviad zexidn f`e .ixewnd wiqiial :zepkiz ixfr ----------- enk zepaen zetya zepkiz xikn dz` m` bedpy zi`x i`ce ,MODULA 2 e` lwqt :jk ,dpini hrn zhqenk d`lel lk meyxl 10 FOR I=1 T0 10 20 PRINT I 30 REM 40 NEXT I ,ef dxeva ze`leld lk meyixl b`ec a"h ozip .daxda dlw dcearl jted zepkizde dcewtd ici lr (?dnl la`) z`f lhal miy) [*L] ici lr z`f xifgdle ,[*L-] .zegepd jxevl ynyn [...] oeniqd :al ,mnvr miraexnd miixbeqd z` qitcdl oi` .(mkezay dn z` wx `l` reviad onfay jkl znxeb TRACE dcewtd `id xy`k dxey xtqn qtcei zipkez lk ly drwzp okid aewrl lw jk .zrvazn .z`f wiqtn TRACE- .jzipkez wiqiiad ly xzeia zepavrnd zepekzd zg` zeize`a yeniy lr ezeywrzd `id ixewnd zvgl m` .zepkizd onfa cala zelecb jetid ywn) INV lr e` CAPS lr dxwina lawl axqn aygnd ,(dhnl oinin miravd dnkega mlrzn a"h .cer `l .zecewtd z` .dl` milcadn zexey z` ycgn xtqnl jzexyt`a migeex xebql e` geztl ick ,zipkezd z` xtqnl jpevxa m` .zexeyd oiay jetdz zigkepd 100 dxeyy jk zexeyd dipyl zg` dxey oia geexindye 300 'qnl :cilwdl jilr ,20 didi RENUM 100,300,20 dxeva zexeyd z` ycgn xtqnl ick `id dpey`xd dxeyd :xnelk ,'zihxcphq' yi ,10 `ed dxey oiay geexinde ,10 :cilwdl RENUM 0,10,10 ycegn zexeyd zwign zpkez z` mixkef divwpet zniiw a"h-a ,okae ?ipei dcewtd .zexey zwignl zinipt zexeyd lk z` zwgen [DEL 100,200] .100-200 geeha lk ikxr z` jqnd lr d`xn DUMP dcewtd dxecvext) zexecvextd zenye mipzynd dzi` cciizp cer .daiage dycg dig `id ly hltd z` xiardl jzexyt`a .(jynda :jk ,hwqic lr uaewl e` zqtcnl DUMP-d .DUMP "D:FILE" e` DUMP "P:" wcea dz` cvik ;dxtey LIST zcewt mb dxey cr jzipkez zligzn zexeyd z` epi` libxd wiqiiad mb jka ?1000 z` d`xz cvik j` .[LIST 0,1000] :dywzn wiqiiad ?jqnd lr jli`e 1000 zexey ,meiqe dlgzd zxey ozn lr ywrzn ixewnd aiig xtqnd .[LIST 1000,32767] :jk xtqn .xg` xtqn s` `le 32767 zeidl lk z` d`xzy jl gihai `l xzei jenp zrced xifgi xzei deab xtqn .zexeyd :lwe heyt oexzitd ,a"h-a .d`iby .[LIST 1000,] zexeyd LIST revia jldna m` ,ab` jxc jzexyt`a ,icn xdn 'zevx' jqnd lr cg` lr dvigl zervn`a avwd z` hi`dl SELECT ,OPTION mixeztkd zyelyn .START-e xifgn a"h ,d`iby zerced epxkfd xak m` wx `le ,d`ibyd zedn lr zeyxetn zerced ,llka .(bven xtqnd mb ik m`) xtqn dcewtd .`ed mb xtzyd ze`ibya letihd znxeb [*B] dcewtd ;xzei dwfg `id TRAP dvitwl mexbz BREAK lr dvigl mby jkl z` zlhan [*B-] dcewtd .TRAP-d zxeyl z` xifgn ERR dpzynd .BREAK-d zcikl z` xifgn ERL dpzynde ,d`ibyd xtqn .d`ibyd zxey xtqn m` .REM zcewtl mb sqep gep aikxn :cilwz 10 -- :k aygnd z`f bivi 10 REM ---------------------------- mipey mirhw oia efk dxdvd qipkdl lkez .jzipkeza :oexkifa letihd -------------- hia 16 ly jxr oqke`n cvik mixkef zia/oezgz zia `ed xcqd ?oexkifa zligz okid zrcl dvex ip` m` .oeilr libxd wiqiiaa dxdvdd ,jqnd oexkif :`id SCREEN=PEEK(88)+PEEK(89)*256 :aezkl jl xyt`n a"h .c`n laxeqn SCREEN=DPEEK(88) ipy ly jxr jl xifgn DPEEK ,xnelk ziad zaezk z` el ozep dz` xy`k ,mizad .cala jenpd zaezk zzl dvex ip` m` ?jetdd avnde wiqiiaa aiig ip` ,jqnd oexkifl dycg :enk edyn aezkl libxd HI=INT(SCREEN/256) LOW=SCREEN-HI*256 POKE 88,LOW:POKE 89,HIGH :daxda heyt avnd a"h-a DPOKE 88,SCREEN oexkif irhw zffd mb jl xyt`n a"h fifdl jpevxa m` .mewnl mewnn milecb ,2000-l 1536-n miza 100 oa oexkif rhw :clwd MOVE 1536,2000,100 m` ;dffdd xcq aeyg mday mixwn miniiw xnelk ,1540-l 1536-n fifdl dvex ip` drax`a dpini oexkifd zlekz lk zffd ,dxardd ick jez oexkifd wgnii ,miza `xw `edy iptl mi`z lr aezki `edy meyn :aezkl jzexyt`a .mze` -MOVE 1536,1540,100 ,dxev dze`a weica oexkifd lk ffei f`e oexkifd i`z ewzrei dligza j` .mipezgzd mi`zd seqal wxe ,mipeilrd :dwibele dwihnizn ---------------- ozip .milk xgan zpkznl ozep a"h lk `ll ,miilnivc`qwd mikxr qipkdl oniqd z` miqipkn heyt ;zecgein zepkd ztya zepkizl dneca ,xtqnl l`nyn [$] :`nbecl ,(ilanq`) sq` POKE $600,$F dxdvdd POKE 1536,15 dxdvdl ddf ilnivcn xtqn lk jetdl ozip :dxdvdd ici lr ilnivc`qwdl A$=HEX{N) xtqn `ed A$ .libx ipexyr xtqn `ed N :lwe heyt jtidd mb .ilnivc`qwd N=DEC(A} ,'zxet ,2 dlecen ,lwqt zetyl dneca zelert rval ozip ,sq` ztye heliit e` ,mixayd z` gipfdle minly mixtqna :jtidl 11/4 = 2.75 :libx welig 11 DIV 4 = 2 :minlya welig 11 MOD 4 = 3 :cala zix`yd aeyig INT(5.7)= 5 :dhn itlk libx lebir INT(-5.7)=-6 TRUNC(5.7)= 5 :ohwd mlyd itlk lebir TRUNC(-5.7)=-5 xzei dgep `id mii`xw` mixtqn zxivi dcewtd ,libx wiqiia ix`h`a :xaran .0-1 megza jxr dxifgn PRINT RND(N) mb j` ,a"h-a mb zixyt` ef dxev .jxr eze` dxifgn PRINT RND dcewtd mly xtqn dxifgn PRINT RAND(N) dcewtd .0-N megza ztya zepkiza oeiqip ilra mkn dl` mixcben 0-2 mixtqndy mircei ,FORTH oexkif gtpa jeqgl ick ,dtyd jeza ycgn `ed oeirxd .reviad zexidn z` licbdle aiig aygnl bivn dz`y xtqn lk :dfk ,icnl zeakxen mebxiz zexbiy jxc xearl oziz m` .dpeekd z` oiai aygndy ick recie ayegn xak mkxry mipzyn aygnl zetya laewn okl .ezeliri xabz ,y`xn migikyd mixtqnd z` xicbdl zeniieqn mixtqnd .dtya gztn zelink xzeia miiaeig minly mixtqn md migikyd .0-3 mixtqnd mixcben a"h ztya .miphw z` micwdl yi,dl` zexcbda ynzydl ick :`nbecl ,mdil` [%] oniqd .oexkif i`z 8 zkxev X=1 dxdvdd .oexkif i`z 3 zkxev X=%1 dxdvdd lk lya cxhidl dvex jpi` m`y oaen zcary itk cearl lkez ,dl`d milewiyd .oiiprzny inl dliri ztqez idef .dk cr dxabl`a zeibel zelert mb wtqn a"h izpkznl zexken dl` zelert .zip`ilea mb .dpekn ztya mizpkznle 64 xecenew j` ,zeibel zelert yi wiqiia ix`h`a o`k qpkidln qepn oi` .dpey ozxev xacn epi` xacd m` .miieqn hexitl .`ad rhwl blcl hwya lkez ,jil` lk ly d`vezd ,libx wiqiia ix`h`a ,zn` e` xwy) 1 e` 0 `id zibel dlert :(dn`zda PRINT 5 AND 7 => 1 PRINT 0 AND 5 => 0 PRINT 0 AND 0 => 0 PRINT (5>3) => 1 PRINT (5<3) => 0 jxr lke ,xwy aygp 0 ,ze`xl ozipy itk .zn` `ed (miilily mixtqn llek) xg` lr a"h xney ,d`ln zen`ez lr xenyl ick zeip`ilea zecewt siqen j` ,df hnxet :zeycg PRINT 5 & 7 => 5 zeccead zeiaiqd oia ip`ilea AND edf ,ix`pia 101 `ed 5 :miwcapd mixtqnd ly ip`ilead AND-d .ix`pia 111 `ed 7-e ipyl zetzeynd zeiaiqd odn wcea zeiaiqd ,df dxwna .miwcapd mixtqnd 101 :xnelk ,zetzeyn od zeipeviwd .ipexyr 5 e` ,ix`pia m`zda ,dlibxd ezxev lr xney OR mb oia OR zrvand dcewtde ,wiqiia-ix`h`l :[!] `id zeiaiq PRINT 5 ! 7 => 7 PRINT 8 ! 7 => 15 zeiaiq dfi` wcea ip`ilead OR-d :mixtqnd ipyn cg`a zegtl zelrten 1000 0101 ! 0111 ! 0111 ---- ---- 1111 0111 j` ,xzein jeaiqk jl d`xp xacdy okzi znxa zepkiza dlecb zeaiyg lra `ed lk mday oexkif i`z miniiw .dpeknd bedp .zxg` divwpetl 'lbc' zynyn ziaiq lk ly dkxre ,0-7 zeiaiqd z` xtqnl ick .dly xtqnd zwfga 2 `ed ziaiq mr [!] rval yi ,zccea ziaiq lirtdl rval yi ,zccea ziaiq zeakl ick .dkxr .dly milynd mr ,[&] xtqn ly ziyilyd ziaiqd zlrtd :`nbecl :(0011 gipp) edylk 0011 ! 0100 ---- 0111 :0111 xtqna efd ziaiqd ieaik 0111 & 1011 ---- 0011 `id a"h siqeny dpexg`d zibeld dlertd .[EXOR] :EXCLUSIVE OR zlrten zg` ziaiq xy`k 'zn`' `ed EXOR z` zepyl mivex ep` xy`k .dieak dipyde :z`f rvap ,zniieqn ziaiq ly qehhqd 0111 0011 EXOR 0100 EXOR 0100 ---- ---- 0011 0111 :mipzyn ------ mixenyd mipzyn zeny xtqn miniiw ynzydl `l ulnene ,micgein miciwtzl zenyd .zexg` zexhnl jizeipkeza mda :md ,HEX$,DEC(),INSTR(),INKEY$,TIME,TIME$ .FRAC(),TRUNC(),RAND(),ERR,ERL wiprn dz`y zenyd zexidaa xkip xetiy oniqa yeniyd i"r byen jly mipzynl ,mipzyn zenya iweg dzrn `edy ,[_] :`nbecl NUMBER_OF_RECORDS=15 HIGH_SCORE=38 :ohw xetiy cer liki dpzyndy dvxz miniieqn mixwna liknd zfexgn dpzynl `nbec .ze`kxn :ze`kxn THIS IS A "SMART" PROGRAM dfk dpzyn zepal ozip wiqiia ix`h`a :jk 10 A$="THIS IS A SMART PROGRAM" 20 A{11,11)=CHR{34) 30 A{17,17)=CHR{34) :daxda miheyt miigd wiqiia eaxeha 10 A$="THIS IS A ""SMART"" PROGRAM" [""] mitevx miiyxb ipniq ipy xnelk .zfexgna izin` cg` yxb oniq mi`han ,jxrnd ixa` lk z` zqt`n DIM dxdvdd e` zevixhna xaecn m`a zelz `ll znxeb ixewnd wiqiia-ix`h`a .zefexgna ,miieqn oexkif rhw zxinyl DIM dcewtd m`a .eielinl be`cl jixv zpkznd j` ilan jxrndn jxr `exwl oeiqip rvazn wiqiia-ix`h` xifgi ,myl qpked `edy .0 jxr xifgi a"h .inzq jxr ywnd ly ezd z` wifgn INKEY$ dpzynd .uglpy oexg`d oa `ed .dryd z` wifgn TIME$ dpzynd `id dryd xy`k :jk iepae ,miez dyiy ekxr didi ,zeipy 10 cere axra 7:35 .ycg jxr el zzl ozip .193510 :dxdvdd TIME$="103000" .xweaa 10:30 dryl oeryd z` zpeekn z` likn (TIME$-n licadl) TIME dpzynd oeeik zligzn etlgy jqnd iaedad xtqn dvigl .dipya jqn iaedad 50 yi .oeryd .oeryd z` zqt`n RESET-d xeztk lr z` mb xikfdl ie`x ,onf epxkfd xak m` xiagzd .dpzndl zynynd PAUSE zcewt :`ed PAUSE A .jqnd iaedad xtqn `ed A xy`k PAUSE 50 :`nbecl :eyexit .reviaa jiynn dz`y iptl zg` dipy oznd zfexgn yetigl zynyn INSTR divwpetd epl yiy gipp .xzei dlecb zfexgn jeza ep` dkezae ,miez itl` za wpr zfexgn dlecbd zfexgnl `xwp .ohw rhw miytgn :cilwp .A$ dphwle ,X$ N=INSTR(X$,A} ezdn lgd `vnp A$-y ixd ,N=5 m` mivex ep` m` .X$ jeza jli`e iyingd jeza A$ ly mixg` mirten ytgle jiyndl xnelk) iyiyd ezdn yetigd z` ligzp ,X$ :dxdvdd ici lr dyrp xacd .(N+1 -n N=INSTR(X$,A$,6) N=INSTR(X$,A$,N+1) :illk ote`a e` xzei oi` ,0 didi N ly ekxr xy`k .X$ jeza A$ ly mirten mlrzz yetigd zxbiyy reawl mb jzexyt`a zelecbe zephw zeize` oiay milcadn mirava zeize` oiay milcadde ,zilbp`a myl .mililnz icarna aeyg xac - miketd mewna [UNINSTR] cilwdl jilr jk .[INSTR] :dwitxb ------ md jzeyxl micnerd miit`xbd milkd dzrn rvazdl dleki jqnd zwign .mipeebn .miaygnd aexa enk ,CLS zcewt ici lr (?CHR{125) `id dxdvdd libxd wiqiiaa) aezkl yi ,itxbd jqnd z` zewpl ick .CLS #6 ici lr ,jqnd lr lbrn xiivl jzexyt`a :dcewtd CIRCLE X,Y,R R-e lbrnd fkxn ly zehpicxe`ewd od X,Y .dqtil` xiivl mb leki dz` .qeicxd `ed .miqeicx ipy ,recik ,yi dqtil`l :`id dxdvdd CIRCLE X,Y,R1,R2 xveeiz `l ,jqnd megzn bxeg lbrnd m` lbrnd ly 'miiweg'd miwlgd wx .d`iby .e`xii rava zit`xb dxev mi`lnn ji` mixkef xekfl gilvn `l ip` mb ?wiqiia-ix`h`a xfridl ilan ,wiiecnd xiagzd z` mrt s` zcewt rval jilr wiqiia-ix`h`a .xtqa dz`y dxevd jeza edylk mewnl POSITION ,mi`znd COLOR-d lr fixkdl ,`lnl dvex .XIO 18,#1,0,0,"S:" :cilwdle ,jk z`f zeyrl iyteg oiicr dz` a"h-a etqep j` ,jnvr z` zeprl ade` dz` m` .PAINT-e FILLTO :zeycg zecewt izy zcewt ly wiiecn iewig `id FILLTO :`ed xiagzd .lirl dxkfedy XIO-d FILLTO X,Y dcewpd ly zehpicxe`ewd od Y-e X xy`k ielind zcewt .ielind ligzn dpnn reavl ligzz m`e ,xqga dwel zixewnd wlg wx dn meyn ravii ,lbrn fkxnn .epnn dly mzixebl`d .PAINT zcewt dxvep okl .ghy lk oihelgl z`lnn `ide ,xzei mkg :oaenk ,`ed xiagzd PAINT X,Y dxevd ielin rav z` reawl jzexyt`a zcewt ici lr dnvr dxevd ravn cxtpa X xy`k FCOLOR X `ed xiagzd .FCOLOR COLOR X-l dneca) ravd xhqibx xtqn `ed .(libxd ,it`xb jqn lr hqwh aezkl jzexyt`a :dheyt dcewt zxfra TEXT X,Y,A$ `ed A$ .zehpicxe`ewd ,oaenk ,od Y-e X .qtcend hqwhd :wiprn df xacy zeiexyt`d lr eayig wx 80 ly mililnz carn opkzl ,lynl ,ozip oepkize it`xbd jqna yeniy zxfra xeh irhw zffd zecewt .zeize`d ly ycgn zfexgn jeza zfexgn yetige oexkifd oepkiza xzeia zeiyeniy zeidl zeieyr ?acpzn edyin .dfk :DOS zecewte hlt/hlw ------------------- dil`n zpaen hrnkde daeygd divwpetd z` ze`xl lkez seq-seq .DIR zcewt `id xefgl ilan hwqicd lry mivawd lk ,oiiprd jxevl zexbiy oerhl ,DOS-l zexfen ze`xpd zehiy dpdke dpdk cere ,il recid lkk) IBM-e lt` iaygn ilral .dlt`a miyybn oiicr 64 xecenew ilra mivawd zniyx z` oerhl mikixv millne`d zigkepd zipkezd zwign ick jez .(oexkifdn :yinbe gep ,heyt `ed xiagzd DIR .1 'qn opeka mivawd zniyx zbvd DIR "D2:*.*" .2 'qn opeka ,l"pk DIR "D:*.BAS" BAS zneiq ilra mivawd zniyx zbvd .1 'qn opeka XIO zecewt zniyx wtqn wiqiia ix`h` ,mivaw zwignl icnl laxeqn xiagz zlra milw miigd dzrn .ileke mny iepiy :xzei DELETE "D:FILE" uaew zwign RENAME "D:OLD,NEW" uaew my iepiy LOCK "D:FILE" uaew zlirp UNLOCK "D:FILE" lerp uaew xexgiy mixkef !ok ,d` :yexcl xyt` cer dn ztya zipkez ly dpirh mirvan cvik iptn ile` ?`l ?wiqiia-ix`h`a dpekn dcewpd ,izrcl ,ef !z`f zeyrl xyt` i`y dyw .wiqiia-ix`h`a xzeia dylgd zipkez oerhl dheyt jxc oi` j` ,oin`dl .qecl xearl ilan hwqicn dpekn ztya jxevl zeycg zecewt izy wtqn a"h ,okae :oiiprd BRUN "D:PROGRAM" .dze` uixne dpekn ztya zipkez oreh BLOAD "D:PROGRAM" uixdl ilan dpekn ztya zipkez oreh .dze` jkn mlrzdl obed df didi `l ,zn`d ornl zipkez zvxdl zexyt` zniiw 3 qec zgzy :hwqicdn dpekn ztya XIO 41,#1,0,0,"D:PROGRAM" yeniy wicvn epi` df oexzi ,z`f zexnl .df laxeqn qeca ,okae .FORMAT zcewt .ok ?cer dn il d`xp .a"h-a zniiw dpi` `id izrztdl ,iwqaexhqe` xn ly dheyt dgkiy idefy XIO-a ynzydl xyt` oiicr .zlaqp `id j` :ycg hwqic ly henxit revial libxd XIO 254,#1,0,0,"D:" hixtz ,dyrnl .DOS-d zecewt o`k cr xefgl ul`iz .xzein zeidl ligzn DOS-d ltkyl e` uaew wizrdl dvxz m` eil` .ea ytgl dn jl oi` ,jkl hxt j` ,hwqic m` :dywaa ?mivawa letihl zecewt cer miieqn uaewn miza 100 `exwl dvex dz` dz` ,oexkifl mxiardle wiqiia-ix`h`a :jk z`f dyer i`ceea FOR I=0 TO 99 GET #1,A:POKE LOCATION+I,A NEXT I :jk z`f miyer a"h-a BGET #1,LOCATION,100 ?cngp dfy oekp miza 100 zxard :jetdd dxwnl ,dzre :uaew jezl oexkifdn :wiqiia ix`h` FOR I=0 TO 99 A=PEEK(LOCATION+I):PUT #1,A NEXT I :wiqiia eaxeh BPUT #1,LOCATION,100 .mizpkznl miig ly itei dxev dtqep PUT-e GET zecewtl mb uaewn zia z`ixw ly dlibxd dxevd .dycg GET #1,A :dk cr dzid ipexyr xtqn `exwl jzexyt`a yi zrk 6 zervn`a ebviil bdep ix`h`dy itk mly %GET #1,A :miza ipexyr xtqn zxard .oekp `ed mb jtidde %PUT #1,A :`id uaewl zclwna yeniy jez mipezp zbvde dhilw zclwndn mipezp zhilw .c`n dxtey jqnae :ici lr `id GET A :dpyid dxevd mewna OPEN #7,4,0,"K:":GET #7,A:CLOSE #7 cew z` mixwnd ipya likn A dpzynd .uglpy ywnd ly ATASCII-d ?jqnd lr A z` mibivn cvike PUT A :mewna OPEN #7,8,0,"E:":PUT #7,A:CLOSE #7 wiqiia-ix`h`a mb .mkze` drhp `l GET #16,A :jkl xeviw jxc dzlbzd z`f lka xacd a"h-a j` ,PUT #16,A-e .xzei heyt `ed ivexr lk z` mixbeq cvik :seqal ?hlt/hlwd :wiqiia ix`h` FOR I=1 TO 7:CLOSE I:NEXT I :wiqiia eaxeh CLOSE .zxzein dlin lk zcewt xetiya hlt/hlw ly df sirq miiqp -hteqexwina ezpkizy mkn dl`l :INPUT-d ,mlera aygn lkl hrnk miiwd ,wiqiia dpana ynzydl i`ceea oncfd ,ix`h` llek :`ad gepd INPUT "WHAT IS YOUR NAME",A$ :mewna PRINT "WHAT IS YOUR NAME";:INPUT A$ jxev yi miax mixwna .xexa lcadd ,INPUT-d iptl jqnd lr drced qitcdl ,a"h .dlw dxeva z`f dyer dfd xetiyde .zeiexyt`d izy z` zpkznl ozep ,oaenk :lilv ---- ix`h`a mililvd lk z` miakn cvik ?uaew s` xebql ilan wiqiia FOR I=0 TO 3:SOUND I,0,0,0:NEXT I ...nnnd ?gep jk lk `l ?d`ad dcewtd lr mkzrc dn SOUND zxag dayg `l recn ?zetqez lk `ll ,edf wiqiia-ix`h` z` dgzit xy`k jk lr SMI dxnega mze` hetyp `l .aeh ?1978-a .onf ly ugla ecar mdy meyn ,dxzi zeahwe`d geeh z` litkdl ozipy zrcid ?zelew ipy sexiv ici lr ix`h`d ly mihia ly iepiy zyxec jkl dwipkhd dqnrn .POKEY-d aayl mipetd miccea :zg` dcewt jkl yi eiykr .zxzein DSOUND,A,B,C,D ,oehd ,lewd xtqn oaenk md D-e C ,B ,A SOUND-d zcewta enk ,dnverde zeeird geehl laben epi` oehd j` ,dlibxd `ed lcadd .0-65535 geehl `l` 0-255 .miyxn `id dl`d zelewd lk zwzyd ,irah ote`a .mixhnxt `ll ,cala DSOUND ici lr :ze`lel ------ meyn ,mitiirzn `l mz`y deewn ip` xzeia wfgde ipebaxd wlgl miribn ep`y oeebin z` ekixri lwqt izpkzn .a"h ly zniiw wiqiia ix`h`a .a"h ly ze`leld :cala zn` zizin` d`lel FOR I=1 TO 10 PRINT I NEXT I :efk dnecn d`lel mb zniiw 100 IF I<10 THEN PRINT I:GOTO 100 z`lela mb ('b`a') uew miiw ,dyrnl ix`h` .ix`h` ly dlibxd FOR/NEXT-d :zg` mrt d`ad d`leld z` rvai wiqiia FOR I=10 TO 1 PRINT I NEXT I ,oekp caer did wiqiia-ix`h` m` mrt elit` zrvazn dzid `l efd d`leld wiiecna m`ez a"h-y epxn` xak .zg` lr mb xenyl evl`p okl .wiqiia-ix`h`l .[*F] :dcewtd dtqep la` ,dfd uewd FOR/NEXT-d ze`lell znxeb ef dcewt z` dxifgn .[*F-] dcewtd .ie`xk bdpzdl .ezencwl avnd .zeiteqpi` ze`lell miwewf ep` mizirl :`ed a"h-a jkl xiagzd DO . . . LOOP ici lr DO...LOOP z`leln z`vl ozip zipkezd revia jynp f`e ,[EXIT] zcewt .LOOP-d ixg`y dcewtdn lk rvazzy d`lell miwewf ep` mizrl lk ,lynl :zn` `ed miieqn i`pzy onf reaixa ezelrdl yi ,B-n ohw A-y onf :d`vezd z` qitcdle WHILE A=B oi` miax mixwnae ,zenec zexevd izy ,z`f mr .ynzyz ze`leldn dfi`a dpyn df WHILE...WEND z`lelay jkl al miyl yi z`lelae ,d`leld zligza i`pzd wcap okl .dteqa wcap `ed REPEAT...UNTIL mrt zegtl REPEAT...UNTIL z`lel rvazz .miiwzn epi` i`pzd m` mb ,zg` :IF/THEN zecewt -------------- lka aeyg aikxn `ed IF...THEN dpand zeqgiizd laiw `ed a"h-ay irah .dty wiqiia ix`h`a dlibxd dxevd .zcgein :efk `id IF THEN ly ipyd wlgd rvazn ,miiwzn i`pzd m` dxeyl reviad xaer ,`l m` .dcewtd ,df dpana ynzydl ozip a"h-a mb .d`ad :d`ad dxevd mb zniiw j` IF THEN <` rva>:ELSE dniyn z` aygnd rvai ,miiwzn i`pzd m` aygnd rvai ,miiwzn epi` i`pzd m` .'` z`f aezkl mivex epiid m` .'a dniyn z` :jk z`f miyer epiid ,wiqiia-ix`h`a 100 IF THEN <` rva>:GOTO 120 110 120 zelhn rval mivex ep` miax mixwna zg` dxey f`e ,miiwzn i`pzdyk zeax :jk z`f rval xyt` a"h-a .dwitqn dpi` IF . . . . ENDIF --------------- IF :elit` e` . . ELSE . . ENDIF yxec ef dxevl oekpd xiagzdy al miy didi dye ,ritez `l THEN dlindy dlhnd :xnelk ,IF-d zxdvda oexg`d wlgd dxeya ritedl zaiig revial dpey`xd .zcxtp ick zigxkd `id ENDIF dcewtd ,ok enk .IF-d zcewt zniizqn okid rci aygndy .ENDIF dxdvdd lr xzeel oi` :zipkez iwlg ly zeny ------------------- aexy dlert xyt`n envr wiqiia-ix`h` dvitw :mixyt`n mpi` wiqiiad iyxtn :xnelk ,dpzyn jeza `vnpd dxey xtqnl :ziweg `id d`ad dxevd A=800:GOTO A dze` llkyn mb j` ,ef dxev xyt`n a"h lr ,zipkezdn wlgl my zzl ozip .c`n :jk ,my eixg`y [#]-a dligznd dxey ici 800 #START ly df wlgl zeptl xyt` okn xg`l :ze`ad zexevd lka zipkezd GO# START GOSUB #START RESTORE #START TRAP #START ON B GO# START, LAST, INIT ON B GOSUB #START, LAST, INIT ly ycgn xetqin mirvanyky oaenk ,aygnd iabl iepiy lk oi` zexeyd xear dxkfedy zncewd dxevdn licadl xtqnl ozip `l dze`y ,wiqiia-ix`h` .RENUMBER zipkez s` ici lr oekp ycgn xearl dleki dpi` mb zncewd dxevd `vnpd xcdn s` ici lr dpekp divlitnew zeny zwprd .dycgd dxevdn licadl ,weya ziyeniy `id zipkezd ly mipeyd miwlgl onfd mr .oey`x hana d`xp xy`n daxda .jka gkeeiz :zexecvext --------- dlhn zrvand dphw zipkez `id dxecvext cinz dl yi .dpihexaql dneca ,zniieqn .dny it lr `id dil` diptde ,my :jk d`xp dpihexaqa libxd yeniyd 10 GOSUB 1000 20 30 END 1000 1100 RETURN ynzypyk jk d`xiz zipkez dze` :zexecvexta 10 EXEC INIT 20 30 END 1000 PROC INIT 1010 1100 ENDPROC j` ,xzein leaxiqk xacd d`xp ile` dpana ynzydl mihep miqepn mizpkzn :`ad zipkezd 10 EXEC INIT 20 EXEC INSTRUCTIONS 30 EXEC MAIN 40 END 900 REM -------------------------- 1000 PROC INIT 1010 . 1020 . 1030 ENDPROC 1040 REM -------------------------- 1100 PROC INSTRUCTIONS 1110 . 1120 . 1130 ENDPROC 1140 REM -------------------------- 1200 PROC MAIN 1210 . 1220 . 1230 ENDPROC ietipa jxev yi xy`k c`n gep dpan edf .ze`iby eaxeh ly zepkizd ze`ltp ,o`k cr cvik zrcl ick ,`exwl jynd .wiqiia z` uixdl cvike a"h xcdna ynzydl .ihnehe` ote`a jizeipkez :(xliitnew) xcdnd ---------------- jipta zcner ,dpken jzipkez xy`k .dpekn ztya zipkezl dktdl zexyt`d dpekn ztya zipkez ly ihnehe` mebxiz mi`aygne) .divlitnew e` xecid `xwp (...'letniw' mizirl mixne` miixar revial zipkez zllek a"h-d zliag .xliitnew e` ,xcdn edf .xecid zipkezd :zepexzi xtqn jzipkez xecidl zipkezdn daxda dxidn `id xecidd xg`l zegt zkxev `id miax mixwna .zixewnd ,dze` gvtl dyw :sqep xace ,oexkif gtp LIST zcewt rval leki jpi` :xnelk .xecid dxary zipkezl ick .cala hwqicd zqxiba miiw xcdnd :clwd ,a"h jeza `vnp dz` xy`k elirtdl BRUN "D:COMPILER.COM" L divte`a xga ,qecd hixtz jezn ,e` ,uaewd myl l`yizyke ,(uaew zpirh) :clwd COMPILER.COM wpxt .oexkifl orhii xcdnd `ed ,dpkezd z` azky ,iwqaexhqe` olek zeneyx zercedd okle ,ipnxb ,zixar aaya ciievn jaygn m`) zipnxba zetxhvnd zeixar zeize` jqnd lr d`xz ef dazk ;db`c l` .(xyt zexqg milinl mb ,xcdna yeniyd z` jl xiaqdl dcrep .zipnxb xaec jpi` m` opek dfi` zipnxba jze` l`yi aygnd xtqna xga .xecidl zipkezd z` likn `ed 1 'qn opek ,mi`xewd aexl) opekd mivawd lk zeny .(dcigid zexyt`d x`en qt .jqnd lr ebvei zxgay opekay uaewl eze` xard .mivawd cg` lr ritei dvigl `ll) mivigd iywn ici lr ievxd uaewd .RETURN lr ugle ,(CONTROL lr dxwna ."ltnewi" `ede ,zipkezdn orhii .d`ibyd zedn z` xcdnd bivi ,d`iby ly aygnd jze` l`yi ,oixyinl jli lkd m` zipkezd z` hwqicd lr xenyl my dfi`a [D:] myd zlgzd z` bivi aygnd .zxcednd z` milydl jilre ,[.CTB] zneiqd z`e .CTB zeidl zaiig zneiqd .elek myd opekl zipkezd z` xenyl jpevxae dcina zipkezd my z` lgzd ,1 'qn xy`n xg` .opekd xtqna aygnd jze` l`yi ,zipkezd zxiny xg`l jk .ztqep mrt dze` xenyl jpevxa m`a izla miwzer xtqna dze` xenyl lkez aygnd dtvn odil`y zeaeyzd .laben miliawnd mdy ,[N] e` [J] od ef dl`yl .zilbp`a Y/N e` `l/ok-l zipnxba mrt zipkezd z` xenyl `ly xgaz m`a 'qn) dpey`xd dl`yl aygnd xefgi ,ztqep .d`ad zipkezd z` xcdl ick ,(opekd hixtzl z`vl jzexyt`a ,dceard meiq mr e` ,CONTROL-D lr dvigl ici lr qecd ezlrtde aygnd ieaik ly divleniq rval ywai dxwn lka .CONTROL-R ici lr ycgn d`ivid z` [J] ici lr xy`l aygnd jze` .lhal ick [N] lr ugl .xcdndn oerhl jilr ,zxcedn zipkez uixdl ick idef .dvxdd-onf-zipkez z` lk mcew dze`y a"h zliaga `id mb dribnd zipkez ,envr a"h jezn dze` uixdl ozip .zlaiw xga qecd jezn .qecd hixtz jezn e` okn xg`le ,(uaew zpirh) L divte`a :clwd RUNTIME.COM :clwd a"h jezn ,e` BRUN "D:RUNTIME.COM" bvez dligza .orhiz dvxdd onf zipkez `id !dpnn mlrzd .d`iby zrced jqnd lr d`vn `l dvxdd onf zipkezy jkn zraep oikdl cvik d`xp jynda .uixdl zipkez .zihnehe` dvxdl zipkez m`d :jqnd lr dl`y bvez okn xg`l ciin zipkez oerhl ,zipkez uixdl dvex dz` zpirh) [L] zexyt`a xga .qecl xefgl e` zipkezd my didz d`ad dl`yd .(zipkez ,zipkezd my z` wx clwd .oerhl jpevxay m` .CTB zneiqd `lle ,opek xtqn `ll ,xg` opekn zipkezd z` oerhl jpevxa xg`le ,SHIFT-CLEAR lr ugl ,1'qn epi`y xtqn llek ,zipkezd my z` clwd okn orhiz zipkezd .CTB zneiqd `ll ,opekd lr dvigl mr e` ,dneiq mr .uxeze ,oerhl jpevxa m`a aey l`yiz ,BREAK [R] zexyt`a xga .qecl z`vl e` ,uixdl [D]-a xga .zipkezd z` aey uixdl ick .qecl z`vl ick ick RESET lr uegll leki dz` aly lka .zxcednd zipkezd z` aey uixdl :zeipkez ly zihnehe` dvxd ------------------------ zynzynd dvxdd zhiy ,oey`x hana zi`xp zel`y zl`eyd dvxd onf zipkeza ozip lfnd daxnl .dgep `le zlaxeqn .oihelgl ihnehe`l jildzd lk z` jetdl zxfra aygnd zlrtd mry jl reci i`ceea ,DOS.SYS qecd uaew z` liknd hwqic ztya zipkez hwqicd lr aygnd ytgn `ven `ed m`e ,AUTORUN.SYS mya dpekn xaer `ed ,`l m`) .dze` uixn `ed dze` e` ,qecd hixtzl ,wiqiiad yxtnl zegkepl m`zda ,zinvrd dwicad zipkezl xeztk lr dvigll m`zdae hixtzd zpkez (.OPTION-d myd zgz zlaiwy) wiqiiad yxtn m` ,AUTORUN.SYS-d zipkez `ed (TURBO.EXE mya wiqiia zipkez ytgi f`e ,orhii `ed .dvixdl ick ,AUTORUN.BAS drcedd bvez ,zniiw dpi` zipkezd m` .READY :zxkend (RUNTIME.COM) dvixd onf zipkez m` ,orhiz `id ,AUTORUN.SYS zipkez `id mya zxcedn zipkez uixdl ytgze .AUTORUN.CTB ,mihwqicl mini`znd mivawd zwzrd zxfra zepal jzexyt`a ,m`zda mny iepiye `l ynzynd mday ,miihnehe` mineyii zelertd lr xac ivge xac zrcl jxhvi ivaw' elit` oikdl jzexyt`a .zervaznd :IBM iaygna miniiwd dl`l dneca ,'dev` mipezp oeilib uixdl jpevxay xn`p dz` ok iptl j` ,a"h-a aezkd ,ipexhwl` :dpekn ztya zeipkez izy oerhl dvex ,ixar jxrnl miezd jxrn zkitdl dpey`xd .xeh 80 ly jqnl jqnd zkitdl dipyde mya zipkez aezkl jxhvz oiiprd jxevl :jk d`xizy ,AUTORUN.BAS 10 BRUN "D:HEBREW.COM" 20 BRUN "D:COL80.COM" 30 RUN "D:CALC.BAS" uixz ,cala zexey yely za ,ef zipkez lr dxgapy dpkezd zaiaqa jzipkez z` .jci ozipy dnbcd zipkez mkxear epkd ,meiql oke ,a"h-a e` libxd wiqiiaa dvixdl .dpekn zty zexidna dvixdle dze` xcdl ici lr dazkp ,SPRITE.BAS ,zipkezd .iycegd hwqicd lr z`vnpe ,ixeck xin` eaxeha ,wiqiia ix`h`a dvixdl eqp zipkez z` elrd okn xg`le ,wiqiia zipkezd z` evixde ,RUNTIME.COM-d ztxevn `id mby ,SPRITE.CTB zxcednd .iycegd hwqicl zxfra jqnd lr xiivl zxyt`n zipkezd oia oeincl al eniy .wihqie'bd .ST ix`h` iaygna onqd oial 'legkn'd xzeia daehd dtyd ?mikgn mz` dnl .mka ielz x`yd .mkicia z`vnp zepkizl !dcearl zepkiz zety ----------- ,aygnl zepaend ze`xed zxcq `id zipkez enk .dni`zn zepkz ztya zazkp `ide zeaiig zepkzd zety mb ,mzixebl`d zeirah zetyl cebipa .zeirnyn-cg zeidl ezpeaz lr zeknzqnd ,(zilbp` ,zixar) zetya ,rneyd ly ehetiy xyek lre ilra zeidl miiehial xeq` zepkzd `eti` od zepkzd zety) mipey miyexit .(dwihnznd ztyl dneca ,zeizek`ln zety dnxd .zepkz zety ly zenx yely zeniiw zexiyi zepaend zetyd z` zllek zizgzd miieqn beqn aygn .miaygnd ici-lr zcgeind dty ,zg` dty wxe j` "oian" .xg` beqn aygnl gxkda zpaen dpi`e ,el MACHINE) dpekn zty z`xwp z`f dty .(LANGUAGE ly iaxin hexit miiw dpekn ztya aygnd lbeqn oze` ,zeiqiqad zelertd miiceqid miaikxnl diipt zniiwe ,rval itl oexkfd i`z :oebk ,aygnd ly dty .(mdizeaezk) miixeciqd mdixtqn el aygnd ly itivtqd dpana diielz z`fk eizecin itl "dxetz"e ,dcrep `id .zewiiecnd ce`n dciakn dpeknd zety ly ef dpekz ,(aygnl zeipkezd iazek) mizpkznd lr zpkznd lr .ax hexit zyxec `id ik zernyn ixqg mdy ,miax mitexiv xekfl mitexiva aygnd zpfd .zeirahd zetya `id (aygnd oexkfl mzqpkd ,xnelk) dl` ztya ze`xedd .icnl zrbiin dlert qiqaa zextq itexiv ,dyrnl ,od dpeknd e` ilhwe` llk-jxca) miieqn dxitq - zewegx mizirle ,il`nivc-dqwd ,lynl ,oiivl leki 000 sexivd .(ix`pia .'eke xeqig - 001 sexivd ;xeaig zty d`vned ,dl` zeira lr xabzdl ick dpzip ef dtya .(ASSEMBLY LANGUAGE) sq ,(zilbp`a dln ,llk-jxca) my d`xed lkl .d`xedd zedn z` x`znd ozip (xeaig z`xed) 000 sexivl ,dnbecl z` xekfl jixv zpkznd oi` dzr .ADD myd ,ze`xedd zeny z` wx `l` ,zextqd sexiv dtya zernyn yi dl` zenyl ,xen`ke ly mitexiv wx "oian" aygnd .zirah zextqd ly mitexiv wx ,llk-jxca) zextq ztya zenyd z` mbxzl jxev yie ,(1-e 0 zipkez .dpeknd ztya mitexivl sqd ASSEMBLER) xlanq` z`xwp mebxzd sqd zty oia lalal oi` ,ab` .(PROGRAM s`e) zilbp`a ik s` ,mebxzd zipkezl mdizeny (revwn iyp` oia libxd yeniya .minec ly ilanq` zety oia ax oeinc yi aygn beq lkl j` ,mipey mibeqn miaygn ilanq`d ztya wxe j` ynzydl yi oiadl `ly lelr cg` beqn aygn .dni`znd xg` beql dazkpy ,xlanq` ztya zipkez .miaygn ly ynzydle zepkzd zk`ln z` lwdl ick ici-lr epaeiy) "zeilqxaipe`" zetya zety egzet ,(miaygn ly mipey mibeq .(HIGH LEVEL LANGUAGES) zeilir xzei cer "zeaexw" zilird dtya ze`xedd ,sqd ztya ze`xedd xy`n zirahd dtyl dtya aygnd zipkez xzei dxvw llk jxcae ,z`fn dxzi .sqd ztya xy`n zilird dty lkle ,zeax zeilir zety zeniiw .dly miicegiid mipiit`nd dtye revial xwira zecreind ,zeilir zety yi zeni`znd zexg` yie ,miircn miaeyig zcwtd) ildpin mipezp ceairl xzei ,z`f mr .(zepeayg zldpd ,zexekyn mizrl zraep zniieqn zilir dty zxiga ezhily ,lynl) zpkznd ly iyi`d mrhdn dzi`y ,zkxrnd zelabinne (dty dze`a .aygnd caer :zevetp zeilir zety ly dniyx oldl ,PASCAL, ALGOL, BASIC, FORTRAN, COBOL .C, RPG, PL/1 miieqn beqn aygna "uixdl" lkepy ick yi ,zilir dtya daezkd zipkezd z` eze` ly dpeknd ztyl dligz dze` mbxzl ,zcgein zipkeza jxev yi jk myl .aygn ly mipey mibeqa gxkda ddf dpi`y .miaygn :mebxz zeipkez ly mipey mibeq ipy yi (COMPILER) xcdn .1 (INTERPRETER) yxtn .2 dtya zipkezd z` dligz mbxzn xcdnd xg`l wxe ,dpeknd ztya zipkezl zilird ztya zipkezd z` aygna "mivixn" okn znbxezn ,z`f znerl ,yxtna .dpeknd - dpeknd ztyl zilird dtydn zg` d`xed znbxezn dzr .dze` "mivixn" cine .d`ld oke ,cin "zvxen"e ,d`ad d`xedd `l` ,aygn zipkez mebxz `eti` o`k oi` .d`xed-xg`-d`xed ly dvxde mebxz ?yxtna e` xcdna ynzydl - sicr dn dltehy xg`l ,zipkezd revia onf zipkeza reviad onfn xzei xvw ,xcdna xcdna yeniya oekqigd .yxtna dltehy yi m` ,cgeind izernyn - yxtnd znerl - .zeax minrt zipkez dze` uixdl jxev miiepiye mipewiz revia ,ipy cvn migep ,zipkezd zwica s`e dycg zipkeza .yxtna miynzyn m` ,xzei daxd ietip ialya mi`vnp ep` cer lk ynzydl gep ,(DEBUGGING) ze`ibyd zipkezd xy`k - z`f znerl .yxtna xefgl micner ep`e ,ie`xk "zcaer" on .xcdna ynzydl ievx ,da ynzydle zpkznd leki cinz `ly ,oiivl ie`xd meyn ,xzeia aehd oexzitd z` el xegal `l j` - yxtn e` xcdn e` ezeyxl cenriy .cgia mdipy (1989 - oxe` mrp) :wiqiiad zty ----------- zty iycegd hwqicl ztxevn ,ycegd cvik dilr dazka `xw .wiqiia-eaxeh mrtd epxeriy z` gztp .aygna dpiwzdl eze` mi`zpe ,epcnl xaky xnegd oekcira `cee :mixikfn ep` aey .wiqiia-eaxehl hley dz`ye mincewd mixeriyd z` z`xwy biydl ozip .d`ixwd jynd iptl mda .mincewd mixeriyd lk z` oecrena :epcnly zecewte wiqiia eaxeh --------------------------- wiqiiad xear epcnly zecewt xtqn oldl :wiqiia eaxeha exteye ,libxd :REM --- xeviwd `id REM-l dtqepy ztqep dxev `ad 10 -- :clwd LIST :d`xi aygnde 10 REM ---------------------------- miwlg oia cixtdl d`pe dxvw jxc idef LIST cilwzy mrt lka .jizeipkez ly miwlgd oia efd dcxtdd z` cin d`xz .mipeyd :mipzyn zeny ----------- [_] oniqd z` lelkl ozip wiqiia eaxeha :lynl ,dpzynd myn wlgk NUMBEROFPOINTS=5 :wiqiia ix`h` NUMBER_OF_POINTS=5 :wiqiia eaxeh daxda dxexa dipyd dxevdy xexa .dpey`xdn :INPUT zcewt ----------- qitcdl aygnl mexbl ozip wiqiia eaxeha :jk ,xtqnd zhilw iptl jqnd lr dl`y INPUT "ENTER A NUMBER",N dl`yd zqtcd z` rval yi wiqiia ix`h`a :jk ,cxtpa INPUT-d zcewt z`e ,cxtpa PRINT "ENTER A NUMBER";:INPUT N :IF zcewt -------- xy`k rvaziy wlg dcewtl siqedl ozip :xnelk ,miiwzn epi` i`pzd :jk aezkl xyt` wiqiia ix`h`a 100 IF A=0 THEN END 110 RUN :wiqiia eaxeha 100 IF A=0 THEN END:ELSE RUN ly zixewnd dxeva aezkl oaenk ozip wiqiia eaxeh :db`c l` .wiqiia ix`h` .z`f oiai yeniy ly xzei zeakxen zexev mb yi lr `xw ,xnega witqn hley dz` m` .IF-a .df oeilibay wiqiia eaxeh lr dazka jk dn oi`y jk ,dagxda jkl qgiizp cizra .xdnl :zeibel zelerte mireaw --------------------- lr `exwl ulnen ,mkipiay mi`wihniznl .wiqiia eaxehd ceriza mi`znd wxta jk ,wiqiiad zty xecna xaqei `l df wxt .miligznl iyeniy epi` `edy meyn ....eppiiprle :mcewd oeilibdn libxzd oexzt --------------------------- helwzy zipkez aezkl cvik dzid dl`yd rvenn z` qitcze ,micinlz dying ipeiv .mipeivd mb dxwna `idy ,zeaegxn iep-xa axin :`ad oexzitl dribd ,zihxtd izxag 10 READ A,B,C,D,E 20 DATA 70,80,100,80,90 30 LET Y=A+B+C+D+E:? Y/5 40 END lr xzeel oaenk ozip .oekp oexzit edf z` zepyl ilan 30 dxeya LET dlind did ozip ,dyrnl .dxdvdd ly dzernyn z` aezkle ,Y dpzynd lr oihelgl xzeel :jk 30 dxey 30 PRINT (A+B+C+D+E)/5 .ddf dzid d`vezde xyt`z (DATA-d zxey) 20 dxey ztlgd .mixg` mipeiv xear zipkezd zvxd ritedl dleki DATA-d zxeyy mb xikfp dpey`xd dxeyk elit` ,zipkeza mewn lka .END-d xg`l e` ,zipkezay lr xaecn xy`k aeh `ed rvend oexzitd lr xaecn df dxwna .ohw mihixt xtqn epcgii mdn cg` lkle ,cala mikxr dying .A,B,C,D,E :cxtp dpzyn 500 ly rvennd z` aygl mikixv epiid m` .iyrn did `l df oexzity ixd ,mipeiv xear dlhn dze` z` zrvan d`ad zipkezd :dying `weec e`l ,mikxr ly edylk xtqn 10 STUDENTS=0:TOTAL=0 20 READ MARK:IF MARK<0 THEN 40 30 STUDENTS=STUDENTS+1: TOTAL=TOTAL+MARK:GOTO 20 40 PRINT "MEAN IS: ";TOTAL/STUDENTS 50 END 60 DATA 82,73,60,44,97,-1 :jk zrvazn dlhnd ,df dxwna .STUDENTS dpzynd `ed micinlzd xtqn aygnd .TOTAL dpzynd `ed mipeivd mekq xnelk) iweg ekxr m` wceae ,oeiv `xew oeivl sqeezn `ed ,ok m` .(dlrne 0-n micinlzd xtqn z` okcrne ,TOTAL illkd ,STUDENTS-l cg` cinlz ztqed ici lr `l jxra lwzp `edy cr ,dlilg xfege aygnd gipn f` .ilily :xnelk ,iweg z` aygne ,`exwl mipeiv cer oi`y mipeivd mekq welig ici lr rvennd citwdl aeyg df dpana .micinlzd xtqna ilily xtqn didi oexg`d oezpdy jk lr .(-1 :eply dxwna) :zefexgne miez ------------- lr bivdl leki aygndy oniq lk `ed ez miit`xb mipniqe zextq ,zeize` .jqnd .miez ly dveaw `id zfexgn .miez md :zfexgn dlikn d`ad dxeyd MY ATARI COMPUTER ?oekp ,miez 17 dlikn ef zfexgn znlrzdy ixd ,15 wx z`vne zxtq m` lkk ez `ed geex .milind oiay migeexdn .miezd zeira oexztl dnevr zeaiyg yi zefexgnl zelecbd hltd zeienk llba ,aygna .dnecke mihwqicl ,jqnl aygnd xiarny `edy lceb lka zfexgn likdl jzexyt`a uxde clwd ,z`f mibcdl ick .dpzyn jeza dxeyn miizpia mlrzd .d`ad zipkezd z` .jynda xaqei dciwtz .zpaen `ld 10 :lrtz zipkezdy ick dcilwdl ipeig 10 DIM A{100) 20 A$="MY ATARI COMPUTER" 30 ? A$:? A$:? A$:? A$ 40 END ?dxw dn MY ATARI htynd z` liknd dpzyn `ed A$ `ed [? A$] cilwpy mrt lka .COMPUTER ,dxvrp zipkezdy xg`l mb .ycgn qtcei lr qtcei htynde ,[PRINT A$] clwd .jqnd MY ATARI jxrd z` lawi A$ dpzyndy ick dneca dxdvd rvazdl zaiig ,COMPUTER zfexgnd z` siwdl yi - xnelk ,20 dxeyl .diciv ipyn ze`kxna zyweand lka zfexgn likdl leki dpzyny epxn` leab miiwy i`ceea j` ,`edy lceb epexkf lceby mlera aygn s` oi` .edylk .laben epi` ,oexkif i`z itl` zexyr dnk ix`h`l itl` zexyr xtqn `ed iaxind leabd okle mewnd o`k `ly zeaiqn .dpzyna miez y`xn zrcl ,aygn lk ,aygnd aiig ohxtl lkl ,dpzynd liki oexkif i`z dnk z` y`xn xidvdl miaiig okl .xzeid :10 dxeya mi`ex ep`y dxdvdd 10 DIM A{100) lkl miez 100 liki A$ dpzynd :eyexit itk ,mlek z` `lnl gxkd oi` .xzeid i`z 100 oiixyi aygnd j` ,epi`xy aiig zfexgn dpzyn lk .A$ xear oexkif zxiga ,dfl xarn .[$] oniqa miizqdl mipzyn ly millkd itl zrvazn eny ,ze`a ligzdl aiig :xnelk ,milibx eaxeha .cala zextqe zeize` likdle oniqd z` likdl mb leki `ed wiqiia .[_] ritei zipkez dze`ay okzi :al miy mya zfexgn dpzyne A mya ixtqn dpzyn df jilde ,ixnbl micxtp md mipzynd .A$ mirvaznd miiepiy .oihelgl iweg `ed $-d oniq .xg`d lr erityi `l mdn cg`a mipzyn oia lalai `l aygndy gihan gihan epi` `ed .zfexgn ipzyne miixtqn ...mdipia lalai `l zpkznd mc`dy :zfexgn ipzyna letihd -------------------- dpey `ed ix`h`a zfexgn ipzyna letihd myiil dqpz l` okl .miaygnd aexa xy`n .mixg` miaygn xear df wxt MY ATARI COMPUTER zfexgna miezd xy`k ,zfexgna mzrted xcq itl mixtqenn ipnid R-de ,1 xtqn ez `ed il`nyd M-d lr qitcdl jzlekia .17 xtqn ez `ed .dpnn wlg wx e` ,dlek zfexgnd z` jqnd :clwde lirlc zipkezd z` aey uxd ? A$ ? A{4,8) :okn xg`le qtced A$ z` qitcdl aygnl zixed xy`k d`xedd j` ,MY ATARI COMPUTER htynd lk ezdn lgd ,A$ z` qitcdl dzid dipyd dqtced okl .ipinya dlke ,ely iriaxd qitcdl dvex dz` m` .cala ATARI dlind :clwd ,cala iyingd ezd z` ? A$(5,5) iyingd ezdn lgd A$ z` qitcdl ick :clwd ,jli`e ? A{5) mipey`xd miezd zyng z` qitcdl icke :clwd ,jqnl ? A{1,5) yi miez dnk jnvrl wecal leki cinz dz` :zfexgna PRINT LEN(A} yi miez dnk jqnd lr bivz ef dcewt .(17-eply dxwna) zfexgna :zfexgnd jeza miez zepyl dqpp e`ea xak .BLACK dlina ATARI dlind z` silgp MY ATARI htyna 4-8 miezdy epi`x okl .ATARI dlind z` milikn COMPUTER :cilwp A{4,8)="BLACK" PRINT A$ :d`xpe MY BLACK COMPUTER ?`l ,heyt :zfexgnd z` hrn jix`p dad A{18)=" IS ATARI" ?A$ :d`vezde MY BLACK COMPUTER IS ATARI d`vezd didz ? LEN(A} eiykr cilwz m` .A$ ly ycgd ekxe` `idy ,26 xxal ilan mb oinin zfexgn jix`dl ozip zeyrl leki aygnd .dkxe` edn mrt lka .epxear z`f A{18)=" IS ATARI" iehiad mewna A{LEN(A}+1)=" IS ATARI" aezkl xyt` lr A$ ly ipnid ewlg z` uvwl jzexyt`a :dxdvdd ici A{18)="" ? A$ :d`vezde MY BLACK COMPUTER :il`nyd wlgd z` uvwl xyt`e A$=A{4) ? A$ :d`vezde BLACK COMPUTER xak :sqep xaqd jixvn o`k epi`xy dn wlgd lkl qgiizn A{18) iehiady epxn` ,eznerl .jli`e 18-d ezdn ,A$ ly ipnid ezl wxe j` qgiizn A{18,18) iehiad dwgn A{18)="" dxdvdd okl .A$ ly 18-d wx `le ,zfexgnd ly ipnid wlgd lk z` dnxb A$=A{4) dxdvdd .dly 18-d ezd z` ,envrn wlg ekezl wizri A$-y jkl eze`l deey eiykr didi A$ lk :xnelk iriaxd ezdn ok iptl didy ely wlg A$=A{4,4) miazek epiid el .jli`e ez ickl wnhvi A$ lky jkl minxeb epiid .(B ze`d `ed) cg` l` zfexgnn wlg zwzrd ,efd zexyt`d .oinil l`nyn cinz zrvazn ,dnvr jez :cilwp ,z`f mibcdl ick NEW 10 DIM A{20) 20 A$="MY ATARI COMPUTER":?A$ 30 A{4)=A$:?A$ 40 END RUN :d`xz jqnd lr MY ATARI COMPUTER MY MY MY MY MY MY ?o`k dxw dn .A{4)=A$ d`xeda epaygn lwzp 30 dxeya miezd z` wizrdl zepziiva ligzd `ed wizrd `ed okn xg`l .4-6 zenewnl 1-3 did 4-6 zenewna j` ,7-9 l` 4-6 z` aeye aey xfg jke ,1-3 ly wzrd eiykr lk ielinl cr rhw eze` z` wizrde .zfexgnd df xac aeygl lelr ziid llk jxca `lnl zexyt` jl wiprn `ed j` ,oexqigk mizrl .ievx ez lka oir-sxdk zfexgn zfexgn `lnl jxevd xxerzn c`n zeaexw :zeira oi` .geexd eza dnly DIM B{18):B$=" ":B{18)=" ":B{2)=B$ lk recn d`xze mialyd ixg` aewr .migeex 18 dlikn B$ zfexgnd :zefexgn z`eeyd -------------- oian aygny ,xara minrt xtqn epxn` gilvn `ed ,`eti` ,cvik .cala mixtqn ?zefexgn mr xczqdl cew ici lr bvein ez lk :dietv daeyzd jxr zzl ozip jk .0-255 geeha ixtqn C ,A-n lecb B ,df cew itl .zfexgn lkl xzeia ohwd jxrd .d`ld oke ,B-n lecb miribn mdixg` .miitxbd mipniql `ed zeize` mdixg` ,zextqde oeaygd ipniq zephw zeize` odixg`e ,zilbp`a zelecb zephw zeize` .ok ,ok) .zilbp`a xear zelecbdn xzei zelecb od zilbp`a xear envr lr xcqd xfeg seqal (!aygnd .miketd mirava miezd :d`xz m` rztez `l okl IF "A" < "B" THEN PRINT "WHOOPY" :`ad rhwd z` `evnl lkez zipkezae 1000 ? "CONTINUE (Y/N)";:INPUT A$ 1010 IF A$="N" THEN END 1020 IF A$<>"Y" THEN ? :? "PLEASE USE OR ONLY":GOTO 1000 1030 REM CONTINUE IF YES ,ef zipkez dyer dn jl xexa `l m` ok iptl aezkl gkyz l` j` ,dze` clwd .dni`zn DIM zxdvd siqedle NEW zty drivn xzei mincwzn miyeniyl jeza zfexgn yetig wiqiia eaxeh :dcewtd .zfexgn ? INSTR(X$,A} z` dxifgne ,X$ jeza `vnp A$ m` zwcea .A$ `vnp epnn lgdy X$-a ezd xtqn ,dlrtd zeiexyt` xtqn ef dcewtl zty lr oeica mi`znd wxta zehxetnd .wiqiia eaxeh ribd .mrtdl witqn dfy ayeg ip` .aeh ze`xzdl .zel`y dnk el`yz mz` mby onfd .d`ad mrta +-------------------------+ ³ ³ ³ .mewna jexcz l` ³ ³ !wiqiia eaxehl xear ³ ³ ³ +-------------------------+ :wxa mr miwgyn ------------- wxa fkxn eze`y ,ycg xecn migzet ep` miwgyna wqer xecnd .ray x`an ec`ipl dxiwq ritez df xecna wxt lka .ix`h`l mr cgi ,ix`h`d aygnl xg` wgyn lr .iweg ote`a ebiydl ozip cvik ze`xed mikixv mdilr aezkl mivexd miwgyn ilra :zaezkd itl ,wxa l` mixn`nd z` zeptdl ec`ipl wxa 10/13 epia` mdxa` 84543 ray x`a wxay mivex mz`y miwgyn mkicia yi m`a z` eil` gelyl mkilr ,mdilr aezki ozip okid hexitd mr cgi ,miwgynd .mykexl .dxciqa dpey`xd dazkl xyid xearpe ZYBEX ----- ZYBEX :xvend ZEPPELIN GAMES :dxagd 1988 :xeviid zpy (gelyn llek `l) h"yil 2.95 :xignd :rwxd ----- xqpix mya micxen ipy mihilgn ,cg` mei gexal ,hrnk zeca`zd zniyna dp`lqwe .miieay md ea akekdn xyt`d lkk xdn jezl xecgl mdilr ,ok zeyrl zpn-lr miyiab seq`le aie`d ly mixvand xg`l .`ad alyl mze` mixiarnd micgein mialyl dyib milawn md eniiq mdy wx .envr qwaifl - seqale ,milabend lrn zeend-zerah z` xiqdl elkei md ,f` .mx`eev :dnigld ------- zervn`a zrvazn ryxd-zegeka dnigld zkxrnl rbepd lka .libx wihqie'b ,zpprxne dphw drztd mkl dkgn ,zeixid wgyna .dilr zrk mkl xtq` `l ip` la` ipy ly iphleniq wgynl zexyt` dpyi df rebtl mileki `l md - db`c l`)mipwgy rav z` zepyl mb ozipe ,(...ipya cg` .mipwgyd miphw mixac ----------- znxebe ddeab dnxl dlrzn ynn dwitxbd ,jly ix`h`d aygn ly zlekidn lrtzdl jl iaygn lr ely zepekzd aexa dlery !m`.ia.ii` iaygn lr elit`e xecenewd mililv mewna ;dlern heyt `ed lilvd .mipeebne mixiyr mililv mirnyen miipr iabl ;dgiztd-zwiqen iabl oekp df lk) xzei `l md mililvd ,envr wgynd dgnen yi oiltf zxagl .(mirvennn heyt `ede ,cpltew o`i` mya ,dwiqenl z` dyery xacd la` .zten-zxivi xvi ,jl ozep `l heyty "hpbn"d `ed wgynd ...zg` mrt cer zeqpl ilan mewl ,owgyd :xignd ------ dxenzl qgia d`ivn-xign heyt `ed xignd -inc llek g"y 15 zeaiaqa - lawn dz`y uilnn ip` ,epinfdl jpevxa m` .gelyn MILES mya dilbp`a weeiy-zxag lr :`id mzaezk .BETTER SOFTWARE MILES BETTER SOFTWARE 221 CANNOCK ROAD CHADSMOOR, CANNOCK STAFFS WS11 2DD ENGLAND ly ieeya mipnefn e` d`gnd gelyl jilr aezkle lirl zpiievnd zaezkl h"yil 4 gkyz l` .ZYBEX wgyna oiipern dz`y mdl ...jzaezk z` sxvl zrxbn ZYBEX-l yi ,zepexzid lk mr cgi eze` biydl ozip `ly `ide ,zipivx zg` jxcd .cala dhqw lr `l` ,hwqic lr opekl ZYBEX z` xiardl elkez da dcigid z`f mr cgi j` ,dxwi dpkez yekxl `id 20 dler `id .TRANSDISK IV mya dliri :n dbiydl ozipe ,h"yil DIGICOMM 170 BRADWELL COMMON BOULEVARD MILTON KEYNES BUCKS MK13 8BG ENGLAND mlera wgyn lk dyrnl xiarz z`f dpkez .opekl tiihn il xzep `ly zei`ck zeyikx dl` - k"dq od ixdy ,mly ala mdilr uilndl `l` zepkez aezkl dpkez-iza zeccern .ix`h`l miwgyne ec`ipl wxa :zkxrnl miazkn ------------- .xnegd zeki`ne rcind znvern epndcp dglvdl epizekxa z` elaw .mkzi` epgp` ozip m`a zrcl eppevxa ok enk .beybiye ly zixewne dheyt zitxb dpkez mqxtl .7 oa cli wipeweq zgtyn aia` lz gnyp :mkzl`yl xy`a .dcez lk mcew < zwzren dpi` `idy i`pza ,dpkez lk lawl m`a dpkezd z` mqxtp ep` .xg` xewn lkn ep` ,miniieqn mixwnae ,zpiiprn `id zeira da mi`ven ep` m` dze` mipwzn .dxigaa lewiy epi` zpkznd lib .zeipkh .8 liba zeipetniq azk hx`ven ------------------------------------- mzxaqd oecrend ly ilei oeiliba m` gny` .DOS 2.5-a yeniyd z` hexhexta .DOS 3 xear z`f eyrz oxe` mrp miizrab s` ici lr yeniyl ulnen epi` 3 qec < miynzyn mpi` ix`h` .mlera xken mxeb mlerd iagxa mipecrene mipezir .cer ea df hnxeta mihwqic lawl mipken mpi` jkl yi .(oaenk ,eply oecrend `ivedl) oeilba xaqedy itk ,xzeia zeaeh zeaiq 2.5 qec ly zeihxcphqd ,jkl xarn .ilei ippi` .ea xzeia zagxp dkinzl znxeb mivaw dlivnd zexiy zpkez s` xikn oi` 2.5 qeca .3 qec lr zerha ewgnpy mkn edyin m`) efk zipkez biydl dira .(epil` xywzdl `p ,jixv iepiyl ,hqebe` yceg zpkez mb `le ,3 qec lr lrtz `l qeca mixhnxtd .df qec lr z`f zrvand dpkez izi`x :ziyrn `l` ,zipkh dpi` jkl daiqd .xzeia ohw `ed efk dpkezl ietvd weyd z`yl lkepy ickn ohw `ed ix`h`d wey lr riavdl did ozip eli` .sqep levit dyw j` ,`gip ,3 qec ly edylk oexzi ix`pia uaew zpirhl hxt ,z`f `evnl dnk ,ab`y ,[XIO 41] dcewtd zervn`a ?da eynzyd mkn efk dyixc didz ok` m` :mekiql ep` j` ,dl dprip ,miax miynzynn okl .2.5 qecl xearl zeqpl c`n mivilnn 3 qecn mivaw dxiarnd zipkez mb epwtiq .ilei oeiliba 2.5 qecl ------------------------------------- z` biydl ozip m`d zrcl ipevxa ?ux`a PAGE 6-e ATARI USER mipifbnd .mze` `aiil ewiqtd 'b`a' zepga ec`ipl wxa ray x`a ,xzei riten epi` ATARI USER oezird < oezird ici lr dpwp `ed .diphixaa mb NEW ATARI myd zgz dzr ritend ,PAGE 6 ozip epi` `ed il recid lkk .USER zaezkd .x`eca eykxl ozip .ux`a dbydl oezir ly ipei oeilba erited mixignde ly ybtn cizra didie dcina .oecrend zepeilb ze`xl didi ozip ,oecrend ixag .zeriawa lawn ip` mze`y ,ely ------------------------------------- aeh .mkneiw lr renyl izgnye izrzted lk .l`xyia ig oiicr ix`h` aygny zrcl mirwyend mivn`nde zeiztki`d lr ceakd migqepn mipezird .zitqk dxenz `ll zepkez milleke aeyg rcin miwtqn ,ahid .jk ekiynd .zeiyeniy mr `exwl zexyt` zniiwy `exwl izrzted zxag ly WARP SPEED-d zxfra opekd IBM aygnn zepkez ,HAPPY COMPUTERS uilnn ip` .aygna ovixdle ,ein`eze .ycegd rvanl WARP SPEED z` qipkdl aygnn zepkez xiardl ozip m`d :dl`y ?ST ix`h` aygnl XL ix`h` qniig opgei ray x`a WARP-d .dkinzde ze`ngnd lr og-og < IBM ly zepkez uixdl leki epi` SPEED ly mivaw `exwl lbeqn `ed .ein`eze xvepd hqwh uaew jl yi m` :xnelk ,IBM uaew e` IBM ly mililnz carn ici lr ,IBM-a ipexhwl` oeilib zxfra azkpy zervn`a mcarle ,ezxfra mxiardl lkez ly ipexhwl` oeilibe mililnz carn zervn`a mb z`f zeyrl ozip .ix`h` zyx jxc miaygnd ipy oia mincen i`pza ,mincend oia zexiyi e` ,zxeywz wynn jxc rvazn ix`h`l mcend xeaigy .RS232 ,ST lr XL ly zepkez zvxdl rbepa .XL-l mixehlen` ipy zegtl ST-l miniiw .xg` aygn dncnd dpkez `ed xehlen` `ed ,ST-a xehlen`d zpkez zvxd xg`l .XL ienc aygnl jted ,znlyen dpi` zen`ezdy oiivl yi zgz libxdn h`l zevx zeipkezde `id divlen`a ztqep dira .xehlen`d mihwqicd ly dpeyd lcebde dpeyd hnxetd XL-n dpkez xiardl ick .miaygnd ipy ly mincena ynzydl yi ,ST-l mi`znd hwqicl .lirl x`ezy itk ,miccvd ipyn :ipkh ueri --------- ,dlert llkn `vi aygna geexd ywn ASC("9") THEN 1020 1040 IF LEN(A}=0 AND K>ASC("2") THEN 1020 1050 IF A$="2" AND K>ASC("3") THEN 1020 1060 IF LEN(A}=2 AND K>ASC("5") THEN 1020 1070 ? CHR{K);:A{LEN(A}+1)=CHR{K) :IF LEN(A}=2 THEN ? ":"; 1080 IF LEN(A}<4 THEN 1020 1090 HOURS=VAL(A{1,2)): MINUTES=VAL(A{3)):CLOSE #1: RETURN `ed m` .ezd z` zhlew 1020 dxey ligzdl dvex ynzyndy dgipn `id , cg` uglp m`a zwcea 1030 dxey .ycgn zipkezd zxfeg ,`l m` .mixtqnd iywnn z` zwcea `id ,ok m` .xg` ez `exwl zeidl zaiig zil`nyd dxtqd :ezeiweg dxtqd zaiig ,2 `idy dxwna .3-n dphw ixyt`d hlwdy jk) 4-n dphw zeidl d`ad zexyr zxtiq .(cala 00-23 `ed zeryl lk m` wx .6-n dphw zeidl zaiig zewcd zqtcen ,dglvda exar dl`d zewicad ly epkezl ztqeezne ,jqnd lr dxtiqd zeryl A$ ly eiwlg micxten seqal .A$ .mini`zn mipzyna miavene ,zewce zxbiy z` jetdl `l recn ,ab` jxc xacd wiqiia eaxeha ?zihnehe`l oeryd miiyi`d eihxt z` qipkn caerd f`e ,lw dnvra fixkz zipkezd .dryd `ll ,cala .dryd lr ix`h` gel --------- zaezkd .llkd zeyxl mpig cner geld ,ix`h` iynzyn oecren :zercenl zxney zkxrnd .aia`-lz ,22589 .c.z .zercen leqtl/zepyl zekfd z` dnvrl okezl zi`xg` zkxrnd oi` ,z`f mr .zercend ------------------------------------- zehlw iab lr miwgyn zepwl oiipern .800XL aygnl .izi`/ihen ,06-515763 oetlh ------------------------------------- iab lr 800XL-l miwgyn silgdl oiipern .oefx irex ,057-558767 oetlh .zehlw ------------------------------------- zeipkeze miwgyn 100-k silgdl oiipern .800XL aygnl mihwqic iab lr .wipeweq ixebixb ,03-5230756 oetlh ------------------------------------- xanaep yceg jldna :oecrend ixag lkl ize` biydl didi ozip `le ,l"ega did` lthl didi ozip xanvca 1-n lgd .oetlha oetlhd xtqna oecrend ipiipra aey gelyl jiyndl ozip .08-417685 :libxd .libxk x`ec .uiaepiax laei ------------------------------------- miyexc ix`h` iynzyn oecren zkxrnl cearl mipkend ,zepkeze mixn`n iazek .drwyde un`na oked df oezr .zeacpzda :epzaezk .giexp epleke dz` mb sxhvd .`"z ,22589 .c.z ,ix`h` iynzyn oecren :miphw mixac ----------- xecn .xyt` i` ixd zephwd zeize`d ila `ed .miycgd oecrend ixagl crein df cvik ,oecrenl minyxp cvik xiaqn xag lkl ulnen .dnecke xneg migley .zg` mrt ea `exwl .migeex `yep epi` ix`h` iynzyn oecren ztk`y miyp` ici lr zeacpzda lrten `ed ,dazk gelyl leki oecren xag lk .mdl glypd xnegd znxe dcina .zipkz e` azkn `ed ,oevx iriayn eay oiiprd zcin e` xg`l mi`ad mihwqicdn cg`a mqxtzi .zkxrnl ezlaw :oecrend zaezk ix`h` iynzyn oecren 22589 .c.z aia` lz hwqic gelyl jilr oecrenl myxidl ick zhlw e` ,zexeb` 80 ly jxra lea mr wix .g"y 1.00 ly jxra lea mr dwix xzei mdl gepy exn` oecrena miax mixag epl oi` .mihwqic xy`n sqk gelyl :`ed sixrzd .zecbpzd .miyceg drax`l g"y 10 - hwqicd zqxib .miyceg dyelyl g"y 10 - zhlwd zqxib jke ,xzei milecb minekq gelyl ozip mekqd .mekql m`zda iepind z` jix`dl ,zg` dpyl iepin incl laben iaxind g"y 40-e hwqicd zqxbl g"y 30 :xnelk .zhlwd zqxbl micrein dl`d minekqd :mkal zneyzl .geex zpeek `ll ,cala ze`vedd ieqikl miwix mihwqic gelyl oiicr ozip ok enk ,df dxwna .sqk mewna zewix zehlw e` .lea sxvl egkyz l` jxc elnr ixt dpkez mqxtnd oecren xag zitqk dxenz ywal i`yx iycegd hwqicd cenva dywad z` mqxti oecrend .dxear z` aiigl ezlkia oi` mle` ,dpkezl .dxear mlyl miynzynd izla zewzrda jnez epi` oecrend un`n dyri oecrend .dpkez ly zeiweg zenqxtznd zepkezd lky gihadl ick xiaq .odixvei zeyxa dpiidz ea `ll llkd zeyxl cner geld :gel zercen iynzyn oecren :zercenl zaezkd .melyz .aia`-lz ,22589 .c.z ,ix`h` e` zepyl zekfd z` dnvrl zxney zkxrnd zkxrnd oi` ,z`f mr .zercen leqtl .zercend okezl zi`xg` lkl zxaren gela znqxtznd drcen lk zexeywd l`xyia miaygnd zxeywz zezyx lra rian m` `l` ,ECHO MAIL i"r odipia .jkl ezecbpzd z` drcend :cizre xar --------- mi`yepd zniyx z` dqkp df xecna mippkeznd dl` z`e ,dk cr epnqxty mihwqic jl mixqg m`a .`ad oeilibl :xekf .oecrena mpinfdl lkez ,mincew miax mi`yep zhxtn dpi` oldly dniyxd miazkn ,ipkhd uerid ixecna eqeky .cere zkxrnl 1989 i`n .1 ----------- lr zipkh dazk - 'mincen lr zvw' - zniyx ,mihxcphq ,mixign .mincen .l`xyia zeihxt zxeywz zezyx zerced zqtcdl zipkez - ERRCODE - .d`iby ixtqn mewna zehxetn d`iby 1989 ipei .2 ------------ mipegxid - 'mlerd iagxa mipezr' - yi dn .zilbp`a ix`h`l meik miniiwd .mixign ,l"egn mpinfdl cvik ,mda ly zihnehe` dwignl zipkez - DELETE - .wiqiia zexey 1989 ilei .3 ------------ dfi` - 'mihwqic zlrtd zekxrn' - mlyd jixcnd .miniiw mihxcphq .DOS 2.5-l .wgyn - FROGGIE - 1989 hqebe` .4 -------------- .ix`h` ly ycgd opekd :XF551 opek - .mixigne mirevia .ipkh xn`n - ceciw zehiye miptv - mixhnxt iepiyl zipkez - CUSTOM - .DOS 2.5-a dhlwdd zeki` zwical zipkez - VERIFY - .zhlw lr .jqnd lr dreaw oery zbevz - CLOCK - lkl qiqa lkn xtqn zkitd - BASES - .qiqa dnbcd zeipkez - GRAPH1,GRAPH2 - .zeit`xb (igkepd oeilibd) 1989 eizq .5 ----------------------------- daehd zepkizd zty - wiqiia-eaxeh - .cgein oeilib ;ix`h`l xzeia .ipkh xn`n - zepkiz zety - (`ad oeilibd) 1990 sxeg ----------------------- :'EASY DOS' - 'lw qec' - .wiqiiad jezn qecd zeivwpetl dyib