Pretože som sem tak isto pridal ďalšie tabuľky tak by sa to tu skôr malo volať Igiho pomocné tabuľky, ale už ten pôvodný názov meniť nebudem.

Prvá vec - je to moja blbinka, ktorá mi hodne pomáha, stále treba prerátavať adresy v 64kbyte adresnom priestore počítača SBC 6502 (a samozrejme nielen u neho) - prvý stĺpik má rozsah 1÷64, druhý dekadicky počítača v rozsahu 0÷63d, nasleduje prepočet do hexa tvaru 0÷3Fh. Následne je tam  adresný rozsah daného kilobytu dekadicky a nakoniec nasleduje aj jeho verzia v hexa tvare. Dosť mi to pomáha, hlavne ak potrebujem dekódovať adresu, pretože sa pri prepočtoch človek ľahko stratí. Takže - ak toto využijete, fajn, poteší to, nemusíte si prácne prepočítavať. Prvý stĺpik je určený pre tých, ktorí majú problém pri prepočítavaní nultého kbyte.

Program ktorý vygeneruje popísanú tabuľku:

1000 CLEAR:DIM D$(16):D$="0123456789ABCDEF"
1001 ? CHR$(12):POKE 15,80
1005 ?"Range Range     Range     Adress      Adress"
1006 ?" k:     dec:        hex:       dec:          hex:"
1007 ?
1010 Q=1
1020 FOR G=0 TO 63
1022 IF G=0 THEN S=0:GOTO 1030
1025 S=G*1024: IF S=-1 THEN S=1
1030 ?Q"   "G"     ";:DEC=G:GOSUB 8000
1035 ? " "S;"-";:? (G*1024+1023);" ";
1040 DEC=S:GOSUB 8000:?"-";:DEC=G*1024+1023:GOSUB 8000:?" "
1065 Q=Q+1
1070 NEXT G
1100 END
8000 NUM=DEC:GOSUB 8500:?N$;:RETURN
8500 REM Conversion Dec to Hex
8510 DIV=4096
8520 FOR I=1 TO 4
8530 N=INT(NUM/DIV)
8535 IF I=1 THEN I$=MID$(D$,N+1,1)
8536 IF I=2 THEN G$=MID$(D$,N+1,1)
8537 IF I=3 THEN O$=MID$(D$,N+1,1)
8538 IF I=4 THEN R$=MID$(D$,N+1,1)
8540 NUM=NUM-DIV*N:DIV=DIV/16
8550 NEXT I
8555 N$=I$+G$+O$+R$
8560 RETURN

____________________________________________________________

Prevodná tabuľka Hex2dec a Dec2hex v jednom:

Síce základný rozsah pre 8bitov t.j.  0÷255d a 00÷FFh sa dá jednoducho poskladať aj v hlave, ale toto je na použitie predsa len o niečo rýchlejšie:

Hex2dec or Dec2hex table

____________________________________________________

Nasleduje tabuľka CHR$ znakov ktoré používa Hyperterminal /v spojení s SBC6502/:

Špecifický význam má znak č.12, ten ako PRINT CHR$(12) vyvolá zmazanie obrazovky terminálu /náhrada za neexistujúci príkaz CLS/, znak ? CHR$(28) spôsobí odskok smerom doprava /tabelátor ?/, ? CHR$(7) vyvolá "cinknutie" zvukovej karty, ? CHR$(8) zase návrat o jeden znak smerom doľava. Táto tabuľka zase urýchľuje vyhľadanie potrebných znakov ktoré chceme pri výpise na Hyperterminál použiť.

__________________________________________________________

Návrat do všetkých pokračovaní o SBC6502:

http://blog.3b2.sk/igi/post/SBC6502-0-UvodIntroduction.aspx

____________________________________________________

Vaše hodnotenie, Rate post: