OldComp.cz

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

Registrace na OCP IV ZDE!

Právě je 21 zář 2018, 09:11

Všechny časy jsou v UTC + 1 hodina




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, 22:43 
Offline
Prvnička

Registrován: 12 čer 2018, 10:44
Příspěvky: 10
Has thanked: 10 times
Been thanked: 0 time
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, 17:46 
Online
Kecálek
Uživatelský avatar

Registrován: 06 srp 2013, 09:49
Příspěvky: 211
Bydliště: Praha
Has thanked: 171 times
Been thanked: 57 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, 10:34 
Online
Kecálek
Uživatelský avatar

Registrován: 06 srp 2013, 09:49
Příspěvky: 211
Bydliště: Praha
Has thanked: 171 times
Been thanked: 57 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 226 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 226 krát ]


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

Registrován: 12 čer 2018, 10:44
Příspěvky: 10
Has thanked: 10 times
Been thanked: 0 time
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


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