Bu sayfadaki yazılar
Sayfanın metni
Sayfa 22
663 Kolon Directory” programını yükleyip uygulayarak nasıl bir şey
elde edeceğinizi mi merak ediyorsunuz? İşte bu formatta bir
manager database compiler superbase 16 ;16 A7 superbase Ed.manager Pp -.3 petspeed p 3 start.p 5 2 loader Pp 58 passi P 4 henter 5 30 program Pp 930 Pp 3 hselect 3 24 Pp 80 pass3 Pp 6 hfind s 7 Pp 18 passda pP ar houtput 5 18 Pp i passdb Pp 3 healc s i Pp 3 Üz Pp 5 hreport s5 14 6d.sort.g p 4 ib l1ib Pp 3 hexecute Ss 568 EB6&d.arithedit Pp 3 logzü Pp 5 hhelp s5 23 p backup Pp 9 hfile 3 Fe Pp 36 arrürs P 7 hformat 5 43 6d,manipulate Pp 8 report Pp 4 hbatch s Gd.report Pp 5 hsört 4 6d4.sürt 5 hprog 5 4 sc.halp screehz ? hmairntain 5 i fz.help scraenz ss 3 5 2 da.checkbook 5 5 1 dp.checkboaok s e dıe ar .Chackbook 5 3 himport 5 e sC.ChecKkbaok Ss 3 hexpoart 5 i p 11 5 1 fs.checkbook 5 i Cüst.inu 5 i Pp Z 4 da.xmaz 1ist 5 1 TRAINING z sc.xmas list e sb 1 ts.xmas p 10 P 1 fs.xmas list 10 Pp 1 Hrn.xmas list p 40 utility P e da.task manager 1 s 3 i4 dealete.p & i ts.task manazer Pp 13 İ zi labels.p 5 1 manazer Pp 2 da.portfölio Ss i 3 1 aAr.poartfoalio 5 2 sCc.poürtfolio 5 1 ts.portfoliü Pp i fs.poörtfoalio 5 1 Hra.portfolio Pp 1 Pf.checkbaok 5 2 5 2 list Ss 1 rf.portfoliü s 1 da.data base dem s 1 tz.data base dem Pp 1 bBrn.data baze dem i fs.data base dam s e base dem xs Blocks blocKks Blocks
PROGRAM ADI 3KOLON DİRECTORY 00040 GET THEN 48 8080641 INPUT "BASLIK <133> DEF OR AND K<1 3)4*"<C2SPACE>" <213> 60) 606045 <148> 00615 DIM 06050 OPEN 1,8,15:0PEN 2,8,2,"#":PRINTHİ, "UL 2 <157)> (18) 68060 28 144":FOR 15144 TO 16 000620 TO 4:RE 1:GET THEN <208> AD 0800786 IF THEN A$z"?” A” <190> Zasl1)-" <112> R , 86108 FOR 1-162 TO 163:GET A$z"" 800386 FOR TO 18:TUZ(5Y)-0: NEXT THEN <179)> 000631 PRİNT 0806165 IF FNRCASCLAS)) THEN A$z"?" <085> DISKET LUTFEN !" <194>
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 23
26) 00120 FOR 154 TO 1486 STEP 4:PRİNTH1,"B-P IF 1-72 THEN NEXT 001306 GET #2e,A$S:IF A$z"" THEN 08148 00156 TR>18:SE-İ 08168 IF THEN 325 88161 TUZ<SE)-İ 60162 PRINT#1,"Ul 2 #2,TR$:6 ET #2,SE$ 001786
00188 60198
FOR TO GET THEN 318 FLEFL*1 AND AND AND FOR 1153 TO 1İ8:PRINTH1İ,"B-P 3a*1lI GET #2,A$:IF A$z"" THEN A$zC$ IF THEN #2,L$:6 ET #a,H$ BLZ(ZG ,FL)SASCLHSA*CS) ) PRINT >"
08195 062068 80216
60230
00250 00255
00260 00265 086270 60288 686290
00388
60305
003186 NEXT 003206 IF THEN 168 868325 PRINT "BLOCKS FREE
1:CLOSE 2
<123> 00338 THEN 38 <876> 860348 OPEN 4 <aa7> (a2) : <229> 88345 FOR TO 2:PRİNT#L,DNSCI)"<4ASPACE <235> >"33NEXT 886358 PRINTH1 <a75> <179> 8686355 FOR TO :PR <187)> INT#1 <249> 88368 FOR 158 TO 143:FOR TO 28:1F <048> THEN 388 <ı124> <048> 88370 )4*"<3SPACE)”,3):NMSCT,1); "<aSPACE>" ; <849> 006375 GOT0 384 <065> 86386 IF THEN IF THEN IF THEN T-3:6G0T0 384 <1İ74> 68381 IF Tsi THEN IF THEN :GOTO 384 <868> 860382 IF Ts2 THEN 384 <227> 08383 <151) <B75)> 88384 NEXT 860385 IF NM$C8,1)-"" AND AND <19a> THEN 398 <225) <159> 08386 NEXT <076> 88398 FOR 1-8 TO 2 <065> 60391 FREE-"LEFT$(MID$CST <168> CE)"; <246> 88332 NEXT :PRİNTHİ:PRİNTHİ:CLÖSE 1 <158> 860395 PRİNT DURDURMAK ICIN «'E BASINIZ.... 886336 PRİNT TEKRAR İCİN HER <123> HANGI BIR TUS.. 90400 GET B$:1F B$-"* THEN 408 <147)> 66418 IF B$<)"e" THEN RUN <166> 88420 OPEN 4,4,6:PRIİNTH4,CHR$0C32):CLÜSE 4 <156)>
© PERİYODİK