OldComp.cz

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


Právě je 28.03.2024, 17:44

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




Odeslat nové téma Odpovědět na téma  [ Příspěvků: 2 ] 
Autor Zpráva
 Předmět příspěvku: Shiftout v ZX BASICu
PříspěvekNapsal: 12.02.2020, 17:18 
Offline
Profík

Registrován: 21.10.2018, 08:27
Příspěvky: 559
Has thanked: 278 times
Been thanked: 139 times
Borci, poraďte mi prosím, potřeboval bych jednoduchou basicovou rutinu pro bitshift - rotaci byte v paměti po bitech ven na jeden bit výstupního portu 8255. Spolu s každým cyklem ještě poslat i clock na druhém bitu.
Ve strojáku mi to funguje, ale BASIC bych měl kvůli názornosti raději, na rychlosti mi přiliš nezáleží.

Díky předem.


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Shiftout v ZX BASICu
PříspěvekNapsal: 12.02.2020, 22:32 
Offline
Óm Nejvyšší

Registrován: 22.05.2013, 21:14
Příspěvky: 3642
Bydliště: Bratislava
Has thanked: 371 times
Been thanked: 788 times
11 LET bajt = PEEK adresa_do_pameti
22 FOR i=1 TO 8
33 LET bit=bajt>127
44 OUT port,bit
55 OUT port,bit+2
66 OUT port,bit
77 LET bajt=bajt+bajt-256*bit
88 NEXT i


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ů: 2 ] 

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 2 návštevní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