OldComp.cz

Komunitní diskuzní fórum pro fanoušky historických počítačů

HVDOSdev2019!

Právě je 25 srp 2019, 17:53

Všechny časy jsou v UTC + 1 hodina [ Letní čas ]




Odeslat nové téma Odpovědět na téma  [ Příspěvků: 4 ] 
Autor Zpráva
 Předmět příspěvku: Znaková sada v BASICu
PříspěvekNapsal: 20 srp 2018, 23:43 
Offline
Prvnička

Registrován: 12 čer 2018, 11:44
Příspěvky: 19
Has thanked: 13 times
Been thanked: 4 times
Viete mi niekto poradiť ako zmeniť znakovú sadu v BASICU 800,event v X- BASICU v režime MZ800 ?
Vďaka :sharp:


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Znaková sada v BASICu
PříspěvekNapsal: 25 srp 2018, 18:46 
Offline
Kecálek
Uživatelský avatar

Registrován: 06 srp 2013, 10:49
Příspěvky: 220
Bydliště: Praha
Has thanked: 182 times
Been thanked: 58 times
V basicu MZ-1Z016 na druhou znakovou sadu přepneš:
Kód:
POKE $5D4,1

zpět na původní:
Kód:
POKE $5D4,0


Příkaz SYMBOL s druhou znakovou sadou:
Kód:
POKE $4DCF,1

zpět na původní:
Kód:
POKE $4DCF,0


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Znaková sada v BASICu
PříspěvekNapsal: 27 srp 2018, 11:34 
Offline
Kecálek
Uživatelský avatar

Registrován: 06 srp 2013, 10:49
Příspěvky: 220
Bydliště: Praha
Has thanked: 182 times
Been thanked: 58 times
Jinak poukování na adrese 0x5D4 se dá analogicky použít i pro přepnutí na vlastní font. Tady jsou označené instrukce, které počítají adresu grafických dat daného znaku z jeho display-kódu:
Příloha:
vypis.png
vypis.png [ 6.28 KiB | Zobrazeno 1206 krát ]

tj. počítá se HL = 8*A + 0x1000. Po příkazu POKE $5D4,1 se tento výpočet mění na HL = 8*(0x100 + A) + 0x1000, tedy HL = 8*A + 0x1800.

Obdobně když si např. na adresu 0xF000 v RAM uložíme data libovolného fontu (třeba azbuky), tak se na tento font přepneme příkazem POKE $5D4,$1C:
Příloha:
basic.png
basic.png [ 3.74 KiB | Zobrazeno 1206 krát ]


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Znaková sada v BASICu
PříspěvekNapsal: 27 srp 2018, 23:07 
Offline
Prvnička

Registrován: 12 čer 2018, 11:44
Příspěvky: 19
Has thanked: 13 times
Been thanked: 4 times
Presne toto som potreboval.
Vďaka


Nahoru
 Profil  
 
Zobrazit příspěvky za předchozí:  Seřadit podle  
Odeslat nové téma Odpovědět na téma  [ Příspěvků: 4 ] 

Všechny časy jsou v UTC + 1 hodina [ Letní čas ]


Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé a 1 návštěvník


Nemůžete zakládat nová témata v tomto fóru
Nemůžete odpovídat v tomto fóru
Nemůžete upravovat své příspěvky v tomto fóru
Nemůžete mazat své příspěvky v tomto fóru
Nemůžete přikládat soubory v tomto fóru

Hledat:
Přejít na:  
Založeno na phpBB® Forum Software © phpBB Group
Český překlad – phpBB.cz