M.D.P. LIST
Retro bilgisayarM.D.P. LIST e $0033 Tuncay GÖKSU
Bu programla hafızadaki makina dili programların listesini döküm ekinde olduğu gibi ekranda görebilir ya da yazıcıya yollayabilirsiniz. Programın bir dezavantajı biraz yavaş oluşu.
PROGRAM ADI
HDP LİST
PRİNT BİT. ADRESLERİCOND
ALIK) R$(CF1O
00):DİM <15â4â>
00020 "<CLR><3DOWN>LUTFEN BEKLE
YIMİZ":FOR TO C:PRİNT
ETsPEEK(H):KeT <249>
00030 200: 2):
41:NEXT
<224>
TO GÖSUB ,200:PR
INT
00050 1:
FOR Dz1 TO V:PRİNT Uç
<247>
00060 PRİNT :FOR
TO 100:NEXT . <078>
00070 PRİNT #<2DOWN>PRG LİSTESİ YAZICIYA
YOLLANSIN MI? ";K$ <098>
00080 GET K$:1F THEN 80 <239>
00082 1F 100 <085>
00084 TE THEN: 80 <255)>
00090 END <092>
OPEN 1,4â:X50:FOR Dz1 TO
Gel TO B <166>
00110
:CLOSE 1:6G0TO 70 -<058>
00200 R-4096 <08B>
00210 THEN GOSUB 29
0;GOT0 225
00220 GOSUÜBR 260 <012>
00225 K-K-YAR:R-INTIR/16) <039>
00230 İF R<1 THEN 250 | <15B)>
00240 GOTO 210 <192>
RETURN <052>
00260 IF Y<-9 THEN RSCD)-
<1B3>
00270 THEN <178>
00280 RETURN <0B4>
00290 IF THEN
“00300 1F Y>9 THEN <012>
< 114>
00310 RETURN