IUAut[ napl[ {U AìAU_YD:13)"ROBI SOFT.":I150:I,I:I"D: 900-D10000:D A$(10)FD A(1UY0)LDD (5)" Ha nincs t|bb adat,akkor 0-t rjon! ";(21)D E0:G0:I0D"Kezd{ kilom`ter :";AD"Utols[ kilom`ter :";BE#:(5)" Ha nincs t|bb adat akkor 0-t rjon! ";(21)'E&"Benzin }ra (l/Ft) :";XYEE("Benzinv}s}rl}s(Ft) :";UYFPE.FFXY_E2 F0 85iE<GGFtEFHF20EPIIH:40EU:(5)" Ha nincs t|bb adat akkor 0-t rjon! ";(21)EZ"Egy`b kiad}sok(Ft) :";DEd D0 120EnEED:90ExC0FJ0F5000F: "$UYBenzink|lts`g :";18);I;" Ft":A(1)I: A$(1)"Benzink|lts`g (Ft) :"F "Egy`b k|lts`gek :";18);ECJ;" Ft":A(2)ECJ:A$(2)"Egy`b k|lts`gek(Ft) :"BG "\sszes kiad}sok :";18);IECJ;" Ft":A(3)IECJ:A$(3)"\sszes kiad}sok(Ft) :"UYG "\sszes benzin- felhaszn}l}s :";18);G;" liter":A(4)G:A$(4)"\sszes benzin- felhaszn}l}s (liter) :"H "\sszes megtett kilom`ter :";18);BA;" km"UY:A(5)BA:A$(5)"\sszes megtett kilom`ter (km) :"IX100G(BA):S((X1000.5))100: "Benzinfogyaszt}s :";18);S;" l/100km":A(6)S:A$(6)"Benzinfogyaszt}s (l/100km) :"IX(IECJ)(BA):S((X1000.5))100: !UY "K|lts`gek :";18);S;" Ft/km":A(7)S:A$(7)"K|lts`gek (Ft/km) :" JX(IECJ)11:S((X1000.5))100: " :";18);S;" Ft/h[":A(8)S:A$(8)"K|lts`gek (Ft/h[) :"JX(BA)11:S((X1000.5))100: "Fut}s U Y :";18);S;" km/h[":A(9)S:A$(9)"Fut}s(km/h[) :"J$14,0,"*** @RINTSEN MEG EGY BILLENTY^T! ***"JA$: A$"" 246 J10090J"]LLITSD a MAGNOT FELV@TELRE!!!!"5K"]lltsd a";(2);" MAGN[T";(1);" FELV@TELRE!!!!"CK 100,500KUYXK I1 500: :K "Megindul az adatfelv`tel!": 100,100K"Indithatsz": 100,10K""Adat"K,# A(1),A(2),A(3),A(4),A(5),A(6),A(7),A(8),A(9)L6# A$(1),A$(2),A$(3),A$(4),A$(5),A$(6),A$(7),A$(8),A$(9)"L@(LD4LN"Adat"hLX# A(1),A(2UY),A(3),A(4),A(5),A(6),A(7),A(8),A(9)Lb# A$(1),A$(2),A$(3),A$(4),A$(5),A$(6),A$(7),A$(8),A$(9)LlL"Adat"L# A$(1),A$(2),A$(3),A$(4),A$(5),A$(6),A$(7),A$(8),A$(9)L1MI0200::I015:$15,0,""::I0:200910:950qM:100,100:(UY 2)" NINCS ADAT BEIRVA!";(18):I0300::I0MI050:1,I:IMI0M5000M100,100::(2)"H I B A":I150:I,I:I:(18)::I0:5000MN$0,10," Ezekb{l v}laszthat:"%N$2,1,"1:Adatber}s *"JN$3,1,"2:Ki`rt`kel`s ^UY *"oN$4,1,"3:Adat ment`s *"N$5,1,"4:Adat bev`tel *"N$6,1,"5:Adat t|rl`s *"N$7,1,"6:Exit *"-O$9,0,"@rintse meg a kiv}nt funkci[hoz tartoz[ sz}mos-billentyt!"BOM$:M$""5090NUY OM(M$)YOM(M)sOI015:$15,0,""::OM1M65000O M11000,12000,13000,14000,15000,16000O(#(50)221ʲPO)#9000P'$0,13,"ROBI SOFT. 1985-1986 V.11.":I050:I,I: P'P'I0-P$'$ 0,10,"AUT[ - NAPL["3P.'hP8'$2,0,"Ez a UY program aut[soknak k`sz~lt!A bek`r-"PB'$3,0,"dezett adatokat a g`p |sszegzi,`s ki`r-"PL'$4,0,"t`keli."PV'$6,5,(4)"@RINTSEN MEG EGY BILLENTY^T!";(20)P`'""10090:10080Qj'I015:$15,0,""::I0:5000^Q*$14,19,(2)"Ok";(18):200,100:IUY 015:$15,0,""::I0::4Q.$14,19,(2)"Ok"(18):200,100:I015:$15,0,""::I0::140Q2I015:$15,0,"":Q2$14,19,(2)"Ok";(18):200,100:I015:$15,0,""::I0Q2/R2$3,0,"* ]lltsa a MAGNETOFONT ~res szalagra! *"R2:"* F`l perc m-UY_lva megindul az adatment`s!*":"***************************************** A hangjelz`sre indtson!":I020000::I0:200,200 R2"Adatok",S3# A(1),A(2),A(3),A(4),A(5),A(6),A(7),A(8),A(9)iS3# A$(1),A$(2),A$(3UY),A$(4),A$(5),A$(6),A$(7),A$(8),A$(9)oS3S"3I015:$15,0,""::I0:5000S6I015:$15,0,""::I0:$14,19,(2)"Ok";(18):200,100:I015:$15,0,""::T6$4,0,"K`szen vagyok az adatok beolvas}s}ra! *** Indtsa el a magnetofont! ***"@T6tTλUY6# A(1),A(2),A(3),A(4),A(5),A(6),A(7),A(8),A(9)T6# A$(1),A$(2),A$(3),A$(4),A$(5),A$(6),A$(7),A$(8),A$(9)T6T610090T: 1000T: 900T:$14,19,(2)"Ok"(18):$0,0,"" U; 200,100U ;0U;I015:$15,0,""::5000zU>I015:$15,0,U Y"":$14,19,(2)"Ok";(18):200,100:I015:$15,0,"":U>$5,0,"":" * Programoz}s

Bet|lt`s * ***** Melyiket v}lasztja? *****"U> (50)221E(0)6V> (26)221ʄ:$5,0,(2)"Indtsa el a magn[t!";(18):(1);:AV>16020U!B'"@!] "B