Obsah:
- PLAN 80 A
- PLAN 80 A návod na stavbu a užití mikropočítače.
- Návod na připojení MODEMU magnetofonu a připojení klávesnice TS 5220004.
- Technický dopis
- PŘÍLOHY
-------------------------------------------------------------
PPPPPP L AA N N 8888 0000 AA
P P L A A NN N 8 8 0 0 A A
P P L A A N N N 8888 0 0 A A
PPPPPP L AAAAAA N N N 8 8 0 0 AAAAAA
P L A A N NN 8 8 0 0 A A
P LLLLLL A A N N 8888 0000 A A
POPIS SYSTEMU
26.09.1988
(VERZE PRO TISK VE V.D. DRUKOV)
-------------------------------------------------------------
-------------------------------------------------------------
OBSAH
=====
1. UVOD ......................................... 1-1
2. ZAKLADNI PARAMETRY SYSTEMU ................... 2-1
2.1. OBVODOVE RESENI .............................. 2-1
2.2. PROGRAMOVE VYBAVENI .......................... 2-16
3. POPIS CINNOSTI A ZAPOJENI SYSTEMU ............ 3-1
3.1. PRINCIP FUNKCE ZOBRAZOVANI ................... 3-1
3.2. BLOKOVE SCHEMA SYSTEMU ....................... 3-6
3.3. OBVODY CPU A JEJIHO OKOLI .................... 3-8
3.4. RADIC ZOBRAZOVANI ............................ 3-11
3.5. OBVODY PAMETI RAM ............................ 3-14
3.6. OBVODY PAMETI EPROM .......................... 3-16
3.7. VSTUPNE/VYSTUPNI OBVODY ...................... 3-18
3.8. VIDEO A VF MODULATORY ........................ 3-21
4. OSAZOVANI A OZIVOVANI ZAKLADNI DESKY ......... 4-1
4.1. PREDBEZNE AKONY .............................. 4-1
4.2. ZOBRAZOVACI CAST ............................. 4-4
4.3. CAST EPROM ................................... 4-6
4.4. CAST RAM ..................................... 4-7
4.5. CAST CPU ..................................... 4-10
4.6. CAST VSTUPNE/VYSTUPNICH OBVODU ............... 4-12
4.7. TESTOVANI FUNKCE ZAKLADNI DESKY .............. 4-12
4.8. SEZNAM PROPOJEK ZAKLADNI DESKY ............... 4-13
5. MATICOVA KLAVESNICE A GENERATOR ZNAKU ........ 5-1
6. PROGRAMOVE VYBAVENI SYSTEMU PLAN80A .......... 6-1
6.1. JEDNOTLIVE VERZE MONITORU .................... 6-1
6.2. PROGRAM MODEMU MAGNETOFONU ................... 6-2
6.3. TINY BASIC ................................... 6-2
7. ZAPOJENI KONEKTORU ZAKLADNI DESKY ............ 7-1
7.1. KONEKTOR VSTUPU/VYSTUPU ...................... 7-1
7.2. KONEKTOR KLAVESNICE .......................... 7-2
7.3. KONEKTOR PRERUSENI ........................... 7-2
7.4. KONEKTOR NAPAJECICH NAPETI ................... 7-2
7.5. KONEKTOR ROZSIRENI ........................... 7-3
7.6. KONEKTOR DYNAMICKE RAM 64 KBYTE .............. 7-4
7.7. KONEKTOR PROGRAMATORU EPROM .................. 7-5
7.8 KONEKTOR HODINOVYCH SIGNALU .................. 7-5
8. LITERATURA ................................... 15-1
---------------------------- I - 2 ------------------------
-------------------------------------------------------------
MANUALY
=======
M-1. UZIVATELSKY MANUAL HONITORU (24 STRAN)
M-2. UZIVATELSKY HANUAL OVLADACIHO PROGRAMU MODEMU MAG-
NETICKE KAZETOVE JEDNOTKY (22 STRAN)
M-3. UZIVATELSKY MANUAL "TINY BASICU" (22 STRAN)
VYPISY SYSTEMOVYCH PROGRAMU
===========================
V-1. VYPIS MONITORU PRO SEMIGRAFIKU V.2.X
V-2. VYPIS OVLADACIHO PROGRAMU MODEMU MAGNETOFONU
V-3. VYPIS "TINY-BASICU"
V-4. VYPIS OBSAHU EPROM GENERATORU ZNAKU (SEMIGRAFIKA)
V-5. VYPIS OBSAHU EPROM GENERATORU ZNAKU (MALA PISMENA)
PRILOHY
=======
P-1. SOUPISKA SOUCASTEK PROCESOROVE DESKY
P-2. SOUPISKA SOUCASTEK MODEMU MAGNETOFONU
SCHEMATA
========
S-1. BLOKOVE SCHEMA SYSTEMU
S-2. CASOVE PRUBEHY RIDICICH SIGNALU
S-3. SCHEMA CENTRALNI JEDNOTKY
S-4. SCHEMA ZOBRAZOVACICH OBVODU
S-5. SCHEMA PAMETI RAM
S-6. SCHEMA PAMETI EPROM
5-7. SCHEMA VSTUPNE/VYSTUPNICH OBVODU
S-8. ROZMISTENI SOUCASTEK NA DESCE MODEMU MAGNETOFONU
S-9. ROZMISTENI SOUCASTEK PROCESOROVE DESKY
S-10. OBVODY PRIPOJENI MATICOVE KLAVESNICE TS5220004
S-11. SCHEMA ZAPOJENI MODEMU MAGNETOFONU
---------------------------- I - 3 ------------------------
-------------------------------------------------------------
1. U V O D
==================
PLAN 8OA JE STAVEBNICE AMATERSKEHO MIKROPOCITACE A LZE
JI TEDY PRIROVNAT K JAKESI "MIKROPROCESOROVE KRYSTALCE". JE
URCENA PRO ZACATECMIKY VE VYPOCETNI TECHNICE, KTERI BY BYLI
SCHOPNI (NAPR. POD ODBORNYM VEDENIM VE SVAZARMU) SESTAVIT
MIKROPOCITAC A OSVOJIT SI TAK ZAKLADY OBVODOVE TECHNIKY. V
TOM JE HLAVNI PEDAGOGICKY PRINOS STAVEBNICE OPROTI KOUPENYM
HOTOVYM SYSTEMUM.
PROBLEM KOUPI HOTOVEHO MIKROPOCITACE MA I JINE
DUSLEDKY. AMATER TIM VLASTNE PRESKOCI ETAPU OBVODOVE VYSTAVBY
A OZIVENI MIKROPOCITACE, KTERA BY HO NUTILA PODROBNE SE
SEZNAMIT S CINNOSTI JEDNOTLIVYCH PRVKU A SOUCASTEK SYSTEMU.
TIM AMATERSKA CINNOST ZTRACI CAST TAK PRO CELOU SPOLECNOST
DULEZITE PEDAGOGICKE PODSTATY ZAJMOVE PRACE. ZAJEM O
MIKROPOCITACE SE PAK V MNOHA PRIPADECH ZVRHNE V TRAVENI
VOLNEHO CASU U "HRACIHO AUTOMATU".
CELA KONCEPCE NAVRHU BYLA PRIZPUSOBENA EKONOMICKYM I
SOUCASTKOVYM MOZNOSTEM CESKOSLOVENSKE AMATERSKE VEREJNOSTI. Z
CENOVEHO HLEDISKA JE HLAVNI VYHODOU MOZNOST FUNKCE V
MINIMALNI VERZI (1 KBYTE RAM) BEZ NUTNOSTI POUZITI VELKE
A DRAHE DYNAMICKE PAMETI. Z HLEDISKA VOLBY SOUCASTEK JSME
SE ZAMERNE OMEZILI MA TY, KTERE JSOU NA NASEM TRHU "NEJMENE
NEDOSTATKOVE".
VSECHNY POUZITE SOUCASTKY JSOU BUD VYROBY TESLA NEBO
VYROBY ZEMI RVHP DOSTUPNE V NASI OBCHODNI SITI. NAVIC JE
PATRNA ORIENTACE NA MIKROPROCESOR MHB 8080A VYRABENY. TESLOU
PIESTANY. Z DUVODU DOSTUPNOSTI NEBYLO POUZITO MIKROPROCESORU
Z80, I KDYZ JE V NEKOLIKA PARAMETRECH POKROKOVEJSI. I8080 BYL
SVETOVYM PRUMYSLOVYM STANDARTEM PRO OSMIBITOVE MIKROPROCESORY
A PREVAZNA CAST (ASI 90%) PROGRAMU NAPSANYCH PRO OPERACNI
SYSTEM CP/M JE V INSTRUKCICH I8080A. DALSIM DUVODEM K POUZITI
TOHOTO MIKROPROCESORU JE SNAHA O KOMPATIBILITU ZOBRAZOVANI
V GRAFICKEM REZIMU S MIKROPOCITACEM PMD-85, NA KTERY SE
V DOBE NAVRHU SYSTEMU PLAM 80A ORIENTOVALY SVAZARMOVSKE
ORGANIZACE.
MIKROPROCESOR JE MIKROELEKTRONICKA SOUCASTKAV TAKZE
VYSTAVBA MIKROPOCITACE JE JEN UPLATNENIM TETO SOUCASTKY. O
TOM SVEDCI I POCET RUZNYCH VZAJEMNE NEKOMPATIBILNICH TYPU
MIKROPOCITACU NA ZAHRANICNICH TRZICH. STANDARTEM SE STAVA
TEN, KDO VYROBI A HLAVNE PRODA NEJVICE KUSU, KDO ZAJISTI
NEJLEPSI A NEJR0ZSAHLEJSI PROGRAMOVE VYBAVENI, KDO ZARUCI
NEJRYCHLEJSI A PRITOM LEVNY SERVIS A POD. JE ZAJIMAVE, ZE
TECHNICKA POKROKOVOST VLASTNIHO MIKROPOCITACE NENI
NEJDULEZITEJSIM HLEDISKEM. MNOHO SYSTEMU, KTERE PREDBEHLY
SVOU DOBU, UPLNE ZANIKLO, I KDYZ BYLY KONCEPCNE NA VYSOKE
AROVNI (NAPR. 16-BITOVE MIKROPOCITACE FIRMY TEXAS
INSTRUMENTS). NA DRUHE STRANE OSOBNI MIKROPOCITAC IBM-PC-XT
SE STAL SVETOVYM STANDARTEM, I KDYZ URCITE NENI "POSLEDNIM
---------------------------- 1 - 1 ------------------------
-------------------------------------------------------------
VYKRIKEM" TECHNIKY.
PRI NAVRHU STAVEBNICE JSME SE NESNAZILI VYTVORIT DALSI
TYP MIKROPOCITACE, JICHZ JE U NAS STEJNE PREBYTEK. NAOPAK NAM
SLO O NAVRH UNIVERZILNIHO STAVEBNICOVEHO SYSTEMU, KTERY BY
UMOZNOVAL PRI MINIMALNICH MODIFIKACICH SIMULACI CINNOSTI
NEKTERYCH Z U NAS VYRABENYCH MIKROPOCITACU. TO SE PODARILO
PRO PMD-85, JPR-1 A JPR-80. JE NA UZIVATELI, O KTERY Z TECHTO
SYSTEMU MA ZAJEM A KTEROU MODIFIKACI STAVEBNICE PLAN 80A
REALIZUJE. PRITOM PRECHOD OD JEDNOHO SYSTEMU KE DRUHEMU
SPOCIVA V PATRICNEM USPORADANI PROPOJEK NA PROCESOROVE DESCE,
VE VOLBE VHODNEHO MONITORU A V DOPLNENI STAVEBNICE O
PRISLUSNE STYKOVE OBVODY (NAPR. U PMD-85 O DESKU RIZENI
MAGNETOFONU).
SYSTEM PLAN 80A NEHODLA KONKUROVAT HOTOVYM,
PROFESIONALNE VYROBENYM A OSAZENYM MIKROPOCITACUM (VETSINOU
ZAHRANICNIM), KTERE SE V POSLEDNI DOBE OBJEVILY NA NASEM
TRHU. OPROTI NIM VSAK NABIZI ZCELA U NAS NOVY PRISTUP,
KTERY LZE SHRNOUT DO NASLEDUJICICH BODU:
- LEVNA ROZSIRITELNA STAVEBNICE
- SOBESTACNA PROCESOROVA DESKA (V MIN. VERZI BEZ SBERNICE)
- KOMPATIBILITA S DOMACIMI SYSTEMY PMD-85, JPR-1, JPR-80
- SEMIGRAFIKA I PLNA GRAFIKA VCETNE GRAFICKEHO BASICU
- MOZNOST AMATERSKEHO I PROFESIONALNIHO POUZITI
- MAXIMALNI VERZE SCHOPNA PROVOZU SE SYSTEMEM CP/M NEBO MP/M
- MOZNOST POUZITI REALNEHO CASU PRO RIZENI A REGULACI
MIKROPROCESOROVY SYSTEM PLAN 80A BYL NAVRZEN S
PRIHLEDNUTIM KE TREM ZAKLADNIM POZADAVKUM: CO NEJNIZSI CENA,
CO NEJJEDNODUSSI OSAZOVANI A OZIVOVANI A DOSTUPNOST
SOUCASTEK. BYL VYVIJEN JAKO MODULARNI JEDNODESKOVY
MIKROPOCITAC S MOZNOSTI DALSIHO ROZSIRENI. PRO USNADNENI
OZIVOVANI SYSTEMU JE VYPRACOVANA METODIKA OSAZOVANI A
OZIVOVANI, KTERA UMOZNUJE OZIVIT SYSTEM S LOGICKOU
SONDOU A VOLTMETREM. TO ROZSIRUJE OBLAST POUZITI
STAVEBNICE I NA AMATERY S OMEZENOU MERICI TECHNIKOU.
PRINCIP FUNKCE ZOBRAZOVANI BYL MOTIVOVAN MIKROPOCITACEM
PMD-85. JDE O PRIMOU SPOLUPRACI PROCESORU S RADICEM
ZOBRAZOVANI A VYUZIVANI SYSTEMOVYCH SBERNIC ZOBRAZOVACIMI
OBVODY.
V ZAKLADNIM PROGRAMOVEM VYBAVENI JE SYSTEM KOMPATIBILNI
S VYVOJOVYMI SYSTEMY RADY INTELLEC MDS 800, POPR. S JEJICH
EKVIVALENTY JAKO JPR-80 (TESLA STRASNICE), SM 50/40 (ZVT
BANSKA BYSTRICA) A POD. TATO PROGRAMOVA NAVAZNOST JE
ZAJISTENA POUZITIM MONITORU "INTELOVSKEHO" TYPU UMISTENEHO OD
ADRESY 0F800H SE STABILNI TABULKOU SKOKU DO PODPROGRAMU NA
ZACATKU. TO UMOZNUJE BUD BEZE ZMEN NEBO JEN S FORMALNIMI
UPRAVAMI POUZIT PROGRAMOVE VYBAVENI, KTERE JE PRO TYTO
SYSTEMY U NAS K DISPOZICI, A TO I V DERNOPASKOVE
(POPR. MAGNETOPASKOVE) VERZI SYSTEMU. PRI POUZITI PLNE
GRAFIKY JE MOZNA PROGRAMOVA KOMPATIBILITA S DOMACIM
---------------------------- 1 - 2 ------------------------
-------------------------------------------------------------
MIKROPOCITACEM PMD-85 NA UROVNI JAZYKA GBASIC I NA UROVNI
POGRAMU VYUZIVAJICICH MONITOR PMD-85 V/1. TIM BY BYLO
ZAJISTENO PROGRAMOVE VYBAVENI PRO SYSTEM PLAN80A.
PO SPUSTENI OPERACNIHO SYSTEMU CP/M (MIKROS) V
ROZSIRENE VERZI SYSTEMU SE NAVIC PRIPOJUJE PRAKTICKY
NEPREBERNE MNOZSTVI PROGRAMOVEHO VYBAVENI Z NEHOZ NAMATKOU
VYBERME RUZNE TYPY PROGRAMOVACICH JAZYKU (PASCAL MT+, FEL
PASCAL, ADA, FORTRAN, C, FORTH, BASIC, ASSEMBLER A TO ASM,
MAC NEBO M80), EDICNI PROGRAMY A TO I S PRIMYM DOSTUPEM DO
TEXTU (EDIT, CREDIT, WORD MASTER, WORD STAR) A MNOZSTVI
RUZNE ORIENTOVANYCH SPECIALNICH PROGRAMU (NAPR. DBASEII,
POWER A JINE). NAVIC PRES OPERACNI SYSTEM CP/M LZE DOSAHNOUT
KOMPATIBILITY S OSTATNIMI MIKROPROCESOROVYMI SYSTEMY
VYROBENYMI V CSSR (NAPR. TNS JZD SLUSOVICE S OMEZENIM NA
PROGRAMY POUZIVAJICI KOD 8080A, JPR-1A TESLA LIBEREC A
POD.). SYSTEM PLAN 80A UMOZNUJE SPUSTENI MULTIPROGRAMOVEHO
VICEUZIVATELSKEHO OPERACNIHO SYSTEMU MP/M (MIKROM). TIM SE
OTEVIRA PRISTUP K SYSTEMU SE SEMIPARALELNIM PROGRAMOVANIM A S
REALNYM CASEM.
PRI JEDNANICH VE VYROBNIM DRUZSTVU DRUKOV V BRNE SE
OBJEVIL NAVRH NA VYTVORENI TZV. "ZAKLADNI STAVEBNICE", KTERA
BY OBSAHOVALA POUZE PODROBNY MANUAL, SCHEMATA ZAPOJENI,
PREDPIS PRO ROZMISTENI SOUCASTEK, ZAKLADNI PROCESOROVOU
DESKU S PLOSNYMI SPOJI (S PROKOVENYMI OTVORY) A
NAPROGRAMOVANE PAMETI OBSAHUJICI GENERATOR ZNAKU A MONITOR.
VYCHAZI SE PRITOM Z TOHO, ZE PRO AMATERA JE NEJHURE DOSTUPNY
PLOSNY SPOJ. SOUCASTKY LZE PRAKTICKY VZDY SEHNAT, AT UZ V
OBCHODECH, NA BURZACH (ZDE DOKONCE LEVNEJI) NEBO POMOCI
INZERATU RADIOAMATERSKYCH CASOPISU, UVAZUJE SE O PRODEJI V
BRNENSKE PRODEJNE DRUZSTVA. K ZAKLADNI STAVEBNICI VYRABI
DRUZSTVO DRUKOV JAKO PRLSLUSENSTVI VF MODULATOR A MODEM
MAGNETOFONU. PRO ZAKLADNI VERZI SYSTEMU SE PREDPOKLADA
POUZITI JDNODUCHE MATICOVE KLAVESNICE TS5220004. STAVEBNICE
PLAN80A SE DODAVA VCETNE SOUCASTEK PRO ZAKLADNI VERZI,
KLAVESNICE A SKRINKY. PRODEJ ZAJISTUJE SIT OBCHODU TESLY
ELTOS, KDE JE MOZNE KOUPIT DALSI DOPLNKY (NAPR. NAPAJECI
ZDROJ ATP.).
SYSTEM PLAN80A BYL VYVIJEN PO DOBU ASI 6 LET. NIZE JE
UVEDEN CASOVY PREHLED HLAVNICH ETAP VYVOJE SYSTEMU.
KVETEN-1982: VZNIK PROJEKTU VYTVORENI AMATERSKEHO
JEDNODESKOVEHO MIKROPOCITACE
ZARI-1982: SESTAVENI PRVNIHO FUNKCNIHO VZORKU MIKROPOCITACE S
PRACOVNIM NAZVEM "BROWNIE" NA UNIVERZALNIM PLOSNEM
SPOJI POMOCI SAMOPAJECICH VODICU.
CERVEN-1983: UZAVRENI PROJEKTU "BROWNIE". PREPRACOVANI
ZOBRAZOVACIHO SYSTEMU NA KOMPATIBILNI S MIKROPOCITACEM
PMD85. NAVRH NOVEHO MIKROPOCITACE S NAZVEM PLAN80A.
PROSINEC-1983: SESTROJENI PRVNIHO FUNKCNIHO VZORKU
---------------------------- 1 - 3 ------------------------
-------------------------------------------------------------
MIKROPOCITACE PLAN80A VERZE V.1 NA UNIVERZALNIM PLOSNEM SPOJI
POMOCI SAMOPAJECICH VODICU.
BREZEN-1984: NAVRH OBVODU PRO UPRAVU PREDAVANI RIZENI MEZI
MIKROPOCITACEM A RADICEM ZOBRAZOVANI. PODANI PV-5068-84 PRO
TOTO ZAPOJENI.
CERVENEC-1984: DOKONCENI VYVOJE MONITORU V.3 PRO SEMIGRAFIKU
V ZAKLADNI (1KB) I ROZSIRENE (2KB) VERZI.
SRPEN-1984: NAVRH PLOSNEHO SPOJE VERZE SYSTEMU PLAN80A VERZE
V.2, SPOJ NEMA PROKOVENE OTVORY A MA HREBINKOVY ROZVOD
NAPAJENI.
RIJEN-1984: OSAZENI SYSTEMU PLAN80A V.2 NA PLOSNEM SPOJI,
DLOUHODOBE TESTY SPOLEHLIVOSTI SYSTEMU.
LISTOPAD-1984: NAVRZENI MODEMU PRO PRIPOJENI KAZETOVEHO
MAGNETOFONU. PODANI PV-7752-85 PRO TOTO ZAPOJENI.
UNOR-1985: NAVRH PLOSNEHO SPOJE S PROKOVENYMI OTVORY PRO
PROFESIONALNI DIGITIZACNI ZARIZENI. VZNIK VERZE V.3.1 SYSTEMU
PLAN80A.
KVETEN-1985: NAVRH PLOSNEHO SPOJE BEZ PROKOVENYCH OTVORU PRO
MODUL DYNAMICKE RAM 16/64 KBYTE, VYROBA PLOSNEHO SPOJE.
CERVEN-1985: OSAZENI DYNAMICKE RAM A JEJI DLOUHODOBE TESTY.
ZARI-1985: VYTVORENI OPERACNIHO SYSTEMU OPRENEHO O KAZETOVY
MAGNETOFON, SPUSTENI NASLEDUJICICH PROGRAMU ZE SYSTEMU
INTELLEC MDS-800: EDITOR, ASSEMBLER, DESASSEMBLER A BASIC.
LISTOPAD-1985: OSAZENI PLOSNEHO SPOJE V.3.1
PROSINEC-1985: ZAPUJCENI SYSTEMU PLAN80A V.2 DO K.P. CHIRANA
S PROGRAMEM ZHOTOVENYM V RAMCI TU 17/85 PRO RIZENI
DIALYZACNIHO MONITORU CHIRASKAL.
UNOR-1986: VYTVORENI RADICE DISKETOVE JEDNOTKY S OBVODEM
I8271 (V.3C) A PRIPOJENI DISKETOVE JEDNOTKY MOMFLEX MF-6400.
BREZEN-1986: SPUSTENI OPERACNIHO SYSTEMU CP/M V.2.2
DUBEN-1986: SPUSTENI PROGRAMU: WORDSTAR, WORDMASTER, DBASEII,
PASCAL MT+, LIBMT, M80, L80, MAC, ASM A POWER.
KVETEN-1986: NAVRH PLOSNEHO SPOJE PRO VERZI V.3.2 S
POSILENYMI ZEMNICIMI ROZVODY.
CERVENEC-1986: OSAZENI A OZIVENI DRUHEHO KUSU MIKROPOCITACE
PLAN80A V.3.1.
SRPEN-1986: OSAZENI A OZIVENI DRUHEHO KUSU DYNAMICKE PAMETI
64 KBYTE NA DESCE S PROKOVENYMI OTVORY V.3.2.
---------------------------- 1 - 4 ------------------------
-------------------------------------------------------------
ZAR1-1986: OZIVENI DESKY 8 BITOVEHO A/D PREVODNIKU A 8
BITOVEHO D/A PREVODNIKU (MHB1502, MDAC08, MAC01, MAC111,
MAC08). OZIVENI MENICE +5V --> +/- 15V.
RIJEN-1986: ODLADENI UPRAV PRO MONITOR PMD-85 TAKOVYCH, ABY
HO BYLO MOZNO POUZIT PRO SYSTEM PLAN 80A (VERZE MONITORU PLAN
V.7)
LISTOPAD-1986: OZIVENI DESKY PRO CTENI A ZAPIS SOUBORU VE
FORMATU PMD-85, SPUSTENI GRAFICKEHO "BASICU G".
PROSINEC-1986: NAVRZENI A OVERENI RADICE DISKETOVE JEDNOTKY S
I8271 A S MOZNOSTI PREPINANI DVOU DISKETOVYCH JEDNOTEK S
RUZNYMI RYCHLOSTMI PRENOSU DAT (8" MOMFLEX MF 6400, 5"
ROBOTRON K5600), PODANI PV-1888-87 PRO TOTO ZAPOJENI,
SPUSTENI CP/M S OBEMA UVEDENYMI JEDNOTKAMI.
UNOR-1987: NAPSANI PROGRAMU PRO VYTVARENI OBSAHU GENERATORU
ZNAKU V JAZYCE PASCAL MT+.
BREZEN-1987: PREDANI JEDNOHO KUSU MIKROPOCITACE V.2.
STUDUJICIMU VUT BRNO K OVERENI FUNKCE V PRAKTICKEM PROVOZU
SYSTEMU.
DUBEN-1987: SPUSTENI OPERACNIHO SYSTEMU MP/M VI.1 NA 64 KBYTE
RAM.
CERVEN-1987: JEDNANI O VYROBE SYSTEMU PLAN80A VE VYROBNIM
DRUZSTVU DRUKOV BRNO
CERVENEC-1987: PRVNI PREDSTAVENI SYSTEMU PLAN80A VEREJNOSTI
NA SEMINARI O MIKROPOCITACOVE TECHNICE PORADANE SVAZARMEM V
OBLASTI BRNENSKE PREHRADY
ZARI-1987: PODANI ZN-27/87 NA STAVEBNICI MIKROPOCITACE
PLAN80A VE V.D. DRUKOV BRNO
RIJEN-1987: PREDVEDENI SYSTEMU PLAN80A PREDSTAVENSTVU V. D.
DRUKOV BRNO
PROSINEC-1987: PREDVEDENI SYSTEMU PLAN 80A S KAPACITNI
KLAVESNICI NA VYSTAVE ERA-87, JEDNANI S REDAKTOREM AR ING.
MYSLIKEM A VEDOUCIM OBCHODNI POLITIKY DOSS ING. MILOSLAVEM
STUDENKOU
LEDEN-1988: VYTVORENI PROGRAMU STREAM PRO ARCHIVACI DISKET NA
MEGNETOFONOVE KAZETY S POMOCI MODEMU
UNOR-1988: CLANEK POPISUJICI ZAKLADNI PARAMETRY SYSTEMU
PLAN80A V AR/A-2. SOUCASNE BYLA VYTISTENA ANKETA PRO ZJISTENI
ZAJMU O TENTO SYSTEM.
UNOR-1988: OVERENI PLOSNEHO SPOJE V.3.2, BYLO PROVEDENO JEHO
OSAZENI A TESTOVANI.
---------------------------- 1 - 5 ------------------------
-------------------------------------------------------------
BREZEN-1988: PRIPRAVA UKAZKOVEHO PROGRAMU PRO ZAKLADNI VERZI
MIKROPOCITACE PLAN80A URCENOU PRO VYSTAVU POLYTECHNICKYCH
POMUCEK V PRAZE,
DUBEN-CERVEN-1988: PREZENTACE SYSTEMU PLAN 80A NA VYSTAVE
POLYTECHNICKYCH POMUCEK V PRAZE, NA VELETERHU SPOTREBNIHO
ZBOZI V BRNE.
KVETEN-1988: PRIPOJENI K SYSTEMU PLAN 80A DISKETOVE JEDNOTKY
TEAC FDC-55-GFR ZA POMOCI RADICE S OBVODEM I8271, KAPACITA
JEDINE 5" DISKETY JE 504 KB (POUZITI 4 MHZ HODIN).
CERVEN-1988: NAVRH VYSLEDNEHO PLOSNEHO SPOJE PROCESOROVE
DESKY V.3.3., PREDANI PODKLADU V.D. DRUKOV.
CERVENEC-1988: NAVRH PLOSNEHO SPOJE PRO MODEM MAGNETOFONU,
PREDANI PODKLADU V.D, DRUKOV.
CERVENEC-1988: OSAZENI A OZIVENI DALSIHO MIKROPOCITACE
PLAN 80A V.3.2 ING. PREROVSKYM VE VERZI S 64 KB PAMETI,
RADICEM DISKETOVE JEDNOTKY S OBVODEM I8271 A OPERACNIM
SYSTEMEM CP/M.
SRPEN-1988: OVERENI PLOSNEHO SPOJE MODEMU MAGNETOFONU,
PREDANI OPRAVENYCH PODKLADU PRO JEHO VYROBU V.D. DRUKOV.
ZARI-1988: OVERENI PLOSNEHO SPOJE PROCESOROVE DESKY V.3.3,
OSAZENI A OZIVENI MINIMALNI VERZE MIKROPOCITACE PLAN 80A.
ZARI-1988: PRIPRAVA SERIOVE VYROBY MIKROPOCITACE PLAN80A VE
V.D. DRUKOV.
NA ZAVER BYCH CHTEL PODEKOVAT VSEM, KTERI SE
JAKOUKOLIV MIROU PODILELI NA VZNIKU SYSTEMU PLAN80A.
ZVLASTE PAK BYCH CHTEL PODEKOVAT SVE ZENE ANNE, BEZ
JEJIHOZ POCHOPENI BY PROJEKT PLAN80A VUBEC NEMOHL
VZNIKNOUT. DEKUJI SVYM RODICUM ZA MORALNI I MATERIALNI
PODPORU. DEKUJI PAVLU SIMIKOVI ZA POMOC PO CELOU DOBU
VYVOJE I REALIZACE. DEKUJI ING. FRANTISKU MICHALKOVI A
JIRIMU HROZKOVI ZA SPOLUPRACI PRI VYVOJI PLOSNYCH SPOJU A
REALIZACI OVEROVACICH KUSU SYSTEMU. V NEPOSLEDNI RADE
DEKUJI VLADIMIRU KOUKOLOVI A OSTATNIM PRACOVNIKUM
DRUZSTVA DRUKOV, JEJICHZ ZASLUHOU BYL SYSTEM PLAN80A PREDAN
DO SERIOVE VYROBY A TAK PRONIKA K SIROKEMU OKRUHU ZAJEMCU.
PRODEJ KOMPLETNI STAVEBNICE BYL UMOZNEN DIKY INICIATIVE
PRACOVNIKU BRNENSKE TESLY ELTOS VEDENYCH ING. VYMAZALEM,
KTERI ZAJISTILI SOUCASTKY A DALSI KOMPONENTY STAVEBNICE.
PETR PELIKAN
---------------------------- 1 - 6 ------------------------
-------------------------------------------------------------
2. ZAKLADNI PARAMETRY SYSTEMU
=============================
OBVODOVE RESENI (HARDWARE):
- ROZMERY PROCESOROVE DESKY VERZE V.3.2: 220 X 320 MM
- NAPAJENI PROCESOROVE DESKY: 5V/3A, 12V/1A, -5V/1A
- MIKROPROCESOR MHB8080A
- VSECHNY SOUCASTKY VYRQBY CSSR NEBO ZEMI RVHP
- ZAKLADNI FREKVENCE HODINOVYCH IMPULSU F2(TTL) = 2,048 MHZ
- PAMET RAM NA ZAKLADNI DESCE 4 KBYTE, TJ. 8 POUZDER MHB2114
- PAMET EPROM NA ZAKLADNI DESCE: 6 KBYTE PRI POUZITI OBVODU
MHB8708, LZE ROZSIRIT NA 8 KBYTE POUZITIM OBVODU MHB8716
NEBO NA MAX 16 KBYTE POUZITIM OBVODU I2732.
- SAMOSTATNY VSTUPNI 8 BITOVY PORT PRO ASCII KLAVESNICI
(MH3212)
- POSILENY PROGRAMOVATELNY STYKOVY OBVOD (MHB8255A,3XMHB8286)
- CTYRBITOVY STAVOVY PORT (MH3216)
- PRERUSOVACI SYSTEM BUD JEDNOUROVNOVY (INT7) NEBO
PRIORIZOVANY CTYRUROVNOVY (MH3214,INT0,INT1,INT5,INT6)
- NEZAVISLE ZOBRAZOVACI OBVODY NA ZAKLADNI DESCE, PRACUJICI
NA PRINCIPU "KRADENI CYKLU" PROCESORU S MOZNOSTI VOLBY
REZIMU SEMIGRAFIKY (GENERATOR ZNAKU) NEBO PLNE GRAFIKY.
TYTO OBVODY PROVADEJI AUTOMATICKE OBNOVENI INFORMACE U
DYNAMICKYCH PAMETI (REFRESH).
- MOZNOST PROGRAMOVE INVERZE JEDNOTLIVYCH ZNAKU POMOCI
HODNOTY NEJVYSSIHO BITU ZNAKU (D7)
- V REZIMU SEMIGRAFIKY JE ZNAK V RASTRU 6X8 PIXLU, A JE
ZOBRAZOVANO 32 RADKU PO 48 ZNACICH (LZE OMEZIT NA 40)
- V REZIMU SEMIGRAFIKY LZE JAKO GENERATOR ZNAKU POUZIT EPROM
BUD MHB8708 NEBO 2716 (MOZNOST VYTVORENI UZIVATELSKYCH
ZNAKU VCETNE CESKE ABECEDY)
- V REZIMU SEMIGRAFIKY LZE VYTVARET OBRAZCE V RASTRU 64X144
BODU (KAZDY ZNAK MA 3X2 BODY)
- V REZIMU PLNE GRAFIKY JE ZOBRAZOVANO 255X288 PIXLU
(KOMPATIBILNI S GRAFIKOU PMD-85), MOZNOST NEZAVISLE INVERZE
KAZDE 6-TICE BODU
- PRI SEMIGRAFICE ZABIRA OBRAZOVA OBLAST 2 KBYTE RAM, PRI
PLNE GRAFICE 16 KBYTE RAM
- LZE POUZIVAT 4 RUZNE BARVY (RESP. ODSTINY SEDI) NEZAVISLE
PRO KAZDYCH 6 SOUSEDNICH PIXLU (RESP. PRO KAZDY ZNAK)
- V REZIMU PLNE GRAFIKY LZE VYTVORIT UZIVATELSKY SOUBOR
ZOBRAZOVANYCH ZNAKU ULOZENY V PAMETI RAM, SE KTERYM PRACUJE
MONITOR V.4.X
- ADRESU ZOBRAZOVANE OBLASTI PAMETI RAM LZE MENIT ZAPISEM
BAZOVE ADRESY DO POMOCNEHO REGISTRU (AZ 32 NEZAVISLYCH
OBRAZOVYCH STRAN PRO SEMIGRAFIKU, 4 NEZAVISLE OBRAZOVE
STRANY PRO PLNOU GRAFIKU PRI OSAZENE PAMETI RAM 64 KBYTE)
- PRO PRIPADNE ROZSIRENI JSOU VYVEDENY SYSTEMOVE SBERNICE
- SYSTEM UMOZNUJE OBECNY STAV HOLD (VCETNE OSETRENI PRIJETI
TOHOTO STAVU PRI ZAPISOVE OPERACI)
- ZOBRAZOVANI POMOCI VF MODULATORU NA LIBOVOLNEM TV PRIJIMACI
NEBO POMOCI VIDEO MODULATORU NA UPRAVENEM TV PRIJIMACI NEBO
---------------------------- 2 - 1 -------------------------
-------------------------------------------------------------
NA ZOBRAZOVACI JEDNOTCE AZJ 462
- MOZNOST UMISTENI "BOOTOVACI" EPROM NA LIBOVOLNEM
MISTE PAMETOVEHG PROSTORU (PO 1 KBYTU)
- MOZNOST PREMISTOVANI MISTNI RAM PO 8 KBYTECH
- POMOCNY KONEKTOR PRO DYNAMICKOU RAM 16-32-48-64 KBYTE
- MOZNOST POUZITI BUD MATICOVE KLAVESNICE, ASCII KLAVESNICE
NEBO NEKTERE Z ASCII KLAVESNIC TOVARNE VYRABENYCH (NAPR.
EC0101)
- POUZITI KOMERCNIHO KAZETOVEHO MAGNETOFONU JAKO VNEJSIHO
PAMETOVEHO MEDIA (POMOCI MODEMU)
- DYNAMICKA RAM NA POMOCNE DESCE (16 AZ 64 KBYTE, MHB4116)
- LEVNA A JEDNODUCHA MATICOVA KLAVESNICE TS5220004.
OVERENO V PODOBE FUNKCNIHO VZORKU:
- RADIC JEDNOTKY PRUZNYCH DISKU S OBVODEM I8271 (JEDNODUCHA
HUSTOTA ZAZNAMU, FM, DVE JEDNOTKY, 5" I 8")
- PREVODNIK A/D S ROZLISENIM 8 BITU A 16 VSTUPNIMI KANALY
- PREVODNIK D/A S ROZLISENIM 8 BITU A VYSTUPNIM NAPETIM 0-10V
- CASOVACI OBVOD KR580VI53 (I8253) POUZITELNY JAKO MERIC
KMITOCTU, CITAC IMPULSU NEBO ZVUKOVY GENERATOR
- OBVODY UMOZNUJICI CTENI/ZAPIS PROGRAMU Z/NA MAGNETOFONOVE
PASKY PRO PMD-85
- OBVODY ZAJISTUJICI STYK V NORME V-24 (RS232C) S OBVODEM
MHB8251
- JOYSTICK (KNIPL,OVLADAC) S PRIPOJENIM NA MHB8255A
PROGRAMOVE VYBAVENI (SOFTWARE)
- MONITOR V.3 PRO ASCII KLAVESNICI A SEMIGRAFIKU ROZDELEN DO
DVOU CASTI PO 1 KBYTU, PRVNI Z NICH JE SCHOPNA SAMOSTATNE
CINNOSTI
- MONITOR V.4 PRO PLNOU GRAFIKU
- MONITOR V.5 PRO CP/M, DISKETOVOU JEDNOTKU A SEMIGRAFIKU
- MONITOR V.7 ODVOZENY OD MONITORU SYSTEHU PMD-85 UMOZNUJICI
EMULACI TOHOTO SYSTEMU NA MIKROPOCITACI PLAN 80A
- MONITOR V.3 AZ V.5 KOMPATIBILNI SE SYSTEMY JVS-80 (INTELLEC
MBS-800) A JPR-1
- MOZNOST PROGRAMOVE VOLBY FORMATU ZOBRAZOVANI (1 AZ 32
RADKU, 1 AZ 48 ZNAKU) S MOZNOSTI ROLOVANI NA VYMEZENE PLOSE
- VSECHNY PROMENNE MONITORU SKRYTE V NEZOBRAZOVANE CASTI
OBRAZOVE PAMETI RAM
- BIOS PRO CP/M UMOZNUJICI JEHO SPUSTENI PRO MONITOR V.5 A
V.8
- OPERACNI SYSTEM PRO KAZETOVY MAGNETOFON (2 KBYTE),
UMOZNUJICI SPUSTENI DERNOPASKOVYCH PROGRAMU BASIC-MIT,
ASSEMBLER, DESASSEMBLER A EDITOR Z INTELLEC MDS-800
- "MIKRO" BASIC (4 KBYTE) SE SEMIGRAFIKOU, EDICI A FUNKCEMI
ZAZNAMU A CTENI DAT NA/Z MAGNETOFONU
- GRAFICKY EDITOR PRO VYTVARENI TECHNOLOGICKYCH SCHEMAT V
SEMIGRAFICE (GRAFICKE OBRAZCE REGULACNICH A RIDICICH
PROGRAMU)
- POD OPERACNIM SYSTEMEM CP/M BYLA OVERENA SPRAVNA CINNOST
---------------------------- 2 - 2 ------------------------
-------------------------------------------------------------
PROGRAMU: PASCAL MT+, FORTRAN, MBASIC, BASCOM, ED, WORD
MASTER, WORD STAR, DBASEII, SDT, DDT, ASM, MAC, M80, L80,
POWER
- TESTOVACI PROGRAM "DISKTEST" PRO OZIVOVANI A TESTOVANI
DISKETOVYCH JEDNOTEK (OBSAHUJE FORMATOVANI DISKET)
- "BASIC G" PRO MONITOR V.7 UMOZNUJICI SPUSTENI VSECH CISTE
BASICOVSKYCH PROGRAMU NAPSANYCH PRO SYSTEM PMD-85 (VCETNE
GRAFICKYCH PRIKAZU PLOT ATP.)
- PROGRAM "MGFPMD" UMOZNUJICI PRENOS SOUBORU MEZI
MAGNETOFONOVYM ZAZNAMEM PMD-85 A DISKETOVYM ZAZNAMEM CP/M
- PROGRAM "MGPLAN" PRO PRENOS SOUBORU MEZI MAGNETOFONOVYM
ZAZNAMEM PLAN 80A A DISKETOVYM ZAZNAMEM CP/M
- PROGRAM SLOUZICI PRO VYTVARENI PROGRAMOVACICH PREDLOH
GENERATORU ZNAKU
- XIOS PRO MULTIPROGRAMOVY A VICEUZIVATELSKY SYSTEM MP/M
(MONITOR V.8)
- MONITOR V.2 PRO MATICOVOU KLAVESNICI TS5220004 A
SEMIGRAFIKU V DELCE 2 KBYTE PRO ZAKLADNI VERZI SYSTEMU
---------------------------- 2 - 3 ------------------------
-------------------------------------------------------------
3. POPIS CINNOSTI A ZAPOJENI SYSTEMU
=======================================
NASLEDUJICI ODSTAVCE PRINASEJI ZAKLADNI INFORMACE O
FUNKCI A ZAPOJENI SYSTEMU PLAN 80A. POPIS JE ROZDELEN DO
BLOKU OBDOBNE JAKO JE TOMU V OSAZOVACIM A OZIVOVACIM NAVODU.
3.1. PRINCIP FUNKCE ZOBRAZOVANI
-------------------------------
PRO DUKLADNE POCHOPENI TETO KAPITOLY JE NUTNE
PROSTUDOVAT NEKTEROU Z NASLEDUJICICH POZIC ZE SEZNAMU LITERA-
TURY: [5], [6], [7], [9], [17], [22], [30], [34], [35].
PRINCIP ZOBRAZOVANI BYL MOTIVOVAN ZAPOJENIM OSOBNIHO
MIKROPOCITACE PMD-85. OBDOBNY PRINCIP ZOBRAZOVANI BYL POPSAN
TEZ V LITERATURE [43]. VTIP JE V TOM, ZE MIKROPROCESOR
MHB8080A POUZIVA SYSTEMOVE SBERNICE PO DOBU MNOHEM KRATSI,
NEZ JE CELKOVA DOBA PROVADENI INSTRUKCE. PO ZBYTEK CASU JSOU
SBERNICE NEVYUZITE (TOTO ZJEDNODUSENI PLATI PRO SOUCASTKY S
DOBOU DOSTUPU POD 450 NS), CIMZ JSOU VOLNE PRO PRENOSY
ZOBRAZOVANE INFORMACE. TENTO PRINCIP ZNACNE ZJEDNODUSUJE CELE
ZAPOJENI, NEBOT PRO RADIC ZOBRAZOVANI LZE POUZIT CASTI
SYSTEMU. NAVIC LZE PRAVIDELNYM ZOBRAZOVANIM ZASTOUPIT
OBNOVOVANI INFORMACE V DYNAMICKYCH PAMETECH (REFRESH), A
JEJICH ZAPOJENI TIMTO TEZ ZJEDNODUSIT.
CASOVY DIAGRAM RIDICICH SIGNALU MIKROPOCITACE PLAN 80A
ZMERENY LOGICKYM ANALYZATOREM TEKTRONIX TYPU 7D02 MA CISLO S-
2. VZHLEDEM K ROZLISOVACI SCHOPNOSTI ANALYZATORU 20 NS, JSOU
V NAKRESU NAZNACENY PASMA, VE KTERYCH MUZE NASTAT ZMENA Z
JEDNE LOGICKE HODNOTY NA DRUHOU.
V NAKRESU JSOU POUZITY NASLEDUJICI ZKRATKY PRO OZNACENI
SIGNALU:
OSC SIGNAL ZE STEJNOJMENNEHO VYSTUPU GENERATORU HODIN
TYPU MH8224 O KMITOCTU 18,432 MHZ (PERIODA SIGNALU
CCA 54,25 NS)
F1 HODINOVY SIGNAL MIKROPROCESORU GENEROVANY OBVODEM
MH8224 S VYSOKONAPETOVOU AROVNI
F2(TTL) HODINOVY SIGNAL MIKROPROCESORU GENEROVANY OBVODEM
MH8224 S AROVNEMI TTL
STSTB/ SIGNAL PRO STROBOVANI PLATNE STAVOVE INFORMACE Z
DATOVE SBERNICE MIKROPROCESORU, JE GENEROVANY
OBVODEM MH8224 NA ZAKLADE SIGNALU "SYNC" Z
MIKROPROCESOCESORU
WR/ RIDICI SIGNAL OPERACE ZAPISU GENEROVANY
MIKROPROCESOREM
---------------------------- 3 - 1 ------------------------
-------------------------------------------------------------
DBIN SIGNAL URCUJICI SMER PRENOSU NA DATOVE SBERNICI
MIKROPROCESORU, GENERUJE MIKROPROCESOR, (PRI LOG1
JE SMER DO MIKROPROCESORU)
MEMR/ SYSTEMOVE RIDICI SIGNALY PRO CTENI Z PAMETI NEBO
IOR/ V/V ZARIZENI, GENERUJE OBVOD MH8228
INTA/ SYSTEMOVY RIDICI SIGNAL POTVRZENI PRIJETI ZADOSTI
O PRERUSENI CINNOSTI, GENERUJE OBVOD MH8228
MEMW/ SYSTEMOVY RIDICI SIGNAL PRO ZAPIS DO PAMETI NEBO
IOW/ DO V/V ZARIZENI, GENERUJE OBVOD MH8228
DBRD/ CASOVY USEK, PO KTERY MUSI BYT NA DATOVE SBERNICI
STABLE PLATNA A STABILNI INFORMACE PRI OPERACICH CTENI
READY CASOVY USEK, V NEMZ SE SLEDUJE SIGNAL READY A MUSI
STABLE TUDIZ BYT STABILNI
INT CASOVY USEK, V NEMZ SE SLEDUJE SIGNAL INT (ZADOST
STABLE O PRERUSENI FUNKCE) A MUSI BYT STABILNI
HOLD CASOVY USEK, V NEMZ SE SLEDUJE SIGNAL HOLD (ZADOST
STABLE O PRIMY PRISTUP K SYSTEMOVYM SBERNICIM) A MUSI
TEDY BYT STABILNI
DBWR/ CASOVY USEK, PO KTERY JE NA DATOVE SBERNICI PLATNA
STABLE INFORMACE PRI OPERACI ZAPISU
SYNC SYNCHRONIZACNI SIGNAL GENEROVANY MIKROPROCESOREM
V PRVNIM STROJOVEM CYKLU, OZNACUJE PLATNOST
STAVOVE INFORMACE NA DATOVE SBERNICI
Q1...Q8 NEPREKRYVAJICI SE HODINOVE SIGNALY SLOUZICI PRO
GENERACI RIDICICH SIGNALU V SYSTEMU (Q0=F2TTL)
STB1 SIGNAL ZAPISUJICI ZOBRAZOVANY KOD DO POMOCNEHO
REGISTRU
STB2 ZAPISOVY SIGNAL VEDENY NA POSUVNY REGISTR
UMOZNUJICI PARALELNE/SERIOVY PREVOD REZU ZNAKU
MODE SIGNAL AKTIVITY RADICE ZOBRAZOVANI S VYZNACENYMI
OKAMZIKY ZMENY UROVNE
MWS/ SIGNALY ZAPISU DO PAMETI, RESP. V/V ZARIZENI PO
IOWS/ UPRAVE POPISOVANE V KAPITOLE 3.3
IORS/ SIGNAL CTENI ZE V/V ZARIZENI PO UPRAVE POPISOVANE
V KAPITOLE 3.3
RAS/ RIDICI SIGNAL DYNAMICKE PAMETI RAM PRO STROBOVANI
ADRESY RADKU
MUX RIDICI SIGNAL DYNAMICKE PAMETI RAM PRO PREPINANI
---------------------------- 3 - 2 ------------------------
-------------------------------------------------------------
ADRESY RADKU A SLOUPCE
CAS-RD/ RIDICI SIGNAL DYNAMICKE PAMETI RAM PRO STROBOVANI
ADRESY SLOUPCE V REZIMU CTENI
CAS-WR/ RIDICI SIGNAL DYNAMICKE PAMETI RAM PRO STROBOVANI
ADRESY SLOUPCE V REZIMU ZAPISU
CAS/ RIDICI SIGNAL DYNAMICKE PAMETI RAM PRO STROBOVANI
ADRESY SLOUPCE, OBECNY PRUBEH
CLK HODINOVY SIGNAL SLOUZICI PRO POSUV ZOBRAZOVANYCH
DAT V POSUVNEM REGISTRU
V NASLEDUJICIM TEXTU BUDE POUZITO TECHTO POJMU:
FUNKCNI DOBA (T) JE KONSTANTNI CASOVY USEK DANY PERIODOU
HODINOVEHO SIGNALU F2(TTL) V DELCE 488,28 NS
STROJOVY CYKLUS (MC) SE SKLADA ZE TRI AZ PETI DOB
(NEPOCITAME-LI PRIPADNE DOBY CEKANI TW) A TVORI
UCELENOU CAST S JEDINOU KOMUNIKACI S PAMETI CL V/V
ZARIZENIM. POKUD SE PRI KOMUNIKACI S PAMETI CTE
KOD INSTRUKCE, JEDNA SE O TZV. CYKLUS FETCH (M1)
INSTRUKCNI CYKLUS (IC) SE SKLADA Z JEDNOHO AZ PETI STROJOVYCH
CYKLU A ZAHRNUJE PROVADENI JEDINE INSTRUKCE.
PRO SPOLUPRACI SE ZARIZENIMI S DOBOU DOSTUPU DELSI NEZ
JE DOBA T (ASI 488 NS) JE PROCESOR VYBAVEN MOZNOSTI
PRODLOUZIT STROJOVY CYKLUS TAK, ZE MEZI DOBY T2 A T3 VKLADA
CELISTVI NASOBEK CEKACICH DOB TW (TAKTEZ V DELCE 488 NS).
SYSTEMOVA DATOVA SBERNICE JE PRI OPERACI CTENI OBSAZENA
OD DRUHE TRETINY DOBY T2 PRES PRIPADNE DOBY TW AZ PO PRVNI
TRETINU DOBY T3 (VCETNE). PRI ZAPISU JE SYSTEMOVA DATOVA
SBERNICE OBSAZENA OD DRUHE TRETINY T2 PRES PRIPADNE DOBY TW,
PRES DOBU T3 AZ PO JEDNU TRETINU DOBY T4 (POKUD JE V DANEM
STROJOVEM CYKLU PRITOMNA) NEBO DOBY TI NASLEDUJICIHO STROJO-
VEHO CYKLU. JELIKOZ VSECHNY POUZITE OBVODY PRIJIMAJI
ZAPISOVANA DATA AZ V DOBE AKTIVNI UROVNE ZAPISOVEHO SIGNALU
WR/ (DULEZITA JE JEHO KONCOVA VZESTUPNA HRANA), LZE PROVEST
OMEZENI PLATNOSTI ZAPISOVANYCH DAT NA DOBU ASI 450 NS DANOU
PLATNYM ZAPISOVYM SIGNALEM.
JE ZREJME, ZE V LIBOVOLNEM STROJOVEM CYKLU SE DATOVA
SBERNICE FUNKCNE VYUZIVA PRIBLIZNE JEN PO DOBU 450 NS, VE
ZBYLEM CASE JI LZE VYUZIT PRO UCELY ZOBRAZOVANI. OBDOBNA
SITUACE JE VE VYUZITI ADRESOVE A RIDICI SBERNICE, KTERE LZE
TAKTEZ VYUZIT PRO ZOBRAZOVANI.
NEJPRISTUPNEJSIM ZOBRAZOVACIM PROSTREDKEM JE TELEVIZNI
---------------------------- 3 - 3 ------------------------
-------------------------------------------------------------
PRIJIMAC. ZOBRAZOVANE UDAJE MUZEME DO OBVODU TV PRIJIMACE
PRIVEST DVEMA ZPUSOBY: BUD POMOCI VF MODULATORU DO ANTENNIHO
VSTUPU NEBO PRIMO DO JASOVYCH OBVODU POMOCI VIDEO MODULATORU.
OBA ZPUSOBY MAJI SVE VYHODY I NEVYHODY. PREVOD OBRAZOVE
INFORMACE PRES VF MODULATOR NEVYZADUJE ZADNE UPRAVY V TV
PRIJIMACI, VF MODULATOR JE VSAK POMERNE SLOZITEJSI NEZ VIDEO
MODULATOR A NAVIC VETSI ZKRESLENI KTERE VZNIKNE TEZ VE VF I
MF OBVODECH TELEVIZORU. VIDEO MODULATOR JE JEDNODUCHY OBVOD S
RELATIVNE VELMI OSTROU KRESBOU I NA MENE KVALITNEJSIM
PRIJIMACI, LZE JEJ POUZIT JEN U TV PRIJIMACU S ODDELENOU
KOSTROU OD SITE (POZOR NA URAZ EL. PROUDEM!) A VYZADUJE
APRAVY V ZAPOJENI PRIJIMACE.
VZHLEDEM K TOMU, ZE SIRKA PASMA OBRAZOVYCH ZESILOVACU
BEZNYCH TELEVIZNICH PRIJIMACU NEPRESAHUJE 6 MHZ, LZE PRI
POUZITI VF MODULATORU POCITAC S ASI 280 BODY NA VIDITELNE
CASTI RADKU (ASI 47 US). PRI POUZITI VIDEO MODULATORU BYLO
PRAKTICKYMI ZKOUSKAMI S TELEVIZOREM JUNOST 401D OVERENO, ZE
LZE NA VIDITELNE CASTI RADKU ZOBRAZIT AZ 430 BODU (SIRKA
PASMA ASI 7,4 MHZ). I KDYZ JEDNOTLIVY BOD BYL CASTECNE
ROZMAZAN, ZNAK SLOZENY Z VETSIHO POCTU BYT ZKRESLENYCH BODU
BYL OPTICKY SUBJEKTIVNE PRIJATELNEJSI, NEZ ZNAK SLOZENY Z
MENSIHO POCTU OSTRYCH BODU.
PRO ZAKLADNI VERZI MIKROPOCITACE PREDPOKLADAME POUZITI
GENERATORU ZNAKU. TO UMOZNI PRACI MIKROPOCITACE JIZ S JEDINYM
KILOBYTEM PAMETI RAM. ABY BYLO MOZNO VYTVORIT VLASTNI SOUBOR
ZNAKU (VCETNE SPECIALNICH ZNAKU NAPR. PRO CESKOU ABECEDU),
POUZIJEME PROGRAMOVATELNOU PAMET EPROM TYPU 2708 NEBO 2716.
JELIKOZ PREDPOKLADAME UMISTENI ZOBRAZOVANE INFORMACE V
CASTI PAMETI RAM, DOSTANEME CELKOVE ZPOZDENI MEZI PRIVEDENIM
ADRESY KODU ZNAKU NA ADRESOVOU SBERNICI A JEHO PRIVEDENIM DO
MOUDULATORU V DELCE ASI 900 NS (VYBAVOVACI DOBA RAM + VYBAVO-
VACI DOBA EPROM S GENERATOREM ZNAKU). KDYZ SROVNAME TUTO DOBU
S DELKOU TRVANI PRACOVNI DOBY T MIKROPROCESORU ZJISTIME, ZE
LZE CIST JEDEN KOD ZNAKU ZA DVE DOBY T CINNOSTI PROCESORU.
VZHLEDEM K DELCE TRVANI VIDITELNE CASTI RADKU NA OBRAZOVCE
DOSTANEME MAXIMALNI POCET 48 ZNAKU, KTERE LZE TAKTO ZOBARZIT.
JELIKOZ PRI ZOBRAZOVANI MUSI MIT PRENOS OBRAZOVE
INFORMACE PREDNOST PRED CINNOSTI MIKROPOCITACE, JE NUTNE
PRIPADNE KOLIZE POZADAVKU NA SYSTEMOVE SBERNICE RESIT
POZDRZENIM FUNKCE MIKROPROCESORU VLOZENIM CEKACICH STAVU TU.
PRO UCHOVANI PRECTENE INFORMACE POUZIJEME POMOCNY REGISTR,
KTERY PRODLOUZI PLATNOST KODU ZNAKU NA VSTUPECH GENERATORU
ZNAKU POZADOVANOU DOBU. NASLEDUJICI OBRAZEK UKAZUJE RESENI
KOLIZE POZADAVKU NA SYSTEMOVE SBERNICE PRI OPERACI CTENI A
ZAPISU.
---------------------------- 3 - 4 ------------------------
-------------------------------------------------------------
T2 TW T3
___ ___ ___ ___
F1 I I__________I I__________I I__________I I____
_______ _______ _______ ____
F2 ____I I______I I______I I______I
_______________ ______________
HODE _______I AKT. ZOBR. I______________I I
________________________ _______________
MR/ I_____________I
T2 T3 T4/T1
___ ___ ___ ___
F1 I I__________I I__________I I__________I I____
_______ _______ _______ ____
F2 ____I I______I I______I I______I
________ ______________
HODE I______________I AKT. ZOBR. I______________I
_________ ______________________________
MR/ I_____________I
IOR/
T2 T3 T4/T1
___ ___ ___ ___
F1 I I__________I I__________I I__________I I____
_______ _______ _______ ____
F2 ____I I______I I______I I______I
_______________ ______________
HODE _______I AKT. ZOBR. I______________I I
________________________ _______________
MW/ I_____________I
IOW/
T2 TW T3
___ ___ ___ ___
F1 I I__________I I__________I I__________I I____
_______ _______ _______ ____
F2 ____I I______I I______I I______I
_______ ______________
MODE I_______________I AKT. ZOBR. I______________I
_______________________________________
MW/ I_____________I
IOW/
OBR.1 RESENI KOLIZI POZADAVKU NA SBERNICE VKLADANIM CEKACICH
STAVU TW.
---------------------------- 3 - 5 ------------------------
-------------------------------------------------------------
Z CASOVE ANALYZY VYPLYVA, ZE POKUD JE RADIC ZOBRAZOVANI
V DRUHE POLOVINE DOBY T2 AKTIVNI A JDE O OPERACI CTENI, JE
TREBA POZASTAVIT PROCESOR VSUNUTIM JEDNE DOBY TW. POKUD VE
STEJNE SITUACI JDE O OPERACI ZAPISU? POZDRZENI PROCESORU NENI
NUTNE, NEBOT SE OPERACE UKONCI NA ZACATKU DOBY T4 (RESP. TI),
KDY JE RADIC ZOBRAZOVANI PASIVNI.
POKUD JE V DRUHE POLOVINE DOBY T2 RADIC ZOBRAZOVANI
PASIVNI A JDE O OPERACI CTENI, NENI TREBA PROCESOR
POZASTAVOVAT, NEBOT SE TATO OPERACE DOKONCI V ZACATKU DOBY T3
JESTE PRED AKTIVACI RADICE ZOBRAZOVANI. POKUD JDE VE STEJNE
SITUACI O OPERACI ZAPISU, KTERA SE PROVADI V DOBE T3 A
ZACATKU T4 (RESP. T1), JE NUTNE PROCESOR POZASTAVIT JEDNIM
STAVEM TW.
ZAPOJENI REALIZUJICI UVEDENE ROZHODOVANI JE POPSANO V
KAPITOLE 3.3 A JE INSPIROVANO ZAPOJENIM Z MIKROPOCITACE PMD-
85. NAVIC BYLO PROVEDENO OSETRENI HAZARDNICH STAVU, KTERE
VZNIKAJI NA RIDICI SBERNICI PRI AKTIVACI RADICE ZOBRAZOVANI,
A KTERE JSOU RESENY V PMD-85 PRIPOJENIM KONDENZATORU NA
RIDICI SIGNALY.
3.2. BLOKOVE SCHEMA SYSTEMU
----------------------------
BLOKOVE SCHEMA SYSTEMU PLAN 80A JE V PRILOZE S-1, KDE
JE POUZITO PRO OZNACENI BLOKU NASLEDUJICICH ZKRATEK:
CPU CENTRALNI JEDNOTKA (MIKROPROCESOR)
G GENERATOR HODINOVYCH SIGNALU
SCBD RADIC SYSTEMU A BUDIC DATOVE SBERNICE
TW OBVOD RESENI KOLIZI POZADAVKU NA POUZIVANI
SYSTEMOVYCH SBERNIC MIKROPROCESOREM A RADICEM
ZOBRAZOVANI
MX MULTIPLEXER PREPINAJICI NA SYSTEMOVOU SBERNICI
ADRESU BUD Z MIKROPROCESORU NEBO Z CITACE
ZOBRAZOVANI
CT CITAC ZOBRAZOVANI GENERUJICI PRISLUSNQU ADRESU PRO
PAMET RAM PRI AKTIVNIM RADICI ZOBRAZOVANI
SYNC GENERATOR SYNCHRONIZACNI SMESI A ZATEMNUJICICH
IMPULSU ODVOZENYCH Z ADRESY ZOBRAZOVANI
LATCH POMOCNY REGISTR PRO UCHOVANI ZOBRAZOVANYCH DAT
GZ GENERATOR ZNAKU (V REZIMU PLNE GRAFIKY SE VYNECHA
A PREMOSTI JAK JE CARKOVANE NAZNACENO)
PR POSUVNY REGISTR PROVADEJICI PARALELNE/SERIOVY
---------------------------- 3 - 6 ------------------------
-------------------------------------------------------------
PREVOD REZU ZOBRAZOVANYM ZNAKEM
VIDEO VIDEO MODULATOR
VF VF MODULATOR
TV TELEVIZNI PRIJIMAC, ZOBRAZOVACI JEDNOTKA
RAM OBVODY MISTNI PAMETI RAM
EPROM OBVODY MISTNI PAMETI EPROM
V/V VSTUPNE/VYSTUPNI OBVODY S NAZNACENYMI PORTY
INT PRERUSOVACI OBVODY
DRAM OBVODY DYNAMICKE PAMETI RAM (ZVLASTNI KONEKTOR)
DRCTR OBVODY GENERACE RIDICICH SIGNALU PRO DYNAMICKOU
PAMET RAM
CTRL BUS SYSTEMOVA RIDICI SBERNICE
DATA BUS SYSTEMOVA DATGVA SBERNICE
ADR BUS SYSTEMOVA ADRESOUA SBERNICE
CINNOST A SPOLUPRACE BLOKU CPU, G, SCBD, RAM, EPROM,
V/V A INT ODPOVIDA BEZNEMU MIKROPROCESOROVEMU SYSTEMU S 8080A
POPSANEMU V LITERATURE [5,9,15 ATD]. POPISEME PROTO JEN
ODLISNOSTI VNASENE ZOBRAZOVACIMI OBVODY.
BLOK TW ZAJISTUJE RESENI KOLIZI POZADAVKU NA SYSTEMOVE
SBERNICE OD MIKROPROCESORU A RADICE ZOBRAZOVANI. TENTO BLOK V
PODSTATE ROZHODUJE O TOM, ZDA DOBA NASLEDUJICI PO DOBE T2
BUDE DOBOU TW NEBO DOBOU T3.
BLOK MX PREPINA NA ADRESOVOU SYSTEMOVOU SBERNICI BUD
ADRESU GENEROVANOU MIKROPROCESOREM NEBO ADRESU GENEROVANOU
CITACEM ZOBRAZOVANI (A TO PRI AKTIVNIM RADICI ZOBRAZOVANI).
BLOK SYNC ODVOZUJE OD ADRESY GENEROVANE CITACEM
ZOBRAZOVANI SIGNALY PRO VERTIKALNI A HORIZONTALNI
SYNCHRONIZACI TV PRIJIMACE A SIGNALY ZATEMNOVANI PAPRSKU PRI
ZPETNYCH BEZICH.
BLOK LATCH UCHOVAVA KOD ZOBRAZOVANEHO ZNAKU PO DOBU
POTREBNOU GENERATORU ZNAKU GZ K VYTVORENI PRISUJSNEHO REZU
TIMTO ZNAKEM. BLOK PR PAK PROVADI PARALELNE/SERIOVY PREVOD
TOHOTO REZU NA PO SOBE JDOUCI BITY, ODPOVIDAJICI JASOVE
INFORMACI JEDNOHO ZOBRAZOVANEHO BODU. TATO INFORMACE SE VEDE
BUD DO VIDEO NEBO VF MODULATORU, KDE SE SPGLECNE SE SYNCHRO-
NIZACNIMI A ZETEMNOVACIMI SIGNALY ACASTNI NA GENERACI VIDEO,
RESP. VF SIGNALU PRO IV PRIJIMAC.
---------------------------- 3 - 7 ------------------------
-------------------------------------------------------------
BLOK DRCTR JE UMISTEN NA ZAKLABNI DESCE A VYTVARI
SOUBOR RIDICICH SIGNALU PRO DYNAMICKOU PAMET DRAM. TA SE
NACHAZI NA ZVLASTNIM PLOSNEM SPOJI A PRIPOJUJE SE PRES
SPECIALNE PRO NI VYHRAZENY KONEKTOR.
3.3. OBVODY CPU A JEJIHO OKOLI
-------------------------------
SCHEMA OBVODU CPU A JEJIHO OKOLI MA CISLO S-3.
PRINCIPIALNI ZAPOJENI ZAKLADNI JEDNOTKY SE NELISI OD
DOPORUCENI UVEDENYCH V KATALOGU VYROBCE. JADRO SYSTEMU TVORI
TROJICE OBVODU IO-49, IO-50 A IO-48 (MIKROPROCESOR MHB 8080A,
GENERATOR HODINOVYCH SIGNALU MH 8224 A RADIC SYSTEMU A BUDIC
DATOVE SBERNICE MH 8228).
POLOVINA OBVODU IO-59 (MH7474 / 09) A HRADLO EXL-OR IO-
52 (UCY7486 / 08) TVORI OBVOD RESENI KOLIZI POZADAVKU O
SYSTEMOVE SBERNICE OD MIKROPROCESORU A RADICE ZOBRAZOVANI.
FUNKCE OBVODU JE NASLEDUJICI: ZE STAVOVEHO SLOVA SE VYBIRA
BIT D1 = WO/, KTERY SE SESTUPNOU HRANOU SIGNALU STSTB/
(INVERZE SIGNALU SE PROVADI V INVERTORU I0-55/MH7404/08)
ZAPISE DO KLOPNEHO OBVODU. UVEDENY BIT NESE INFORMACI, ZDA V
DANEM STROJOVEM CYKLU PUJDE O ZAPIS (D1 = LOG 0) NEBO O CTENI
(D1 = LOG 1). SIGNAL MODE SE VEDE Z RADICE ZOBRAZOVANI A SVOU
VYSOKOU AROVNI URCUJE AKTIVNI STAV ZOBRAZOVANI. PODLE OBR. 1
JE NUTNO VYGENEROVAT SIGNAL READY PRO MIKROPROCESOR TAK, ABY
KOLIZE POZADAVKU NA SBERNICE BYLY RESENY VLOZENIM STAVU WAIT.
TATO FUNKCE MA TVAR:
MODE D1=WO/ READY
-------------------------
1 1 0
1 0 1
0 1 1
0 0 0
ODPORY R6, R40 A R41 (1K2) ZAJISTUJI ZVYSENOU UROVEN
LOG 1 PRO OBVODY MOS MIKRO-PROCESORU.
DRUHA POLOVINA OBVODU IO-59 (MH7474 / 05) ZAJISTUJE
SPRAVNE ZAHAJENI STAVU HOLD V ODPOVEDI NA SIGNAL HOLD/. PO
PRIJETI TOHOTO STAVU MIKROPROCESOREM, OZNAMI SE PRIJETI
ZADOSTI O ODPOJENI SE OD ZBERNIC POTVRZUJICIM SIGNALEM HLDA.
JEHO STAV JE STROBOVAN VZESTUPNOU HRANOU HODINOVEHO SIGNALU
F2(TTL). PRITOM JE ZAJISTENO, ABY V PRIPADE ZAPISOVE OPERACE
BYLO POZDRZENO ODPOJOVANI OD ZBERNIC SYSTEMU O JEDNU FUNKCNI
DOBU T, ABY SE OPERACE ZAPISU MOHLA DOKONCIT. SIGNALEM VEDE-
NYM Z VYSTUPU 05 OBVODU IO-59 (MH7474) SE UVEDOU DO VYSOKO-
IMPEDANCNIHO STAVU BUDICE RIDICICH I DATOVYCH SIGNALU V OBVO-
DU IO-48 (MH8228). HRADLO NAND IO-56 (MH7400 / 11) A INVERTOR
IO-55 (MH7404 / 04) ZAJISTUJI ZABLOKOVANI SIGNALU HLDA/ VEDE-
---------------------------- 3 - 8 ------------------------
-------------------------------------------------------------
NEHO NA MULTIPLEXERY ADRESY IO-43 AZ IO-46 (SN74LS257) PO
DOBU AKTIVNIHO SIGNALU HODE. TIM SE UMOZNI ZOBRAZOVANI I
BEHEM STAVU HOLD S TIM, ZE VYUZITI SYSTEMOVYCH SBERNIC
VNEJSIM OBVODEM (NAPR. RADICEM DMA) JE OMEZENO NA KAZDOU
DRUHOU FUNKCNI DOBU, KDY JE SIGNAL MODE = LOG 0.
MULTIPLEXERY IO-43 AZ IO-46 (SN74LS257) SLOUZI K PREPI-
NANI SYSTEMOVE ADRESOVE SBERNICE BUD NA ADRESOVE VYSTUPY
MIKROPROCESORU NEBO NA VYSTUPY CITACU RADICE ZOBRAZOVANI.
POKUD BUDE VYUZIVAN STAV HOLD, JE NUTNE POZIT TYPY S TRISTA-
VOVYMI VYSTUPY. POKUD NEBUDE STAV HOLD VYUZIVAN , LZE P0UZIT
TYPY UCY74157. PROPOJKY 149 - 172 SLOUZI K NASTAVENI ADRESY
ZOBRAZOVANI PRO REZIM SEMIGRAFIKY (S GENERATOREM ZNAKU) NEBO
PRO REZIM PLNE GRAFIKY. PRI REZIMU SEMIGRAFIKY JSOU BITY C6
AZ C8 CITACE ZOBRAZOVACI ADRESY VYUZITY PRO VOLBU REZU ZNAKEM
A VEDOU SE NA GENERATOR ZNAKU. PROTO SE V TOMTO REZIMU PRIPO-
JUJI BITY A6 A VYSSI ADRESOVE SBERNICE NA BITY C9 A VYSSI
CITACE ZOBRAZOVANI. PRI REZIMU PLNE GRAFIKY SE PROPOJUJI
STEJNOLEHLE BITY ADRESOVE SBERNICE A CITACE ZOBRAZOVANI (C6-
A6, C7-A7, ... , C13-A13).
U OBVODU TVORENEHO IO-51 (MH7474), IO-52 (UCY7486 /
03,11) A IO-56 (MH7400 / 08) BYLO POZADANO O OCHRANU AUTOR-
SKYM OSVEDENIM [40]. JDE 0 ZAPOJENI, KTERE ZAMEZUJE VZNIKU
HAZARDNICH STAVU NA RIDICICH SBERNICICH V SOUVISLOSTI S CIN-
NOSTI RADICE ZOBRAZOVANI. SVOU FUNKCI ZAMEZUJE VZNIKU DVOJNA-
SOBNYCH ZAPISOVYCH PULSU MEMW/, IOW/ A CTECICH PULSU IOR/ PRI
VKLADANI CEKACICH STAVU WAIT (A "ODPLAVANI" RIDICI SBERNICE).
POSUVNY REGISTR IO-47 (MH7496) JE ZDE VYUZIT JAKO PETI-
BITOVY REGISTR UMOZNUJICI PREPINANI ADRESY ZOBRAZOVANE STRAN-
KY PAMETI. PRI ZAPISOVANI DO NEJ JE TREBA NEJDRIVE VYNULOVAT
JEHO OBSAH SIGNALEM ADRES/ A TEPRVE PAK SIGNALEM ADRSET/
ZAPSAT POZADOVANOU INFORMACI Z DATOVE SBERNICE. PRITOM VZA-
JEMNY VZTAH MEZI DATOVYMI A ADRESOVYMI BITY JE NASLEDUJICI:
DATA ADRESA PROPOJKA
--------------------------
D0 A11 165-166
D1 A12 168-169
D2 A13 171-172
D3 A14 -
D4 A15 -
V REZIMU SEMIGRAFIKY SE PREPINANI ADRESY ZOBRAZOVANE RAM
DOSAHNE ZAPISEM NASLEDUJICICH BYTU DO REGISTRU NA ADRESE 1FH
(PRED KAZDYM ZAPISEM JE NUTNE REGISTR VYNULOVAT VYSLANIM
LIBOVOLNEHO OBSAHU NA ADRESU 18H).
----------------------------- 3 - 9 -----------------------
-------------------------------------------------------------
ADRESY D4 D3 D2 D1 DO HEX DEC
------------------------------------------------------------
0000-07FF 0 0 0 0 0 00 0
0800-0FFF 0 0 0 0 1 01 1
1000-17FF 0 0 0 1 0 02 2
1800-1FFF 0 0 0 1 1 03 3
2000-27FF 0 0 1 0 0 04 4
2800-2FFF 0 0 1 0 1 05 5
3000-37FF 0 0 1 1 0 06 6
3800-3FFF 0 0 1 1 1 07 7
4000-47FF 0 1 0 0 0 08 8
4800-4FFF 0 1 0 0 1 09 9
5000-57FF 0 1 0 1 0 0A 10
5800-5FFF 0 1 0 1 1 0B 11
6000-67FF 0 1 1 0 0 0C 12
6800-6FFF 0 1 1 0 1 0D 13
7000-77FF 0 1 1 1 0 0E 14
7800-7FFF 0 1 1 1 1 0F 15
8000-87FF 1 0 0 0 0 10 16
8800-8FFF 1 0 0 0 1 11 17
9000-97FF 1 0 0 1 0 12 18
9800-9FFF 1 0 0 1 1 13 19
A000-A7FF 1 0 1 0 0 14 20
A800-AFFF 1 0 1 0 1 15 21
B000-B7FF 1 0 1 1 0 16 22
B800-BFFF 1 0 1 1 1 17 23
C000-C7FF 1 1 0 0 0 18 24
C800-CFFF 1 1 0 0 1 19 25
D000-D7FF 1 1 0 1 0 1A 26
D800-DFFF 1 1 0 1 1 1B 27
E000-E7FF 1 1 1 0 0 1C 28
E800-EFFF 1 1 1 0 1 1D 29
F000-F7FF 1 1 1 1 0 1E 30
F800-FFFF 1 1 1 1 1 1F 31
POZN. ZOBRAZOVAT LZE POUZE PAMET TYPU RAM, NEBOT POUZE JEJI
DEKODERY JSOU PO DOBU AKTIVNIHO SIGNALU "MODE" ODBLOKOVANY.
V REZIMU PLNE GRAFIKY LZE TEDY ZOBRAZOVAT LIBOVOLNY ZE CTYR
KVADRU ZAPISEM NASLEDUJICICH BYTU NA PORT 1FH:
ADRESY BYTE(HEX)
----------------------
0000-3FFF 00H
4000-7FFF 08H
8000-BFFF 10H
C000-FFFF 18H
POZN. PRVNI A CTVRTY KVADR NELZE OBECNE VYUZIVAT V CELEM
ROZSAHU, POKUD JE V MIKROPOCITACI POUZIT ZAKLADNI MONITOR.
DATOVA SBERNICE JE OSETRENA ODPORY R14 - R22 (U
ZAKLADNI VERZE 12K, U ROZSIRENE VERZE S BUDICI DATOVE
SBERNICE 1K5) PRIPOJENYMI NA NAPAJECI NAPETI +5V. JEDNOTLIVE
RIDICI SIGNALY JSOU TAKTEZ OSETRENY ODPORY R34 - R37 A R49.
----------------------------- 3 - 10 ----------------------
-------------------------------------------------------------
3.4. RADIC ZOBRAZOVANI
-----------------------
SCHEMA ZAPOJENI RADICE ZOBRAZOVANI MA CISLO S-4.
ZAKLADNI CASOVANI CELEHO SYS1EMU ZOBRAZOVANI ZAJISTUJE
POSUVNY REGISTR IO-9 (MH74164). NA JEHO DATOVE VSTUPY JE
PRIVEDEN SIGNAL F2(TTL), KTERY JE HODINOVYMI IMPULSY OSC
ZAPISOVAN DO OBVODU A POSTUPNE POSOUVAN. NA VYSTUPECH Q1 AZ
Q8 (Q0...F2TTL) SE OBJEVUJE SOUSTAVA NEPREKRYVAJICICH SE
VZAJEMNE FAZOVE POSUNUTYCH IMPULSU (OBDOBA JOHNSONOVA CITACE)
UMOZNUJICI GENERACI RIDICICH SIGNALU BEZ NEBEZPECI VZNIKU
HAZARDNICH STAVU.
SIGNALY MUX, RAS/, CAS/ SLOUZI K RIZENI FUNKCE
DYNAMICKYCH PAMETI TYPU MHB4116. MUX PREPINA MULTIPLEXERY
ADRESY RADKU A SLOUPCE. SIGNAL RAS/ URCUJE OKAMZIK PLATNOSTI
ADRESY RADKU, CAS/ OKAMZIK PLATNOSTI ADRESY SLOUPCE.
OBVODY IO-14 (74S10) A IO-5 (MH74S00/11) ZAJISTUJI
GENERACI HODINOVYCH SIGNALU URGUJICICH JEDNGTLIVE BODY OBRAZU
(PIXLY). KAZDY REZ ZNAKEM V SEHIGRAFICE A ZOBRAZOVANY OBSAH
BYTU V PLNE GRAFICE SE SKLADA ZE SESTI (6) ZAKLADNICH BODU
(PIXLU) V OBRAZE. V REZIMU SEMIGRAFIKY JSOU JEDNOTLIVE REZY
CTENY Z PAMETI GENERATORU ZNAKU. V REZIMU PLNE GRAFIKY JE
ZAKLADNI SOUBOR ZNAKU ULOZEN V MONITORU V4.X, UZIVATELSKY
SOUBOR ZNAKU LZE UMISTIT DO RAM A PRES SPOJOVACI ADRESY
PODRIDIT MONITORU.
SIGNALY MODE A MODE/ UDAVAJI USEKY AKTIVNIHO
ZOBRAZOVANI (MODE = LOG1). SIGNAL PGM/ UMOZNUJE ZABLOKOVAT
ZOBRAZOVANI A UVEST SYSTEM DO REZIMU PRACE BEZ ZPOMALOVANI
VKLADANIM STAVU WAIT. ZPOMALENI SYSTEMU ZOBRAZOVANIM JE ASI
16%.
CITACE IO-16 AZ IO-19 (MH7493A) TVORI GENERATOR ADRESY
ZOBRAZOVANI C0-C14. DELIC DVEMI OBVODU IO-16 NAVIC ZAJISTUJE
PRODLOUZENI CYKLU ZOBRAZOVANI JEDNOHO ZNAKU NA DVE FUNKCNI
DOBY T.
SOUSTAVA OBVODU IO-3 (MH74S04), IO-4 (MH74S04/12), IO-5
(MH7405/02,12) A IO-2 (MH74S00/08,11) ZAJISTUJE GENERACI
SYNCHRONIZACNICH IMPULSU HORIZONTALNIHO ROZKLADU HSYN/ A
VERTIKALNIHO ROZKLADU VSYN/. JEJICH GENERACE JE DANA VZTAHYS:
HSYN = TMA * C2 * C3/
VSYN = C14 * C11/ * C10
KDE TMA JE SIGNAL Z VYSTUPU R/S KLOPNEHO OBVODU NASTAVOVA-
NEHO PRO 40 ZNAKU NA RADKU SOUCINEM C5 * C3 * CL A PRO
48 ZNAKU NA RADKU SOUCINEM C5 * C4 * CL, NULOVANEHO V
OBOU PRIPADECH SOUCINEM CL * C5/
Cn JSOU SIGNALY Z GENERATORU ADRESY ZOBRAZOVANI.
----------------------------- 3 - 11 -----------------------
-------------------------------------------------------------
SIGNALY SPOJENE SE ZOBRAZOVANIM MAJI TYTO PARAMETRY:
DELKA AKTIVITY SIGNALU VSYN ............... 1 MS
DELKA AKTIVITY SIGNALU HSYN................ 3,9 US
DOBA JEDNOHO SNIMKU ....................... 20,0 MS
CELKOVA DOBA JEDNOHO RADKU ................ 62,5 US
DOBA VIDITELNE CASTI RADKU SE 40 ZNAKY .... 39,1 US
DOBA VIDITELNE CASTI RADKU SE 48 ZNAKY .... 46,9 US
SIGNAL "BLOK", VYVEDENY NA PROPOJKU C. 40 UMOZNUJE
ZATEMNOVANI ZPETNYCH BEHU PAPRSKU PO OBRAZOVCE. POUZITIM
TOHOTO SIGNALU LZE DOSAHNOUT ZOBRAZOVACIHO REZIMU "CERNE
PISMO NA BILEM PAPIRU NA CERNE PODLOZCE".
3.9 62.5 [US]
!<---->!<------------------------------>!
_______ __________ ... __________ ______
VSYN/ |______| |______|
____________ ____________
BLOK ____| |_______ ... _______| |___
-->|--|<---->|--|<----------------->|<---------->|
2 3.9 9.7 46.6 15.6 [US]
____ __________ ... ___________ ____
HSYN/ |________| |________|
|<------>|<--------------------------------->|
1 20 [MS]
DIODY D3 A D4 SLOUZI K ZATEMNENI CASTI OBRAZOVKY (D4
JEJI HORNI POLOVINY, D3 JEJI PRVNI A TRETI CTVRTINY ZHORA)
PRI POUZITI MENSI PAMETI RAM NEZ 4 KBYTE, KDY SE ZOBRAZUJE
POUZE 16 NEBO JEN 8 RADKU MISTO PLNYCH 32 RADKU.
REGISTR IO-13 <MH8282> SLOUZI K UCHOVANI ZOBRAZOVANE
INFORMACE PO DVE FUNKCNI DOBY T. TYTO DATA SE VEDOU NA
ADRESOVE VSTUPY GENERATORU ZNAKU IO-12 (VOLITELNE MHB
8708/8608 NEBO MHB2716/C POMOCI PROPJEK 34 AZ 38). VZHLEDEM K
TOMU, ZE GENERATOR ZNAKU TVORI PROGRAMOVATELNA PEVNA PAMET A
ZE LZE POUZIT PAMET O KAPACITE 2 KBYTE NA AZ 256 ZNAKU, LZE
VYTVORIT GENERATOR PRO SPECIALNI ZNAKY CESKE ABECEDY S VELKY-
MI I MALYMI PISMENY. TIM SE ROZSIRUJE MOZNOST POUZITI MIKRO-
POCITACE I NA OBLAST ZPRACOVAVANI CESKYCH TEXTU.
----------------------------- 3 - 12 ---------------------
------------------------------------------------------------
V REZIMU PLNE GRAFIKY SE GENERATOR ZNAKU VYNECHAVA A JE
NAHRAZEN PROGRAMOVOU KRESBOU ZNAKU. PRITOM JE UMOZNENO
PROGRAMOVE VYTVORIT UZIVATELSKY SOUBOR ZNAKU UMISTENY V RAM A
VCLENIT JEJ DO MONITORU V4.X. V REZIMU PLNE GRAFIKY SE PROPO-
JI V SOKLU OBVODU IO-12 NASLEDUJICI VYVODY (LZE POUZIT I
TRANSPARENTNE NAPROGRAMOVANE EPROM):
15 - 05 (D0)
14 - 04 (D1)
13 - 03 (D2)
11 - 02 (D3)
10 - 01 (D4)
09 - 23 (D5)
DVA NEJVYSSI BITY D6 A D7 LZE V REZIMU PLNE GRAFIKY
VYUZIT BUD K INVERZI CELEHO BYTU (D7) A K MODULACI JASU
CELEHO BYTU (D6) NEBO OBA BITY POUZIT K PRENOSU INFORMACE O
BARVE ZOBRAZOVANEHO BYTU (D6...VID1, D7...VID2).
KLOPNY OBVOD IO-15 (MH7474/09) UMOZNUJE V OBOU REZIMECH
UCHOVANI BITU D7 A V SOUCINNOSTI S HRADLEM IO-01 (UCY7486/11)
PROGRAMOVE INVERTOVAT ZOBRAZOVANY BYTE V REZIMU PLNE GRAFIKY,
POPR. CELY ZNAK V REZIMU SEMIGRAFIKY.
POSUVNE REGISTRY IO-10,11 (MH7496) ZAJISTUJI PARALELNE
SERIOVY PREVOD ZOBRAZOVANEHO BYTU, JAKO PRVNI SE ZOBRAZUJE
BIT DO, JAKO POSLEDNI BIT D5.
INVERTORY IO-06 (08,06,04) SPOLU S ODPOREM R5 A DIODAMI
D1,D2 TVORI VIDEO MODULACNI CAST. AMPLITUDOVE MODULOVANY
SIGNAL SE VEDE PRES ODPOR R4 (RIZENI HLOUBKY VF MODULACE) NA
PRIPADNY VF MODULATOR.
PROPOJKY 22 AZ 23 UMOZNUJI VOLBU ZOBRAZOVANI MEZI 40 A
48 ZNAKY NA JEDNOM RADKU.
ROZBELENI ADRES ZOBRAZOVANE PAMETI V REZIMU SEMIGRAFIKY
JE UKAZANO NA PRIKLADU PAMETI 4 KBYTES
0800 0801 0802 ... 082E 082F 0830 ... 083F
0840 0841 0842 ... 086E 086F 0870 ... 087F
. . . ... . . . ... .
. . . ... . . . ... .
0FC0 0FC1 0FC2 ... 0FEE 0FEF 0FF0 ... 0FFF
\_______________ _______________/ \______ _____/
\/ \/
VIDITELNA NEVIDITELNA
CAST CAST
----------------------------- 3-16 ------------------------
-------------------------------------------------------------
ROZDELENI ADRES PRI ZOBRAZOVANI V REZIMU PLNE GRAFIKY
JE UKAZANO NA PRIKLADU 48 KBYTOVE PAMETI:
8000 8001 8002 ... 802E 802F 8030 ... 803F
8040 8041 8042 ... 806E 806F 8070 ... 807F
8080 8081 8082 ... 80AE 80AF 80B0 ... 80BF
. . . ... . . . ... .
. . . ... . . . ... .
BF80 BF81 BF82 ... BFAE BFAF BFBO ... BFBF
BFCO BFC1 BFC2 ... BFEE BFEF BFFO ... BFFF
\_______________ ______________/ \______ ______/
\/ \/
VIDITELNA NEVIDITELNA
CAST CAST
ADRESY NACHAZEJICI SE V TZV. NEVIDITELNE CASTI
OBRAZOVKY JSOU VYUZIVANY ZCASTI MONITOREM A JINYMI
SYSTEMOVYMI PROGRAMY (PRVNICH 8 RADKU). ZBYLE MOHOU BYT
POUZITY LIBOVOLNYM ZPUSOBEM V UZIVATELSKYCH PROGRAMECH.
V REZIMU PLNE GRAFIKY SE ZOBRAZUJE BIT PO BITU, PRITOM
JAKO PRVNI SE ZOBRAZUJE BIT DO, JAKO DRUHY BIT D1, ... , JAKO
POSLEDNI BIT B5:
... D0 D1 D2 D3 D4 D5 D0 D1 ...
\___________ _________/
\/
JEDEN BYTE
PRO PRIPOJENI ZOBRAZOVACICH JEDNOTEK (TELEVIZNICH
MONITORU) SE VYVADI NA KONEKTOR "HODINOVYCH SIGNALU" IMPULSY
SNIMKOVEHO ROZKLADU (HSYNC/), RADKOVEHO ROZKLADU (VSYNC/),
MODULACE JASU (VIDEO/) A CELKOVEHO SMISENEHO VIDEOSIGNALU
SPOLECNE SE SYNCHRONIZACI (SMES).
PRO SPECIALNI UCELY SLOUZI VYVODY C14(VID1) A
C11(VID2). NA NE LZE POMOCI PROPOJEK PRIPOJIT SEDMY A OSMY
NEZOBRAZOVANY BIT (PROPOJKY 27-29, 25-30) NEBO SIGNALY Z
CASOVE ZAKLADNY C11 A C14 (PROPOJKY 25-26, 28-29). NA
NEKTEROU Z TECHTO PROPOJEK LZE VYVEST TAKE SIGNAL C5
(PROPOJKA 44) NEBO SIGNAL BLOKOVANI PRI ZPETNYCH BEZICH
(PROPOJKA 40).
3.5. OBVODY PAMETI RAM
-----------------------
SCHEMA ZAPOJENI PAMETI RAM MA CISLO S-5. DEKODER
PAMETOVEHO PROSTORU IO-28 (MH3205) ZAJISTUJE ADRESOVANI 4
KBYTE RAM ZAKLADNI DESKY, TVORENE IO-34 AZ IO-41 (MHB2114).
----------------------------- 3 - 14 ----------------------
-------------------------------------------------------------
POUZDRA TECHTO PAMETI JSOU NA DESCE PLOSNEHO SPOJE FYZICKY
ROZMISTENY PODLE NASLEDUJICI TABULKY:
POUZDRO ADRESY BITY
IO-34 0000-03FF D4-D7
IO-35 0400-07FF D4-D7
IO-36 0800-0BFF D4-D7
IO-37 0C00-0FFF D4-D7
IO-38 0000-03FF D0-D3
IO-39 0400-07FF D0-D3
IO-40 0800-0BFF D0-D3
IO-41 0C00-0FFF D0-D3
POZN. ROZMISTENI JE STEJNE PRO VSECHNY OSMICE KILOBYTU, NA
KTERE JE NASTAVEN DEKODER ADRESY PAMETI RAM.
DEKODER JE AKTIVOVAN SOUCTEM SIGNALU MODE/ (ZOBRAZOVA-
NI), MWS/ (ZAPIS) A MEMR/ (CTENI) V SOUCINNOSTI S ADRESOVYMI
BITY A13 AZ A15. UMISTEMI ADRESOVANE OBLASTI V PAMETOVEM
PROSTORU SE PROVADI PRISLUSNYM PROPOJENIM PROPOJEK:
ADRESY A15 A14 A13 P R O P O J I T
0000-1FFF 0 0 0 12-14, 07-09, 10-16
2000-3FFF 0 0 1 12-14, 07-09, 15-16
4000-5FFF 0 1 0 12-14, 07-08, 10-16
6000-7FFF 0 1 1 12-14, 07-08, 15-16
8000-9FFF 1 0 0 12-13, 07-09, 10-16
A000-BFFF 1 0 1 12-13, 07-09, 15-16
C000-DFFF 1 1 0 12-13, 07-08, 10-16
E000-FFFF 1 1 1 12-13, 07-08, 15-16
POZN. ODPOJENI CELE PAMETI RAM NA ZAKLADNI DESCE LZE DOCILIT
ROZPOJENIM PROPOJKY C. 16.
OBVODY IO-29 (UCY7407) UMOZNUJI POUZITI I JINYCH OBVODU
RAM NEZ 2114 (NAPR. 6116) UMISTENYCH V KONEKTORU NEKTERE Z
EPROM. PROPOJKY 139 AZ 144 UMOZNUJI SPOJOVAT VYBEROVE SIGNALY
POUZDER PRO VICEKILOBYTOVE OBVODY RAM.
SOUSTAVA OBVODU IO-31 (MH74S20/06), IO-3 0 (MH74S04),
IO-05 (MH74S00) A IO-32 (MH74S00) ZAJISTUJI GENERACI SIGNALU
RIDICICH ODBLOKOVANI A SMER PRENOSU DAT BUDICEM DATOVE
SBERNICE IO-42 (MH8286).
SIGNALY DRAMEN/ A DRAMINH/ SLOUZI K RIZENI DYNAMICKE
PAMETI RAM 64 KBYTE. DRAMEN/ VZNIKA SLOUCENIM SIGNALU MEMR/,
MUS/ A MODE/ A URCUJE VSECHNY MOZNE OKAMZIKY AKTIVACE DYNAMI-
CKE PAMETI RAM. SIGNAL DRAMINH/ JE ODVOZEN OD VYBEROVYCH
SIGNALU POUZDER PAMETI RAM NEBO EPROM NA ZAKLADNI DESCE A
UMOZNUJE ZABLOKOVANI OBLASTI DYNAMICKE RAM SE STEJNYMI ADRE-
SAMI JAKO PAMETI NA ZAKLADNI DESCE.
PREKRYVANI DYNAMICKE A STATICKE PAMETI MUZE VEST KE
----------------------------- 3 - 15 ----------------------
-------------------------------------------------------------
SNIZENI SPOLEHLIVOSTI SYSTEMU U TECH TYPU STATICKYCH PAMETI
RAM, KTERYCH DOSTUPGVA DOBA NEMA ZADNE RESERVY VUCI HODNOTE
450 NS (NEKTERE SERIE PAMETI TESLA MHB2114 A POD). PROTO SE
TAKOVE PREKRYVANI NEDOPORUCUJE, BYT BY BYLO SIGNALEM DRAMINH/
UMOZNENO. V PRIPADE POUZITI STATICKEHO I. DYNAMICKEHO TYPU
PAMETI V JEDNOM SYSTEMU SE DOPORUCUJE BUD UMISTIT STATICKOU
PAMET NAD DYNAMICKOU (MOZNE PRO 16-32-48 KBYTE DYNAMICKE
PAMETI), NEBO STATICKOU PAMET UPLNE ODPOJIT (ODPOJENI
PROPOJKY C. 16).
POMOCI PROPOJEK 139 AZ 144, POPR. VOLNYCH PROPOJEK Z
VYSTUPU DEKODERU PAMETI EPROM IO-26, LZE GENEROVAT SIGNALY
CS1/ A CS2/. JDE O VYBEROVE SIGNALY POUZDER, KTERE UMOZNUJI
ROZSIRENI PAMETI RAM, RESP. EPROM O POUZDRA NACHAZEJICI SE
MIMO ZAKLADNI DESKU (JSOU VEDENY NA KONEKTOR DYNAMICKE RAM).
3.6. OBVODY PAMETI EPROM
-------------------------
SCHEMA ZAPOJENI PAME1I EPROM MA CISLO S-6. DEKODER JE
TVOREN IO-26 (MH8205), KTERY MUZE ADRESOVAT LOBGVOLNY KILO-
BYTE NEBO JEJICH DVOJICI V PAMETOVEM PROSTORU PODLE PREPNUTI
PROPOJEK. V PRIPADE, ZE JE ZADANO ADRESOVANI PO JEDNOTLIVYCH
KILOBYTECH (PRO TYP 2708), PROPOJIME PROPOJKY 41-42 A PRO
UMISTENI DEKODERU ADRESY V RAMCI PAMETOVEHO PROSTORU PLATI:
ADRESY A15 A14 A13 P R O P O J I T
0000-1FFF 0 0 0 04-06, 01-03, 11-15
2000-3FFF 0 0 1 04-06, 01-03, 10-11
4000-5FFF 0 1 0 04-06, 01-02, 11-15
6000-7FFF 0 1 1 04-06, 01-02, 10-11
8000-9FFF 1 0 0 04-05, 01-03, 11-15
A000-BFFF 1 0 1 04-05, 01-03, 10-11
C000-DFFF 1 1 0 04-05, 01-02, 11-15
E000-FFFF 1 1 1 04-05, 01-02, 10-11
NA VYSTUPECH DEKODERU JSOU NAPOJENY NEINVERTUJICI SLE-
DOVACE S OTEVRENYM KOLEKTOROVYM VYSTUPEM IO-27 A IO-29
(UCY7407), KTERE UMOZNUJI SLUCOVAT VYBEROVE SIGNALY POUZDER
DO JEDINEHO PRO VICEKILOBYTOVE OBVODY EPROM. VOLBA SE PROVADI
SPOJENIM PROPOJEK 123 AZ 138. SPOJENI JEDNOTLIVYCH PROPOJEK S
ADRESAMI A POUZDRY PAMETI UKAZUJE NASLEDUJICI TABULKA:
A12 A11 A10 PROP. ! PROP. POUZDRO
-------------------------------+------------------------
0 0 0 123 ! 124 IO-22
0 0 1 125 ! 126 IO-23
0 1 0 127 ! 128 IO-24
0 1 1 129 ! 130 IO-25
1 0 0 131 ! 132 CS-2/
1 0 1 133 ! 134 CS-1/
1 1 0 135 ! 136 IO-20
----------------------------- 3 - 16 ----------------------
-------------------------------------------------------------
1 1 1 137 ! 136 IO-21
V PRIPADE ADRESACE PO DVOJICICH KILOBYTU (PRO POUZDRA
2716 A 2732), PROPOJIME 42-43 A PRO UMISTENI ADRESOVEHO
DEKODERU V PAMETOVEM PROSTORU PLATI:
ADRESY A15 A14 PROPOJIT
0000-3FFF 0 0 4-6, 1-3
4000-7FFF 0 1 4-6, 1-2
8000-BFFF 1 0 4-5, 1-3
C000-FFFF 1 1 4-5, 1-2
VZHLEDEM K TOMU, ZE JE PORADI ADRESOVYCH VODICU
PRIPOJENYCH NA VSTUPY DEKODERU JINE, ODPOVIDAJI ROZSAHUM
ADRES NASLEDUJICI PROPOJKY:
ADRESY A12 A11 A13 PROPOJKA
0000-07FF 0 0 0 123
0800-0FFF 0 1 0 127
1000-17FF 1 0 0 131
1800-1FFF 1 1 0 135
2000-27FF 0 0 1 125
2800-2FFF 0 1 1 129
3000-37FF 1 0 1 133
3800-3FFF 1 1 1 137
POZN. OBDOBNE PRIRAZENI PLATI S PRISLUSNYM OFFSETEM PRO
OSTATNI KVADRY PAMETI.
OBVOD IO-32 (MH74S00) A IO-01 (UCY7486) ZAJISTUJE
INICIACI (TZV. BOOT) SYSTEMU PO ZAPOJENI DO SITE. TENTO OBVOD
JE SIGNALEM RST/ UVEDEN DO STAVU BOOT, VE KTEREM VYBIRA EPROM
NA POZICI IO-21 (NEZAVISLE NA JEJI FYZICKE ADRESE PODLE
DEKODERU). V TETO EPROM PAK MUSI BYT NA PRVNI POZICI NAHRAN
SKOK DO SKUTECNE STARTOVACI ADRESY PROGRAMU (TAKTEZ UMISTENE
V TETO EPROM). VZNIKLY VYBEROVY SIGNAL PROVEDE NASTAVENI
BOOTOVACIHO OBVODU DO PRACOVNIHO STAVU.
PAMETOVE OBVODY IO-20 AZ IO-25 MOHOU BYT TYPU MHB8708
(1 KILOBYTOVE), MHB2716/C (2 KYLOBYTOVE) NEBO 12732 (4 KILO-
BYTOVE). VOLBA SE PROVADI PROPOJENIM PRISLUSNYCH PROPOJEK.
NAVOD PROPOJOVANI JE V KAPITOLE 4.3. U SOV. EKVIVALENTU
(K573RF5) JE TREBA PROVEST VYBER, NEBOT NEKTERE SERIE TECHTO
OBVODU NEZAJISTOVALY SPOLEHLIVY CHOD SYSTEMU. OSVEDCILA SE
SERIE S KODEM DATA VYROBY 8703. PRO ORIENTACI JSOU UVEDENY
OZNACENI JEDNOTLIVYCH VYVODU PRO VSECHNY TRI TYPY PAMETI
EPROM:
----------------------------- 3 - 17 ----------------------
-------------------------------------------------------------
VYVOD TYPY:
CISLO MHB8708 MHB2716/C I2732
1 A7 A7 A7
2 A6 A6 A6
3 A5 A5 A5
4 A4 A4 A4
5 A3 A3 A3
6 A2 A2 A2
7 A1 A1 A1
8 A0 A0 A0
9 D0 D0 D0
10 D1 D1 D1
11 D2 D2 D2
12 GND GND GND
13 D3 D3 D3
14 D4 D4 D4
15 D5 D5 D5
16 D6 D6 D6
17 D7 D7 D7
18 PGM CE/ CE/
19 VDD A10 A10
20 CS/,WE/ OE/ OE/,VPP
21 VBB VPP A11
22 A9 A9 A9
23 A8 A8 A8
24 VCC VCC VCC
POZN. VBB ... -5V, VDD ... +12V, VCC ... +5V, GND ... 0V
3.7. VSTUPNE / VYSTUPNI OBVODY
-------------------------------
SCHEMA ZAPOJENI OBVODU VSTUPU / VYSTUPU MA CISLO S-7.
DEKODER JE TVOREN OBVODEM IO-54 (MH3205). JEDNOTLIVYM ADRESAM
PAK PRISLUSI NASLEDUJICI OBVODY:
A7......A0
XX0000XX STAVOVY PORT (3216)
XX0001XX VSTUPNI PORT KLAVESNICE (3212)
XX0010XX KOMUNIKACNI OBVOD (8255)
XX0011XX TEST PROGRAMOVE KLAVESNICE
XX0100XX BUZENI ZVUKOVE SIGNALIZACE
XX0101XX REDIC PRERUSENI (8214)
XX0110XX NULOVANI REGISTRU ADRESY ZOBRAZOVANI
XX0111XX NASTAVENI REGISTRU ADRESY ZOBRAZOVANI
----------------------------- 3 - 18 ----------------------
-------------------------------------------------------------
PRO PRIPADNE ROZSIRENI JE TREBA DODRZET ZASADU, ZE
VSECHNY ADRESY V/V OBVODU UMISTENYCH NA ZAKLADNI DESCE MAJI
ADRESU S A5=0. PRO VSECHNY PRIDAVNE OBVODY PAK MUSI PLATITR
ZE MAJI ADRESU S A5=1, ABY NEDOSLO KE KOLIZIM NA DATOVE
SBERNICI. JE PREDEPSANO NASLEDUJICI ROZDELENI V/V ADRES:
A7......A0
101000XX RADIC DISKET - VYBER POUZDRA I8271
101001XX RADIC DISKET - RESERVOVANO
10I010XX RADIC DISKET - VYBER POUZDRA I8272
101011XX RADIC DISKET - REZERVOVANO
101100XX RADIC DISKET - AKTIVACE RESET
101101XX RADIC DISKET - PASIVACE RESETU
101110XX RADIC DISKET - NASTAVENI HODIN 2 MHZ
101111XX RADIC DISKET - NASTAVENI HODIN 4 MHZ
011000XX REZERVOVANO
011001XX REZERVOVANO
011010XX '8255 PREVODNIKU A/D
011011XX '8253 PREVODNIKU D/A
011100XX '8251 PRO MAGNETOFON PMD-85
011101XX REZERVOVANO
011110XX REZERVOVANO
011111XX VOTRAX SC-01 (SYNTEZA RECI)
111000XX UZIVATELSKE - NEPOUZITO V SYSTEMU
111001XX UZIVATELSKE - NEPOUZITO V SYSTEMU
1I1010XX UZIVATELSKE - NEPOUZITO V SYSTEMU
111011XX UZIVATELSKE - NEPOUZITO V SYSTEMU
111100XX UZIVATELSKE - NEPOUZITO V SYSTEMU
111101XX UZIVATELSKE - NEPOUZITO V SYSTEMU
111110XX UZIVATELSKE - NEPOUZITO V SYSTEMU
111111XX UZIVATELSKE - NEPOUZITO V SYSTEMU
HRADLA IO-58 (MH7430) A IO-56 (MH7400/06) ZAJISTUJI
AKTIVACI BUDICE DATOVE SBERNICE IO-62 (MH8286) PRI VYBERU
NEKTEREHO Z V/V OBVODU NA ZAKLADNI DESCE. SMER UVEDENEHO
BUDICE JE ODVOZEN ZE SIGNALU IOWS/.
PRERUSOVACI SYSTEM JE TVOREN V ZAKLADNI SESTAVE POUZE
KLOPNYM OBVODEM IO-57 (MH7474/08). JDE O JEDNOUROVNOVE
PRERUSENI RST 7, KTERE LZE VYVOLAT TLACITKEM INT. (PRI JEDNO-
DUCHYCH REGULACNICH APLIKACICH LZE PRIVEST CASOVE EKVIDIS-
TANTNI IMPULSY DRATOVOU PROPOJKOU NA VSTUP TOHOTO OBVODU A
ZISKAT TAK ZAKLADNI SYSTEM REALNEHO CASU). V TOMTO PRIPADE
PROPOJUJEME 181-179 A OBVOD IO-60 NEOSAZUJEME (!). PRI
POZADAVKU NA VICEAROVNOVY PRIORIZOVANY PRERUSOVACI SYSTEM
POUZIJEME OBVODU IO-60 (MH3214) JAKO RADICE A PROPOJUJEME
179-180. I V TOMTO REZIMU JE ZAJISTENA FUNKCE TLACITKA INI
VYVOLAVAJICIHO PRERUSENI RST 7. K DISPOZICI JSOU DALE CTYRI
UROVNE PRERUSENI RST0, RST1, RST5 A RST6 (NEJNIZSI PRIORITA
----------------------------- 3 - 19 ----------------------
-------------------------------------------------------------
RST6, NEJVYSSI RST0).
PRI OVLADANI OBVODU HH3214 JE NUTNE DODRZET PREDEPSANY
POSTUP PRI SPOUSTENI PRERUSOVACIHO REZIMU. V PRVNI RADE JE
NUTNE ZAPSAT TZV. PRIORITNI MASKU PRERUSENI, UDAVAJICI UROVEN
PRERUSENI, OD KTERE SE BUDOU ZADOSTI BRAT V UVAHU. PRAKTICKY
SE ZAPIS MASKY PROVADI JAKO ZAPIS BYTU NA VYSTUPNI PORT #14H.
JEDNOTLIVE MASKY MAJI VYZNAM:
MASKA POVOLENE UROVNE PRERUSENI
08H 0,1,2,3,4,5,6,7
07H 0,1,2,3,4,5,6
06H 0,1,2,3,4,5
05H 0,1,2,3,4
04H 0,1,2,3
03H 0,1,2
02H 0,1
01H 0
00H - - - (VSECHNY ZAKAZANE)
PRO AKTIVACI PRERUSOVACIHO SYSTEMU MUSI BYT SIGNAL
ZADOSTI O PRERUSENI INTX/ PODRZEN V AKTIVNI UROVNI TAK
DLOUHO, DOKUD OD SYSTEMU NEPRIJDE POTVRZENI O JEHO PRIJETI
SIGNALEM INTA/. TIMTO SIGNALEM MUSI BYT ZADOST O PRERUSENI
PASIVOVANA.
______ _________________
INTX/ !____________ ... _____________!
___________________ ... ________ __________
INTA/ !___________!
VZHLEDEM K TOMU, ZE HODINOVY SIGNAL ZAPISU ZADOSTI O
PRERUSENI DO RADICE MA FREKVENCI 50 KHZ, NESMI BYT CETNOST
ZADOSTI O PRERUSENI VYSSI. VETSINOU VSAK BYVA NEJKRATSI MOZNA
PERIODA MEZI PRICHODY ZADOSTI O PRERUSENI DANA DELKOU
OBSLUZNEHO PROGRAMU.
V SYSTEMU PLAN 80A JE Z PROSTOROVYCH DUV0DU ZAPOJEN
RADIC PRERUSOVACIHO SYSTEMU 8214 BEZ POMOCNEHO REGISTRU 8212.
JE TO UMOZNENO LOGICKYM ZISKEM VYSTUPU RADICE 8214 (10 ZATEZI
TTL) A JEJICH TYPEM - OTEVRENY KOLEKTOROVY VYSTUP. VYUZIVA SE
DALE OSETRUJICICH ODPORU U DATOVE SBERNICE, KTERE VNUTI NA
NENULOVE BITY HODNOTU LOG 1.
TOTO USPORADANI MA VSAK NEVYHODU V CASOVEM OMEZENI
PLATNOSTI SIGNALU ZADOSTI O PRERUSENI NA PERIODU HODINOVEHO
SIGNALU, TJ. 20 US. POKUD NENI POZADAVEK BEHEM TETO DOBY
OBSLOUZEN, JE IGNOROVAN I KDYZ NA VSTUPECH INT0-7 JE AKTIVNI
SIGNAL ZADOSTI O PRERUSENI. NEBEZPECI ZTRATY SYNCHRONIZACE
LZE OBEJIT TAK, ZE V KAZDE KRITICKE SEKCI ZACINAJICI ZAKAZEM
PRERUSENI (INSTRUKCI DI) PROVEDEME PRED JEHO OPETONYM
----------------------------- 3 - 20 ----------------------
-------------------------------------------------------------
POVOLENIM (INSTRUKCI EL) ZNOVUNASTAVENI MASKY PRERUSENI. TIM
SE ZAJISTI, ZE ZADOST O PRERUSENI PRONIKNE VZDY AZ K
MIKROPROCESORU.
PRO VSTUP DAT Z KLAVESNICE JE URCEN SAMOSTATNY STYKOVY
OBVOD IO-67 (MH3212). DATA Z KLAVESNICE JSOU PRIVADENA PO
SBERNICI PK0-PK7. SIGNAL RDY/ S AKTIVNI NIZKOU AROVNI SLOUZI
K ZAPISU INFORMACE DO MIKROPOCITACE A JE GENEROVAN KLAVESNICI
PO USTALENI KODU ZNAKU. SIGNAL ACK/ S AKTIVNI NIZKOU AROVNI
POTVRZUJE PREVZETI TECHTO DAT MIKROPOCITACEM. CASOVY PRUBEH
SIGNALU PRI KOMUNIKACI S KLAVESNICI JE:
_______ ___________________________________ __________
DATA _______X___________________________________X__________
| |
__________________________________ |
ACK/ ____I | I___________________
| |
____________ _____________________
RDY/ | I___________________I |
| | | |
|<-->|<----------------->|<-------->|
MIN 20 NS MIN 40 NS > 0
BIT PK7 LZE VYUZIT NEJEN K PRENOSU DATOVE INFORMACE,
ALE I K PRENOSU STAVOVE INFORMACE (NAPR. PRI PROGRAMOVEM
OPAKOVANI DELE PODRZENE KLAVESY). TENTO BIT JE TOTIZ VEDEN
TEZ NA STAVOVY PORT IO-61 (MH3216). NA JEHO VSTUPY JSOU DALE
NAPOJENY NASLEDUJICI STAVOVE SIGNALY:
BIT STAVOVY SIGNAL
D3 STATUS KLAVESNICE (0...READY)
D2 PRIZNAK OPAKOVANI (PK7)
D1 ZADOST O PRERUSENI INT/
D0 VNEJSI STAVOVY SIGNAL PV0
KLOPNY OBVOD IO-57 (MH7474/06) A HRADLO IO-68 (MH7430)
UMOZNUJI POUZITI MATICOVE KONTAKTNI KLAVESNICE S PROGRAMOVYM
DEKODOVANIM A POCTEM KLAVES OMEZENYM NA 32. GENERACE
POTREBNYCH BUDICICH SIGNALU PRO TUTO KLAVESNICI JE TAKTEZ
ZAJISTENA PROGRAMOVE PRES VYSTUPNI PORT PV1-PV4 (IO-61).
PROGRAMOVATELNY STYKOVY OBVOD IO-64 (MHB8255A) MA
POSILENE VYSTUPY (RESP. ODDELENE VSTUPY) BUDICI IO-63, IO-65,
IO-66 (MH8286). JEJICH SMER JE NASTAVITELNY PROPOJKAMI,
PRICEMZ UROVEN LOG 1 NA VSTUPU T NASMERUJE BUDIC JAKO
VYSTUPNI A LOG 0 JAKO VSTUPNI. OBVOD MHB8255A MUSI MIT
PROGRAMOVE NASMEROVANE PORTY STEJNYMI SMERY JAKO JSOU
PRISLUSNE BUDICE, JINAK BY MOHLO DOJIT K JEHO POSKOZENI.
(POZN. PO INICIACI JSOU VSECHNY PORTY VE TRETIM, VYSOKG-
OHMOVEM STAVU). PRO TY, KTERI BUDOU DOVAZET SOUCASTKY ZE
ZAHRANICI SE DOPORUCUJE POUZITI RYCHLEJSICH VERZI STYKOVEHO
OBVODU, NAPR. I8255A-5 S DOBOU PRISTUPU 300 NS.
----------------------------- 3 - 21 ----------------------
-------------------------------------------------------------
3.8. VIDEO A VF MODULATORY
---------------------------
PRIKLAD ZAPOJENI VF MODULATORU JE VE SCHEMATU C. S-4
(RADIC ZOBRAZENI). LZE POUZIT I JINE OBDOBNE ZAPOJENI.
MODULATOR JE UMISTEN DO KOVOVE KRABICKY O ROZMERECH 30 X 35 X
15 MM. PRO VYVOD SIGNALU JE POUZIT SOUOSY KONEKTOR (BNC). JE
TREBA UPOZORNIT NA NUTNOST POUZITI PRUCHODKOVEHO KONDENZATORU
V PRIVODU NAPAJECIHO NAPETI. ZAMEZI SE TIM PRUNIKU RUSENI Z
ROZVODU NAPAJENI DO MODULATORU. PREDPOKLADA SE VYROBA A
PRODEJ OZIVENEHO VF MODULATORU VE V.D. DRUKOV.
----------------------------- 3 - 22 ----------------------
-------------------------------------------------------------
4. PREDPIS PRO OSAZOVANI A OZIVOVANI ZAKLADNI DESKY
======================================================
OSAZOVACI A OZIVOVACI PREDPIS JE ROZDELEN DO NEKOLIKA
CASTI TAK, ABY JIZ OZIVENE CASTI SYSTEMU MOHLY SLOUZIT JAKO
OZIVOVACI POMUCKA PRO PRAVE OZIVOVANE CASTI. JEDNOTLIVE UKONY
JSOU OCISLOVANY TAK, JAK BY SE MELY POSTUPNE PROVADET.
DODRZENI TOHOTO POSTUPU JE NUTNE PROTO, ZE NEKTERE UKONY JSOU
ZARAZENY POUZE Z DUVODU TESTOVANI PRAVE OZIVOVANE CASTI,
TAKZE NASLEDUJICI UKONY JE ZASE ZRUSI (NAPR. URCITE PROPOJENI
PROPOJEK). PRED CISLEM UKONU JE PISMENO "U". UKONY ODLISNE
PRO JEDNOTLIVE VERZE SOUCASTEK (NAPR. EPROM 1,2 A 4 KBYTE)
JSOU ODLISENY PISMENEM ABECEDY ZA CISLEM UKONU (NAPR. U31A,
U32B A POD.). HVEZDICKOU JSOU OZNACENY UKONY PLATNE PRO
ZAKLADNI VERZI.
PRO PAJENI DURAZNE DOPORUCUJEME NIZKOVOLTOVOU PAJECKU,
PRI PAJENI PISTOLOVOU PAJECKOU NELZE ZARUCIT SPOLEHLIVOU
FUNKCI SYTEMU (I TTL OBVODY LZE TOUTO PAJECKOU NAPETOVYM
PRURAZEM POSKODIT). OBECNE LZE DOPORUCIT POUZIVANI OBVODU
RADY 74LS NEBO 74ALS, NEBOT MAJI NIZSI ODBERY ZE ZDROJU, COZ
MA KLADNY VLIV NA CELKOVOU SPOLEHLIVOST SYSTEMU. TAM, KDE JE
PREDEPSANO POUZITI OBVODU RADY 74S LZE POUZIT I JINE RADY
(TJ. NORMALNI 74, 74LS NEBO 74ALS) BEZ NEBEZPECI OHROZENI
CINNOSTI SYSTEMU. RYCHLE OBVODY, KTERE JSOU POUZITY V
ZOBRAZOVACI CASTI, MAJI ZAJISTOVAT OSTROU A PRESNOU KRESBU
ZNAKU A TUDIZ NEMAJI NA VLASTNI CINNOST SYSTEMU VLIV. OSTATNI
RYCHLE OBVODY POUZIVANE V ADRESOVYCH A STAVOVYCH DEKODERECH
VYTVAREJI SPOLEHLIVOSTN1 RESERVU A NEJSOU NEZBYTNE NUTNE.
PRO VLASTNI OZIVOVANI JSOU PREDEPSANY: LOGICKA SONDA
(INDIKUJICI LOG 1, LOG 0 A IMPULSY), VOLTMETR S ROZSAHY 5-
10V, 12-20V, A NAPAJECI ZDROJ +5V/3A, +12V/1A, -5V/1A.
CISLOVANI JEDNOTLIVYCH SOUCASTEK JE PROVEDENO VE SHODE
S OZNACENIM NA PRISLUSNYCH SCHEMATECH I NA PREDPISU PRO
ROZMISTENI SOUCASTEK NA PROCESOROVE DESCE, KTERY JE V PRILOZE
A MA CISLO S-9.
4.1. PREDBEZNE UKONY
---------------------
JEDNIM Z NEJDULEZITEJSICH UKONU PRI OSAZOVANI DESKY S
PLOSNYMI SPOJI JE JEJI OPTICKA KONTROLA. PRI TETO KONTROLE
LZE ODHALIT PREVAZNOU VETSINU CHYB VE SPOJICH, JEJICHZ
ODHALENI NA OSAZENE DESCE BY MOHLO BYT ZNACNE ZTIZENO (NAPR.
PRASKLINA POD ZALETQVANYM INTEGROVANYM OBVODEM A POD.). LZE
DOPORUCIT ROZDELENI CELE DESKY PLOSNEHO SPOJE NA SIT CTVERCU
O STRANE ASI 5 CM, KTERE BUDEME ZA POMOCI LUPY PROHLEDAVAT.
ZRAKOVA KONTROLNI CINNOST TRVA PRACOVNIKU OBEZNAMENEMU S
PLOSNYM SPOJEM A JEHO "ZALUDNOSTMI" AZ 1 HODINU, PROTO CASEM
NESETRME.
----------------------------- 4 - 1 -----------------------
-------------------------------------------------------------
PRI JAKEMKOLI PODEZRENI O PRASKLINU PROVEDEME PROPAJENI
SPOJE, VLASOVE ZKRATY ODSTRANUJEME SKALPELEM. PO OSAZENI
VSECH SOUCASTEK DOPORUCUJEME NAPAJET NA RAMCOVY ROZVOD
ZEMNICIHO POTENCIALU KOLEM DESKY ALESPON 1 MM VYSOKOU VRSTVU
CINU (POZOR NA PROHNUTI DESKY).
MEZI DALSI PRIPRAVNE PRACE PATRI PROMERENI VSECH
PAJENYCH SOUCASTEK. INTEGROVANE OBVODY KONTROLUJEME V
PODSTATE JEN NA ZAKLADNI FUNKCI, OSVEDCILA SE KONTROLA POMOCI
JINEHO OVERENEHO ZARIZENI SE SOKLY. TAK LZE KONTROLOVAT
VSECHNY OBVODY ZAKLADNI RADY TTL. KDO TUTO MOZNOST NEMA, MUSI
RISKOVAT, ZE POUZITE OBVODY JSOU V PORADKU. I TAK JE MENSI
PRAVDEPODOBNOST, ZE POUZIJEME VADNY OBVOD NEZ PRAVDEPODOBNOST
PORUCHY V DUSLEDKU POUZITI SOKLU PRO VSECHNY INTEGROVANE
OBVODY. SOKLY NASI VYROBY NEPATRI MEZI NEJKVALITNEJSI, TAKZE
SE OMEZIME V JEJICH POUZITI JEN NA NEJNUTNEJSI PRIPADY.
V PRIPADE, ZE ZJISTIME PORUCHU NEKTEREHO INTEGROVANEHO
OBVODU, NESMIME SE BAT JEJ VYSTIPAT. TEPRVE PAK SAMOSTATNE
VYPAJUJEME JEDNOTLIVE JEHO PRIVODY. JEN TAK OMEZIME POSKOZENI
PLOSNEHO SPOJE NA PRIJATELNOU MIRU.
JAKO POSLEDNI PROVEDEME PROMERENI ROZVODU NAPAJENI A
ZEMI U VSECH POZIC PRO INTEGROVANE OBVODY. PRO MERENI LZE
POUZIT BUD OHMMETRU, NEBO RUZNYCH PRIPRAVKU, Z NICHZ
NEJJEDNODUSSI SE SKLADA S BATERIE 4,5V, ZAROVKY A DVOU
VODICU.
PRI PRAKTICKYCH ZKOUSKACH OSAZENYCH DESEK S PLOSNYMI
SPOJI SE UKAZALO, ZE NEJVETSI PROBLEMY BYLY S PROKOVENYMI
OTVORY. V DESKACH V3.1 BYL VETSI POCET PROKOVENYCH OTVORU BUD
PRIMO VADNYCH NEBO S NESPOLEHLIVYM KONTAKTEM. MNOHEM
KVALITNEJSI BYLY VZORKY DESEK V3.2. PRESTO SE DOPORUCUJE
VSECHNY PROKOVENE OTVORY NEOBSAZENE VYVODY SOUCASTEK
PROLETOVAT. MNOHEM MENSI POTIZE BYLY S PRASKLINAMI V PLOSNYCH
SPOJICH. U NEKTERYCH SERII DESEK S PLOSNYMI SPOJI SE PROJEVIL
DALSI PORUCHOVY CINITEL - PRILISNE PODLEPTANI SPOJU. NA PRVNI
POHLED NENI TOTO PODLEPTANI PATRNE, PROJEVI SE VSAK PRI
PAJENI, KDY SE GALVANICKY NANESENY CIN OMEZI POUZE NA
SKUTECNY MEDENY PODKLAD. V NEJVICE POSTIZENYCH DESKACH BYLO
TOTO PODLEPTANI AZ 6O% SPOJE. POKUD SE TAKOVA ZAVADA ZJISTI,
JE NUTNO VSECHNY ROZVODY ZEMNICI ROVINY I NAPAJECICH SIGNALU
POSILIT PRILETOVANIM TENKYCH MEDENYCH VODICU O PRUMERU 0,2 -
0,3 MM.
PRED PAJENIM INTEGROVANYCH OBVODU LZE DOPORUCIT
OSKRABANI (VELMI JEMNE) Z VYVODU INTEGROVANYCH OBVODU VRSTVY
NECISTOT (NAPR. SKALPELEM).
----------------------------- 4 - 2 -----------------------
-------------------------------------------------------------
4.2. ZOBRAZOVACI CAST
----------------------
PRED OZIVENIM VLASTNI ZOBRAZOVACI CASTI MUSIME VYTVORIT
STYKOVY OBVOD PRO ZOBRAZENI INFORMACE NA OBRAZOVCE. JDE O VF
NEBO VIDEO MODULATOR. JEJICH POPIS JE V KAPITOLE 3.8., TYP JE
DAN DRUHEM ZOBRAZOVACI JEDNOTKY (TV PRIJIMAC, AZJ A POD.).
JEDNODUSSI JE VIDEO MODULATOR, DAVA TAKE LEPSI KRESBU NA
OBRAZOVCE. MA VSAK TU NEVYHODU, ZE U TV PRIJIMACE VYZADUJE
ZASAH DO JEHO VNITRNIHO ZAPOJENI A NAVIC HO LZE POUZIT JEN U
TELEVIZORU S ODDELENOU KOSTROU OD SITE. NAPROTI TOMU VF
MODULATOR JE SICE SLOZITEJSI, AVSAK VYHOVI PRO LIBOVOLNY TV
PRIJIMAC SE SYMETRICKYM ANTENNIM VSTUPEM 75 OHMU BEZ NUTNOSTI
JAKEKOLIV ZMENY V JEHO ZAPOJENI. PREDPOKLADA SE, ZE VF
MODULATOR BUDE VYRABEN A PRODAVAN JAKO HOTOVY BLOK.
NYNI PRISTOUPIME K OSAZOVANI A OZIVOVANI VLASTNI
ZOBRAZOVACI CASTI MIKROPOCITACE.
U1* ODPOR R12 270R
U2* DIODA D9 LQ1101
U3* ODPOR R11 270R
U4* DIODA D10 LQ1401
U5* ODPOR R13 680R
U6* DIODA D11 LQ1701
U7* KONEKTOR NAPAJECICH NAPETI
U8* PROVERIME, ZDA MEZI JEDNOTLIVYMI NAPAJECIMI ROZVODY
(+5V, +12V, -5V A ZEM) NEJSOU ZKRATY
U9* PROVERIME ROZVOD JEDNOTLIVYCH NAPAJECICH NAPETI CL ZEMI
NA OSTATNI KONEKTORY
U10* PRIPOJIME NAPAJECI NAPETI +5V, +12V A -5V. MUSI SE
ROZSVITIT DIODY D9, D10 A D11.
U11* ODPOR R14 1K5
U12* ODPOR R15 1K5
U13* ODPOR R16 1K5
U14* ODPOR R18 1K5
U15* ODPOR R19 1K5
U16* ODPOR R20 1K5
U17* ODPOR R21 1K5
U18* ODPOR R22 1K5
PRO ZAKLADNI VERZI BEZ BUDICU PAMETOVE A V/V CASTI JE
NUTNO POUZIT ODPORY MIN. 3K3, ABY NEDOSLO K PRETIZENI
BUDICU PAMETI EPROM (I0L = 1,6 MA)
U19* PROVERIME, ZDA NEJSOU NA DATOVE SBERNICI ZKRATY MEZI
JEDNOTLIVYMI BITY NEBO PROTI ZEMI
U20* PRIPOJIME NAPAJECI NAPETI +5V A ZKONTROLUJEME, ZDA JSOU
VSECHNY BITY DATOVE SBERNICE D0-D7 VE STAVU LOG 1
U21* OBVOD IO-1 UCY 7486
U22* OBVOD IO-2 MH 74S00
U23* OBVOD IO-3 MH 74S00
U24* OBVOD IO-4 MH 74S04
U25* OBVOD IO-5 MH 74S00
U26* OBVOD IO-6 MH 7405
U27* OBVOD IO-7 MH 7410
U28* OBVOD IO-8 MH 7410
----------------------------- 4 - 3 -----------------------
-------------------------------------------------------------
U29* OBVOD IO-9 MH 74164
U30* OBVOD IO-10 HH 7496
U31* OBVOD IO-11 HH 7496
PROPOJENI PROPOJEK PRO GENERATOR ZNAKU, POUZIJEHE-LI
EPROH TYPU:
A) 2708
U32A* PROPOJIT: 34 - 36 VOLNE: 35
U33A* PROPOJIT: 38 - 39 VOLNE: 37
U34A* PROPOJIT: 32 - 33 VOLNE: 31
B) 2716
U32B PROPOJIT: 35 - 36 VOLNE: 34
U33B PROPOJIT: 37 - 39 VOLNE: 38
U34B PROPOJIT: 32 - 33 VOLNE: 31
U35* SOKL 2 X 12 VYVODU PRO EPROH GENERATORU ZNAKU
U36* OBVOD IO-13 MH 8282
U37* OBVOD IO-14 MH 74S10
U38* OBVOD IO-15 MH 7474
U39* OBVOD IO-16 MH 7493A
U40* OBVOD IO-17 MH 7493A
U41* OBVOD IO-18 MH 7493A
U42* OBVOD IO-19 MH 7493A
U43* OBVOD IO-50 MH 8224
U44* ODPOR R4 2K2 TRIMR
U45* ODPOR R5 560R
U46* ODPOR R8 1K2
U47* ODPOR R9 1K2
U48* ODPOR R10 1K2
U49* ODPOR R17 1K2
U50* DIODA D1 KA 207
U51* DIODA D2 KA 207
U52* DIODA D7 KA 207
U53* KONDENZATOR C31 10P
U54* KRYSTAL PK1 18,432 HHZ
ODPOR R56 470R
DIODA D13 KA207
PODLE POUZITE KAPACITY PAHETI RAH (V ZAKLADNI VERZI 1
KBYTE) JE TREBA PRIPOJIT DIODY D3 A D4 (KY 207)
NASLEDOVNE:
RAM 1K: ZOBRAZUJE SE 8 RADKU (RADEK 8-15)
U55A* D3 ZAPOJENA HEZI 193(KATODA) A 194(ANODA)
U56A* D4 ZAPOJENA HEZI 196(ANODA) A 40(KATODA)
RAM 2K: ZOBRAZUJE SE 16 RADKU (RADEK 16-31)
U55B D3 SE NEZAPOJUJE
U56B D4 ZAPOJENA MEZI 196(KATODA) A 195(ANODA)
RAM 3K: ZOBRAZUJE SE 16 RADKU (RADEK 0-15)
U55C D3 SE NEZAPOJUJE
U56C D4 ZAPOJENA MEZI 196(ANODA) A 40(KATODA)
----------------------------- 4 - 4 -----------------------
-------------------------------------------------------------
RAM 4K A VICE: ZOBRAZUJE SE 32 RADKU (0-31)
U55D D3 SE NEOSAZUJE
U56D D4 SE NEOSAZUJE
U57* PROPOJIT: 45 - 46 VOLNA: 47
U58* PROPOJIT: 22 - 23 VOLNA: 24
U59* PROPOJIT: 25 - 26 VOLNA: 27
U60* PROPOJIT: 28 - 29 VOLNA: 30
U61* KONEKTOR FRQ PRO PRIPOJENI VIDEO MODULATORU (V NOSNEM
TELESE KONEKTORU JE NUTNE PROVEST VYREZ PRO ODPOR R8),
U ZAKLADNI VERZE POUZE V PRIPADE, KDY NEPOUZIJEME VF
MODULATORU
U62* PO PRIPOJENI NAPAJECIHO NAPETI POMOCI LOGICKE SONDY
ZJISTIME, ZDA KMITA OSCILATOR (MHB8224) A ZDA VSECHNY
STUPNE DELICKY (MH7493/I0-16 AZ IO-19) PRACUJI. DALE SE
PRESVEDCIME, ZDA NA VYVODECH PRO VIDEO MODULATOR JSOU
IMPULSY VERTIKALNIHO A HORIZONTALNIHO ROZKLADU A VIDEA
(JDE O VYVODY 3,4,8,9,10 A 11).
U63* PRIPOJIME VF NEBO VIDEO MODULATOR (ZHOTOVENY PODLE
NAVODU V KAPITOLE 3.8.), ZASUNEME PRISLUSNE OBVODY DO
SOKLU A PRIPOJIME NAPAJENI. NA OBRAZOVCE BY SE MEL
OBJEVIT STABILNI OBRAZEC TVORENY SAMYMI ZNAKY S KODEM
FFH. POMOCI VODICE SPOJENEHO SE ZEMI VNUCUJEME NA
JEDNOTLIVE DATOVE BITY D0 - D7 LOG.0 V MISTE PRIPOJENI
ODPORU R14-R22. TIM VNUCUJEME KODY 7F,BF,...,FE NA
DATOVOU SBERNICI, COZ BY SE MELO PROJEVIT ZMENOU
ZOBRAZOVANEHO ZNAKU NA OBRAZOVCE. TIM OVERIME SPRAVNOST
JAK ZOBRAZOVACIHO SYSTEMU TAK I DATOVE SBERNICE.
4.3. CAST EPROM
----------------
U64* OBVOD IO-43 UCY 74157
U65* OBVOD IO-44 UCY 74157
U66* OBVOD IO-45 UCY 74157
U67* OBVOD IO-46 UCY 74157
V PRIPADE, ZE BUDEME POUZIVAT REZIM PRIMEHO PRISTUPU DO
PAMETI (DMA), JE NUTNO POUZIT JAKO OBVODY IO-43 AZ IO-
46 TYP SN74LS257 (K555KP11).
U68* OBVOD IO-53 UCY 7408
U69* OBVOD IO-26 MH 3205
U70* OBVOD IO-29 UCY 7407
U ZAKLADNI VERZE SE OBVOD IO-29 NEOSAZUJE, NYBRZ SE
PROPOJI OTVORY PRO JEHO VYVODY 08-09, 05-06.
PODLE TYPU POUZITYCH EPROM PRO IO-20 PROVEDEME:
A) PRO TYP 2708
U71A PROPOJIT: 56 - 57 VOLNE: 91
U72A PROPOJIT: 54 - 55 VOLNE: 89
U73A PROPOJIT: 92 - 88 VOLNE: 53
U74A PROPOJIT: 50 - 51 VOLNE: 86
(DALE ZUSTANOU VOLNE: 49, 87, 90, 52, 85)
----------------------------- 4 - 5 -----------------------
-------------------------------------------------------------
B) PRO TYP 2716
U71B* PROPOJIT: 88 - 92 VOLNE: 53 (CS)
U72B* PROPOJII: 89 - 90 VOLNE: 55 (A10)
U73B* PROPOJIT: 56 - 57 VOLNE: 91 (OE)
U74B* PROPOJIT: 85 - 86 VOLNE: 51 (PGM)
(DALE ZUSTANOU VOLNE: 49, 50, 52, 54, 87)
C) PRO TYP 2732
U71C PROPOJIT: 56 - 57 VOLNE: 91
U72C PROPOJIT: 89 - 90 VOLNE: 55
U73C PROPOJIT: 88 - 92 VOLNE: 53
U74C PROPOJIT: 86 - 87 VOLNE: 51
(BALE ZUSTANOU VOLNE: 49, 50, 52, 54, 85)
U75* SOKL 2 X 12 PRO EPROM IO-20 (U SOKLU CS VYROBY JE TREBA
ZBROUSIT CELNI STRANU, ABY BYL ZAJISTEN PRISTUP K
PROPOJKAM). PAJENI PAMETI EPROM LZE DOPORUCIT JEN V
PRIPADE, ZE URCITE NEBUDEME MENIT VERZE SYSTEMU (NAPR.
PEVNY REGULATOR TOPENI A POD.).
U76* OBVOD IO-42, U ZAKLADNI VERZE OBVOD IO-42 NEOSAZUJEME,
NYBRZ PROPOJIME NASLEDUJICI OTVORY PRO JEHO VYVODY:
01-19 02-18 03-17 04-16
05-15 06-14 07-13 08-12
U OSTATNICH VERZI PRO OZIVENI TENKYM VODICEM (PRUMER DO
0,2 MM) PROPOJIME PRISLUSNE DATOVE VYVODY NA SOKLU IO-
42 TAK, ABY DATOVA SBERNICE SYSTEMU BYLA SPOJENA S
DATOVOU SBERNICI EPROM
ADRESOVE PROPOJKY EPROM NASTAVIT NASLEDOVNE:
U77* PROPOJIT: 01 - 02 VOLNE: 3
U78* PROPOJIT: 04 - 05 VOLNE: 6
PODLE TOHO, ZDA MA ADRESOVY DEKODER NIT ZAKLADNI KROK
PO 1 KB NEBO PO 2 KB (PODLE POUZITYCH EPROM) PROVEDEME:
A) PRO KROK 1 KB:
U79A PROPOJIT: 41 - 42 VOLNE: 43
PROPOJIT: IO-11
B) PRO KROK 2 KB:
U79B* PROPOJIT: 42 - 43 VOLNE: 41
U80* ODPOR R57 1K2
U81* PRO OZIVOVANI JE NUTNE PROVEST PRO KROK ADRESOVEHO
DEKODERU MENSI NEZ KAPACITA POUZITE EPROM UKON U136 A
OSADIT OBVOD I0-27/UCY7407. PRO ZAKLADNI VERZI TENTO
OBVOD NEOSAZUJEME, NYBRZ PROPOJIME OTVORY PRO JEHO
VYVODY 01-02.
U82* ODPOR R01 1K2
U83* ODPOR R03 10K
U84* ODPOR R38 10K
U85* ODPOR R31 1K2
U86* PROPOJIT: 147 - 148
----------------------------- 4 - 6 -----------------------
-------------------------------------------------------------
PRO KROK ADRESOVEHO DEKODERU 1 KB:
U87A PROPOJIT: 135 - 136
PRO KROK ADRESOVEHO DEKODERU 2 KB:
U88B* PROPOJIT: 136 - 137
U89* PRIPOJIT 178 NA ZEM
U90* PROPOJIT: 150 - 151 VOLNE: 149
U91* PROPOJIT: 153 - 154 VOLNE: 152
U92* PROPOJIT: 156 - 157 VOLNE: 155
U93* PROPOJIT: 159 - 160 VOLNE: 158
U94* PROPOJIT: 162 - 163 VOLNE: 161
U95* OBVOD IO-55 MH 7404
U96* ZASUNEME NAPROGRAMOVANY OBVOD IO-20 (EPROM S MONITOREM)
DO SOKLU
U97* PO PRIPOJENI NAPAJECIHO NAPETI DOCILIME ZOBRAZENI OBSA-
HU EPROM NA OBRAZOVCE. OBRAZ MUSI BYT STABILNI, PRO-
BLIKAVANI ZNAKU SVEDCI 0 PORUCHACH VE SBERNICICH. PO-
STUPNYM ZKRATOVANIM JEDNOTLIVYCH BITU ZJISTUJEME, VE
KTEREM BITU PORUCHA NASTAVA A ODSTRANIME JI.
U98* ODPOJIME 178 OD ZEME
U99* ROZPOJIME 147-148, 01-02, 04-05, 10-11
4.4. CAST RAM
--------------
U100* OBVOD IO-28 MH 3205
POKUD NEPREDPOKLADAME ROZSIRENI SYSTEMU O PLNOU DYNA-
MICKOU RAM, PROVEDEME ZAPAJENI OBVODU IO-34 A IO-38.
POKUD BUDEME SYSTEM ROZSIRIVAT O DYNAMICKOU RAM, LZE
POUZIT PRO TYTO OBVODY SOKLY 2 X 9.
U101* OBVOD IO-38 MH 2114
U102* OBVOD IO-34 MH 2114
PROPOJI SE ADRESOVE PROPOJKY RAM:
U103* PROPOJIT: 12 - 14 VOLNA: 13
U104* PROPOJIT: 07 - 09 VOLNA: 08
U105* PROPOJIT: 10 - 16
U106* PRIPOJI SE 166 A 169 NA ZEM
U107* ODPOR R33 4K7
U108* PO PRIPOJENI NAPAJENI BY SE NA OBRAZOVCE MEL OBJEVIT
NAHODNY OBSAH RAM. MEL BY TO BYT VSAK STABILNI OBRAZ.
ZA POMOCI VODICE PRIPOJENEHO NA ZEM VNUTIME NA RIDICI
ZAPISOVACI VSTUP OBVODU IO-38 AKTIVNI UROVEN, CIMZ DO
NEJ ZAPISEME KOD OFFH (SAME JEDNICKY). TOMU BY MELA
ODPOVIDAT ZMENA V OBRAZE.
U109* ODPOJI SE 166 A 169 OD ZEME, ROZPOJI SE 12-14, 07-09,
10-16
NASLEDUJICI UKONY U110 AZ U132 SE TYKAJI ROZSIRENE
VERZE A UMOZNUJI OSADIT CELY PROSTOR EPROM.
----------------------------- 4 - 7 -----------------------
-------------------------------------------------------------
PODLE TYPU POUZITYCH EPROM IO-21 PROVEDEME:
A) PRO TYP 2708
U110A PROPOJIT: 65 - 66 VOLNY: 100 (PGM)
U111A PROPOJIT: 63 - 64 VOLNY: 98 (VDD)
U112A PROPOJIT: 96 - 97 VOLNY: 62 (CS)
U113A PROPOJIT: 59 - 60 VOLNY: 94 (VBB)
(DALE ZUSTANOU VOLNE: 58, 61, 93, 95, 99, 101)
B) PRO TYP 2716
U110B PROPOJIT: 65 - 66 VOLNY: 100 (CE)
U111B PROPOJIT: 98 - 99 VOLNY: 64 (A10)
U112B PROPOJIT: 96 - 97 VOLNY: 62 (OE)
U113B PROPOJIT: 93 - 94 VOLNY: 60 (VPP)
(DALE ZUSTANOU VOLNE: 58, 59, 61, 63, 95, 101)
C) PRO TYP 2732
U110C PROPOJIT: 100-101 VOLNY: 66 (CE)
U111C PROPOJIT: 98 - 99 VOLNY: 64 (A10)
U112C PROPOJIT: 61 - 62 VOLNY: 96 (OE)
U113C PROPOJIT: 94 - 95 VOLNY: 60 (ALL)
(DALE ZUSTANOU VOLNE: 93, 97, 58, 59, 63, 65)
PODLE POUZITE EPROM IO-22 PROVEDEME:
A) PRO TYP 2708
U114A PROPOJIT: 74 - 75 VOLNY: 110 (PGM)
U115A PROPOJIT: 72 - 73 VOLNY: 108 (VDD)
U116A PROPOJIT: 106-107 VOLNY: 71 (CS)
U117A PROPOJIT: 68 - 69 VOLNY: 104 (VBB)
(DALE ZUSTANOU VOLNE: 67, 70, 103, 105, 109, 111)
B) PRO TYP 2716 PROVEDEME
U114B PROPOJIT: 74 - 75 VOLNE: 110 (CE)
U115B PROPOJIT: 108-109 VOLNE: 73 (A10)
U116B PROPOJIT: 106-107 VOLNE: 71 (OE)
U117B PROPOJIT: 103-104 VOLNE: 69 (VPP)
(DALE ZUSTANOU VOLNE: 67, 68, 72, 73, 105, 111)
C) PRO TYP 2732 PROVEDEME
U114C PROPOJIT: 110-111 VOLNE: 75 (CE)
U115C PROPOJIT: 108-109 VOLNE: 73 (A10)
U116C PROPOJIT: 70 - 71 VOLNE: 106 (OE)
U117C PROPOJIT: 104-105 VOLNE: 69 (A11)
(DALE ZUSTANOU VOLNE: 67, 68, 72, 74, 103, 107)
PRO OBVOD IO-25 PODLE POUZITEHO TYPU EPROM PEOVEDEME:
A) PRO TYP 2708
U118A PROPOJIT: 83 - 84 VOLNE: 119 (PGM)
U119A PROPOJIT: 81 - 82 VOLNE: 117 (VDD)
U120A PROPOJIT: 115-116 VOLNE: 80 (CS)
U121A PROPOJIT: 77 - 78 VOLNE: 113 (VBB)
(DALE ZUSTANOU VOLNE: 76, 79, 112, 114, 118, 120)
B) PRO TYP 2716
U118B PROPOJIT: 83 - 84 VOLNE: 119 (CE)
U119B PROPOJIT: 117-118 VOLNE: 82 (A10)
U120B PROPOJIT: 115-116 VOLNE: 80 (OE)
U121B PROPOJIT: 113-112 VOLNE: 78 (VPP)
(DALE ZUSTANOU VOLNE: 76, 77, 79, 81, 114, 120)
C) PRO TYP 2732
----------------------------- 4 - 8 -----------------------
-------------------------------------------------------------
U118C PROPOJIT: 119-120 VOLNE: 84 (CE)
U119C PROPOJIT: 117-118 VOLNE: 82 (A10)
U120C PROPOJIT: 79 - 80 VOLNE: 115 (OE)
U121C PROPOJIT: 113-114 VOLNE: 78 (A11)
(BALE ZUSTANOU VOLNE: 76, 77, 81, 83, 112, 116)
U122 SOKL 2 X 12 PRO OBVOD IO-21
U123 SOKL 2 X 12 PRO OBVOD IO-22
U124 SOKL 2 X 12 PRO OBVOD IO-23
U125 SOKL 2 X 12 PRO OBVOD IO-24
U126 SOKL 2 X 12 PRO OBVOD IO-25
PODLE ADRES JEDNOTLIVYCH PAMETI JE NUTNO PRISLUSNE
PROPOJIT PROPOJKY 123 AZ 138 (VIZ TEXT V POPISU
CINNOSTI)
U127 ODPOR R25 1K2
U128 ODPOR R26 1K2
U129 ODPOR R27 1K2
U130 ODPOR R28 1K2
U131 ODPOR R29 1K2
U132 ODPOR R32 1K2
U133* ODPOR R2 1K2
U134* OBVOD IO-32 MH 74S00
U135 OBVOD IO-33 MH 74ALS30
U136 OBVOD IO-27 MH 7407 (VIZ UKON U81)
U137* OBVOD IO-31 MH 74S20
U138* OBVOD IO-30 MH 74S04
U139* ODPOR R-23 1K2
U140* ODPOR R-24 1K2
POKUD PREDPOKLADAME ROZSIRENI SYSTEMU O PLNOU DYNAMIC-
KOU RAM 64 KBYTE, POUZIJEME PRO NASLEDUJICI OBVODY
SOKLY 2 X 9. POKUD NE, PRIMO OBVODY ZAPAJIME.
U141 OBVOD IO-35 MHB 2114
U142 OBVOD IO-36 MHB 2114
U143 OBVOD IO-37 MHB 2114
U144 OBVOD IO-39 MHB 2114
U145 OBVOD IO-40 MHB 2114
U146 OBVOD IO-41 MHB 2114
4.5. CAST CPU
--------------
U147* ODPOR R6 1K2
U148* ODPOR R7 1K2
U149* ODPOR R41 1K2
U150* ODPOR R40 1K2
U151* OBVOD IO-59 MH 7474
U152* OBVOD IO-51 MH 74S74
U153* OBVOD IO-52 UCY 7486
U154* OBVOD IO-56 MH 74S00
----------------------------- 4 - 9 -----------------------
-------------------------------------------------------------
U155* OBVOD IO-47 MH 7496
U156* OBVOD IO-48 MH 8228
U157* SOKL 2 X 20 PRO OBVOD MHB 8080A
U158* DIODA D12 KA206
U159* KONDENZATOR C40 6M8
U160* ODPOR R44 56K
UI61* ODPOR R43 47R
U162* MIKROSPINAC WK 55900 PRO RESET
U163* ODPOR R30 1K2
U164* ODPOR R45 1K2
U165* ODPOR R39 1K2
U166* ODPOR R36 1K5
U167* ODPOR R49 1K5
U168* ODPOR R37 1K5
U169* ODPOR R35 2K2
U170* ODPOR R34 1K5
U171* PROPOJIT: 165-166 VOLNA: 164
U172* PROPOJIT: 168-169 VOLNA: 167
U173* PROPOJIT: 171-172 VOLNA: 170
U174* PROPOJIT: 173-174 VOLNA: 175, 176
PROPOJKY ADRESY EPROM NASTAVIME TAK, ABY DEKODER UKA-
ZOVAL NA POSLEDNICH 8 KBYTU PAMETOVEHO PROSTORU, TJ.
ABY A13=A14=A15=LOG1:
U175A PROPOJIT: 10 - 11 VOLNE: 15
U175B* PRI KROKU 2 KB ZUSTANE PROPOJKA 11 VOLNA.
U176* PROPOJIT: 01 - 02 VOLNE: 03
U177* PROPOJIT: 04 - 05 VOLNE: 06
PROPOJKY ADRESY RAM NASTAVIME TAK, ABY DEKODER UKAZOVAL
NA PRVNICH 8 KBYTU PAMETOVEHO PROSIORU, TJ. AI3=A14=
=A15=LOGO:
U178* PROPOJIT: 12 - 14 VOLNE: 13
U179* PROPOJIT: 07 - 09 VOLNE: 08
U180* PROPOJIT: 10 - 16 VOLNE: 15
PROPOJKY VYBERU POUZDRA PODLE POUZITEHO OBVODU IO-20:
A) PRO 2708
U181A PROPOJIT: 135-I36
B) PRO 2716
U182BA PRO KROK 1 KB: PROPOJIT: 135-136-137
U182BB* PRO KROK 2 KB PROPOJIT: 137-136
C) PRO 2732
U183CA PRO KROK 1 KB: PROPOJIT: 137-135-133-131-136
U183CB PRO KROK 2 KB: PROPOJIT: 135-136-137
U184* ODPOR R50 1K2
U185* PROPOJIT: 19-20
U186* PODLE TYPU POUZITEHO OBVODU IO-48 PROPOJIME:
PRO MH8228 ... 199 - 200 VOLNA: 198
PRO ZAHRANICNI TYP ... 199 - 200 VOLNA: 198
U187* PROPOJIT: 17 - 18
NASLEDUJICI KONDENZATORY ZAJISTUJI BLOKOVANI NAPAJECICH
NAPETI A MUSI BYT PRIPOJENY I V ZAKLADNI VERZI.
----------------------------- 4 - 10 ----------------------
-------------------------------------------------------------
U188* KONDENZATOR C24 33K
U189* KONDENZATOR C25 47M
U190* KONDENZATOR C26 33K
U191* KONDENZATOR C27 33K
U192* KONDENZATOR C28 33K
U193* KONDENZATOR C29 33K
U194* KONDENZATOR C30 33K
UI95* KONDENZATOR C32 33K
U196* KONDENZATOR C33 33K
U197* KONDENZATOR C34 33K
U198* KONDENZATOR C38 33K
U199* KONDENZATOR C21 47M
U200* KONDENZATOR C22 33K
U201* KONDENZA1OR C23 33K
U202* KONDENZATOR C17 33K
U203* KONDENZATOR C18 33K
U204* KONDENZATOR C19 33K (NENI-LI OSAZEN KONEKTOR)
U205* KONDENZATOR C1 33K (NENI-LI OSAZEN KONEKTOR)
U206* KONDENZATOR C2 33K (NENI-LI OSAZEN KONEKTOR)
U207* KONDENZATOR C3 15M
U208* KONDENZATOR C4 33K
U209* KONDENZATOR C5 33K
U210* KONDENZATOR C6 33K
U211* KONDENZATOR C7 33K
U212* KONDENZATOR C8 33K
U213* KONDENZATOR C9 33K
U214* KONDENZATOR C10 33K
U215* KONDENZATOR C11 47M
U216* KONDENZATOR C12 33K
U217* KONDENZATOR C13 33K
U218* KONDENZATOR C14 33K
U219* KONDENZATOR C15 33K
U220* KONDENZATOR C16 33K
U221* KONDENZATOR C35 47M
U222* KONDENZATOR C36 33K
KONDENZATORY C35 A C36 SE OSAZOJI POUZE TEHDY, POKOD
NEOSAZUJEME KONEKTOR V/V.
U223* KONDENZATOR C37 15M
U224* OBVOD IO-54 MH 3205
U225* PO ZASUNUTI VSECH OBVODU DO PRISLUSNYCH SOKLU A PO
PRIPOJENI NAPAJECICH NAPETI BY SE V ZAKLADNI VERZI
V.3.X MELA SMAZAT OBRAZOVKA A OBJEVIT TECKA (PROMPT). V
ROZSIRENE VERZI V.3.X NEBO VE VERZI V.2.X BY SE MELO NA
OBRAZOVCE OBJEVIT CELE OHLASENI MONITORU.
4.6. CAST VSTUPNE / VYSTUPNICH OBVODU
--------------------------------------
U226 OBVOD IO-57 MH 7474
U227 OBVOD IO-58 MH 7430
U228* OBVOD IO-61 MH 3216
U229* OBVOD IO-67 MH 3212
U230* SOKL 2 X 20 PRO OBVOD IO-64
----------------------------- 4 - 11 ----------------------
-------------------------------------------------------------
(POUZE PRO ZAKLADNI VERZI S MATICOVOU KLAVESNICI)
U231* OBVOD IO-62, V ZAKLADNI VERZI SE TENTO OBVOD NEOSAZUJE
A PROPOJUJI SE NASLEDUJICI JEHO VYVODY:
01-19 02-18 03-17 04-16
05-15 06-14 07-13 08-12
U232 (ZRUSENO)
U233 ODPOR R46 1K2
U234 ODPOR R47 47K
U235 ODPOR R48 47R
U236 ODPOR R42 1K2
U237* ODPOR R54 560R
U238* ODPOR R55 560R
U239 KONDENZATOR C41 10M
U240* PRIPOJIT KONEKTOR KLAVESNICE
U241* PROPOJIT: 184-185 VOLNE: 182,183
U242* PRO MATICOVOU KLAVESNICI OSADIT OBVOD IO-64/MHB8255A.
U243* POSILOVACE IO-63, IO-65, IO-66 TYPU MHB8286 SE V
ZAKLADNI NEOSAZUJI, JE VSAK U NICH NUTNO PROPOJIT
OTVORY PRO NASLEDUJICI VYVODY:
01-19 02-18 03-17 04-16
05-15 06-14 07-13 08-12
U244* PRO MATICOVOU KLAVESNICI OSADIME KONEKTOR V/V.
U245* ODZKOUSIME FUNKCI KLAVESNICE JEJIM PRIPOJENIM K SYSTEMU
(PRO MATICIVOU KLAVESNICI JE NUTNA VERZE MONITORU
V.2X). KLAVESNICI TS5220004 PRIPOJUJEME POMOCI OBVODU
PODLE OBR. S-10. TENTO OBVOD BY MEL BYT VYRABEN
DRUZSTVEM DRUKOV A PRODAVAN JAKO PRIVODNI KABEL
KLAVESNICE I PRO ZAKLADNI VERZI SYSTEMU.
U246 V PRIPADE POUZITI MODEMU MAGNETOFONU PROVEDEME UKONY
U240, U241, U242, U244 PRO LIBOVOLNY TYP KLAVESNICE.
4.7. TESTOVANI FUNKCE ZAKLADNI DESKY
-------------------------------------
K TESTOVANI CPU, JEJIHO BLIZKEHO OKOLI A PRO ZAKLADNI
KONTROLU PAMETI SLOUZI PROGRAM "CPUTEST". PO ZAVEDENI Z PASKY
DO PAMETI SE SPOUSTI POD MONITOREM G=100. BEHEM SVE CINNOSTI
OHLASUJE DOKONCENI JEDNOTLIVYCH ETAP TESTU.
TESTOVANI PRERUSOVACIHO SYSTEMU VYZADUJE TESTOVACI
PROGRAM "INTEST" A SPECIALNI PRIPRAVEK, PRIVADEJICI SIGNALY
ZADOSTI O PRERUSENI A PRISLUSNE VSTUPY OBVODU IO-60 (MH3214).
TESTOVANI OSTATNICH CASTI SYSTEMU JE MOZNE JEN POD
MONITOREM (NAPR. TESTOVANI ROZSIRUJICICH VSTUPU/VYSTUPU).
----------------------------- 4 - 12 ----------------------
-------------------------------------------------------------
4.8. SEZNAM PROPOJEK ZAKLADNI DESKY
------------------------------------
CISLO FUNKCE
01 AZ 16 VOLBA UMISTENI RAM/EPROM
17 AZ 20 REZIM RESTARTU SYSTEMU
21 VYVOD PRO VF MODULATOR
22 AZ 24 POCET ZNAKU NA RADKU
25 AZ 30 PRIPOJENI SIGNALU NA C11(VID1) A C14(VID2)
31 AZ 39 VOLBA TYPU EPROM GENERATORU ZNAKU
40 VOLBA ZATEMNOVANI CASTI OBRAZOVKY
41 AZ 43 NASTAVENI ROZSAHU DEKODERU EPROM (8/16 KB)
44 VYVEDEN HODINOVY SIGNAL C5
45 AZ 47 VOLBA KRESBY ZNAKU A POZADI
48 ZEMNICI POTENCIAL
49 AZ 120 VOLBA TYPU EPROM
121,122 VYVOD MUS/ PRO OBVODY 6116
123 AZ 146 VOLBA VYBERU POUZDER EPROM/RAM
147,148 REZIM RESTARTU SYSTEMU
149 AZ 172 VOLBA REZIMU SEMIGRAFIKA/PLNA GRAFIKA
173 AZ 176 VOLBA PRUBEHU SIGNALU IOR/ NA KON. ROZSIRENI
177,178 PRIVEDENI MWS/ NA DEKODER EPROM (PRO 6116)
179 AZ 181 VOLBA REZIMU PRERUSOVACIHO SYSTEMU
182 AZ 185 VOLBA KONTAKTNI/KAPACITNI KLAVESNICE
186 AZ 191 VOLBA SMERU POSILOVACU IO-63,65,66
193 AZ 196 VOLBA ZATEMNOVANI CASTI OBRAZOVKY
----------------------------- 4 - 13 ----------------------
-------------------------------------------------------------
5. MATICOVA KLAVESNICE A GENERATOR ZNAKU
-----------------------------------------
KLAVESNICE JE URCENA PRO TY, KTERI NEBUDOU POUZIVAT
SYSTEM NA ZPRACOVAVANI TEXTOVYCH DAT A MOHOU SI USETRIT PRACI
PRI VYTVARENI KVALITNEJSI KLAVESNICE. PRO SVOU CINNOST
VYZADUJE ZAPOJENY OBVOD MHB8255A A SPECIALNI OBSLUZNY PROGRAM
PRO DEKODOVANI ZNAKU (MONITOR VERZE V.2.X). PREDPOKLADA SE
POUZITI TETO KLAVESNICE PRO ZAKLADNI VERZI SYSTEMU.
PREDPOKLADA SE NASLEDUJICI USPORADANI MATICE KLAVES:
12+
1: 2: 3: 4+5: 11: 13: 14: 15:
6: Q/!/1 A/- H/L U/L RIGHT CTRL CR P/@/0
7: E/#/3 D/= X// 0-9 LEFT M/. K/[ I/(/8
8: T/%/5 G/_ V/; B/? H/< Y/&/6
9: R/$/4 F/A C/: SP N/| J/> U/'/7
10: W/"/2 S/+ Z/* CS DOWN UP L/] O/)/9
CISLICE S DVOJTECKOU OZNACUJI CISLO VODICE NA PASKOVEM VYVODU
KLAVESNICE. V OZNACENI KLAVES JE POUZITO NASLEDUJICIHO KODU:
X/Y/Z KDE X ... PISMENO (VELKE NEBO MALE)
Y ... POMOCNY (HORNI) ZNAK
Z ... CISLICE
REZIM VELKYCH A MALYCH PISMEN SE PREPINA KLAVESOU [U/L] (DVA
CTVERECKY NAD SEBOU). REZIM HLAVNICH A POMOCNYCH (HORNICH)
ZNAKU SE PREPINA KLAVESOU [H/L] (DVA TROJAHELNIKY NAD SEBOU).
SIPKY JSOU OZNACENY NASLEDOVNE: NAHORU=UP, DOLU=DOWN,
VLEVO=LEFT, VPRAVO=RIGHT. REZIM CISLIC SE PREPINA KLAVESOU
[0-9]. KLAVESA [SP] OZNACUJE MEZERNIK. KLAVESA [CS] MA
SPECIALNI POUZITI PODLE PROVADENEHO PROGRAMU (NAPR. SLOUZI
JAKO SPECIALNI ZNAK ESC S KODEM 1BH V NEKTERYCH EDITORECH).
KLAVESA [CTRL] VYGENERUJE PRI NASLEDNE STISKNUTE KLAVESE JI
ODPOVIDAJICI RIDICI ZNAK (D7-D5 = 0). KLAVESA [CR] SLOUZI PRO
UKONCENI ZADAVANI PRIKAZU (OZNACUJE SE TEZ JAKO ENTER NEBO
LOMENA SIPKA <--' ).
PRO ZAKLADNI VERZI MIKROPOCITACE PLAN80A SE POCITA S
POUZITIM TOVARNE VYRABENE KLAVESNICE TYPU TS5220004 S VYSE
UVEDENYM ROZLOZENIM ZNAKU. PRO JEJI PRIPOJENI KE KONEKTORUM
MIKROPOCITACE SLOUZI OBVOD, JEHOZ SCHEMA MA CISLO S-10.
CINNOST OBVODU JE NASLEDUJICI: VYSTUPNI PORT PB OBVODU
MHB8255A BUDI JEDNOTLIVE "RADKY" MATICE KLAVESOVYCH KONTAKTU
(VYVODY 6 AZ 10). ABY NEDOCHAZELO K VZAJEMNEHU OVLIVNOVANI
RADKU PRI STISKU VICE NEZ JEDNE KLAVESY (NAPR. CTRL +
PISMENO), JSOU JEDNOTLIVE RADKY MATICE KLAVESOVYCH KONTAKTU
OD SEBE ODDELENY DIODAMI KA207 (KATODA SMERUJE K PORTU PB).
CTENI JEDNOTLIVYCH "SLOUPCU" MATICE KLAVESOVYCH KONTAKTU
ZAJISTUJE VSTUPNI OBVOD MH3212 (STANDARTNI VSTUP PRO
----------------------------- 5 - 1 -----------------------
-------------------------------------------------------------
KLAVESNICI). NA SLOUPCICH 4, 11 A 12 NEJSOU KOLIDUJICI
KLAVESOVE KONTAKTY, PROTO BYLY TYTO SLOUPCE SPOJENY. ABY BYL
STAV VSTUPU OBVODU MH3212 JEDNOZNACNY, JSOU JEHO VSTUPY
OSETRENY OSMI ODPORY 10K. ZVUKOVY SIGNAL SE GENERUJE
PODELENIM DVEMI (OBVODEM MH7474) SIGNALU BEEP\ Z KONEKTORU
PRERUSENI (VYVOD 6).
HEXADECIMALNI VYPIS OBSAHU GENERATORU ZNAKU MA CISLO
V-4. TENTO GENERATOR ZNAKU NEMA MALA PISMENA. MISTO NICH JSOU
UMISTENY SEMIGRAFICKE SYMBOLY, UMOZNUJICI KRESBU V RASTRU
144X63 BODU. PRO TEXTOVE EDITORY JE VHODNEJSI GENERATOR ZNAKU
S MALYMI PISMENY A CESKYMI ZNAKY (HACKY A CARKY), JEHOZ
HEXADECIMALNI VYPIS MA CISL0 V-5.
----------------------------- 5 - 2 -----------------------
-------------------------------------------------------------
6. PROGRAMOME VYBAVENI SYSTEMU
=================================
6.1. JEDNOTLIVE VERZE MONITORU
-------------------------------
MONITOR JE ZAKLADNI OVLADACI PROGRAM, KTERY UMOZNUJE NA
ZAKLADNI UROVNI RIDIT CHOD SYSTEMU A SPOUSTET OSTATNI VYSSI
PROGRAMY.
PODPROGRAMY MONITORU MOHOU BYT VYUZIVANY V UZIVATEL-
SKYCH PROGRAMECH. VZHLEDEM K POZADOVANE PROGRAMOVE KOMPATIBI-
LITE SYSTEMU PLAN80A SE SYSTEMY RADY INTELLEC MDS 800 A
TESLA-STRASNICE JVS-80, BYLO USPORADANI MONITORU PREVZATO Z
TECHTO SYSTEMU. MONITOR JE UMISTEM VZDY NA POSLEDNICH DVOU
KILOBYTECH PAMETOVEHO PROSTORU (TJ. F800H AZ FFFFH). NA ZA-
CATKU MONITORU JE TABULKA SKOKU DO JEDNOTLIVYCH JEHO PODPRO-
GRAMU, KTERA JE PRO VSECHNY VERZE MONITORU SHODNA. TO UMOZ-
NUJE FUNKCI PROGRAMU BEZ ZMEN PRI RUZNYCH VERZICH MONITORU.
Z HLEDISKA SYSTEMU LZE MONITORY ROZDELIT NA DVA DRUHY.
PRVNI PRACUJI V REZIMU SEMIGRAFIKY S GENERATOREM ZNAKU
(V.2.X, V.3.X, V.5.X), DRUHE PRACUJI Y REZIMU PLNE GRAFIKY A
GENERATOR ZNAKU CASTECNE NAHRAZUJI (V.4.X, V.6.X, V.7.X).
JEDNOTLIVYM VERZIM MONITORU MUSI ODPOVIDAT I OBVODOVE
USPORADANI SYSTEMU, TJ. NAPR. PRO MONITOR RADY V.4.X MUSI BYT
K DISPOZICI ALESPON 16 KBYTE DYNAMICKE A 1 KB STATICKE RAM.
PRO ZAKLADNI VERZI STAVEBNICE MIKROPOCITACE PLAN80A BYL
VYVINUT MONITOR PRO SEMIGRAFIKU A MATICOVOU KLAVESNICI
(V.2.X).
MONITOR PRACUJICI V REZIMU SEMIGRAFIKY (V.3.X) MA DVE
CASTI. ZAKLADNI CAST ZABIRA 1 KBYTE EPROM A ZAJISTUJE POUZE
ZAKLADNI FUNKCE SYSTEMU. K NI LZE POUHYM ZASUNUTIM PAMETI
EPROM S NAHRANOU ROZSIRUJICI DRUHOU CASTI PRIPOJIT STANDARTNI
SOUBOR PRIKAZU, OBDOBNY JINYM MIKROPOCITACOVYM SYSTEMUM.
MONITOR V.4.X ODPOVIDA SVOU CINNOSTI MONITORU V.3.X,
AVSAK PRACUJE S PLNOU GRAFIKOU A MA OMEZENEJSI SOUBOR
INSTRUKCI.
MONITORY V.5.X (SEMIGRAFICKY) A V.6.X (GRAFICKY)
UMOZNUJI POUZITI U SYSTEMU PLAN80A DISKETOVE JEDNOTKY A
SPUSTENI OPERACNICH SYSTEMU CP/M.
MONITOR V.7.X UMOZNUJE SIMULACI MIKROPOCITACE PMD-85 NA
SYSTEMU PLAN80A. ZAJISTUJE TO PROGRAMOVOU KOMPATIBILITU SE
SYSTEMEM PMD-85 NA AROVNI G-BASICU NEBO NA UROVNI PROGRAMU
POUZIVAJICICH PRO KOMUNIKACI S OBVODY MIKROPOCITACE VYHRADNE
PODPROGRAMU MONITORU.
MONITOR V.8.X UMOZNUJE PRACI V REALNEM CASE A TUDIZ
SPUSTENI OPERACNIHO SYSTEMU MP/M.
----------------------------- 6 - 1 -----------------------
-------------------------------------------------------------
6.2. PROGRAM OVLADANI MODEMU MAGNETICKE KAZETOVE JEDNOTKY
---------------------------------------------------------
PRO UKLADANI DATOVYCH SOUBORU BYLO PRO JEDNODUSSI VERZI
SYSTEMU VYVINUTO VNEJSI PAMETOVE ZARIZENI OPIRAJICI SE O
BEZNY KAZETOVY MAGNETOFON A MODEM.
PRO OVLADANI TOHOTO PAMETOVEHO MEDIA TAKOVYM ZPUSOBEM,
ABY NAHRADILO DERNOU PASKU BYL VYVINUT SPECIALNI OVLADACI
PROGRAM. JE UMISTEN NA DVOU KILOBYTECH TESNE POD MONITOREM
(TJ. F000-F7FF). UMOZNUJE ZAKLADNI FUNKCI SYSTEMU PLAN80A
JAKO VYVOJOVEHO MIKROPROCESOROVEHO SYSTEMU. PRO SVOU CINNOST
POTERBUJE NEJMENE 3 KBYTE RAM (PRO VYTVORENI BUFFERU).
PROGRAM JE VYTVOREN TAK, ZE UMOZNUJE SOUCASNE OTEVRENI
DVOU SOUBORU NA KAZETE, JEDNOHO PRO CTENI A DRUHEHO PRO
ZAPIS. TIM JE UMOZNENA FUNKCE PREKLADACU A EDITORU PREVZATYCH
Z DERNOPASKOVYCH SYSTEMU BEZ PODSTATNYCH UPRAV.
PROGRAM MA VLASTNI OVLADACI PRIKAZY, KTERE LZE ZADAVAT
Z MONITORU (SE KTERYM UZCE SPOLUPRACUJE). PRI POUZITI VYSSICH
PROGRAMU JE STYK S KAZETOU ZAJISTEN POMOCI MONITOROVSKYCH
PODPROGRAMU PO (VYSTUP BYTU) A RI (VSTUP BYTU).
BLIZSI UDAJE O FUNKCI A POUZITI TOHOTO PROGRAMU LZE
NALEZT V UZIVATELSKEM MANUALU OVLADACIHO PROGRAMU MODEMU
MAGNETICKE KAZETOVE JEDNOTKY (M-2).
6.3. TINY BASIC
---------------
JDE O JEDNODUCHY PROGRAMOVACI JAZYK PRACUJICI I NA
ZAKLADNI PROCESOROVE DESCE. JE NAHRAN DO 4 KBYTOVE PAMETI
EPROM NA ADRESACH E000-EFFF. MUZE SPOLUPORACOVAT S KAZETOVOU
MAGNETICKOU JEDNOTKOU. SVYM OBSAHEM A FUNKCNIMI MOZNOSTMI
(POUZE CELOCISELNA ARITMETIKA A POD.) JE URCEN SPISE PRO
AMATERSKE VYUZITI V JEDNODUSSICH VERZICH SYSTEMU PLAN80A.
KE STANDARTNIM PRIKAZUM TINY BASICU, JEHOZ ZDROJOVA
VERZE POCHAZI ZE SYSTEMU SAPI-1 [41,42], BYLY PRIPOJENY ZA-
KLADNI PRIKAZY PRO PRACI S DATOVYMI SOUBORY (ZAPIS A CTENI
BYTU NA/Z KAZETY), PRIKAZY PRO KRESBU V SEMIGRAFICE (ZOBRA-
ZENI BODU DANEHO SOURADNICEMI) A PRIKAZ EDICE RADKU.
BLIZSI O POUZITI A OVLADANI TINY BASICU V UZIVATELSKEM
MANUALU TINY BASICU (M-3).
----------------------------- 6 - 2 -----------------------
-------------------------------------------------------------
7. ZAPOJENI KONEKTORU ZAKLADNI DESKY
======================================
7.1. KONEKTOR VSTUPU/VYSTUPU.
-----------------------------
1 +12V
2 GND
3 PB1
4 PB0
5 PB2
6 PB7
7 PB6
8 PB5
9 PB4
10 PB3
11 +5V
12 +5V
13 PC0
14 PC4
15 PC5
16 PC6
17 PC7
18 PC1
19 PC2
20 PC3
21 C0 (512 KHZ)
22 -5V
23 GND
24 +5V
25 PA4
26 PA6
27 PA5
28 PA7
29 PA3
30 PA2
31 PA0
32 PA1
33 GND
34 GND
35 +5V
36 +5V
----------------------------- 7 - 1 -----------------------
-------------------------------------------------------------
7.2. KONEKTOR KLAVESNICE
------------------------
1 PK4
2 PK5
3 PK6
4 PK7
5 +5V
6 ACK/
7 GND
8 PK3
9 PK2
10 PK0
11 RDY/
12 PK1
7.3. KONEKTOR PRERUSENI
-----------------------
1 PV3
2 PV4
3 PV0
4 PV1
5 PV2
6 BEEP/
7 GND
8 INT0/
9 INT1/
10 INTA/
11 INT5/
12 INT6/
7.4. KONEKTOR NAPAJECICH NAPETI
-------------------------------
1 GND
2 GND
3 +5V
4 +5V
5 GND
6 GND
7 +12V
8 +12V
9 GND
10 GND
11 -5V
12 -5V
----------------------------- 7 - 2 -----------------------
-------------------------------------------------------------
7.5. KONEKTOR ROZSIRENI
-----------------------
1 +5V
2 -5V
3 +12V
4 GND
5 MODE/
6 HOLD/
7 HLDA/
8 RST/
9 IORS/
10 IOWS/
11 MEMR/
12 MWS/
13 A15
14 A14
15 A13
16 A12
17 A11
18 A10
19 A9
20 A8
21 A7
22 A6
23 A5
24 A4
25 A3
26 A2
27 A1
28 A0
29 D7
30 D6
31 D5
32 D4
33 D3
34 D2
35 D1
36 D0
----------------------------- 7 - 3 -----------------------
-------------------------------------------------------------
7.6. KONEKTOR DYNAMICKE PAMETI
------------------------------
1 +5V
2 -5V
3 +12M
4 GND
5 CS2/
6 CS1/
7 DRAMINH/
8 MUX
9 RAS
10 CAS/
11 DRAMEN/
12 MWS/
13 A15
14 A14
15 A13
16 A12
17 A11
18 A10
19 A9
20 A8
21 A7
22 A6
23 A5
24 A4
25 A3
26 A2
27 A1
28 A0
29 D7
30 D6
31 D5
32 D4
33 D3
34 D2
35 D1
36 D0
----------------------------- 7 - 4 -----------------------
-------------------------------------------------------------
7.7. KONEKTOR PROGRAMATORU EPROM
--------------------------------
1 +5V
2 +5V
3 GND
4 GND
5 GND
6 PRG
7 -
8 WE/
9 VPP
10 -
11 PGM/
12 CSPGM/
7.8. KONEKTOR HODINOVYCH SIGNALU
--------------------------------
1 GND
2 C14 (VID1)
3 OSC (18,432 MHZ)
4 F2ITTL) (2,048 MHZ)
5 C11 (VID2)
6 M1/
7 STSTB
8 SMES
9 VIDEO/
10 VSYNC/
11 HSYNC/
12 +5V
----------------------------- 7 - 5 -----------------------
-------------------------------------------------------------
8. LITERATURA
====================
[1] VIT,V.: TELEVIZNI TECHNIKA, SNTL + ALFA, PRAHA 1979
[2] 8080 MICROCOMPUTER SYSTEMS USER'S MANUAL, INTEL CORP.,
SEPTEMBER 1975
[3] DEDINA,B.;VALASEK,P.: MIKROPROCESORY A MIKROPOCITACE,
SNTL, PRAHA 1981
[4] BERNARD,J.M.: OD LOGICKYCH OBVODU K MIKROPROCESORUM I
AZ IV, SNTL, PRAHA 1982-84 (PREKLAD Z ORIGINALU DE LA
LOGIQUE CABLEE AUX MICROPROCESSEURS, EDITIONS EYROLLES,
PARIS, 1979)
[5] KLINGMAN,E.E.: PROJEKTOWANIE SYSTEMOW MIKROPROCESORO-
WYCH, WNT, WARSZAWA 1982 (PREKLAD Z ORIGINALU MICRO-
PROCESSOR SYSTEMS DESIGN, PRENTICE-HALL, NEW YERSEY
1977)
[6] MISIUREWICZ,P.: SYSTEMY MIKROKOMPUTEROWE I A II, WSP,
WARSZAWA 1982
[7] PENNEY,W.M.: UKLADY SCALONE MOS LSI, WNT, WARSZAWA 1979
(PREKLAD Z ORIGINALU MOS INTEGRATED CIRCUITS, LITTON
EDUCATIONAL PUBLISHING, NEW YORK 1972)
[8] BADZMIROWSKI,K.: CYFROWE AKLADY MOS LSI, WNL, WARSZAWA
1979
[9] MISIUREWICZ,P.: SYSTEMY MIKROKOMPUTEROWE, WNT, WARSZAWA
1982
[10] SOBOTKA,Z.: OTAZKY A ODPOVEDI Z MIKROPROCESORU A MIKRO-
POCITACU, NAVRH MIKROPOCITACU, ALFA, BRATISLAVA 1981
[11] SOBOTKA,Z.: OTAZKY A ODPOVEDI Z MIKROPROCESORU A MIKRO-
POCITACU, ARCHITEKTURA A PROGRAMOVANI, ALFA, BRATISLAVA
1981
[12] BUBINSKY,J.: POLOVODICOVE PAMETI A JEJICH POUZITI, SNTL
+ ALFA, PRAHA 1977
[13] PIENKOS,J.: AKLADY SCALONE TTL SERII UCY74 I ICH ZASTO-
SOWANIE, WKL, WARSZAWA 1977
[14] SOBOTKA,Z.: PREHLED CISLICOVYCH SYSTEMU, SNTL, PRAHA
1981
[15] LEGAT,P.: MIKROPROCESOROVE SYSTEMY V RIDICI TECHNICE,
PRILOHA CASOPISU AUTOMATIZACE
[16] BUDINSKY,J.: AMATERSKE A OSOBNI MIKROPOCITACE, PRILOHA
CASOPISU AMATERSKE RADIO RADY A, 1980
----------------------------- 8 - 1 -----------------------
-------------------------------------------------------------
[17] MIKROPOCITACE A MIKROPROCESORY, PRILOHA CASOPISU AMA-
TERSKE RADIO RADY A, 1982
[18] SMEJKAL,L.: KURS PROGRAMOVANI SYSTEMU S MIKROPROCESOREM
8080, PRILOHA CASOPISU AUTOMATIZACE, 1980-1983
[19] INTEL MCS-80 SYSTEM DESIGN KIT, USERS GUIDE
[20] THE TK-80 TRAINING KIT, NIPPON ELECTRIC CO., 1977
[21] THE MICRO COM - 8 SOFTWARE MANUAL, NEC MICROCOPUTERS
1975
[22] MIKROPROCESOR 8080, AMATERSKE RADIO, 1983
[23] INTEL DATA CATALOG 1976
[24] THE TTL DATA BOOK FOR DESIGN ENGENEERS, TEXAS INSTRU-
MENTS 1980
[25] COMPONENT DATA CATALOG, INTEL 1980
[26] SOUCASTKY PRO ELEKTRONIKU, TESLA LANSKROUN, 1976
[27] TESLA - BIPOLARNI LOGICKE INTEGROVANE OBVODY 1983-84
[28] NAD,M.: PAMETOVE INTEGROVANE OBVODY MHB8708C A MHB8608
/XYZ, SDELOVACI TECHNIKA, 1984, C.4, STR.169
[29] KRASNY,P.;CERNOCH,M.: FUNKCNI VLASTNOSTI PROGRAMOVA-
TELNEHO IO 8255A PRO PARALELNI V/V, SDELOVACI TECHNIKA,
1982, C.12, STR.449
[30] CERNOCH,M. A KOL.: TECHNICKE PROSTREDKY A FUNKCE MIKRO-
PROCESORU 8080A, SDELOVACI TECHNIKA, 1981, C.12,
STR.442
[31] KISS,R.: OSOBNY POCITAC PMD-85, SDELOVACI TECHNIKA,
1984, C.6, STR.211
[32] DLABALA,F.;STARY,J.: SYSTEMY S MIKROPROCESORY A PRENOS
DAT, NDS, PRAHA 1984
[33] PRAGER,E.;PUZMAN,J.: MIKROPROCESOROVE SYSTEMY V TELEKO-
MUNIKACNICH ZARIZENICH, SNTL, PRAHA 1984
[34] SACHA,K.;RYDZEWSKI,A.: MIKROPROCESOR W PYTANIACH I OD-
POWIEDZIACH, WNT, WARSZAWA 1985
[35] SLIPKA,J: NAVRHOVANI MIKROPROCESOROVYCH SYSTEMU, SNTL +
ALFA, PRAHA 1985
[36] STARY,J.: MIKROPOCITAC A JEHO PRAGRAMOVANI, SNTL, PRAHA
1984
----------------------------- 8 - 2 -----------------------
-------------------------------------------------------------
[37] DYNAMISCHE RAM KARTE, ELEKTOR, APRIL, 1982
[38] BELICS,ROB.: PRACTICAL DYNAMIC MEMORY SYSTEM DESIGN,
BYTE, DECEMBER, 1982, STR. 72
[39] PV-7752-85: PELIKAN,P.,SIMIK,P.: ZAPOJENI MODULACNE
DEMODULACNIHO OBVODU PRO UCHOVAVANI CISLICOVYCH DAT NA
MAGNETOPASKOVE JEDNOTCE PLYNOVEHO CHROMATOGRAFU,
30.10.1985
[40] PV-5068-84: PELIKAN,P.: ZAPOJENI PRO CASOVANI RIDICICH
SIGNALU MIKROPOCITACE V REZIMU SDILENI SBERNIC,
29.06.1984
[41] SMUTNY,T.: PROGRAMOVANI MIKROPOCITACE JPR-1, AMATERSKE
RADIO, B/2, 1983, STR. 64
[42] SAPI-1, UZIVATELSKY MANUAL K TINY BASICU, DIZ PRAHA
[43] TROTTIER,L.: TRANSPARENT MEMORY ENDS CONFLICTS OVER
CRT CONTROL, ELECTRONICS, JULY 1979, C. 14, STR. 136
[44] CARR,W.N.: PROJEKTOWANIE I ZASTOWANIE UKLADOW MOS
WIELKIEJ SKALI INTEGRACJI, WNT, WARSZAWA 1976 (PREKLAD
Z ORIGINALU MOS/LSI DESIGN AND APPLICATION, MCGRAW-
HILL, NEW YORK 1972)
[45] FRIEDMAN,A.D.: TEORIE A NAVRH LOGICKYCH OBVODU, SNTL,
PRAHA 1983 (PREKLAD Z ORIGINALU THEORY & DESIGN OF
SWITCHING CIRCUITS, COMPUTER SCIENCE PRESS, MARYLAND
1975)
[46] KOCIS,I.: MIKROPROCESORY A MIKROPOCITACE, SNTL, PRAHA
1986
[47] PV-1888-87: PELIKAN, P.: ZAPOJENI PRO PREPINANI
RYCHLOSTI PRENOSU DAT U JEDNOTKY PRUZNYCH DISKU S
JEDNODUCHOU HUSTOTOU ZAZNAMU.
[48] KRAMER,M.: PRAKTISCHE MIKROCOMPUTER TECHNIK,
MILITAURVERLAG DER DEUTDCHEN DEMOKRATISCHEN REPUBLIK,
BERLIN, 1988.
[49] RIBARIC,S.: ARCHITEKTURY MIKROPROCESORU, ALFA,
BRATISLAVA, 1988.
[50] ERLEKAMPF,R.: MIKROELEKTRONIK IN DER AMATEURPRAXIS 3,
MILITAURVERLAG DER DDR, BERLIN, 1988.
[51] PIENKOS,J.: UKLADY MIKROPROCESOROWE 8080/8085 W
MODULOWYCH SYSTEMACH STEROWANIA, WKL, WARSZAWA 1988.
[52] SCHLENZIG,K.: MIKROELEKTRONIK FUER PRAKTIKER, VEB
VERLAG TECHNIK, BERLIN1986.
----------------------------- 8 - 3 -----------------------
-------------------------------------------------------------
[53] LONGJW.E.: TECHNIKA SPRZEGANIA UKLADOW W SYSTEMACH
MIKROPROCESOROWYCH, WARSZAWA, WNT, 1988 (PREKLAD Z
ORIGINALU PRACTICAL INTERFACING TECHNIQUES FOR
MICROPROCESSOR SYSTEMS, PRENTICE-HALL, 1983).
[54] HEDTKE,R.: SYSTEMY MIKROPROCESOROWE, WNT, UARSZAWA 1987
(PREKLAD Z ORIGINALU: MIKROPROZESSORSYSTEME, SPRINGER
VERLAG, HEIDELBERG 1984).
----------------------------- 8 - 4 -----------------------
-------------------------------------------------------------
M O N I T O R
=========================
P L A N 8 0 A
U Z I V A T E L S K Y M A N U A L
M O N I T O R U V E R Z E V.2 A V.3
26.09.88
-------------------------------------------------------------
-------------------------------------------------------------
O B S A H
=========
1. UVOD ...................................... 3
2. ROZLOZENI V PAMETI ........................ 4
3. CINNOST PO SPUSTENI SYSTEMU ............... 5
4. PROMENNE MONITORU ......................... 8
5. SEZNAM PRIKAZU ............................ 11
6. POPIS FUNKCE PRIKAZU ...................... 12
7. POPIS SLUZEB MONITORU...................... 16
8. PREHLED ADRES V/U ZARIZENI................. 26
9. SIMULACE KONZOLY .......................... 26
-------------------------------- 2 ------------------------
-------------------------------------------------------------
1. UVOD
==========
ZAKLADNIM RIDICIM PROGRAMEM, UMOZNUJICIM START A FUNKCI
MIKROPROCESOROVEHO SYSTEMU PLAN 80A, JE JEHO MONITOR.
CHARAKTERISTICKYM RYSEM MONITORU JE PROGRAMOVA NAVAZ-
NOST NA SYSTEMY VYCHAZEJICI ZE ZAHRANICNIHO VZORU: MIKROPRO-
CESOROVEHO VYVOJOVEHO SYSTEMU INTELLEC MDS 800. U NAS JDE
NAPR. O SYSTEM JVS 80 (NA BAZI JPR 80). KOMPATIBILITA TECHTO
SYSTEMU SE OPIRA JEDNAK O ROZLOZENI PROMENNYCH V PAMETI RAM
(DEFINOVANE HODNOTY NA JEJIM ZACATKU), O ULOZENI MONITORU NA
KONCI PAMETOVEHO PROSTORU (0F800H AZ 0FFFH) A O SPOJOVACI
ADRESY SLUZEB MONITORU (OD ODRESY 0F800H). POKUD JE PROGRAM
NAPSANY POMOCI TECHTO SPOJOVACICH ADRES, JE POUZITELNY NA
VSECH TAKTO KOMPATIBILNICH SYSTEMECH. TO UMOZNUJE ROZSIRIT
PROGRAMOVE VYBAVENI SYSTEMU PLAN 80A HLAVNE V ZAKLADNICH
VERZICH BEZ DISKETY (DERNA PASKA JE NAHRAZENA KAZETOVYM MAG-
NETOFONEM) .
VZHLEDEM K TOMU, ZE SYSTEM UMOZNUJE FUNKCI VE DVOU
ZAKLADNICH REZIMECH (SEMIGRAFIKY A PLNE GRAFIKY), JSOU VYTVO-
RENY TEZ DVE VERZE MONITORU. VERZE V.2.X A V.3.X SLOUZI PRO
PRACI SE SEMIGRAFIKOU, VERZE V4.X SLOUZI PRO PRACI S PLNOU
GRAFIKOU. JEDNGTLIVE VERZE MAJI ODLISNE POZADAVKY NA OSAZENI
PAMETI RAM A EPROM.
VERZE MONITORU PRO SEMIGRAFICKE USPORADANI ODPOVIDA
SPISE APLIKACIM PRO ZPRACOVAVANI TEXTU A PROGRAMATORSKOU
PRACI V JAZYKU SYMBOLICKYCH ADRES. MONITOR JE VYBAVEN SIROKYM
SOUBOREM PRIKAZU, KTERE UMOZNUJI POHODLNE LADENI PROGRAMU.
JSOU DOSTUPNE EDICNI PROGRAMY A PREKLADACE, KTERE V
SOUCINNOSTI S KAZETOVYM MAGNETOFONEM UMOZNUJI VYTVORIT
VYVOJOVY SYSTEM V RELATIVNE NIZKYCH CENOVYCH RELACICH.
VZHLEDEM K TOMU, ZE SEMIGRAFICKE USPORADANI UMOZNUJE PRACI
SYSTEMU JIZ S JEDINYM KILOBYTEM PAMETI RAM, JE VHODNY ZVLASTE
PRO ZACATECNIKY.
VERZE S PLNOU GRAFIKOU JE VHODNA SPISE PRO MATEMAIICKO-
FYZIKALNI VYPOCTY. SVYM PRINCIPEM VYZADUJE VETSI ROZSAH PAME-
TI RAM (MINIMALNE 17 KILOBYTE). MONITOR PRO PLNOU GRAFIKU
JE SKROMNEJSI A UMOZNUJE V ZAKLADNI VERZI POUZE SPUSTENI
PROGRAMU. LZE JEJ VSAK DOPLNIT ROZSIRENIM NAHRANYM NA KAZETE
A ZISKAT TAK VERZI S PRIKAZY OBDOBNYMI MONITORU PRO SEMIGRA-
FIKU.
-------------------------------- 3 ------------------------
-------------------------------------------------------------
2. ROZLOZENI V PAMETI
------------------------
MONITOR V.3.X SE SKLADA Z DVOU CASTI. PRVNI UMOZNUJE
SPUSTIT SYSTEM A OBSAHUJE PRIKAZY PRO ZAKLADNI FUNKCI
SYSTEMU. DRUHA JE ROZSIRENIM A DOPLNUJE ZAKLADNI CAST O DALSI
PRIKAZY A SLUZBY. KAZDA Z CASTI MA ROZSAH 1 KBYTU PAMETI.
VERZE V.2.X SE LISI OD (ROZSIRENE) VERZE V.3.X POUZE V TYPU
POUZITE KLAVESNICE. U V.2.X JDE O MATICOVOU KLAVESNICI TESLA
TS5220004, U V.3.X O PLNOU ASCII KLAVESNICI S OBVODOVYM
DEKODOVANIM STISKNUTE KLAVESY. DALSI ROZDIL SPOCIVA V TOM, ZE
V.2.X JE NEDELITELNY S DELKOU 2 KBYTE, KDEZTO V.3.X UMOZNUJE
POUZITI JAK V ZAKLADNI VERZI V DELCE 1 KB TAK I V AUTOMATICKY
ROZPOZNAVANE ROZSIRENE VERZI DELKY 2 KB.
PRO FUNKCI SYSTEMU PLAN 80A JE BEZPODMINECNE NUTNE, ABY
OD ADRESY 0000H BYLA PAMET RAM. JEJI MINIMALNI DELKA JE 1
KILOBYTE, LZE JI VSAK ROZSIROVAT NA 4 KILOBYTE NA ZAKLADNI
DESCE NEBO AZ NA 64 KILOBYTE POMOCI MODULU DYNAMICKE PAMETI.
PODMINKOU VSAK JE, ABY PAMET RAM BYLA V CELEM ROZSAHU SPOJI-
TA. VLASTNI SYSTEMOVA KONFIGURACE NASTAVA PRI RESTARTU SYSTE-
MU AUTOMATICKY. ZOBRAZOVANI JE UMISTOVANO NA POSLEDNI DVA
KILOBYTE PAMETI (AZ NA VYJIMKY PRO RAM MENSI NEZ 3 KILOBYTE).
TESNE POD OBRAZOVOU RAM SE UMISTUJE ZASOBNIK. PROMENNE MONI-
TORU JSOU UMISTENY V SKRYTE CASTI OBRAZOVE RAM.
MINIMALNI VERZE SYSTEMU PLAN 80A:
FFFF ----------------
I I NEOBSAZENY PROSTOR U V.3.X
FC00 ---------------- (MONITOR V.2.X 2KB)
I MONITOR 1KB I (E) ZAKLADNI VERZE MONITORU V.3.X
F800 ----------------
I I
I I
. .
. . NEOBSAZENY PAMETOVY PROSTOR
. .
I I
I I
0400 ----------------
I RAM 1KB I (R) JEDINY KILOBYTE RAM
0000 ----------------
POZN. V ZAVORCE JE NAZNACEN TYP PAMETI: E...EPROM, R...RAM
MAXIMALNI VERZE SYSTEMU PLAN 80A SE ZAPLNENYM CELYM
PAMETOVYM PROSTOREM OBSAHUJE 56 KILOBYTE RAM (POSLEDNICH 8
KILOBYTE U DYNAMICKE RAM SE NEAKTIVUJE), TINY BASIC (4 KILO-
BYTOVY INTERPRET), MAGNETOFON (2 KILOBYTOVY PROGRAM OVLADANI
KAZETOVEHO MAGNETOFONU) A PLNY MONITOR (2 KILOBYTE). JEDNO-
-------------------------------- 4 ------------------------
-------------------------------------------------------------
TLIVE VYSE VYJMENOVANE PROGRAMY JSOU VOLITELNE A SYSTEM AUTO-
MATICKY POZNA JEJICH PRITOMNOST POUHYM ZASUNUTIM NAPROGRAMO-
VANYCH POUZDER EPROM DO SOKLU (AT JIZ JDE O ROZSIRENI MONITO-
RU V.3.X, MAGNETOFON NEBO INTERPRET TINY BASICU).
ROZSAH PAMETI LZE V UVEDENYCH MEZICH LIBOVOLNE MENIT,
PRI OSAZENI PLNE DYNAMICKE PAMETI RAM 64 KILOBYTE SE
AUTOMATICKY BLOKUJI OBLASTI PAMETI OBSAZENE NA ZAKLADNI DESCE
POUZDRY EPROM (NAPR. MONITOREM A POD.).
MAXIMALNI VERZE SYSTEMU PLAN 80A:
FFFF ----------------
I MONITOR EXP. I (E) ROZSIRENI MONITORU V.3.X 1 KB
FC00 ---------------- (MONITOR V.2.X 2 KB)
I MONITOR I (E) ZAKLADNI MONITOR V.3.X 1 KB
F800 ----------------
I MAGNETOFON I (E) PROGRAM OVLADANI KAZETOVEHO
I I MAGNETOFONO 2 KB
F000 ----------------
I I
I TINY I (E) INTERPRET JAZYKA TINY BASIC
I BASIC I 4 KB
I I
E000 ----------------
I I
I I
. .
. RAM . (R) PAMET RAM
. .
I I
I I
0000 ----------------
3. CINNOST PO SPUSTENI SYSTEMU
---------------------------------
SPUSTENIM SYSTEMU SE ROZUMI BUD JEHO ZAPOJENI (VE
SMYSLU PRIVEDENI NAPAJECICH NAPETI) NEBO STISKNUTI TLACITKA
RESET NA ZAKLADNI DESCE.
POZOR! SKOK NA ADRESU F800H (STUDENY START MONITORU) NEMA
TENTYZ UCINEK JAKO STISKNUTI TLACITKA RESET, NEBOT
SE NEGENERUJE SIGNAL RESET NUTNY PRO NEKTERE
SPOLUPRACUJICI OBVODY (NAPR. MHB8255A A POD.).
-------------------------------- 5 ------------------------
-------------------------------------------------------------
CINNOST PO SPUSTENI SYSTEMU SPOCIVA V CELKOVE PROGRA-
MOVE INICIALIZACI SYSTEMU. V PRVNI RADE SE ZJISTI ROZSAH
PAMETI RAM. POKUD JE VETSI NEZ 3 KILOBYTY, PAK SE ZOBRAZOVANA
OBLAST RAM UMISTI DO POSLEDNICH DVOU KILOBYTU A ZOBRAZUJE SE
PLNYCH 32 RADKU. POKUD MA RAM TRI KILOBYTY, JE ZOBRAZOVANA
RAM V POSLEDNIM Z NICH A ZOBRAZUJE SE POUZE 16 RADKU. STEJNA
SITUACE JE PRO DVA KILOBYTY RAM. PRI JEDINEM KILOBYTU SE
ZOBRAZOVANA RAM UMISTUJE DO JEHO HORNI POLOVINY A ZOBRAZUJE
SE POUZE 8 RADKU. POCET ZOBRAZOVANYCH RADKU SE ULOZI DO
PROMENNE "LINENO". GRAFICKY LZE ZNAZORNIT JEDNOTLIVE
ROZLOZENI PAMETI RAM NASLEDOVNE:
A) RAM 3 KILOBYTE (16 RADKU TEXTU)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
. .
. .
. .
0BFF I----------------I
I 1 KB I (R) ZOBRAZOVANA CAST RAM
0800 I----------------I
I 64 B I (R) ZASOBNIK
07C0 I----------------I
I 1978 B I (R) UZIUATELSKA RAM
0006 I----------------I
I 6 B I (R) PRIZNAKY MONITORU
0000 '----------------'
B) RAM 2 KILOBYTE (16 RADKU TEXTU)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
. .
. .
. .
07FF I----------------I
I 1 KB I (R) ZOBRAZQVANA CAST RAM
0400 I----------------I
I 64 B I (R) ZASOBNIK
03C0 I----------------I
I 914 B I (R) UZIVATELSKA RAM
0006 I----------------I
I 6 B I (R) PRIZNAKY MONITORU
0000 '----------------'
-------------------------------- 6 ------------------------
-------------------------------------------------------------
C) RAM 1 KILOBYTE (8 RADKU TEXTU)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
. .
. .
. .
03FF I----------------I
I 512 B I (R) ZOBRAZOMANA CAST RAM
0200 I----------------I
I 64 B I (R) ZASOBNIK
01C0 I----------------I
I 442 B I (R) UZIVATELSKA RAM
0006 I----------------I
I 6 B I (R) PRIZNAKY MONITORU
0000 '----------------'
VE VSECH PRIPADECH SE ADRESA KONCE PROGRAMOVE PAMETI,
ROVNA PRVNI ADRESE POD ZOBRAZOVANOU OBLASTI (NAPR. PRO 4 KB
JDE O ADRESU 07FFH), ULOZI DO BUNEK "RAMEND" NA ADRESACH
0004H A 0005H (PRVNI NIZSI BYTE). TYTO BUNKY JSOU ZIVOTNE
DULEZITE PRO FUNKCI SYSTEMU A POKUD POUZIVAME SLUZEB MONITO-
RU, NESMI BYT UZIVATELSKYM PROGRAMEM POSKOZOVANY.
VRCHOL ZASOBNIKU JE UMISTEN NA KONCI PROGRAMOVE PAMETI,
ZASOBNIK MA REZERVOVANOU DELKU 64 BYTE (32 ULOZENI).
MONITOR ROZEZNAVA DALE KONEC UZIVATELSKE PAMETI, JEHOZ
ADRESA JE ULOZENA V BUNKACH "URENB" (USER RAM END). DO TECHTO
BUNEK SE UKLADA ADRESA POSLEDNI BUNKY PAMETI, KTEROU MUZE
UZIVATELSKY PROGRAM POUZIVAT (VIZ. SLUZBA "MEMCK"). JEJI
HODNOTA SE MENI PODLE OSAZENI SYSTEMU. POKUD JE PRITOMEN
POUZE MONITOR, JE DANA PRVNI BUNKOU POD OBLASTI VYHRAZENOU
PRO ZASOBNIK. POKUB JE PRITOMEN PROGRAM OBSLUHY MAGNETOFONU,
JE POSUNUTA JESTE ASI O 500 BYTU SMEREM K ZACATKU PAMETI, ABY
SE VYHRADILO MISTO NA BUFFERY PROGRAMU.
V BUNCE "MSTACK" JE UKLADANA ADRESA VRCHOLU ZASOBNIKU
MONITORU, KTERA SE OBNOVUJE PRI KAZDEM "TEPLEM" STARTU
MONITORU (TJ. PRI SKOKU NA "NEXT"). IMPLICITNE JE DO TETO
BUNKY ULOZENA HODNOTA OBSAHU "RAMEND", AVSAK LZE JI MENIT A
PRESOUVAT TAK OBLAST POUZIVANOU MONITOREM PRO ZASOBNIK
(PROGRAM MAGNETOFONU VRCHOL ZASOBNIKU NEMENI).
V DALSI CINNOSTI NASTAVUJE MONITOR STRANKU ZOBRAZOVANE
PAMETI. V SEMIGRAFICKEM REZIMU JDE O DVOUKILOBYTOVE BLOKY
KTERE LZE PREPINAT ZAPISEM 00H AZ 1FH DO REGISTRU NA ADRESE
#1FH (V/V OPERACE). IMPLICITNE JE NASTAVENA TA STRANKA, KTERA
ODPOVIDA ADRESAM PROGRAMOVE OBSLUHOVANE OBLASTI RAM.
NYNI SE NASTAVUJE CITAC RADKU "LINECO" A CITAC ZNAKU
"CHARCO" (TJ. POLOHA KURZORU), NA NULU (TJ. DO LEVEHO HORNIHO
ROHU OBRAZOVKY). POCET ZNAKU PROGRAMOVE ZOBRAZOVANYCH NA
RADKU SE UKLADA DO PROMENNE "CHARNO" A JE IMLICITNE ROVEN 48
(2FH).
-------------------------------- 7 ------------------------
-------------------------------------------------------------
V ZAKLADNI VERZI V.3.X A VE VERZI V.2.X SE JESTE
NASTAVI SPOJOVACI ADRESY NA HANDLERY (OBSLUZNE PODPROGRAMY
PERIFERNICH ZARIZENI) PRO VSTUP ZNAKU Z KLAVESNICE "CI",
ZJISTENI STATUSU KLAVESNICE "CSTS" A ZOBRAZENI ZNAKU NA
OBRAZOVCE "CO".
NASTAVI SE TEZ HODNOTA ADRESY VRCHOLU ZASOBNIKU PRO
UZIVATELSKE PROGRAMY SPOUSTENE PRIKAZEM "GOTO" V BUNCE
"SPREG". IMPLICITNE SE ULOZI HODNOTA (MSTACK - 2).
NYNI SE U ZAKLADNI VERZE V.3.X PROVEDE TEST, ZDA JE
PRITOMEN ROZSIROVACI BLOK MONITORU (DRUHY KILOBYTE). POKUD
NE, PROVEDE SE POMALY VYMAZ OBRAZOVKY A SKOCI SE DO "TEPLEHO"
STARTU MONITORU, TJ. NA "NEXT". POKUD JE ROZSIRUJICI BLOK
PRITOMEN, SKOCI SE DO JEHO INICIALIZACNIHO PODPROGRAMU.
PROVEDE SE VYSLANI ZVUKOVEHO SIGNALU, ZOBRAZENI OHLASENI
MONITORU VE TVARU:
MON V3X (V2X) KDE X JE PISMENOVA VERZE MONITORU
DALE SE ZAJISTI NASTAVENI SPOJOVACICH ADRES PRO OSTATNI V/V
ZARIZENI, JAKO JE SNIMAC "RI", DEROVAC "PO", TISKARNA "LO" A
POD. PROVEDE SE INICIALICE RADICE PRERUSENI MH3214 S
POVOLENIM PRERUSENI ZE VSECH UROVNI. POKUD JE PRITOMEN
OBSLUZNY PROGRAM MAGNETOFONU, PROVEDE SE JEHO INICIALIZACE.
NAKONEC SE TESTUJE, JE-LI PRITOMEN "TINY BASIC". POKUD
NE, SKOCI SE DO "TEPLEHO" STARTU MONITORU. POKUD JE INTERPRET
BASICU PRITOMEN, PROVEDE SE JEHO SPUSTENI.
"TEPLY" START MONITORU, TJ. SKOK NA "NEXT" (VIZ. SLUZBY
MONITORU) ZAJISTI NASTAVENI VRCHOLU ZASOBNIKU NA OBSAH BUNKY
"MSTACK" A OBNOVENI KODU SKOKU DO "STUDENEHO" STARTU MONITORU
NA ZACATKU PAMETI RAM (ADRESY 0000H-0002H). NACEZ SE VYPISE
NA NOVY RADEK TECKA, COZ JE OHLASENI PRIPRAVENOSTI PRIJIMAT
DALSI PRIKAZY.
4. PROMENNE MONITORU
-----------------------
PRO SVOU CINNOST POUZIVA MONITOR PROMENNE. TYTO PROMEN-
NE JSOU UMISTENY VE SKRYTE CASTI ZOBRAZOVANE PAMETI RAM TAK,
ABY NEZABIRALY MISTO V UZIVATELSKEM PROSTORU. ADRESY PROMEN-
NYCH LZE ZISKAT POMOCI ODSTUPU OD ZACATKU PAMETI RAM. TUTO
FUNKCI ZAJISTUJE SLUZBA MONITORU (VIZ. "GETADR").
-------------------------------- 8 ------------------------
-------------------------------------------------------------
RADEK: 0
DISRAM + 30H
DISRAM + 31H UREND = NIZSI BYTE ADRESY KONCE UZIV. RAM
DISRAM + 32H VYSSI BYTE ADRESY KONCE UZIV. RAM
DISRAM + 33H MSTACK = NIZSI BYTE ADRESY VRCHOLU ZASOBNIKU
DISRAM + 34H VYSSI BYTE ADRESY VRCHOLU ZASOBNIKU
DISRAM + 35H LINECQ = CITAC RADKU
DISRAM + 36H CHARCO = CITAC ZNAKU NA RADKU
DISRAM + 37H LINENO = POCET RADKU V OBRAZE
DISRAM + 38H CHARNO = POCET ZNAKU NA RADKU
DISRAM + 39H PROMEN = REZERVOVANO PRO VYSSI VERZE MONITORU
DISRAM + 3AH -"-
DISRAM + 3BH -"-
DISRAM + 3CH -"-
DISRAM + 3DH -"-
DISRAM + 3EH -"-
DISRAM + 3FH -"-
RADEK: 1
DISRAM + 70H BRADR = VYSSI BYTE ADRESY PRERUSENI
DISRAM + 71H NIZSI BYTE ADRESY PRERUSUNI
DISRAM + 72H BRCODE = KOD INSTRUKCE NA TETO ADRESE
DISRAM + 73H SPREG = NIZSI BYTE <SP>
DISRAM + 74H VYSSI BYTE <SP>
BISRAM + 75H HREG = OBSAH REG. <H>
DISRAM + 76H LREG = OBSAH REG. <L>
DISRAM + 77H DREG = OBSAH REG. <D>
DISRAM + 78H EREG = OBSAH REG. <E>
DISRAM + 79H BREG = OBSAH REG. <B>
DISRAM + 7AH CREG = OBSAH REG. <C>
DISRAM + 7BH AREG = OBSAG REG. <A>
DISRAM + 7CH FREG = OBSAH REG. <F>
DISRAM + 7DH INOUT = PRACOVNI OBLAST PRIKAZU IN/OUT
DISRAM + 7EH -"-
DISRAM + 7FH -"-
RADEK: 2
BISRAM + B0H CONINP = KOD INSTRUKCE JMP (PRO CL)
DISRAM + B1H NIZSI BYTE ADRESY SKOKU
BISRAM + B2H VYSSI BYTE ADRESY SKOKU
DLSRAM + B3H CONOUT = KOD INSTRUKCE JMP (PRO CO)
DISRAM + B4H NIZSI BYTE ADRESY SKOKU
DISRAM + B5H VYSSI BYTE ADRESY SKOKU
DISRAM + B6H READIN = KOD INSTRUKCE JMP (PRO RI)
DISRAM + B7H NIZSI BYTE ADRESY SKOKU
DISRAM + B8H VYSSI BYTE ADRESY SKOKU
DISRAM + B9H USRRI = KOD INSTRUKCE JMP (DUMMY)
DISRAM + BAH NIZSI BYTE ADRESY SKOKU
DISRAM + BBH VYSSI BYTE ADRESY SKOKU
DISRAM + BCH PUNOUT = KOD INSTRUKCE JMP (PRO PO)
-------------------------------- 9 ------------------------
-------------------------------------------------------------
DISRAM + BDH NIZSI BYTE ADRESY SKOKU
DISRAM + BEH VYSSI BYTE ADRESY SKOKO
DISRAM + BFH
RADEK: 3
DISRAM + F0H USRPO = KOD INSTRUKCE JMP (DUMMY)
DISRAM + F1H NIZSI BYTE ADRESY SKOKU
DISRAM + F2H VYSSI BYTE ADRESY SKOKU
DISRAM + F3H LSTOUT = KOD INSTRUKCE JMP (PRO LO)
DISRAM + F4H NIZSI BYTE ADRESY SKOKU
DISRAM + F5H VYSSI BYTE ADRESY SKOKU
DISRAM + F6H CONSTA = KOD INSTROKCE JMP (PRO CSTS)
DISRAM + F7H NIZSI BYTE ADRESY SKOKU
DISRAM + F8H VYSSI BYTE ADRESY SKOKU
DISRAM + F9H -
DISRAM + FAH -
DISRAM + FBH -
RADEK: 4
DISRAM + 130H NAME1 = 16-TI BITOVY NAZEV SOUBORU (CTENI)
RADEKS 5
DISRAM + 170H NAME2 = 16-TI BIIOVY NAZEV SOUBORU (ZAPIS)
RADEKS 6
DISRAM + 1B0H PNADR = NIZSI BYTE ADRESY BUFFERU DEROVACE
DISRAM + 1B1H VYSSI BYTE ADRESY BUFFERU DEROVACE
DISRAM + 1B2H PNFOI = ADRESA UKAZATELE BUFFERU DEROVACE
DISRAM + 1B3H RDADR = NIZSI BYTE ADRESY BUFFERU SNIMACE
DISRAM + 1B4H VYSSI BYTE ADRESY BUFFERU SNIMACE
DISRAM + 1B5H RDPOI = ADRESA UKAZETELE BUFFERU SNIMACE
DISRAM + 1B6H PBLKC = CITAC BLOKU DEROVACE
DISRAM + 1B7H PFILC = CITAC SOUBORU DEROVACE
DISRAM + 1B8H RBLKC = CITAC BLOKU SNIMACE
DISRAM + 1B9H RFILC = CITAC SOUBORU SNIMACE
DISRAM + 1BAH PNSTS = STATUS LOGICKEHO ZARIZENI PRO ZAPIS
DISRAM + 1BBH RDSTS = STATUS LOGICKEHO ZARIZENI PRO CTENI
DISRAM + 1BCH
DISRAM + 1BDH
DISRAM + 1BEH
DISRAM + 1BFH
RADEK: 7
DISRAM + 1F0H TMPAR = POMOCNA OBLAST
-------------------------------- 10 -----------------------
-------------------------------------------------------------
RADEK: 8 (POUZE U VERZE V.2.X)
DISRAM + 230H KEYCD = POLE VZORKU MATICOVE KLAVESNICE
DISRAM + 231H -"-
DISRAM + 232H -"-
DISRAM + 233H -"-
DISRAM + 234H -"-
DISRAM + 235H ZNAK = VSTUPNI ZNAK
DISRAM + 236H UPLO = HORNI/DOLNL ZNAKY
DISRAM + 237H CTRL = RIDICI ZNAKY
DISRAM + 238H NUM = CISLICE
DISRAM + 239H CTN = CITAC BLIKANI KURZORU
DISRAM + 23AH
DISRAM + 23BH
DISRAM + 23CH
DISRAM + 23DH
DISRAM + 23EH
DISRAM + 23FH
5. SEZNAM PRIKAZU
--------------------
V NASLEDUJICIM SEZNAMU JSOU UVEDENY VSECHNY PRIKAZY,
KTERE LZE ZADAT Z UROVNE MONITORU (TJ. PO VYPSANI VYCKAVACI
TECKY). PRIKAZY JSOU ZADAVANY JEDNOPISMENOVYMI ZKRATKAMI.
JEJICH NAZEV JE UVEDEN V ZAVORCE (PRO NAVAZNOST JSOU NAZVY
PREVZANE PODLE VZITE ANGLICKE TERMINOLOGIE). NASLEDUJE KRATKY
POPIS FUNKCE A NAKONEC JE JEDNOPISMENOVYM KODEM V ZAVORCE
OZNACENO, KDE SE DANY PRIKAZ VYSKYTUJE. POKUD ZADNE OZNACENI
NENI VYPSANO, LZE PRIKAZ VYVOLAT I V ZAKLADNI VERZI MONITORU
V.3.X. (NAPR.GOTO). ZKRATKA (E) OZNACUJE ROZSIRENOU VERZI
MONITORU V.3.X NEBO VERI V.2.X (EXPAND). ZKRATKA (T) OZNACUJE
VYSKYT PRIKAZU V OVLADACIM PROGRAMU MAGNETOFONU. ZKRATKOU (B)
JSOU OZNACENY PRIKAZY, KTERE LZE POUZIT JEN JE-LI PRITOMEN
INTERPRET "TINY BASICU".
A...(APPEND).......PRIPOJENI BINARNIHO SOUBOR (T)
B...(BASIC)........STUDENY START BASICU (B)
C...(CONTINUE).....TEPLY START BASICU (B)
D...(DISPLAY)......ZOBRAZENI OBSAHU PAMETI (E)
E...(END OF FILE)..ZAPIS UZAV. HEX. SOUBORU (T)
F...(FILL).........VYPLNENI PAMETI ZNAKEM (E)
G...(GOTO).........SKOK DO PROGRAMU
H...(HEX)..........HEXADECIMALNI SOUCET A ROZBIL (E MIMO V.2)
I...(INPUT)........VSTUP Z PORTU (E)
J...(JOIN).........NASTAVENI ADRES MAGNETOFONU (T)
K...(CLGSE)........UZAVRENI ZAPSANEHO SOUBORU (T)
L...(LOAD).........OVLADANI MOTORKU MAGNETOFONU (T)
M...(MOVE).........PRESUN OBLASTI PAMETI (E)
-------------------------------- 11 -----------------------
-------------------------------------------------------------
N..................NENI POUZITO
0...(OUTPUT).......VYSTUP NA PORT (E)
P...(PUT)..........ZAPIS BINARNIHO SOUBORU NA PASKU (T)
Q...(QUAFF)........CTENI BINARNIHO SOUBORU Z PASKY (T)
R...(REAB).........CTENI HEX. SOUBORU Z PASKY (T)
S...(SUBSTITUTE)...ZAMENA OBSAHU PAMETI
T...(TAPE).........VYPIS NAZVU VSECH SOUBORU (T)
U...(UNNAMED)......POJMENOVANI NOVE KAZETY (T)
V...(VERIFY).......ZOBRAZENI OBSAHU REGISTRU (E MIMO V.2.X)
W...(URITE)........ZAPIS HEX. SOUBORU NA PASKU (T)
X..................NENI POUZITO
Y..................NENI POUZITO
Z..................NENI POUZITO
6. POPIS FUNKCE PRIKAZU
--------------------------
PRIKAZY SE ZADAVAJI POMOCI VELKYCH PISMEN ABECEDY TAK,
JAK JSOU UVEDENY V KAPITOLE 2.4. POKUD MA PRIKAZ PARAMETRY,
PAK JE DOTAZEM NA HODNOTU PARAMETRU VYPIS ROVNITKA. PO ZADANI
HODNOTY PARAMETRU VE FORME HEXADECIMALNIHO CLSLA SE ZADAVANI
UKONCI STISKNUTIM ZNAKU "CR" (NAVRAT VOZU), "SP" (MEZERA)
NEBO "," (CARKA). POKUD JE PARAMETR CISLO CTYRZNAKOVE (RESP.
DVOUZNAKOVE), PAK JSOU PLATNA POUZE CTYRI (RESP. DVA) POSLED-
NE ZADANE ZNAKY. PRI ZADANI MENSIHO POCTU ZNAKUT NEZ JE POCET
ZNAKU PARAMETRU, DOPLNI SE HODNOTA ZLEVA NULAMI AUTOMATICKY.
ZADAVANI PARAMETRU LZE KDYKOLI PRERUSIT STISKNUTIM KLAVESY
"DEL" (U VERZE V.2.X JDE O KLAVESU "CS" = "ESC"), ZRUSI SE
VSAK SOUCASNE PROVADENY PRIKAZ. POKUD SE PRI VOLBE PRIKAZU
NEBO ZADAVANI PARAMETRU PROVEDE CHYBA, JE OHLASENA VYPISEM
DVOJITEHO KRIZE "#". HODNOTU CHYBNEHO PARAMETRU LZE OPRAVIT
ROVNOU, CHYBNY PRIKAZ JE NUTNE CELY ZADAT ZNOVU. V KAPITOLE
2.4. JE UVEDENO, KTERE PRIKAZY JSOU OBSAZENY V ZAKLADNI VERZI
MONITORU, KTERE V JEHO ROZSIRENI A KTERE V OVLADACIM PROGRAMU
PRO MAGNETOFON. POUZITI PRIKAZU, KTERY NEMA V SYSTEMU ZASTOU-
PENY PRISLUSNY PROGRAM, VYVOLA OHLASENI CHYBY A IGNOROVANI
PRIKAZU.
SUBSTITUTE:
PRIKAZ SUBST UMOZNUJE ZAMENIT OBSAH LIBOVOLNE BUNKY PAMETI
NOVYM OBSAHEM. MA JEDINY VSTUPNI PARAMETR (ADRESU PRVNI PRE-
PISOVANE BUNKY) A SOUBOR PRACOVNICH PARAMETRU (NOVE OBSAHY PO
SOBE JDOUCICH BUNEK POCINAJE URCENOU PRVNI BUNKOU). "SP"
NEMENI OBSAH - INKREMENTUJE ADRESU, "CR" BEZ NOVEHO OBSAHU
UKONCI PRIKAZ. PRI CHYBE V ZADAVANI PRVEHO Z DVOJICE
HEXADEXIMALNICH ZNAKU SE OPRAVA PROVEDE STISKNUTIM
LIBOVOLNEHO ZNAKU VYJMA HEX. CISLICE, "CR", "SP" NEBO CARKY.
TIM JE VSTUP IGNOROVAN A LZE JEJ OPAKOVAT. PRI CHYBE V DRUHEM
-------------------------------- 12 -----------------------
-------------------------------------------------------------
ZNAKU JE TREBA ZADAT OBA ZNAKY ZNOVU OPAKOVANIM PRIKAZU SUBST
SE STEJNYMI HODNOTAMI ARGUMENTU.
PRIKLAD: ZMENA OBSAHU BUNKY NA ADRESE 0075H NA HODNOTU
0C4H A ZJISTENI OBSAHU BUNKY NA ADRESE 0077H:
.S=75"CR"
0075 A5 C4
0076 B1"SP"
0077 E5"CR"
.
POZN. ZNAKY "CR" ZNAMENAJI POUHE STISKNUTI KLAVESY
NAVRAT VOZU (NE STISKNUTI UVOZOVEK!).
GOTO:
PRIKAZ GOTO UMOZNUJE START UZIVATELSKYCH PROGRAMU. MA DVA
VSTUPNI PARAMETRY: STARTOVACI ADRESU PROGRAMU A NEPOVINNOU
(PRI STISKU "SP" PO START. ADRESE) ADRESU PRERUSENI BEHU
PROGRAMU S VYPISEM OBSAHU REGISTRU. V TOMTO PRIPADE SE NA
ADRESU 0037H UKLADA SKOK DO OBSLUHY PRERUSENI RST7, KOD TETO
INSTRUKCE SE PAK ULOZI NA PRISLUSNE MISTO V PROGRAMU. OBSAHY
BUNEK PROGRAMU ZUSTAVAJI ZACHOVANY V PRACOVNI OBLASTI PAMETI
A OBNOVI SE PRI PROVADENI TETO INSTRUKCE, TJ. PRI PRERUSENI
BEHU PROGRAMU NA ZVOLENE ADRESE, POKUD JE PRITOMNO ROZSIRENI
MONITORU V.3.X NEBO JDE O VERZI V.2.X. PRI SPOUSTENI PROGRAMU
LZE POCATECNI HODNOTY REGISTRU CPU NASTAVIT NAPR. PRIKAZEM
"VERIFY" NEBO "SUBST" V PRISLUSNE PRACOVNI OBLASTI PAMETI
(SPREG - HREG).
POZOR: KROKOVAT BEH PROGRAMU POMOCI TETO SLUZBY
LZE POUZE U PROGRAMU NAHRANYCH V PAMETI RAM,
TENTO REZIM U PAMETI EPROM NEMA SMYSL.
PRIKLAD: SPUSTENI PROGRAMU OD ADRESY 0F800H BEZ
NASTAVENI ADRESY PRERUSENI:
.G=F800"CR"
(PROVEDE SE STUDENY START MONITORU)
PRIKLAD: SPUSTENI PROGRAMU OD ADRESY 0100H S NASTAVENIM
ADRESY PRERUSENI NA 0100H:
.G=100"SP"=100"CR"
PC=0100=FF HL=00FF=DB SP=B7FB=0100
AF=00D7 BC=00FF BE=00FF
.
POZN. UVEDENY VYPIS SE PROVEDE POUZE V
ROZSIRENE VERZI MONITORU V.3.X NEBO VE VERI
V.2.X, OBSAHY REGISTRU <AF>, <BC>, <DE> A
<HL> MOHOU BYT ODLISNE.
-------------------------------- 13 -----------------------
-------------------------------------------------------------
DISPLAY:
PRIKAZ DISPL UMOZNUJE ZOBRAZENI LIBOVOLNEHO USEKU PAMETI. MA
DVA OPERANDY: POCATECNI A KONCOVOU ADRESU ZOBRAZOVANE OBLA-
STI. INFORMACE JE ZOBRAZOVANA HEXADECIMALNE I POMOCI ASCII
ZNAKU. TAM, KDE JE OBSAH BYTU K6DEM MALEHO PISMENE NEBO
RIDICIHO ZNAKU, ZOBRAZI SE V DOPLNKOVEM POLI KECKA.
PRIKLAD: ZOBRAZENI OBSAHU PRVNICH SESTI BYTU PAMETI.
.D=0"SP~=5"SP"
0000 C3 5A F8 E4 FF B7 .Z....
.
POZN. OBSAH BUNEK MUZE BYT ODLISNY.
FILL:
PRIKAZ FILL ZAPLNI OBSAH URCENE OBLASTI PAMETI ZADANYM ZNA-
KEM. MA TRI OPERANDY: POCATECNI A KONCOVOU ADRESU PAMETOVE
OBLASTI A HEXADECIMALNI JEDNOBYTOVY OBSAH.
PRIKLAD: ZAPLNENI OBLASTI PAMETI 0040H AZ 004FH
OBSAHEM 55H.
.F=40"SP"=4F"SP"=55"SP"
.
MOVE:
PRIKAZ MOVE PRENASI OBSAH ZADANE OBLASTI PAMETI NA JINE MISTO
V PAMETI. MA TRI VSTUPNI PARAMETRY: POCATECNI A KONCOVOU
ADRESU ZDROJOVE OBLASTI A ADRESU URCENI.
PRIKLAD: PRESUN OBLAST PAMETI 0100H AZ 01FFH NA ADRESY
0300H AZ 03FFH.
.M=100"SP"=1FF"SP"=300"SP"
.
OUTPUT:
PRIKAZ OUTPUT UMOZNUJE ZAPSAT NA LIBOVOLNY PORT ZADANOU
HODNOTU. MA DVA PARAMETRY, PRVNI JE ADRESA PORTU. DRUHY JE
ZAPISOVANA HODNOTA. PRIKAZ POUZIVA SKRYTE OBLASTI ZOBRAZOVACI
PAMETI, KDE SIMULUJE INSTRUKCI OUT.
PRIKLAD: ZAPIS HODNOTY 88H NA PORT #55H.
.O=55"SP"=88"CR"
.
-------------------------------- 14 -----------------------
-------------------------------------------------------------
INPUT:
PRIKAZ INPUT UMOZNUJE PRECIST HODNOTU LIBOVOLNEHO PORTU A
ZOBRAZIT JI. MA JEDINY PARAMETR, ADRESU ZVOLENEHO PORTU. K
TOMU POUZIVA SKRYTE OBLASTI ZOBRAZOVACI PAMETI, KAM SIMULUJE
KOD INSTRUKCE IN.
PRIKLAD: PRECTENI OBSAHU PORTU S ADRESOU #33H.
.I=33"SP"=FF
.
VERIFY: (NENI VE VERZI V.2.X)
PRIKAZ UMOZNUJE ZMENIT OBSAHY PRACOVNIHO POLE, URCUJICI
NASTAVENI HODNOT REGISTRU PRI STARTU UZIVATELSKEHO PROGRAMU
PRIKAZEM GOTO. PO VYVOLANI PRIKAZU SE OBJEVI VZDY ZKRATKA
REGISTRU A STARY OBSAH, NACEZ SE CEKA NA ZADANI NOVEHO
OBSAHU. STISKNUTIM MEZERY (SP) SE STARY OBSAH NEMENI (NAVIC
SE ZOBRAZI), NOVY OBSAH SE ZADA STISKNUTIM (CR) ZA NOVYM
CISLEM (JEDEN BYTE).
PRIKLAD: ZMENIT OBSAH REGISTRU <A> NA 66H, <HL> NA
5432H A <DE> NA 4567H.
.V
S=FF="SP"FF (POZN. DOLNI BYTE SP)
P=7F="SP"7F (POZN. HORNI BYTE SP)
H=FF=54"CR"
L=FF=32"CR"
D=FF=45"CR"
E=FF=67"CR"
B=FF="SP"FF
C=FF="SP"FF
A=FF=66"CR"
F=00="SP"00
.
HEXADECIMAL ADD: (NENI VE VERZI V.2.X)
PRIKAZ SLOUZI PRO VYPOCET HEXADECIMALNIHO SOUCTU A ROZDILU
DVOU HEXADECIMALNICH CISEL, ZADANYCH JAKO PARAMETRY PRIKAZU.
PRIKLAD: SOUCET CISEL 0000H A 0001H:
.H=0000"SP"=0001"SP"0001 FFFF
.
-------------------------------- 15 -----------------------
-------------------------------------------------------------
7. POPIS SLUZEB MONITORU
---------------------------
PRO MONITOR PLAN 80A JE CHARAKTERISTICKA TABULKA SKOKU
DO SLUZEB MONITORU, KTERA JE U VSECH VERZI STEJNA A NACHAZI
SE NA TEMZE MISTE, TJ. OD ADRESY 0F800H.
0F800H.....COLDST......STUDENY START M_NITORU
0F803H.....CI..........VSTUP Z KONZOLY <A>
*0F806H.....RI..........VSTUP ZE SERIOVEHO PORTU <A>
0F809H.....CO..........VYSTUP NA KONZOLU <C>
*0F8GCH.....PO..........VYSTUP NA SERIOVY PORT <C>
*0F80FH.....LO..........VYSTUP NA TISKARNU
0F812H.....CSTS........STAVOVY PORT KONZOLY <A>
*0F815H.....IOCHK.......ZJISTENI I/O-BYTU <A>
*0F818H.....IOSET.......NASTAVENI I/O-BYTU <C>
*0F81BH.....MEMCK.......ZJISTENI KONCE UZIV. PAMETI RAM <AB>
*0F81EH.....IODEF.......NASTAVENI UZIVATELSKYCH V/V <C>
0F821H.....INTER.......SKOK DO OSETRENI PRERUSENI
0F824H.....CRLF........NOVY RADEK
0F827H.....EXPR........VSTUP PARAMETRU, POCET C <C>
0F82AH.....ERROR.......VYPIS '#' NA OBRAZOVKU
0F82DH.....ASHEX.......PREVOD ASCII NA HEX, <A>
0F830H.....DADR........ZOBRAZENI OBSAHU <HL>
0F833H.....DBYTE.......ZOBRAZENI OBSAHU <A>
*0F836H.....BHILO.......INKREMENTACE <HL> A SROVNANI S <DE>
0F839H.....NEXT........TEPLY START MONITORU
0F83CH.....SPACE.......MEZERA NA CO
0F83FH.....CINCR.......VSTUP A ROZPOZNANI PRIKAZU
*0F842H.....IMTXT.......ZOBRAZENI BEZPROSTREDNE NASL. TEXTU
0F845H.....ADRKUR......ADRESA KURZORU DO <HL>
0F848H.....HXASC.......PREVOD HEX NA ASCII
*0F84BH.....TIMER.......CEKANI <BC> MILISEKUND
0F84EH.....GETADR......ADRESA MONITOROVSKE PROMENNE <HL>
0F851H.....STJMB.......ULOZENI <DE> NA [<HL>]
0F854H.....ECHO........VSTUP A ZOBRAZENI ZNAKU <A>
*0F857H.....BACST.......POSUN KURZORU O JEDNU POZICI ZPET
JEDNOTLIVE SLUZBY UVEDENE V TABULCE LZE VOLAT JAKO
PODPROGRAMY V UZIVATELSKYCH PROGRAMECH, CIMZ SE JEJICH DELKA
PODSTATNE ZKRATI. NAVIC SE TYTO PROGRAMY STANOU POUZITELNE
PRO VSECHNY VERZE MONITORU SYSTEMU PLAN 80A (POKUD SAMOZREJME
NEVYUZIVAJI SPECIALNICH MOZNOSTI JEDNOTLIVYCH VERZI, NAPR.
PLNE GRAFIKY). NASLEDUJE POPIS JEDNOTLIVYCH SLUZEB MONITORU.
POZOR! SLUZBY OZNACENE "*" JSOU PRISTUPNE VE VERZI
V.3.X POUZE V ROZSIRENI. JEJICH VYVOLANI V
ZAKLADNI VERZI MONITORU VEDE K NEDEFINOVANEMU
CHOVANI SYSTEMU.
-------------------------------- 16 -----------------------
-------------------------------------------------------------
COLDST
^^^^^^
STUDENY START MONITORU, JE POPSAN V KAPITOLE 2.2.
CI
^^
PODPROGRAM CI (CONSOLE INPUT) UMOZNUJE VSTUP ZNAKU Z KLAVES-
NICE A BLIKANI ZNAKU DANEHO KURZOREM. VSTUPNI ZNAK JE V
REGISTRU <A>. TATO SLUZBA MA V ZAKLADNI VERZI MONITORU V.3.X
OMEZENOU FUNKCI, PROVADI POUZE VSTUP ZNAKU BEZ BLIKANI KURZO-
RU NEBO ZVUKOVEHO SIGNALU PO PRIJETI ZNAKU. PRI PRIPOJENEM
ROZSIRENI MONITORU V.3.X NEBO VE VERZI V.2.X SE ZAJISTUJE JAK
BLIKANI KURZORU, TAK I ZVUKOVY SIGNAL PRI PRIJETI ZNAKU.
VE VERZI V.3.X SE PRI STISKNUTI ZNAKU BLANK (00H = 'CTRL @')
A PRI PRITOMNOSTI MAGNETOFONU VYVOLA PRIKAZ UZAVRENI SOUBORU
"CLOSE". PRI VSTUPU ZNAKU JE VE VERZI V.3.X AUTOMATICKY
NULOVAN BIT D7 A JE PROVEDEN PREVOD MALYCH PISMEN NA PISMENA
VELKA.
POSKOZENE REGISTRY: A,F
PRIKLAD: CEKACI SMYCKA NA STISKNUTI KLAVESY "SP", TJ.
MEZERY:
SEM: CALL CI
CPI 20H
JNZ SEM
RI (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
(READER INPUT) JDE O SKOK NA SPOJOVACI ADRESU PRO SERIOVY
VSTUP.
POSKOZENE REGISTRY: - - -
PRIKLAD: ULOZENI 100 BYTU DAT Z DERNE PASKY DO PAMETI
OD ADRESY 320H:
LXI H,320H
MVI C,100
SEM: CALL RI
MOV M,A
INX H
DCR C
JNZ SEM
-------------------------------- 17 -----------------------
-------------------------------------------------------------
CO
^^
PODPROGRAM CO (CONSOLE OOTPOT) PROVADI VYSTUP ZNAKO ULOZENEHO
V REGISTRO <C> NA OBRAZOVKU NA MISTO URCENE SOURADNICEMI
LINECO A CHARCO. SOUCASNE SIMULUJE CHOVANI HARDWAROVE KONZOLY
PRO ZNAKY FF, BS, CR, LF, HT, HOME, DL, DSCR A BELL (VIZ.
KAPITOLA 2.8.). REAKCE NA RIDICI ZNAKY JE VSAK ODLISNA V
ZAKLADNI A ROZSIRENE VERZI MONITORU V.3.X. DEKODER FONKCNICH
ZNAKU LZE VE VERZI V.3.X ROZSIROVAT NASLEDOVNE:
1. V BONCE [DISRAM+CONEXP+1] A [DISRAM+C0NEXP+2] NASTAVIME
ADRESU ROZSIROJICI CASTI DEKODERU (ZDE DEKEXP).
2. VYTVORIME ROZSIRUJICI CAST DEKODERU NASLEDOVNE:
DEKEXP: CPI ZN1
JZ SOBR1
CPI ZN2
JZ SOBR2
.
.
.
JMP CO1
3. JEDNOTLIVE OBSLUZNE PODPROGRAMY SUBR1,SUBR2,... MUSI MIT
TVAR:
SUBRX: PUSH PSW
PUSH B
PUSH H
PUSH D
.
. VLASTNI CINNOST
.
POP D
POP H
POP B
POP PSW
RET
POZN. UCHOVAVAME JEN NEFUNKCNI POSKOZOVANE REGISTRY.
PO (NENI O ZAKLADNI VERZE V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
(PONCH OUTPUT) JDE O SKOK NA SPOJOVACI ADRESU HANDLERU
VYSTUPNIHO ZARIZENI PRO SERIOVY VYSTUP (OBVYKLE DEROVAC DERNE
PASKY).
POSKOZENE REGISTRY: - - -
-------------------------------- 18 -----------------------
-------------------------------------------------------------
PRIKLAD: VYDEROVANI ZNAKU VKLADANYCH Z KLAVESNICE:
SEM: CALL CL
MOV C,A
CALL PO
JMP SEM
LO (NENI U ZAKLADNI VERZE V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
(LIST OUTPUT) JDE O SKOK NA SPOJOVACI ADRESU HANDLERU VYSTUP
NA TISKARNU.
POSKOZENE REGISTRY: - - -
PRIKLAD: VYPIS OBSAHU PAMETI OD ADRESY 0100H, DO KTERE
BYL DRIVE ZAPSAN SOUBOR ASCII ZNAKU V DELCE
150 BYTU.
LXI H,100H
MVI B,150
SEH: MOV C,M
CALL LO
INX H
DCR C
JNZ SEM
CSTS
^^^^
PODPROGRAM CSTS (CONSOLE STATUS) ZJISTUJE U VERZE V.3.X STAV
OBVODU 8212 (KLAVESNICE). POKUD <A> = 08H, FF-Z = 0, PAK
OBVOD 8212 OBSAHUJE PLATNY ZNAK, POKUD <A> = 00H, FF-Z = 1,
PAK OBVOD 8212 NEMA PLATNY ZNAK. U VERZE V.2.X JE OBVODOVE
RESENI NAHRAZENO PROGRAMEM, CHOVANI JE STEJNE.
POSKOZENE REGISTRY: A,F
PRIKLAD: CAST VETSIHO CYKLU, VSTUP HODNOTY Z KLAVESNI-
CE POUZE PRI STISKNUTI KLAVESY:
CALL CSTS
CNZ CI
IOCHK (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
PODPROGRAH IOCHK (INPUT-OUTPUT CHECK) ULOZI DO REGISTRU <A>
PLATNY I/O-BYT, TJ. OBSAH ADRESY 0003H.
POSKOZENE REGISTRY: A
-------------------------------- 19 -----------------------
-------------------------------------------------------------
POZN. Z PROSTOROVYCH DUVODU NEBYLA OPROTI MONITORUM
"INTELOVSKEHO" TYPU ZAHRNUTA FUNKCE I/O BYTU. MONITORY
SYSTEMU PLAN80A UMOZNUJI PROPOJOVANI V/V ZARIZENI POUZE NA
UROVNI HANDLERU POUZITIM SLUZBY IODEF.
IOSET (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
PODPROGRAM IOSET (INPUT-OUTPUT SET) PROVEDE ULOZENI OBSAHU
REGISTRU <C> NA ADRESU 0003H, TJ. UPRAVU STAVAJICIHO I/O
BYTU.
POSKOZENE REGISTRY: - - -
MEMCK (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
PODPROGRAM MEMCK (MEMORY CHECK) ULOZI DO REGISTRU <B> HORNI A
DO REGISTRU <A> DOLNI BYTE ADRESY KONCE UZIVATELSKE PAMETI.
TU ZISKA Z PROMENNE UREND MONITORU.
POSKOZENE REGISTRY: A,F,B
IODEF (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
PODPROGRAM IODEF (INPUT-OUTPUT DEFINITION) UMOZNUJE NASTAVIT
UZIVATELSKE ADRESY PRO VSTUPNE/VYSTUPNI ZARIZENI. NOVA SPOJO-
VACI ADRESA UZIVATELSKEHO HANDLERU SE ULOZI DO REGISTRU <DE>.
DRUH ZARIZENI JE URCEN OBSAHEM REGISTRU <C> A ZNAMENA:
0 ... CI
1 ... CO
2 ... RI
3 ... NEPOUZITO
4 ... PO
5 ... NEPOUZITO
6 ... LO
7 ... CSTS
8 ... MEMTOP (NENI VE VERZI V.2.X)
POSKOZENE REGISTRY: A,F
POZOR! V PRIPADE, ZE <C>=8, TJ. JDE O ZMENU OBSAHU
BUNKY RAMEND, JE NUTNE DODRZET SPECIALNI
POSTUP, PRI NEMZ NEJDRIVE PRENESEME OBSAHY
VSECH SKRYTYCH MONITOROVSKYCH PROMENNYCH. PRI
NEDODRZENI TOHOTO POSTUPU JE CHOVANI SYSTEMU
NEDEFINOVANE.
-------------------------------- 20 -----------------------
-------------------------------------------------------------
PRIKLAD: NASTAVENI SPOJOVACI ADRESY PRO DEROVAC DERNE
PASKY NA HODNOTU 0580H, KDE JE UMISTEN UZIVA-
TESLKY HANDLER TOHOTO ZARIZENI:
LXI D,580H
MVI C,4
CALL IODEF
INTER
^^^^^
INTER OSETRUJE PRERUSENI. OBSAHY REGISTRU SE ULOZI DO PRACOV-
NIHO POLE PAMETI PRIKAZU GOTO. DALE SE ZJISTI, ZDA SLO O
PRERUSENI SOFTVAROVE NEBO HARDWAROVE. POKUD BYLO SOFTWAROVE,
URCI SE POMOCI OBSAHU PROMENNE BRADR, ZDA SLO O PRERUSENI
VYVOLANE PRERUSOVACI ADRESOU PRIKAZU GOTO. POKUD ANO, OBNOVI
SE PUVODNI KOD NA TETO ADRESE. JE-LI PRITOMNO ROZSIRENI
MONITORU, PROVEDE SE NAVIC ZOBRAZENI OBSAHU VSECH REGISTRU
A SKOK NA TEPLY START MONITORU.
POSKOZENE REGISTRY: A,F,B,C,D,E,H,L,SP
CRLF
^^^^
PODPROGRAM CRLF PROVEDE VYSLANI ZNAKU "CR" = 0DH A "LF" = 0AH
PRES PODPROGRAM "CO". (VIZ KAPITOLA 2.8.).
POSKOZENE REGISTRY: - - -
EXPR
^^^^
PODPROGRAM EXPR UMOZNUJE VSTUP PARAMETRU (ADRES,BYTU) DO
PROGRAMU. POCET PARAMETRU JE V REGISTRU <C>. JEUNOTLIVE
PARAMETRY UKLADA POSTUPNE DO ZASOBNIKU.
POSKOZENE REGISTRY: A,F,B,C,H,L,SP
PRIKLAD: VSTUP JEDNOHO PARAMETRU DO REGISTROVEHO
PARU <BC>:
MVI C,1
CALL EXPR
POP B
-------------------------------- 21 -----------------------
-------------------------------------------------------------
ERROR
^^^^^
PODPROGRAM ERROR PROVADI VYPIS HLASENI O VYSKYTU CHYBY VE
FORME DVOJITEHO KRIZKU (#).
POSKOZENE REGISTRY: - - -
ASHEX
^^^^^
PODPROGRAM ASHEX (ASCII-HEX) PROVADI PREVOD HEX. CISLA ZADA-
NEHO POMOCI ASCII ZNAKU NA HEX. HODNOTU. PUVODNI ZNAK JE V
REGISTRU <A>, VYSLEDEK V REGISTRU <A>. AUTOMATICKY POSOUVA
RAD PRI VICENASOBNEM VOLANI.
POSKOZENE REGISTRY: A,F
PRIKLAD: PREVOD VSTUPNIHO HEXADECIMALNIHO CISLA
V ROZSAHU 0 AZ F NA BINARNI CISLO V <A>:
CALL CI
CALL ASHEX
DADR A DBYTE
^^^^^^^^^^^^
PODPROGRAM DADR, RESP. DBYTE (DISPLAY ADDRESS, RESP. BYTE)
SLOUZI K ZOBRAZENI ADRESY (BYTU) ULOZENEHO V REGISTRECH <HL>
(RESP. V REG. <A>) NA OBRAZOVCE POMOCI HEXADECIMALNI NOTACE.
POSKOZENE REGISTRY: A,F,C
PRIKLAD: ZOBRAZENI OBSAHU <BC> A <D>:
PUSH B
POP H
CALL DADR
CALL SPACE
MOV A,D
CALL DBYTE
HILO
^^^^
PODPROGRAM HILO PROVEDE INKREMENTACI PARU <HL> A JEHO
SROVNANI S PAREM <DE>. VYSLEDEK ULOZI DO PRIZNAKU. PRI
NASTAVENEM FF-Z JE <HL>=<DE>. PRI NASTAVENEM FF-C JE <HL> >
<DE>. POKUD JE <HL>=FFFFH UKONCI SE S FF-Z=1,FF-C=1.
POSKOZENE REGISTRY: A,F,H,L
-------------------------------- 22 -----------------------
-------------------------------------------------------------
PRIKLAD: CYKLUS S 1258 PRUBEHY:
LXI H,0
LXI D,1258
SEH: (TELO CYKLU)
CALL HILO
JNZ SEM
NEXT
^^^^
JDE O "TEPLY" START MONITORU, JEHOZ CHOVANI JE POPSANO V
KAPITOLE 2.2.
SPACE
^^^^^
PODPROGRAM SPACE PROVEDE VYPIS MEZERY POMOCI PODPROGRAMU "CO"
(VIZ. KAPITOLA 2.8.).
POSKOZENE REGISTRY: - - -
CINCR
^^^^^
PODPROGRAM CINCR PROVADI VSTUP, ZOBRAZENI A ANALYZU ZNAKU Z
KLAVESNICE. ZNAK JE V REGISTRU <A>, PODLE JEHO HODNOTY JSOU
NASTAVENY PRIZNAKY NASLEDOVNE:
ZNAKY FF-C FF-Z
, SP 0 1
CR 1 1
OSTATNI 0 0
POSKOZENE REGISTRY: A,F
PRIKLAD: PRI VSTUPNIM ZNAKU "CR" SKOK NA ADR1,
PRI VSTUPNIM ZNAKU "SP" SKOK NA ADR2:
CALL CINCR
JC ADR1
JZ ADR2
IMTXT (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
PODPROGRAM IMTXT (IMMEDIATE TEXT) UMOZNUJE VYPIS RETEZCU
ZNAKU BEZPROSTREDNE NASLEDUJICICH ZA VYVOLANIM PODPROGRAMU
-------------------------------- 23 -----------------------
-------------------------------------------------------------
IMTXT POMOCI "CO", POSLEDNIM (TISKNUTYM) ZNAKEM JE ZNAK S
D7=1. POUZ1VA NESTANDARTNE ZASOBNIK !
POSKOZENE REGISTRY: H,L,C,A,F
PRIKLAD: VYTISKNUTI TEXTU "JIRI KOUPIL BAREVNOU
TELEVIZI":
CALL IMTXT
DB 'JIRI KOUPIL'
DB ' BAREVNOU TELEVIZ','I' OR 80H
ADRKUR
^^^^^^
PODPROGRAM ADRKUR VYPOCITA ZE SOURADNICOVYCH UKAZATELU LINECO
(CITAC RADKU) A CHARCO (CITAC ZNAKU) FYZICKOU ADRESU MISTA V
OBRAZOVE PAMETI, KDE SE NACHAZI NA OBRAZOVCE KUZROR, VYSLED-
NOU ADRESU UKLADA DO REGISTRU <HL>.
POSKOZENE REGISTRY: H,L
PRIKLAD: ZOBRAZENI TECKY NA POZICI KURZORU:
CALL ADRKUR
MVI M,'.'
HXASC
^^^^^
PODPROGRAM HXASC (HEX - ASCII) PROVADI PREVOD HEXADECIMALNI
HODNOTY NA KOD ZNAKU ASCII. HEXADECIMALNI HODNOTA JE V
REGISTRU <A>, KOD ZNAKU V REGISTRU <C>.
POSKOZENE REGISTRY: C
PRIKLAD: ZOBRAZENI HEXADECIMALNE REGISTRU <A>:
PUSH PSW
RRC
RRC
RRC
RRC
ANI 0FH
CALL HXASC
CALL CO
POP PSW
ANI 0FH
CALL HXASC
CALL CO
-------------------------------- 24 -----------------------
-------------------------------------------------------------
TIMER (NENI V ZAKLADNI VERZI V.3.X)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
PODPROGRAM VYTVORENI PRODLEVY <BC> MILISEKUND, POCITA SE
ZPOMALENIM CINNOSTI MIKROPOCITACE PLAN 80A O ASI 17% VLIVEM
ZOBRAZOVANI.
POSKOZENE REGISTRY: - - -
GETADR
^^^^^^
PODPROGRAM GETADR UMOZNUJE VYPOCET ADRESY PROMENNYCH UMISTE-
NYCH V NEVYUZITE CASTI PAMETI RAM URCENE PRO UCHOVANI OBRAZU.
VSTUPNI PROMENNOU JE ODSTUP OD ZACATKU DISRAM, UKLADA SE DO
<HL>, VYSLEDNA ADRESA JE OPET V <HL>.
POSKOZENE REGISTRY: H,L
PRIKLAD: ULOZENI OBSAHU MONITOROVSKE PROMEN-
NE "LINECO" DO <A>:
LXI H,LINECO
CALL GETADR
MOV A,M
STJMB
^^^^^
PODPROGRAM SLOUZI K ULOZENI HODNOTY Z REGISTROVEHO PARU <DE>
DO PAMETI, NA MISTO URCENE ADRESOU V REGISTROVEM PARU <HL> A
<HL+1>. PRVNI SE UKLADA REGISTR <E>.
POSKOZENE REGISTRY: H,L
ECHO
^^^^
PODPROGRAM ECHO PROVADI VSTUP ZNAKU PRES PODPROGRAM "CI" A
JEHO ZOBRAZENI POMOCI PODPROGRAMU "CO". ZNAK JE ULOZEN V
REGISTRU <A>.
POSKOZENE REGISTRY: A,F
-------------------------------- 25 -----------------------
-------------------------------------------------------------
8. PREHLED ADRES V/V ZARIZENI
--------------------------------
--------------------------------------------------------------------
I A7 A5 A3 I A1 A0 I A1 A0 I A1 A0 I A1 A0 I
I A6 A4 A2 I 0 0 I 0 1 I 1 0 I 1 1 I
I--------------I------------I------------I------------I------------I
I X X 0 0 0 0 I ST/OP <RW> I ST/OP (RW) I ST/OP (RW) I ST/OP <RW> I
I--------------I------------I------------I------------I------------I
I X X 0 0 0 1 I D '12 (RO) I D '12 (RO) I D '12 (RO) I D '12 (R0) I
I--------------I------------I------------I------------I------------I
I X X 0 0 1 0 I A '55 (RW) I B '55 (RW) I C '55 (RW) I CT'55 (RW) I
I--------------I------------I------------I------------I------------I
I X X 0 0 1 1 I KEY? (WO) I KEY? (WO) I KEY? (WO) I KEY? (WO) I
I--------------I------------I------------I------------I------------I
I X X 0 1 0 0 I BEEP (WO) I BEEP (WO) I BEEP (WO) I BEEP (WO) I
I--------------I------------I------------I------------I------------I
I X X 0 1 0 1 I '14 M (WO) I '14 M (WO) I '14 M (WO) I '14 M (WO) I
I--------------I------------I------------I------------I------------I
I X X 0 1 1 0 I ABRES (RW) I ABRES (RW) I ADRES (RW) I ADRES (RW) I
I--------------I------------I------------I------------I------------I
I X X 0 1 1 1 I ADSET (WO) I ADSET (WO) I ADSET (WO) I ADSET (WO) I
--------------------------------------------------------------------
KDE: X '55 JE REGISTR X OBVODU 8255
D '12 JE VYSTUPNI PORT OBVODU 8212
ST/OP JE OBOOSMERNY PORT STAVOVE INFORMACE/VYSTUPU
'14 M JE MASKOVACI PORT OBVODO 8214
ADRES JE SIGNAL NULOVANI REGISTRU ADRESY ZOBRAZOVANI
ADSET JE SIGNAL ZAPISU ADRESY DO REGISTRU ZOBRAZOVANI
KEY? JE TEST PRITOMNOSTI SOFTWAROVE KLAVESNICE
(WO) JE POUZE VYSTUPNI PORT (VZHLEDEM K SYSTEMU)
(RO) JE POUZE VSTUPNI PORT (POUZE OPERACE CTENI)
(RW) JE OBOOSMERNY PORT
9. SIMULACE KONZOLY
----------------------
VYSTUPNI ZARIZENI PRO KOMUNIKACI S OPERATOREM, TZV.
KONZOLA, JE SIMULOVANA PODPROGRAMEM "CO". ZAJISTUJE POMOCI
SOUBORU DALSICH PODPROGRAMU ZOBRAZOVANI ZNAKU A SPECIALNI
CINNOSTI PODLE RIDICICH ZNAKU. PODPROGRAM "CO" REAGUJE NA
NASLEDUJICI RIDICI ZNAKY VYVOLANIM PRISLUSNYCH PODPROGRAMU:
CR.....0DH........CARRET.....CARRIAGE RETURN
LF.....0AH........LINEF......LINE FEET
BS.....08H........BACST......BACK STEP
FF.....0CH........FORFI......FORM FEET
HOME...1DH........GHOME......GO HOME
DL.....1EH........DELLIN.....DELETE LINE
DSCR...1FH........DELSCR.....DELETE SCREEN
BELL...07H........BEEPS......BEEP SIGNAL
-------------------------------- 26 -----------------------
-------------------------------------------------------------
CARRET
^^^^^^
PODPROGRAM CARRET UMISTI KURZOR NA ZACATEK PRUBEZNEHO RADKU.
LINEF
^^^^^
PODPROGRAM LINEF PROVADI PRECHOD NA NOVY RADEK. POKUD JDE O
RADEK POSLEDNI, PAK VE VERZI V.3.X SLEDUJE PRITOMNOST
ROZSIRENI MONITORU. PRI JEHO PRITOMNOSTI (VE VERZI V.2.X
VZDY) VYVOLA PODPROGRAM ROLL. PRI NEPRITOMNOSTI ROZSIRENI VE
VERZI V.3.X PROVEDE PRECHOD NA PRVNI ZOBRAZOVANY RADEK.
PODPROGRAM ROLL PROVADI ROLOVANI OBSAHU OBRAZOVKY (TJ.
OBRAZOVE PAMETI DISRAM) O JEDEN RADEK NAHORU. PRITOM HORNI
RADEK SE ZTRACI, SPODNI RADEK ZUSTAVA NEPORUSEN (ZDVOJUJE
SE). POZICE KURZORU V RADKU ZUSTANE NEZMENENA.
GHOME
^^^^^
PODPROGRAM GHOME PREMISTI KURZOR DO LEVEHO HORNIHO ROHU OBRA-
ZOVKY.
DELSCR
^^^^^^
PODPROGRAM DELSCR PROVEDE VYMAZ OBRAZOVKY POCINAJE (VCETNE)
RADKU, NA KTEREM JE KURZOR.
FORFI
^^^^^
PODPROGRAM FORFI PROVEDE VYMAZ CELE OBRAZOVKY A UMISTI KURZOR
DO LEVEHO HORNIHO ROHU OBRAZOVKY.
BACST
^^^^^
PODPROGRAM BACST POSOUVA KURZOR O JEDENU POZICI DOLEVA. POKUD
SE NACHAZI NA PRVNI POZICI NA RADKU PREJDE NA POSLEDNI POZICI
PREDCHOZIHO RADKU. PRI DOSAZENI PRVNIHO ZNAKU NA PRVNIM RADKU
ZADNOU DALSI CINNOST NEPROVADI.
DELLIN
^^^^^^
PODPROGRAM DELLIN VYMAZE RADEK OD MISTA KURZORU.
BEEPS
^^^^^
PODPROGRAM BEEP PROVADI GENERACI ZVUKOVEHO SIGNALU ZADANE
DELKY "BEEPLN" A VYSKY "BEEPFQ".
-------------------------------- 27 -----------------------
-------------------------------------------------------------
P L A N 8 0 A
M O D E M M A G N E T O F O N U
==================================================
UZIVATELSKY MANUAL
04.10.1988
(verze pro tisk ve v.d. Drukov)
-------------------------------------------------------------
-------------------------------------------------------------
O B S A H
=========
1. UVOD ....................................... 3
2. PRAVIDLA OBSLUHY PROGRAMOVEHO VYBAVENI ..... 4
3. PREHLED OVLADACIEH PRIKAZU ................. 5
4. POPIS OVLADACICH PRIKAZU ................... 5
4.1. PRIKAZ U ... "UNNAMED" ..................... 5
4.2. PRIKAZ W ... "WRITE" ....................... 6
4.3. PRIKAZ E ... "END OF FILE" ................. 6
4.4. PRIKAZ R ... "READ" ........................ 6
4.5. PRIKAZ P ... "PUT" ......................... 6
4.6. PRIKAZ A ... "APPEND" ...................... 7
4.7. PRIKAZ Q ... "QUAFF" ....................... 7
4.8. PRIKAZ T ... "TAPE DIRECTORY" .............. 7
4.9. PRIKAZ L ... "LOAD MOTION" ................. 7
4.10. PRIKAZ J ... "JOIN" ........................ 7
5. HLASENI CHYB ............................... 8
6. FORMAT ZAZNAMU NA PASCE .................... 8
6.1. USPORADANI BLOKU ........................... 8
6.2. TYPY BLOKU ................................. 10
7. POPIS OVLADACIHO PROGRAMU .................. 11
7.1. WRITE ...................................... 11
7.2. READ ....................................... 12
7.3. EOF ........................................ 12
7.4. QUAFF ...................................... 12
7.5. PUT ........................................ 13
7.6. LOAD ....................................... 13
7.7. TAPE ....................................... 13
7.8. UNNAMED .................................... 14
7.9. KI ......................................... 14
7.10. KO ......................................... 14
7.11. JOIN ....................................... 15
7.12. CLOSE ...................................... 15
7.13. WRBUF ...................................... 15
7.14. RDBUF ...................................... 16
7.15. OPEN ....................................... 16
8. SEZNAM SPOJOVACICH ADRES ................... 17
9. OBVODOVY POPIS MODEMU MAGNETOFONU .......... 19
9.1. POPIS ZAPOJENI A CINNOSTI .................. 19
9.2. TESTOVANI MODEMU ........................... 21
10. ZKUSENOSTI Z PROVOZU MAGNETOFONU ........... 21
11. NAVOD K POUZITI MODEMU MAGNETOFONU ......... 22
-------------------------------- 2 ------------------------
-------------------------------------------------------------
1. UVOD
=======
ABY BYLA PRO STAVEBNICI PLAN 80A ZAJISTENA PROGRAMOVA
NAVAZNOST NA PROFESIONALNI MIKROPOCITACE, BYL NAPSAN OPERACNI
SYSTEM, KTERY DOVOLUJE NAHRADU PAPIROVE DERME PASKY POMOCI
KAZETGVEHO MAGNETOFONU.
PROGRAM OBSLUHY MODEMU UPRAVUJE SPOJOVACI ADRESY
PERIFERNICH ZARIZENI MIKROPOCITACE TAK, ZE KOMUNIKUJE PRES
MONITOROVSKE PODPROGRAMY PO A RI. TO MA ZA NASLEDEK, ZE PO
PROBEHNUTI INICIALIZACNIHO PODPROGRAMU S PRIRAZENIM ADRES LZE
POUZIVAT LIBOVOLNY "DERNOPASKOVY" PROGRAM (BASIC, EDITOR,
ASSEMBLER A POD.) S PRIPOJENYM MAGNETOFONEM.
OPROTI OBDOBNYM SYSTEMUM (NAPR. JPR-1 V4.X) MA NAVIC TU
VYHODU, ZE UMOZNUJE SOUCASNE OTEVRENI DVOU SOUBORU: JEDNOHO
PRO CTENI A DRUHEHO PRO ZAPIS. TATO FILOZOFIE UMOZNUJE
PROVADET EDICI NEBO PREKLAD DELSICH SOUBORU NEZ JE DELKA
UZIVATELSKE PAMETI RAM TAK, ZE SE PREPINA FUNKCE CTENI A
ZAPISU MAGNETOFONU A STRIDAJI SE KAZETY PRO CTENI A ZAPIS.
PRO ZARUCENI VYSSI SPOLEHLIVOSTI ZAZNAMU NA KAZETE, BYL
VYVINUT MODEM PRO KAZETOVY MAGNETOFON. MODEM PROVADI UPRAVU
ZAPISOVANEHO SIGNALU DO TVARU, KTERY JE PRO KOMERCNE
POUZIVANE MAGNETOFONY NEJVHODNEJSI. SOUCASNE ZAJISTUJE
OBVODOVE DEKODOVANI CTENYCH DAT. PREVZETIM TECHTO FUNKCI
MODEMEM JE MIKROPROCESORU MHB8080A UMOZNENO DOSAHNOUT VETSICH
PRENOSOVYCH RYCHLOSTI. JE POUZITO JEDNOPERIODOVE KMITOCTOVE
MODULACE SE SKOKOVOU ZMENOU DELKY PERIODY V OKAMZIKU PRUCHODU
NULOU. UVEDENY PRINCIP UMOZNUJE ZAZNAM A CTENI JEDNOTLIVYCH
BITU S PRENOSOVOU RYCHLOSTI AZ 4800 BD (KMITOCTY 3200 HZ A
6400 HZ).
VZHLEDEM K DELCE POUZITYCH VYROVNAVACICH PAMETI V
PROGRAMU BYLO NUTNE ROZDELIT ZAZNAM DO BLOKU. KAZDY BLOK
OBSAHUJE ZAVADECI MEZERU, SYNCHRONIZACNI ZNAKY, KONTROLNI
ZNAKY, NAZEV SOUBORU, PRIZNAK TYPU SOUBORU, CISLO SOUBORU A
BLOKU A 256 BYTU PRENASENYCH DAT. DELKA BLOKU A JEHO
USPORADANI JE NEMENNE. MEZIBLOKOVE MEZERY UMOZNUJI ZASTAVIT
MAGNETOFON A LIBOVOLNE DLOUHO ZPRACOVAVAT DATA PRECTENA
(ZAPISOVANA) DO VYROVNAVACI PAMETI.
-------------------------------- 3 ------------------------
-------------------------------------------------------------
2. PRAVIDLA OBSLUHY PROGRAMOVEHO VYBAVENI.
==========================================
V DALSIM POPISU SE BUDOU VYSKYTOVAT NASLEDUJICI OBJEKTY:
POCATECNI ADRESA, KONCOVA ADRESA, STARTOVACI ADRESA, NAZEV,
POZNAMKA, EDICE, PRERUSENI FUNKCE.
POCATECNI ADRESA JE 4 MISTNE HEX. CISLO NASLEDOVANE
KLAVESOU "SPACE" NEBO "CR". EDICE CISLA NENI MOZNA, PLATNE
JSOU POSLEDNI CTYRI ZADANE CIFRY.
KONCOVA ADRESA JE 4 MISTNE HEXADECIMALNI CISLO
NASLEDOVANE KLAVESOU "SPACE" NEBO "CR". EDICE CISLA NENI
MOZNA, PLATNE JSOU POSLEDNI CTYRI ZADANE CIFRY.
STARTOVACI ADRESA JE 4 MISTNE HEXADECIMALNI CISLO NASLE-
DOVANE KLAVESOU "SPACE" NEBO "CR". EDICE CISLA NENI MOZNA,
PLATNE JSOU POSLEDNI CTYRI ZADANE CIFRY.
NAZEV JE RETEZ 11 ZNAKU ASCII VYJMA ZNAKU "BS", "ESC" (U
KLAVESNICE TS5220004 JDE O KLAVESU "CS") A "CR", UKONCENY
ZNAKEM CR (POKUD NECHCEME ZADAVAT NASLEDUJICI POZNAMKU).
NEDOPORUCUJE SE POUZIVAT ASCII ZNAKU, KTERE NEKTERE SYSTEMY
NEZOBRAZUJI (NAPR. RIDICI ZNAKY, MALA PISMENA CI SEMIGRAFICKE
SYMBOLY). JEDNOTLIVE ZNAKY NAZVU LZE EDITOVAT KLAVESOU "BS".
MISTO KONKRETNIHO JMENA LZE POUZIT TZV. HVEZDICKOVE KONVENCE.
POKUD JE NA LIBOVOLNEM MISTE NAZVU ZADANA HVEZDICKA "*", PAK
JSOU PLATNE POUZE PRED NI UVEDENE ZNAKY. HVEZDICKA NA PRVNIM
MISTE ZNAMENA LIBOVOLNY NAZEV.
POZNAMKA JE RETEZ ZNAKU, NASLEDUJICI ZA NAZVEM, UKONCENY
KLAVESOU "CR". SPOLU S NAZVEM SMI MIT CELKOVOU DELKU MAX. 230
ZNAKU. PRO ZNAKY POZNAMKY PLATI STEJNA PRAVIDLA JAKO U NAZVU.
POZNAMKU LZE EDITOVAT KLAVESOU "BS".
EDICE MA SMYSL V SOUVISLOSTI SE ZADAVANIM NAZVU A POZ-
NAMKY. SLOUZI K NI KLAVESA "BS", KTERA PROVEDE VYMAZ POSLEDNE
ZADANEHO ZNAKU A PRECHOD KURZORU NA JEHO POZICI.
PRERUSENI FUNKCE LZE ZPUSOBIT V LIBOVOLNEM REZIMU STIS-
KNUTIM KLAVESY "ESC". PRI REZIMECH, VE KTERYCH BY NA PASCE
MOHL VZNIKNOUT NEDEFINOVANY OBJEKT JE MOZNOST PRERUSENI POZ-
DRZENA DO OKAMZIKU, KDY JI LZE PROVEST (NAPR. PO ZAZNAMU
CELEHO BLOKU A POD.). V NEKTERYCH PRIPADECH PRI CTENI, KDY NA
VSTUPU MODEMU NENI PRIVADEN SIGNAL (KONEC PASKY, VYPNUTY
MAGNETOFON), MUZE DOJIT K ZABLOKOVANI FUNKCE PRERUSENI, KTERA
PRO SVOU CINNOST NUTNE VYZADUJE PROMENNY SIGNAL NA VSTUPU.
POKUD K TOMU DOJDE, STACI PRIVEST NA VSTUP MODEMU NEKOLIKANA-
SOBNOU ZMENU SIGNALU (V PRAXI STACI STISKNOUT KLAVESU "ESC" A
NEKOLIKRAT ZAPNOUT A VYPNOUT MAGNETOFON).
-------------------------------- 4 ------------------------
-------------------------------------------------------------
3. PREHLED OVLADACICH PRIKAZU
==============================
---------------------------------------------------------I
I KLAVESA I F U N K C E I
I----------I---------------------------------------------I
I U I ZAPIS HLAVICKY - NAZVU KAZETY I
I----------I---------------------------------------------I
I W I ZAPIS HEXADECIMALNIHO SOUBORU INTEL I
I----------I---------------------------------------------I
I E I ZAPIS HEX. UZAVIRACIHO SOUBORU INTEL I
I----------I---------------------------------------------I
I R I CTENI HEXADECIMALNIHO SOUBORO INTEL I
I----------I---------------------------------------------I
I P I ZAPIS BINARNIHO SOOBORU I
I----------I---------------------------------------------I
I A I PRIPOJENI BINARNIHO SOOBORU I
I----------I---------------------------------------------I
I Q I CTENI BINARNIHO SOOBORO I
I----------I---------------------------------------------I
I T I VYPIS NAZVU A POZNAMEK VSECH SOOBORU I
I----------I---------------------------------------------I
I L I OVLADANI SPINACE MOTORKO MAGNETOFONO I
I----------I---------------------------------------------I
I J I INICIALIZACE PROGRAMU I SPOJOVACICH ADRES I
----------------------------------------------------------
POZN. JEDNOTLIVE PRIKAZY SE VOLAJI UVEDENYMI KLAVESAMI
V MONITORU, KTERY AUTOMATICKY ZAJISTI SKOK DO PRISLUSNEHO
PODPROGRAMU OBSLUHY MAGNETOFONU.
4. POPIS OVLADACICH PRIKAZU
===========================
4.1. PRIKAZ U ... "UNNAMED"
---------------------------
PRIKAZ SE POUZIVA PRO VYTVORENI UVODNIHO BLOKU NA KA-
ZETE. PRI PROVADENI TOHOTO PRIKAZU JE NUTNO ZADAT NAZEV
KAZETY V DELCE 11 ZNAKU ASCII A POZNAMKU DO CELKOVE DELKY AZ
230 ZNAKU ASCII. UVEDENY RETEZEC ZNAKU UKONCIME KLAVESOU
"CR". NYNI SE PROGRAM ZEPTA, ZDA JE MAGNETOFON ZAPNUT NA
NAHRAVANI DOTAZEM "RECORD DONE?". PREPNEME PRISLUSNE
MAGNETOFON A STISKNEME LIBOVOLNOU KLAVESU JAKO POTVRZENI. PO
NAHRANI UVODNIHO BLOKU SE MAGNETOFON AUTOMATICKY ZASTAVI.
UVODNI BLOK MA ZAVADECI MEZERU DLOUHOU ASI 10 S, NEBOT ZACA-
TEK PASKY BYVA VELMI CASIO ZNEHODNOCEN LEPIDLEM ZE SLEPKY.
-------------------------------- 5 ------------------------
-------------------------------------------------------------
UVODNI SOUBOR SE PRI DALSI PRACI S MAGNETOFONEM ZOBRAZUJE
JAKO KAZDY JINY NAZEV NA KAZETE, NESMI VSAK BYT PRECTEN
NEKTERYM S PRIKAZU "G","R" A POD.
4.2. PRIKAZ W ... "WRITE"
-------------------------
PRIKAZ UMOZNUJE ZAPIS SOUBORU V HEXADECIMALNI INTEL
NORME. FORMAT ZAPISU ODPOVIDA FORMATU POUZITEMU U DERNE
PASKY. TENTO ZAPIS SE VYZNACUJE ZVYSENOU MOZNOSTI KONTROLY,
ZABIRA VSAK ASI 3 X VETSI PROSTOR NEZ ZAPIS BINARNI. PRIKAZ
MA DVA PARAMETRY: POCATECNI A KONCOVOU ADRESU. PO JEJICH
ZADANI SE PROGRAM ZEPTA NA JMENO POSLEDNIHO SOUBORU NA PASCE
(NEZNAME-LI, LZE SI VYPOMOCI HVEZDICKOVOU KONVENCI VIZ KAP.
2). PO DOTAZU "PLAY DONE?", PREPNUTI MAGNETOFONU NA CTENI
(PREDPOKLADA SE PREVINUTA PASKA NA ZACATEK) A POTVRZENI
STISKEM LIB. KLAVESY ZACNE PROGRAM VYHLEDAVAT POSLEDNI BLOK
UDANEHO SOUBORU. AZ HO NAJDE, ZEPTA SE NA JMENO PRAVE
ZAPISOVANEHO SOUBORU. PO JEHO ZADANI SI VYZADA POTVRZENI
"RECORD DONE?", ZE MAGNETOFON BYL PREPNUT NA ZAPIS. JE-LI
TOTO PROVEDENO A JE-LI STISKNUTA LIBOVOLNA KLAVESA, ZAPISUJE
SE CELY SOUBOR PO JEDNOTLIVYCH BLOCICH.
POZOR! PRIKAZ "W" NEUZAVIRA AUTOMATICKY ZAPSANY SOUBOR. JE
NUTNE POUZIT PRIKAZU "E" (ENB OF FILE).
4.3. PRIKAZ E ... "END OF FILE"
-------------------------------
PRIKAZ UMOZNUJE ZAPSAT STARTOVACI ADRESU, KTERA JE JEDI-
NYM JEHO PARAMETREM. NAVIC PROVEDE ZAPIS UZAVIRACIHO BLOKU.
TENTO PRIKAZ JE NUTNE PROVEST VZDY PO PRIKAZU "W".
POZN. NULOVA STARTOVACI ADRESA ZPUSOBI ZABLOKOVANI AUTOMATIC-
KEHO STARTU PROGRAMU PO JEHO ZAVEDENI DO PAMETI PRIKAZEM "R".
4.4. PRIKAZ R ... "READ"
------------------------
PRIKAZ UMOZNUJE CIST HEXADECIMALNI SOUBORY. MA JEDINY
PARAMETR: OFFSET, SE KTERYM SE DATA ULOZI DO PAMETI OPROTI
POLOZE, VE KTERE BYLY PRI ZAPISU. POKUD BYL PROGRAM ZAPSAN S
NENULOVOU STARTOVACI ADRESOU A OFFSET BYL NULOVY, PROVEDE SE
AUTOMATICKY SKOK NA TUTO ADRESU.
4.5. PRIKAZ P ... "PUT"
-----------------------
PRIKAZ UMOZNUJE ZAZNAM BINARNIHO SOUBORU. MA DVA PARAME-
TRY: POCATECNI A KONCOVOU ADRESU. STEJNE JAKO PRIKAZ "W"
VYHLEDA POSLEDNI SOUBOR NA KAZETE, NA JEHOZ JMENO SE ZEPTA,
-------------------------------- 6 ------------------------
-------------------------------------------------------------
SPOLU S DATY NESE INFORMACI O ADRESE, ZE KTERE BYLA DATA
PRECTENA. PO ZAPISU CELEHO SOUBORU PROVEDE AUTOMATICKY JEHO
UZAVRENI.
4.6. PRIKAZ A ... "APPEND"
--------------------------
TENTO PRIKAZ LZE POUZIT JEN PO PREDCHOZIM POUZITI PRIKA-
ZU "P". UMOZNUJE ZAPIS BINARNIHO SOUBORU BEZ NUTNOSTI VYHLE-
DAVANI POSLEDNIHO SOUBORU NA KAZETE. TZN, ZE ZAPISUJE PRIMO
OD MISTA, VE KTEREM SE NACHAZI. MA DVA VSTUPNI PARAMETRY:
POCATECNI A KONCOVOU ADRESU.
4.7. PRIKAZ Q ... "QUAFF"
-------------------------
PRIKAZ UMOZNUJE CIST BINARNI SOUBORY. MA JEDINY PARA-
METR: OFFSET, SE KTERYM SE MAJI DATA UMISTIT V PAMETI PROTI
POLOZE, VE KTERE BYLY PRI ZAPISU.
4.8. PRIKAZ T ... "TAPE DIRECTORY"
----------------------------------
PRIKAZ UMOZNUJE VYPIS NAZVU A POZNAMEK VSECH SOUBORU,
KTERE SE NACHAZEJI NA PASCE. TENTO PRIKAZ MAGNETOFON NEZASTA-
VI NA KONCI PASKY.
4.9. PRIKAZ L ... "LOAD MOTION"
-------------------------------
PRIKAZ UMOZNUJE ZAPINAT MOTOREK MAGNETOFONU PRO PREVIJE-
NI A POD. VYPNUTI MOTORKU SE PROVEDE PO STISKNUTI LIBOVOLNE
KLAVESY JAKO POTVRZENI OTAZKY "DONE?".
4.10. PRIKAZ J ... "JOIN"
-------------------------
PRIKAZ PROVADI INICIALIZACI PROGRAMU. PRITOM NASTAVUJE
PRACOVNI CITACE DO NULY, PRIRAZUJE SPOJOVACI ADRESY MONITORU
NA RI A PO A NULUJE PRIZNAK CHYBY I PRIZNAK ZASTAVENI PRI
CHYBE. PRIKAZ "J" SE DOPORUCUJE PROVEST PO VYSKYTU JAKEKOLIV
CHYBY.
-------------------------------- 7 ------------------------
-------------------------------------------------------------
5. HLASENI CHYB
---------------
VE VYVOJOVE VERZI PROGRAMU PRI VYSKYTU LIBOVOLNE CHYBY
SE HLASI JEJI CISLO ZA ZNAKEM "#". V LISTINOU PROGRAMU LZE
ZJISTIT, O KTEROU CHYBU JDE. V PRACOVNI VERZI PROGRAMU BYLO Z
PROSTOROVYCH DUVODU OD HLASENI CHYB CISLEM UPUSTENO, CHYBA SE
HLASI POUZE ZOBRAZENIM "#". PRI VZNIKU CHYB PRI CTENI SE
DOPORUCUJE CTENI OPAKOVAT. ABY NEDOCHAZELO K ZNEHODNOCENI
JEDINECNYCH DATOVYCH SOUBORU, DOPORUCUJRE SE PROVEST PO KAZ-
DEM ZAPISU KONTROLU CTENI PRIKAZEM "T". PRI VZNIKU CHYBY SE
ROZSVITI LED PRIZNAKU CHYBY NA DESCE PROPOJENI (MODEMU).
NASLEDUJE SEZNAM VSECH CHYB INDIKOVANYCH PROGRAMEM SPOLU S
NAVESTIMI ODPOVIDAJICIMI NAZVUM CHYB VE VYPISU PROGRAMU:
ERR1 ... CHYBA HANDLERU PO
ERR2 ... POSLEDNE ZAPSANY SOUBOR NEBYL UZAVREN
ERR3 ... CHYBA V OBSAHU PAMETI PRI READ
ERR4 ... CHYBA V KONTROLNIM SOUCTU PRI READ
ERR5 ... CHYBA V KONTROLNIM SOUCTU PRI READ
ERR6 ... CHYBA HANDLERU RI
ERR7 ... MENE NEZ 1 KBYTE UZTV. PAMETI
ERR8 ... CTENI NEBINARNIHO SOOBORO PRIKAZEM QUAFF
ERR9 ... CHYBI LEVA ADR. ZAVORKA PRI CTENI BIN. SOUB.
ERR10 ... CHYBI PRAVA ADR. ZAVORKA PRI CTENI BIN. SOUB.
ERR11 ... CHYBA V KONTR. SOUCTU ADR. CASTI BIN. SOUB.
ERR12 ... CHYBA V KONTR. SOUCTU DAT. CASTI BIN. SOUB.
ERR13 ... CHYBI UKONCOVACI ZNAK SUBS = 1AH U BIN. SOUB.
ERR14 ... UZAVIRANI NEOTEVRENEHO SOUBORU
ERR15 ... CHYBI KONCOVY PREAMBLE PRI RDBUF
ERR16 ... CHYBA V KONTROLNIM SOUCTU PRI RDBUF
ERR17 ... POSLEDNE ZAPSANY SOUBOR NEBYL UZAVREN
ERR18 ... POSLEDNE CTENY SOUBOR NEBYL OZAVREN
ERR19 ... CHYBA V SOUSLEDNOSTI BLOKU
ERR20 ... CHYBA V SOUSLEDNOSTI SOUBORU
ERR21 ... PRERUSENI FUNKCE KLAVESOU 'ESC'
ERR22 ... CHYBA HANDLERU PO
PO VYSKYTU KAZDE CHYBY JE NUTNE UVEST MODEM DO
POCATECNIHO STAVU PRIKAZEM "J".
6. FORMAT ZAZNAMU NA PASCE
==========================
6.1. USPORADANI BLOKU
---------------------
SOUBOR ZAPSANY NA MAGNETICKE PASCE JE ZAPISOVAN PO BLOCICH,
-------------------------------- 8 ------------------------
-------------------------------------------------------------
KTERE MAJI JEDNOTNOU STRUKTURU, VE KTERE LZE VYCLENIT NA-
SLEDUJICI PRVKY:
A. UVODNI MEZERA
B. SYNCHRONIZACNI ZNAKY
C. PRIZNAK BLOKU
D. DATOVE BYTY
E. NAZEV SOUBORU
F. CISLO BLOKU
G. CISLO SOUBORU
H. KONTROLNI SOUCET
I. SYNCHRONIZACNI ZNAK
J. UZAVIRACI ZNAK
K. KONCOVA MEZERA
UVODNI MEZERA
MA ZA UKOL UMOZNIT ODLISENI BLOKU A SPRAVNOU SYNCHRONIZACI.
SKLADA SE ZE SAMYCH JEDNICEK (0FFH). POCET BYTU UVODNI MEZERY
JE DAN KONSTANTOU "G1LEN' A JE VYPOCTEN TAK, ABY MEZERA MELA
PRO RYCHLOST ZAZNAMU 2400 BD DELKU 800 MS.
SYNCHRONIZACNI ZNAKY
JSOU TVORENY TREMI BYTY V HODNOTACH 010H.
PRIZNAK BLOKU
JE TVOREN JEDINYM ZNAKEM A OZNACUJE TYP BLOKU. MUZE NABYVAT
TECHTO HODNOT:
041H JDE O BLOK TYPU ASCII
042H JDE O BINARNI BLOK
004H JDE O POSLEDNI BLOK V SOUBORU
03AH JDE O BLOK S NAZVEM KAZETY
001H JDE O BLOK S NAZVEM SOUBORU
DATA SOUBORU
JSOU ZAPISOVANA POSTUPNE POCINAJE PRVNIM BYTEM BLOKU. PRU-
BEZNE JE VYTVAREN KONTROLNI SOUCET.
NAZEV SOUBORU
JE TVOREN 11 ZNAKY ASCII.
-------------------------------- 9 ------------------------
-------------------------------------------------------------
CISLO BLOKU
JE BINARNI HODNOTA CISLA BLOKU (PRVNIM BLOKEM JE BLOK S
NAZVEM SOUBORU A MA CISLO 01).
CISLO SOUBORU
JE BINARNI HODNOTA CISLA SOUBORU (PRVNIM SOUBOREM JE NAZEV
KAZETY A MA CISLO 00).
KONTROLNI SOUCET
VYTVARI SE JAKO PROSTE PRICITANI MOD 256 VSECH HODNOT POCI-
NAJE PRIZNAKEM BLOKU A KONCE CISLEM SOUBORU. JE ZAPISOVAN
JAKO BINARNI PRIMA HODNOTA.
UZAVIRACI ZNAK
JE TVOREN JEDINYM BYTEM V HODNOTE 00H.
KONCOVA MEZERA
JE TVORENA SAMYMI JEDNICKAMI (0FFH). JEJI DELKA JE URCENA
KONSTANTOU 'G2LEN' TAK, ABY PRO RYCHLOST ZAZNAMU 2400 BD MELA
DELKU 100 MS. ZAJISTUJE UKONCENI CTENI PRI DROP-OUTECH NA
PASCE.
6.2. TYPY BLOKU
---------------
VZHLEDEM K PRIZNAKUM ROZLISUJEME PET TYPU BLOKU:
A. BLOK ASCII SOUBORU
B. BLOK BINARNIHO SOUBORU
C. UKONCOVACI DATOVY BLOK
D. DATOVY BLOK S NAZVEM KAZETY
E. DATOVY BLOK S NAZVEM PROGRAMU
BLOK S NAZEVEM KAZETY
BLOK MA PRIZNAK ':' = 03AH. V DATOVE CASTI OBSAHUJE 250
ZNAKU, Z NICHZ JE 11 PRVNICH ROVNO NAZVU UVODNIHO SOUBORU,
ZBYTEK TVORI POZNAMKU.
-------------------------------- 10 -----------------------
-------------------------------------------------------------
BLOK S NAZVEM SOUBORU
BLOK MA PRIZNAK 01H. V DATOVE CASTI OBSAHUJE 250 ZNAKU, Z
NICHZ PRVNICH 11 TVORI NAZEV SOUBORU, ZBYTEK JE POZNAMKOU.
BATOVY BLOK ASCII SOUBORU
BLOK MA PRIZNAK 'A' = 41H. V DATOVE CASTI OBSAHUJE 255 ZNAKU
ASCII, KTERE ODPOVIDAJI DATAM SOUBORU (ZDROJOVE SOUBORY,
HEXADECIMALNI SOUBORY). TYTO BLOKY LZE VYTVARET POMOCI PRIKA-
ZU HEXADECIMALNIHO ZAPISU (PRES SPOJOVACI ADRESU PO).
DATOVY BLOK BINARNIHO SOUBORU
BLOK MA PRIZNAK 'B' = 42H. V DATOVE CASTI OBSAHUJE U PRVEHO
BLOKU ZA BLOKEM NAZVU KONCOVOU A POCAIECNI ADRESU UZAVRENOU
DO ADRESOVYCH ZAVOREK '<' A ,>'. TATO CAST MA SAMOSTATNY
KONTROLNI SOUCET. DALE NASLEDUJI VLASTNI DATA SOUBORU. PO-
SLEDNIM ZNAKEM ZA DATY SOUBORU JE ZNAK "SUB".
UKONCOVACI DATOVY BLOK
BLOK MA PRIZNAK 04H. V BATOVE CASTI OBSAHUJE BUFFER, KTERY JE
DO PLNE DELKY DOPLNEN ZNAKEM NUL=00H. TENTO BLOK SE VYTVARI
PO PRIKAZU "E", "P" NABO "A" AUTOMATICKY NA KONCI ZAZNAMENA-
VANEHO SOUBORU.
7. POPIS OVLADACIHO PROGRAMU
============================
NASLEDUJE POPIS JEDNOTLIVYCH USEKU PROGRAMU A
PODPROGRAMU, PROVADEJICI UCELENE CINNOSTI.
7.1. WRITE
----------
PODPROGRAM - PRIKAZ PRO ZAPIS OBLASTI PAMETI DANE POCATECNI A
KONCOVOU ADRESOU V HEXADECIMALNIM FORMATU INTEL PRES SPOJO-
VACI ADRESU PRO PO. NA TOTO VYSTUPNI ZARIZENI SE VYSILA
SOUBOR PO BLOCICH, KTERE MAJI TVAR:
CR,LF,':',N,A,T,D,D,D,...,D,C
KDE: CR ... ZNAK 'CR' = 0DH
LF ... ZNAK 'LF' = 0AH
':' ... ZNAK ':' = 3AH
N ... POCET DATOVYCH BYTU D
-------------------------------- 11 ------------------------
-------------------------------------------------------------
A ... ADRESA UMISTENI PRVEHO DATOVEHO BYTU D
T ... TYP BLOKU, U DATOVEHO ROVEN 00H
D ... JEDNOTLIVE BYTY DAT HEXADECIMALNE, NAPRED
DOLNI NIBBLE PAK HORNI NIBBLE
C ... KONTROLNI SOUCET Z HODNOT N,A,T,D
POSLEDNI, UKONCOVACI BLOK MA TVAR:
CR,LF,':',00,A,T,C
KDE: 00 ... ODPOVIDA NULOVEMU POCTU DATOVYCH BYTU
A ... JE STARTOVACI ADRESA (POKUD JDE O PROGRAM)
T ... JE TYP BLOKU (ROVEN 01H)
PODPROGRAM WRITE VYSILA TYTO BLOKY PRES SPOJOVACI ADRESY "PO"
NA PODPROGRAM "KO", KTERY VYTVARI PRISLUSNE BLOKY NA KAZETE.
PODPROGRAM WRITE MUZE, POKUD JE V PAMETI PRISLUSNY HANDLER A
SPOJOVACI ADRESA NA NEJ, SPOLUPRACOVAT S DEROVACEM DERNE
PASKY V HEXADECIMALNI NORME FIRMY INTEL.
7.2. READ
---------
PODPROGRAM READ TVORI OPAK PODPROGRAMU WRITE. UMOZNUJE TOTIZ
CIST SOUBORY ZAPSANE V INTEL-HEXADECIMALNI NORME PRES SPOJO-
VACI ADRESU RI. POKUD TATO ADRESA ODPOVIDA PODPROGRAMU KI,
PAK LZE CIST Z KAZETY SOUBORY VYTVORENE PODPROGRAMEM WRITE
PRES SPOJOVACI ADRESY PO-KO.
7.3. EOF
--------
PODPROGRAM SLOUZI PRO UZAVIRANI SOUBORU VYTVARENYCH PODPRO-
GRAMEM WRITE. POKUD BYL TEZ AKTIVOVAN ZAPISOVY REZIM, VYVOLA
SE AUTOMATICKY PODPROGRAM CLOSE PRO UZAVIRANI SOUBORU NA
KAZETE.
7.4. QUAFF
----------
PRIKAZ UMOZNUJE NACTENI CELEHO SOUBORU Z PASKY DO PAMETI.
BERE SE V UVAHU OFFSET, JEZ JE VSTUPNIM PARAMETREM PRIKAZU.
DELKA SOUBORU NA PASCE NENI TIMTO NARUSENA. KONTROLUJI SE
KONTROLNI SOUCTY, CISLO SOUBORU A CISLA BLOKU (NA SOUSLED-
NOST). OVLADANI MOTORKU MAGNETOFONU JE AUTOMATICKE. PO ZAVO-
LANI PRIKAZU JE NUTNE UDAT NAZEV SOUBORU, PODLE KTEREHO JE
SOUBOR VYHLEDAVAN. FUNKCE USEKU PROGRAMU PROVADEJICIHO PRIKAZ
QUAFF JE:
-------------------------------- 12 -----------------------
-------------------------------------------------------------
- VSTUP OFFSETU
- OTEVRENI SOUBORU PRO CTENI (FIND)
- PRES RI VSTUP PRVNIHO BYTU (NACTENI BUFFERU)
- JDE O BINARNI SOUBOR - NE CHYBA
- CTENI A KONTROLA ADRESOVE CASTI : <A1A2>C - CHYBA ?
- PRICTENI OFFSETU K POCATECNI (A2) I KONCOVE (A1) ADRESE
- PRES RI CTENI JEDNOTLIVYCH BYTU A UKLADANI DO PAMETI
- CTENI A KONTROLA KONTROLNIHO SOUCTU DATOVE CASTI - CHYBA?
- CTENI A KONTROLA UKONCOVACIHO ZNAKU "SUBS" - CHYBA ?
- PASIVACE STATUSU CTENI
7.5. PUT
--------
PRIKAZ UMOZNUJE ULOZENI CELEHO SOUBORU VYMEZENEHO POCATECNI A
KONCOVOU ADRESOU, JEZ JSOU VSTUPNIMI PARAMETRY. SOUBOR SE
ZAPISUJE PO BLOCICH S PRISLUSNE UPRAVENYMI CISLY SOUBORU A
BLOKU. PRIKAZ UMOZNUJE NAJIT POSLEDNI ZAPSANY SOUBOR (PODLE
JMENA), Z NEJZ BERE CISLO SOUBORU. CINNOST USEKU PROGRAMU
PROVADEJICI PRIKAZ PUT JE:
- VSTUP DVOU ADRES (EXPR)
- OTEVRENI SOUBORU PRO ZAPIS (OPEN)
- ULOZENI PRIZNAKU BINARNICH BLOKU
- NULOVANI KONTROLNIHO SOUCTU
- PRES PO ZAPIS ADRESOVE CASTI <A1A2>C
- NULOVANI BUNKY KONTROLNIHO SOUCTU
- PRES PO ZAPIS OBLASTI PAMETI VYMEZENE ADRESAMI
- PRES PO ZAPIS KONTROLNIHO SOUCTU
- PRES PO ZAPIS UZAVIRACIHO ZNAKU "SUBS"
- UZAVRENI SOUBORU (CLOSE)
7.6. LOAD
---------
PRIKAZ ZAJISTI SPUSTENI MOTORKU. NASLEDUJE DOTAZ, ZDA JE
PREVIJENI UKONCENO NACEZ SE PO STISKNUTI LIBOVOLNE KLAVESY
MOTOREK OPET ZASTAVI. CINNOST USEKU PROGRAMU PROVADEJICI
PRIKAZ LOAD JE:
- SPUSTENI MOTORKU
- VYPIS 'REWIND DONE ?', CEKANI NA LIB. KLAVESU
- ZASTAVENI MOTORKU
7.7. TAPE
---------
PRIKAZ PRECTE NAZVY VSECH SOUBORU NA KAZETE A VYPISE JE NA
OBRAZOVCE. ZA NAZEV VYPISE CISLO BLOKU A SOUBORU. KONTROLUJE
CISLA SOUBORU NA SOUSLEDNOST A ZJISTUJE KONTROLNI SOUCTY V
KAZDEM PRECTENEM BLOKU. CINNOST USEKU PROGRAMU PROVADEJICI
-------------------------------- 13 -----------------------
-------------------------------------------------------------
PRIKAZ TAPE JE:
- KONTROLA PASIVITY PRIZNAKU CTENI - CHYBA ?
- VYPIS 'PLAY DONE ?' A CEKANI NA LIB. KLAVESU
- PRECTENI BLOKU (RDBUF)
- POKUD NEJDE O BLOK S NAZVEM CTI DALSI BLOK
- ZOBRAZ NAZEV, CISLO BLOKU A SOUBORU
- ZPET NA CTENI BLOKU
7.8. UNNAMED
------------
PRIKAZ PRO VYTVORENI UVODNIHO SOUBORU S NAZVEM KAZETY A
POZNAMKOU. CISLO SOUBORU JE 00H. CINNOST USEKU PROGRAMU
PROVADEJICIHO PRIKAZ UNNAMED JE:
- KONTROLA PASIVITY STATUSU ZAPISU - CHYBA?
- TISK 'CASSETTE NAME:'
- VSTUP NAZVU (NAMIN)
- TISK 'RECORD DONE ?' A CEKANI NA LIB. KLAVESU
- VYNULOVANI CITACE BLOKU A SOUBORU DEROVACE
- ULOZENI PRIZNAKU BLOKU ':'
- ZAPIS BLOKU Z BUFFERU DEROVACE (WRBUF)
- PASIVACE STATUSU ZAPISU
7.9. KI
-------
PODPROGRAM CTENI BYTU V BLOKOVEM REZIMU PRACE. PRACUJE SE S
BUFFEREM. JE PRIMO KOMPATIBILNI S PODPROGRAMEM RI, TAKZE MUZE
SLOUZIT JAKO HANDLER VSTUPNIHO SERIOVEHO ZARIZENI. CINNOST
PODPROGRAMU KI JE:
- PRI PASIVNIM STATUSU CTENI OTEVRENI SOUBORU (FIND)
- PRI PRAZDNEM BUFFERU - NACTI DALSI BLOK (RDBUF)
- ZOBRAZ NAZEV, KONTROLUJ CISLO BLOKU A SOUBORU
- INKREMENTUJ UKAZATEL
- CTI DALSI ZNAK Z BUFFERU
- JDE-LI O SUBS A O ASCII BLOK PASIVUJ PRIZNAK CTENI
7.10. KO
--------
PODPROGRAM ZAPISU BYTU V BLOKOVEM REZIMU PRACE. PRACUJE S
BUFFEREM. JE PRIMO KOMPATIBILNI S PODPROGRAMEM PO, TAKZE MUZE
SLOUZIT JAKO HANDLER VYSTUPNIHO SERIOVEHO ZARIZENI. CINNOST
PODPROGRAMU KO JE:
- PRI PAS. STATUSU ZAPISU OTEVRI SOUBOR PRO ZAPIS (OPEN)
- PRI PAS. STATUSU ZAPISU VYNULUJ BUFFER
- JE-LI BUFFER PLNY, ZAPIS HO (WRBUF), NULUJ POINTR
- INKREMENTUJ POINTR
-------------------------------- 14 -----------------------
-------------------------------------------------------------
- ULOZ DATOVY BYTE BO BUFFERU
- JDE-LI O SUBS A JBE-LI O ASCII BLOK UZAVRI SOUBOR (CLOSE)
7.11. JOIN
----------
PRIKAZ PRO INICIACI SYSTEMU MAGNETOFONU, NASTAVENI VSECH
PRIZNAKU A SPOJOVACICH ADRES MONITORU. CINNOST PODPROGRAMU
JOIN JE:
- RIDICI SLOVO NA '55
- ZJISTENI KONCE UZIV. RAM (MEMCHK)
- JE PRITOMNO VICE NEZ 1 KILO USRAM - NE CHYBA
- BUFFER DEROVACE NA POSLEDNICH 256 BYTU USRAM
- BUFFER SNIMACE NA PREDPOSLEDNICH 256 BYTU USRAM
- KONEC UZIVATELSKE PAMETI UREND ZMENSIT O 512
- UKAZATELE BUFFERU DEROVACE A SNIMACE NA NULU
- CITACE BLOKU A SOUBORU DEROVACE I SNIMACE NA NULU
- PRIPOJKA PRO JOIN0
- STATUSY DEROVACE A SNIMACE NA NULU (PASIVNI)
- NASTAV SPOJOVACI ADRESU PO NA KO
- NASTAV SPOJOVACI ADRESU RI NA KI
- VYSLI PASIVUJICL PRIKAZ NA MODEM PRES '55
7.12. CLOSE
-----------
PODPROGRAM PRO UZAVRENI PRAVE ZAPISOVANEHO A DOPOSUD
OTEVERENEHO SOUBORU. CINNOST PODPROGRAMU CLOSE JE:
- KONTROLA AKTIVITY STATUSU ZAPISU - CHYBA?
- PASIVACE STATUSU ZAPISU
- DOPLNENI BUFFERU ZNAKY 00H
- ULOZENI PRIZNAKU KONCOVEHO BLOKU 04H
- ZAPIS BUFFERU
7.13. WRBUF
-----------
PODPROGRAM ZAPISU OBSAHU BUFFERU NA KAZETU. CINNOST
PODPROGRAMU WRBUF JE:
- INKREMENTACE CITACE BLOKU
- PRI AKT. STS CTENI PIS 'RECORD DONE' A CEKEJ NA KLAVESU
- SPUST MOTOREK
- ZAPIS UVODNI MEZERU
- ZAPIS 3 BYTE PREAMBLU 10H
- NULUJ KONTROLNI SOUCET
- ZAPIS CELY BUFFER
- ZAPIS NAZEV (11 ZNAKU Z OBLASTI NAME2)
-------------------------------- 15 -----------------------
-------------------------------------------------------------
- ZAPIS CISLO BLOKU
- ZAPIS CISLO SOUBORU
- ZAPIS KONTROLNI SOUCET
- ZAPIS PREAMBLE 10H
- ZAPIS BYTE 00H
- ZAPIS UKONCOVACI MEZERU
- ZASTAV MAGNETOFON
7.14. RDBUF
-----------
PODPROGRAM PRO ZAPLNENI CTECIHO BUFFERU BLOKEM PRECTENYM Z
KAZETY. CINNOST PODPROGRAMU RDBUF JE:
- PODLE PRIZNAKU CTENI/ZAPIS URCI PRACOVNI BUFFER
- INKREMENTUJ CITAC BLOKU
- PRI AKTIVNIM STATUSU CTENI VYPIS 'PLAY DONE' A CEKEJ
- PRIPRAV INTERFACE PRO CTENI
- NAJDI MEZERU (SRGAP)
- CTI A KONTROLUJ 3 BYTY PREAMBLE 10H
- NULUJ KONTROLNI SOUCET
- CTI 256 BYTU DO BUFFERU
- CTI 11 ZNAKU NAZVU A 2 BYTY CISEL DO POM. OBLASTI
- CTI A KONTROLUJ KONTR. SOUCET - CHYBA ?
- CTI A KONTROLUJ BYTE PREAMBLE 10H - CHYBA ?
- ZASTAV MAGNETOFON
7.15. OPEN
----------
PODPROGRAM PRO OTEVRENI SOUBORU PRO CTENI, TJ. VYHLEDANI
PRISLUSNEHO NAZVU A NALEZENI PRVNIHO DATOVEHO BLOKU. CINNOST
PODPROGRAMU OPEN JE:
- KONTROLA PASIVITY STATUSU ZAPISU - CHYBA ?
- VYPIS 'LAST NAME'
- VSTUP JMENA POSLEDNIHO ZAPSANEHO SOUBORU (NAMIN)
- VYPIS 'PLAY DONE ?' A CEKEJ NA KLAVESU
- PRES ZAPISOVY BUFFER VYHLEDEJ URCENY SOUBOR (SEARCH)
- VYPIS 'NEW NAME'
- VSTUP JMENA NOVEHO SOUBORU (NAMIN)
- AKTIVACE PRIZNAKU ZAPISU
- ULOZENI PRIZNAKU BLOKU SE JMENEM (01H)
- VYPIS 'RECORD DONE ?' A CEKEJ NA LIB. KLAVESU
- VYNULUJ CITAC BLOKU
- CITAC SOUBORU NASTAV O JEDNICKU VETSI NEZ U POSL. SOUBORU
- ZAPIS BLOK SE JMENEM
- VYNULUJ BUFFER
- ULOZ PRIZNAK ASCII BLOKU (A)
-------------------------------- 16 -----------------------
-------------------------------------------------------------
8. SEZNAM SPOJOVACICH ADRES PROGRAMU
====================================
PRO KOMUNIKACI S MONITOREM A OVLADACIM PROGRAMEM
MAGNETOFONU SLOUZI NASLEDUJICI SPOJOVACI ADRESY (JDE O VERZI
PROGRAMU MAGNETOFONU NAHRANOU V EPROM OD ADRESY 0F0000H):
ADRESA NAZEV PODPR. CINNOST
-------------------------------------------------------------
MAGIC+01H JOIN STUDENY START PROGRAMU
MAGIC+04H JOINO TEPLY START PROGRAMU
MAGIC+07H QUAFF CTENI BINARNIHO SOUBORU
MAGIC+0AH PUT ZAPIS BINARNIHO SOUBORU
MAGIC+0DH APEND PRIPOJENI BIN. SOUBORU
MAGIC+10H LOAD OVLADANI MOTORKU MGF
MAGIC+13H DIR VYPIS NAZVU SOUBORU
MAGIC+16H UNNAM POJMENOVANI NOVE KAZETY
MAGIC+19H KI CTI BYTE Z KAZETY
MAGIC+1CH KO ZAPIS BYTE NA KAZETU
MAGIC+1FH WRITE ZAPIS HEX. SOUBORU
MAGIC+22H READ CTENI HEX. SOUBORU
MAGIC+25H EOF ZAPIS AKON. HEX. SOUBORU
MAGIC+28H CLOSE UZAVRENI ZAP. SOUBORU
-------------------------------------------------------------
PRITOM HODNOTA "MAGIC" ODPOVODA POCATECNI ADRESE
OBSLUZNEHO PROGRAMU. VE VETSINE VERZI JE NA TETO ADRESE OBSAH
55H, KTERY UMOZNUJE AUTOMATICKOU IDENTIFIKACI PRITOMNOSTI
TOHOTO PROGRAMU Z JINYCH PROGRAMU NEBO Z MONITORU.
NA VSECH UVEDENYCH SPOJOVACICH ADRESACH JSOU SKOKY DO
PRISLUSNYCH PODPROGRAMU, TZN. V UZIVATELSKEM PROGRAMU SE
PROVADI VOLANI SUBRUTINY VYSE UVEDENE ADRESY.
PRIKLAD: VSTUP JEDNOHO BYTU Z KAZETY A JEHO ZOBRAZENI
JAKO HEXADECIMALNIHO ZNAKU.
CALL 0F019H ; KI
MOV A,C
CALL 0F833H ; DBYTE
-------------------------------- 17 -----------------------
-------------------------------------------------------------
PRI SPOLUPRACI S MONITOREM VYUZIVA PROGRAM
NASLEDUJICICH ADRES A SLUZEB:
NAZEV ADRESA FUNKCE
----------------------------------------------------------
CI MONIT+03H VSTUP ZNAKU Z KLAVESNICE
RI MONIT+06H VSTUP ZNAKU ZE SNIMACE
CO MONIT+09H VYSTUP ZNAKU NA OBRAZOVKU
PO MONIT+0CH VYSTUP ZNAKU NA DEROVAC
LO MONIT+0FH VYSTUP ZNAKU NA TISKARNU
CSTS MONIT+12H STATUS KONZOLY
MEMCK MONIT+1BH ZJISTENI KONCE PAMETI
IODEF MONIT+1EH NASTAVENI SPOJ. ADRES V/V
CRLF MONIT+24H PRECHOD NA NOVY RADEK
EXPR MONIT+27H VSTUP HEX. CISLA
ASHEX MONIT+2DH PREVOD ASCII --> HEX
DADR MONIT+30H ZOBRAZENI OBSAHU <HL>
DBYTE MONIT+33H ZOBRAZENI OBSAHU <A>
HILO MONIT+36H INKR. <HL> A SROV. S <DE>
NEXT MONIT+39H TEPLY START MONITORU
SPACE MONIT+3CH ZOBRAZENI MEZERY
CINCR MONIT+3FH VSTUP A ROZPOZNANI ZNAKU
HXASC MONIT+48H PREVOD HEX --> ASCII
TIMER MONIT+4BH CEKANI <BC> MILISEKUND
GETADR MONIT+5EH ADRESA SKRYTE PROMENNE <HL>
STJMB MONIT+51H ULOZ <DE> NA [<HL>F<HL>+1]
ECHO MONIT+54H VSTUP A ZOBRAZENI ZNAKU
BACST MONIT+57H POSUN KURZORU O MISTO ZPET
PRO SVOU CINNOST POUZIVA PROGRAM MAGNETOFONU TECHTO
FYZIKYCH ADRES V/V ZARIZENI:
ADRPA 0A0H ADRESA PORTU PA OBVODU 8255
ADRPB 0A1H ADRESA PORTU PB OBVODU 8255
ABRPC 0A2H ADRESA PORTU PC OBVODU 8255
ADRCT 0A3H ADRESA RIDICIHO PORTU OBVODU 8255
CTRLWD 92H RIDICI SLOVO PA-IN,PB-IN,PC-OUT,M0
PASWD 10H PASIVACNI SLOVO INTERFACE
POMOCNYMI PARAMETRY PROGRAMU MAGNETOFONU JSOU KONSTANTY
URCUJICI DELKY JEDNOTLIVYCH MEZER V ZAZNAMU, DELKY BUFFERU,
DELKY NAZVU A POZNAMKY. JEJICH VELIKOSTI JSOU:
GAPBIT 320 POCET JEDNICKOVYCH BITU PRO 100 MS
G1LEN 2240 POCET JEDNICKOVYCH BITU PRO 700 MS
G2LEN 160 POCET JEDNICKOVYCH BITU PRO 50 MS
G3LEN 32000 POCET JEDNICKOVYCH BITU PRO 10 S
WAITTR 300 POCET MS CEKANI NA ROZBEHNUTI MOTORKU
COMLEN 239 DELKA ZOBRAZOVANE POZNAMKY
NAMLEN 11 DELKA NAZVU
BUFLEN 255 DELKA BUFFERU
-------------------------------- 18 -----------------------
-------------------------------------------------------------
9. MODEM PRO MAGNETICKOU KAZETOVOU JEDNOTKU
===========================================
PRO UKLADANI DATOVYCH SOUBORU BYLA VYVINUTA VNEJSI
PAMETOVA JEDNOTKA OPIRAJICI SE O KOMERCNI KAZETOVY MAGNETO-
FON. K PREVODU DIGITALNICH DAT NA SINUSOVY SIGNAL A NAOPAK
BYL VYVINUT SPECIALNI OBVOD - MODEM (MODULATOR/DEMODULATOR).
PRINCIP ZAZNAMU SE OPIRA O ZMENU DELKY PERIODY SINOVEHO
PRUBEHU PODLE LOGICKE HODNOTY BITU DAT. PRITOM JEDNOMU BITU
ODPOVIDA CELY PRUBEH JEDNE PERIODY (KLADNA I ZAPORNA
PULVLNA). ZMENA PERIODY SIGNALU SE PROVADI SKOKEM, AVSAK PRI
NULOVE HODNOTE SINUSOVEHO NAPETI (RESP. PRI PRUCHODU SINUSO-
VEHO PRUBEHU CASOVOU OSOU A ELIMINOVANE STEJNOSMERNE SLOZCE).
PRO SVOU FUNKCI MODEM VYUZIVA PARALELNI PROGRAMOVATELNY
KOMUNIKACNI OBVOD MHB8255A (EKVIVALENT ZAHRANICNIHO OBVODU
I8255A). NEDOPORUCUJE SE POUZITI SOVETSKEHO OBVODU KR580IK55,
NEBOT TEN JE EKVIVALENTEM MNOHEM POMALEJSIHO I8255.
PROGRAMOVE JE MODEM RIZEN SPECIALNIM PROGRAMEM NAHRANYM
DO PAMETI EPROM (2 KB). OVLADACI PROGRAM MODEMU LZE RIDIT NA
UROVNI MONITORU ZVLASTE PRO TENTO UCEL VYHRAZENYMI PRIKAZY. V
PROGRAMECH VYSSI UROVNE (TJ. SYSTEMOVYCH NEBO UZIVATELSKYCH)
LZE MAGNETOFONU POUZIVAT JAKO NAHRADY DERNE PASKY. PAK SE NA
KAZETOPASKOVOU JEDNOTKU OBRACIME PRES SPOJOVACI ADRESY
MONITORU VOLANIM PODPROGRAMU RI (VSTUP ZE SNIMACE DERNE
PASKY) PRO CTENI NEBO PO (VYSTUP NA DEROVAC PASKY) PRI
ZAPISU. SOUCASTI PROGRAMU JE STATICKA SIMULACE DERNE PASKY,
TJ. JE UMOZNENO UKLADANI NEBO CTENI SAMOSTATNYCH BYTU. V
TAKTO ORGANIZOVANEM SYSTEMU JE VSAK NUTNO VYHRADIT SLUZBU,
KTERA Z VYSSIHO JAZYKA UMOZNI UZAVRIT PRAVE ZAPSANY SOUBOR.
TATO SLUZBA MUZE PROSTE VOLAT PODPROGRAM "CLOSE". OTEVIRANI
SOUBORU PRO CTENI I ZAPIS JE AUTOMATICKE, PROVEDE SE PRI
PRVNI KOMUNIKACI (PRVNI VYVOLANI PO NEBO RI). UZAVIRANI
SOUBORU PRO CTENI SE NEVYZADUJE.
9.1. POPIS ZAPOJENI A CINNOSTI
-------------------------------
U POPSANEHO ZAPOJENI BYLO POZADANO O OCHRANU POMOCI
AUTORSKEHO OSVEDCENI PV-7752-85.
SCHEMA ZAPOJENI MODEMU MA CISLO S-11, ROZMISTENI
SOUCASTEK NA DESCE S PLOSNYMI SPOJI MA CISLO S-8.
OBVOD IO-08 (MH7439A) ZAJISTEJE PODELENI HODINOVEHO
SIGNALU CLC ZAKLADNIHO KMITOCTU 512 KHZ PRO JEDNOTLIVE "BO-
DOVE" RYCHLOSTI. K DISPOZICI JSOU STREDNI "BODOVE" RYCHLOSTI
600 BD, 1200 BD, 2400 BD A 4800 BD. TYTO UDAJE JSOU STATIS-
TICKE A PLATI PRO SOUBORY SE STEJNYM POCTEM JEDNICEK A NUL
(DELKA JEDNICKY JE POLOVICNI VZHLEDEM K DELCE NULY).
DELIC IO-07 (MH7493A) ZAJISTUJE DALSI SNIZENI FREKVENCE
-------------------------------- 19 -----------------------
-------------------------------------------------------------
POSTUPUJICIHO SIGNALU VYDELENIM 8. ZA NIM NASLEDUJE RIZENY
DELIC DVEMI SESTAVENY Z OBVODU IO-06 (MH7474/09) A HRADEL IO-
05 (MH7400/06,08,11). FUNKCE TOHOTO OBVODU SPOCIVA V TOM, ZE
PODLE HODNOTY BITU PC0 (VYSTUPNI DATOVY BIT Z MIKROPOCITACE),
ZAPSANEHO DO POMOCNEHO KLOPNEHO OBVODU IO-06 (MH7474/05),
OTEVIRA BUD PRIMOU CESTU NEBO CESTU PRES DELIC DVEMI. TIM JE
PROVADENA ZMENA PERIODY ZAPISOVANEHO SIGNALU V ZAVISLOSTI NA
HODNOTE DAT.
TAKTO UPRAVENY SIGNAL PROMENNE PERIODY POSTUPUJE NA
DEKADICKY DELIC IO-04 (MH7490A), KTERY ZAJISTI VYDELENI
ZAKLADNI PERIODY NA DESET STEJNYCH CASOVYCH USEKU. V KAZDEM Z
TECHTO USEKU GENERUJE DEKODER IO-03 (MH7442) JEDEN Z
POSLOUPNOSTI DESETI IMPULSU, JEZ SE VEDOU NA ODPOROVOU SIT
SESTAVENOU Z ODPORU R16, R18 AZ R27. JEJICH HODNOTY BYLY
VYPOCTENY TAK, ABY SIGNAL NA VYSTUPU MIC/AUX BYL APROXIMACI
SINUSOVEHO PRUBEHU. Z ODPOROVE SITE VYCHAZI SIGNAL SCHODOVEHO
PRUBEHU, KTERY JE JESTE UPRAVEN TVAROVE (C8,R15,C5,C7) I
UROVNOVE (R14,R17). ODPORY R16 AZ R27 BY MELY MIT PRESNOST 1 %
(V AMATERSKE PRAXI LZE RESIT VYBEREM Z VETSIHO MNOZSTVI).
CTVRTY A OSMY IMPULS POSLOUPNOSTI SOUCASNE OVLADAJI
STAV R-S KLOPNEHO OBVODU IO-05 (MH7400/03,06). DESATY IMPULS
ZAJISTUJE ZAPIS VYSTUPNICH DAT PC0 DO POMOCNEHO KLOPNEHO
OBVODU IO-06 (MH7474/05).
VSTUPNI SIGNAL Z MAGNETOFONU SE VEDE NA ZESILOVAC IO-01
(MAA741) A NA SHMITTUV KLOPNY OBVOD I0-02/MH7400/03,06.
UPRAVENY SIGNAL JE VEDEN NA NULOVACI VSTUPY CITACU A VYVEDEN
NA VYSTUPNI KONEKTOR JAKO SIGNAL SYNC. VZHLEDEM K TOMU, ZE
NEKTERE MAGNETOFONY OBRACEJI FAZI REPRODUKOVANEHO ZAZNAMU,
BYLO NUTNE POUZIT PREPINACE "INV" UMOZNUJICIHO ZPETNE
OBRACENI FAZE. PRI ZAZNAMU VSAK MUSI BYT TENTO SPINAC V
TAKOVE POLOZE, ABY BYLY NULOVACI VSTUPY CITACU PROPOJENY S
VYSUPEM IO-02/7400/06.
HRADLO I0-02/MH7400/08 A TRANZISTOR T1-KC509 UMOZNUJI
PROGRAMOVE RIZENI MOTORKU MAGNETOFONU, RESP. POSUVU PASKY
KAZETY.
TRANZISTOR T2-KC509 UMOZNUJE PROGRAMOVE ZABLOKOVAT
VYSTUP GENERATORU SINUSOVKY, POKUD JE ZADGUCI ZAZNAMENAT
TICHOU PASAZ, NAPR. MEZERU MEZI DATOVYMI BLOKY A POD.
PRI ZAPISU JE CINNOST MODEMU TAKOVA, ZE PODLE
VYSTUPNICH DAT DIN, KTERA JSOU MENENA V RYTMU
SYNCHRONIZACNIHO SIGNALU FRAME A ZAPISOVANA DO POMOCNEHO
KLOPNEHO OBVODU, SE MENI PERIODA ZAPISOVANEHO SINUSOVEHO
VYSTUPNIHO SIGNALU MIC/AUX. ULOHOU PROGRAMU JE ZDE SLEDOVAT
ZMENY SYNCHRONIZACNIHO SIGNALU FRAME A PRI DOSAZENI HODNOTY
LOG 1 VYSLAT DALSI BIT DATOVEHO SOUBORU NA DIN. OBECNE
PROGRAM ZAJISTUJE SPINANI POSUVU PASKY, ODBLOKOVANI CITACU
SIGNALY BLK1 A TBLK2, A ODBLOKOVANI GENERATORU SINUSOVKY
SIGNALEM BLKOUT.
-------------------------------- 20 -----------------------
-------------------------------------------------------------
PRI CTENI JE FUNKCE MODENU PONEKUD SLOZITEJSI. SIGNAL Z
MAGNETOFONU (MON) SE ZESILI A UPRAVI NA OBDELNIKOVY PRUBEH V
SCHMITTOVE KLOPNEM OBVODU OBVODU IO-02/7400/03,06. POKUD SE
JEDNA O PRVNI KLADNOU PULPERIODU SIGNALU, JSOU CITACE
NULOVANY JEDNICKOVYM SIGNALEM NA NULOVACICH VSTUPECH. V DRUHE
ZAPORNE PULPERIODE JE SIGNAL NA NULOVACICH VSTUPECH NULOVY A
CITACE ZAHAJI CINNOST. PRITOM VYSTUP OBVODU IO-06/MH7474/09
JE Z MIKROPOCITACE NASTAVEN DO JEDNICKY, TAKZE SE NACITAVA
RYCHLEJSI FREKVENCE. CTVRTYM IMPULSEM Z DEKODERU SE R-S
KLOPNY OBVOD NASTAVI DO JEDNICKY, TJ. CTENY DATOVY SIGNAL JE
V JEDNICCE. NYNI ZALEZI NA TOM, ZDA JDE O KRATKOU NEBO O
DLOUHOU PULPERIODU (TJ. ZDA BYLA ZAPSANA LOG 1 NEBO LOG 0).
PRI DLOUHE PULPERIODE SE VYGENERUJE TEZ OSMY IMPULS, KTERY
KLOPNY OBVOD R-S VYNULUJE, TOMU ODPOVIDA NULOVY CTENY DATOVY
SIGANL DOUT. POKUD JDE O KRATKOU PULPERIODU, KE GENERACI
OSMEHO IMPULSU NEDOJDE, NEBOT JSOU CITACE ZABLOKOVANY KLADNOU
PULPERIODOU NASLEDUJICIHO BITU, A TAK CTENY DATOVY SIGNAL
DOUT ZUSTANE JEDNICKOVY.
ULOHOU PROGRAMU JE SLEDOVAT PRUBEH SIGNALU SYNC A VZDY
PRI NABEHU KLADNE PULPERIODY PRECIST HODNOTU BITU DOUT.
SOUCASNE MUSI BYT OVLADANY OSTATNI FUNKCE MODEMU, OBDOBNE JAK
TOMU BYLO PRI ZAPISE.
DIODY D1 AZ D4 UMOZNUJI OPTICKY ZOBRAZIT STAV, VE
KTEREM SE MODEM NACHAZI. DIODA D1 URCUJE, KDY JE SPUSTEN
MOTOREK MAGNETOFONU. DIODA D4 OZNAMUJE, ZE MODEM JE V REZIMU
ZAZNAMU. DIODA D2 SVITI, JE-LI MODEM V REZIMU CTENI. JAKO
PRIZNAK CHYBY SLOUZI DIODA D3.
9.2. TESTOVANI MODEMU
----------------------
TESTOVANI OZIVENEHO MODEMU PROVEDEME NEJLEPE TAK, ZE
ZAPLNIME PAMET SYSTEMU DEFINOVANYM OBSAHEM, KTERY
MNOHONASOBNE NAHRAJEME JAKO DATOVY SOUBOR NA KAZETU. PRI
CTENI TAKTO VYTVORENYCH ZAZNAMU SLEDUJEME, ZDA NEVZNIKAJI
CHYBY.
10. ZKUSENOSTI Z PROVOZU MAGNETOFONU
-------------------------------------
PRI POUZIVANI KAZETOVEHO MAGNETOFONU JE NUTNO DODRZET
NASLEDUJICI ZAKLADNI PRAVIDLA:
1. DOPORUCUJE SE POUZIVAT PASEK ORWO K-60 CHROMDIOXID NEBO
AUDIOSTAR HS-I60. POKUD BUDOU POUZITY PASKY JINEHO TYPU
(NAPR. EMGETON), JE NUTNE JE PRED POUZITIM OTESTOVAT,
-------------------------------- 21 -----------------------
-------------------------------------------------------------
NAVIC JE TREBA OMEZIT RYCHLOST PRENOSU DAT NA MAX. 2400
BD.
2. PASKY SKLADUJEME VZDY PREVINUTE AZ K ZAVADECI CASTI A
UZAVRENE V OBALECH. PASKU NIKDY NEVYJIMAME Z MAGNETOFONU
BEZ PREDCHOZIHO PREVINUTI (VYJMA PRIPADU MULTIBLOKOVEHO
PREKLADU)
3. PRI POUZITI MAGNETOFONU JINEHO TYPU NEZ K-10 JE TREBA
UVAZIT, ZDA MA UROVNE NAPETI NA VSTUPU A VYSTUPU SHODNE
S MAGNETOFONEM K-10. BYLA OVERENA SPOLEHLIVA FUNKCE
MAGNETOFONU BRG MK-27.
4. HLAVA MAGNETOFONU MUSI BYT CLSTENA PRAVIDELNE PRED KAZ-
DYM POUZITIM K MAGNETOFONU PRILOZENYM CISTICIM PRIPRAV-
KEM A JEDNOU ZA 10 HODIN PROVOZU VYMYTA PROPYLALKOHOLEM.
5. MAGNETOFON HUSI BYT VZDALEN OD VSECH ZDROJU ELMAG.
POLI (OBVODY OBRAZOVKY, TRANSFORMATORY ATP.). VLIV
OKOLNIHO ELMAG. POLE NA MAGNETOFON LZE OVERIT V REZIMU
ZAZNAMU S HLASITYM PRIPOSLECHEM, KDY PREMISTOVANIM A
NATACENIM MAGNETOFONU NAJDEME JEHO POLOHU S NEJMENSIM
SLYSITELNYM BRUMEM.
6. MAGNETOFON MUSI BYT V BEZVADNEM STAVU. TO SE TYKA JAK
HLAVY TAK I MECHANICKE CASTI MAGNETOFONU. NELZE
DOCILIT SPOLEHLIVE CINNOSTI, POKUD VLIVEM OPOTREBENI
MAGNETOFONU (NEBO VADNYCH KAZET) JE SLYSITELNE ZNACNE
KOLISANI RYCHLOSTI POSUVU PASKY.
7. PASKY MUSI BYT SKLADOVANY V MISTE VZDALENEH OD VSECH
ZDROJU ELMAG. POLI, NEJLEPE V UZAVRENE PLECHOVE
KRABICI.
11. NAVOD K POUZITI MODEMU MAGNETOFONU
========================================
POPIS OVLADACICH A INDIKACNICH PRVKU
------------------------------------
VSECHNY OVLADACI A INDIKACNI PRVKY SE NACHAZEJI NA
CELNI STENE SKRINKY MODEMU. V JEJI PRAVE HORNI CASTI JSOU
UMISTENY CTYRI PREPINACE PRO VOLBU RYCHLOSTI PRENOSU DAT A
JSOU OZNACENY "600", "1200", "2400" A "4800". PRO SPOLUPRACI
S MIKROPOCITACEM PLAN80A SE DOPORUCUJE RYCHLOST 2400 BD, PRO
KTEROU JSOU VYTVARENY VSECHNY CASOVE SMYCKY V OVLADACIM
PROGRAMU MODEMU. BEZE ZMEN LZE POUZIT RYCHLOSTI NIZSI (600 A
1200 BD), POUZE SE PRISLUSNE PRODLOUZI VSECHNY CEKACI DOBY
(NAPR. MEZERY MEZI JEDNOTLIVYMI BLOKY ZAZNAMU NA KAZETE). PRO
RYCHLOST 4800 BD JE TREBA POUZIT ZVLASTNICH UZIVATELSKYCH
-------------------------------- 22 -----------------------
-------------------------------------------------------------
PROGRAMU A TAKTEZ VYBRANYCH KAZET PRO MAGNETOFON. TATO
RYCHLOST SE POUZIVA PRO ARCHIVACI VETSIHO MNOZSTVI DAT.
P O Z O R !
SOUCASNE SMI BYT STISKNUT POUZE JEDEN ZE CTYR PREPINACU VOLBY
RYCHLOSTI PRENOSU DAT. NENI DOVOLENO PREPINAT RYCHLOST DAT
BEHEM PROVOZU MIKROPOCITACE (NUTNO JEJ VYPNOUT).
VE STREDNI CASTI CELNI STENY SKRINKY MODEMU SE
NACHAZEJI DVA PREPINACE. PRVNI - OZNACENY "INV" - SLOUZI K
INVERZI VSTUPNIHO SIGNALU PRO MAGNETOFONY, KTERE OBRACEJI
FAZI CTENEHO SIGNALU OPROTI SIGNALU ZAZNAMENANEMU. TOTO
TLACITKO SE POUZIVA V PRIPADE, KDY NEMUZEME PRECIST ZAZNAM ZE
ZAPUJCENE NEBO KOUPENE (V DRUZSTVU DRUKOV NAHRANE) KAZETY.
PAK VE STLACENE POLOZE TLACITKA JE PROVADENA INVERZE CTENEHO
SIGNALU. TIM JE ZAJISTENA KOMPATIBILITA MEZI RUZNYMI DRUHY
MAGNETOFONU. DRUHE TLACITKO - OZNACENE "MOT" - UMOZNUJE
SPUSTIT MOTOREK MAGNETOFONU (NAPR. PRO PREVIJENI PASKY) BEZ
OHLEDU NA TO, V JAKE UROVNI JE SIGNAL PRO RIZENI MOTORKU Z
MIKROPOCITACE.
V LEVE DOLNI CASTI CELNI STENY SKRINKY MODEMU JSOU
UMISTENY INDIKACNI DIODY "LED". JSOU OZNACENY "RD", "WR",
"ER" A "MO". DIODA "RD" SVITI TEHDY, POKUD JE OVLADACI
PROGRAM MODEMU V REZIMU CTENI BLOKU. DIODA "WR" SVITI TEHDY,
POKUD JE OVLADACI PROGRAM V REZIMU ZAZNAMU BLOKU. DIODA "ER"
SVITI TEHDY, DOJDE-LI Z NEJAKEHO DUVODU KE VZNIKU CHYBY. TATO
DIODA SVITI DO TE DOBY, NEZ JE PROGRAM OVLADANI MODEMU
INICIALIZOVAN PRIKAZEM "J" (V MONITORU). DIODA "MO" ODPOVIDA
STAVU SIGNALU MIKROPOCITACE PRO RIZENI POHYBU MOTORKU. POKUD
SVITI, JE POHYB MOTORKU ODBLOKOVAN.
PRIPOJENI MODEMU K MIKROPOCITACI
--------------------------------
MODEM SE PRIPOJUJE K MIKROPOCITACI POMOCI PROPOJOVACIHO
KABELU, KTERY TVORI NEDILNY CELEK S KABELEM PRO KLAVESNICI A
MEL BY BYT VYRABEN JAKO HOTOVY DOPLNEK K MIKROPOCITACI
PLAN80A DRUZSTVEM DRUKOV. KONEKTOR PRO PRIPOJENI MODEMU JE
UMISTEN NA ZADNI STRANE SKRINKY (MA 24 POLU).
P O Z O R !
KONEKTOR MUSI BYT PRIPOJEN TAK, ABY SI CISLA POLU NA VIDLICI
I NA ZASUVCE VZAJEMNE ODPOVIDALY. GPACNE PRIPOJENI MODEMU
MUZE ZAPRICINIT JEHO POSKOZENI. PRIPOJOVANI (ODPOJOVANI)
KABELU MODEMU K MIKROPOCITACI LZE PROVADET POUZE V JEHO
VYPNUTEM STAVU.
-------------------------------- 23 -----------------------
-------------------------------------------------------------
PRIPOJENI MODEMU K MAGNETOFONU
------------------------------
K MAGNETOFONU SE MODEM PRIPOJUJE POMOCI TRIVODICOVEHO
STINENEHO KABELU. TENTO KABEL JE JEDNIM KONCEM PRIPOJEN K
OBVODUM MODEMU, NA JEHO DRUHEM KONCI SE NACHAZI VIDLICE
PETIKOLIKOVEHO KONEKTORU DIN. PREDPOKLADA SE STANDARTNI
PROPOJENI JEDNOTLIVYCH PRIVODU V KONEKTORU MAGNETOFONU:
VYVOD VYZNAM
1 VYSTUP SIGNALU Z MODEMU
(NAHRAVACI VSTUP MAGNETOFONU)
2 ZEMENI
3 VSTUP SIGNALU DO MODEMU
(VYSTUP SIGNALU Z MAGNETOFONU)
4 RIZENI OTACENI MOTORKU
PREDPOKLADA SE, ZE MAGNETOFON UMOZNUJE VNEJSI RIZENI
OTACENI MOTORKU. OTACENI MOTORKU SE RIDI UZEMNENIM VYVODU 4
KONEKTORU (MOTOREK SE ZASTAVI) NEBO PONECHANIM TOHOTO VYVODU
V "PLOVOUCIM" STAVU (MOTOREK SE MUZE OTACET). SPINACEM JE
TRANZISTOR, JEHOZ KOLEKTOR JE PRIPOJEN NA VYVOD 4 KONKTORU.
TENTO PRINCIP VYHOVUJE MAGNETOFONUM K-10 (VYROBY TESLA) NEBO
MK-27 (VYROBA BRG MADARSKO).
P O Z O R !
RIZENI OTACEK MOTORKU JE NUTNE PRO SPRAVNOU CINNOST
OVLADACIHO PROGRAMU. MAGNETOFONY, KTERE RIZENI NEUMOZNUJL,
NELZE BEZ APRAVY POUZIT.
-------------------------------- 24 -----------------------
-------------------------------------------------------------
P L A N 8 0 A
T I N Y B A S I C
================================
U Z I V A T E L S K Y M A N U A L
27.09.1988
-------------------------------------------------------------
-------------------------------------------------------------
"TINY BASIC" JE JEDNIM Z NEJKRATSICH ALE I NEJJEDNODUS-
SICH ZASTUPCU BASICOVSKE RODINY INTERPRETU. VZHLEDEM KE SVYM
MOZNOSTEM JE URCEN PREDEVSIM PRO AMATERSKE DOMACI POUZITI A
PRO ZACINAJICI ADEPTY MIKROPOCITACOVE TECHNIKY. JELIKOZ CELY
INTERPRET JE KRETSI NEZ 4 KBYTE, LZE JEJ NAPROGRAMOVAT DO
DVOU POUZDER PAMETI MHB2716/C A POUZIVAT JAKO REZIDENTNI
JAZYK V MALEM AMATERSKEM MIKROPOCITACI.
POPSANY "TINY BASIC" MA POUZE CELOCISELNOU ARITMETIKU.
JEHO SILNOU STRANKOU JE VSAK VELMI POHODLNA SPOLUPRACE S
MONITOREM A PROGRAMY NAPSANYMI VE STROJOVEM KODU. PUVODNI
VERZE TOHOTO INTERPRETU BYLA PREVZATA ZE SYSTEMU SAPI-1, BYLA
VSAK UPRAVENA PRO SYSTEM PLAN 80A A OBOHACENA O NEKTERE
PRIKAZY A FUNKCE. Z DUVODU PROGRAMOVE KOMPATIBILITY S
PUVODNIM SYSTEMEM I JEDNOTNOSTI OBSLUHY BYLY UPRAVY OMEZENY
JEN NA NUTNE MINIMUM.
START "TINY BASICU" SE V SYSTEMU PLAN 80A PROVADI POD
MONITOREM STISKNUTIM PRIKAZU "B", PO KTEREM SE VYPISE:
TINY BASIC VX.Y
READY
\
LOMITKO ZDE OZNAMUJE PRIPRAVENOST BASICU PRIJIMAT PRIKAZY,
ZNAKY VX.Y URCUJI VERZI BASICU. JDE O TZV. STUDENY START,
KTERY CELY INTERPRET INICIUJE A VYNULUJE UKAZATELE PROGRAMOVE
I DATOVE PAMETI. POKUD BYL JIZ JEDNOU INTERPRET SPUSTEN A PAK
JEHO FUNKCE PRERUSENA, NAPR. SKOKEM DO MONITORU, LZE JEJ BEZ
POSKOZENI PROGRAMU SPUSTIT POD MONITOREM PRIKAZEM "C", PO
KTEREM SE VYPISUJE POUZE "\".
INTERPRET "TINY BASICU" JE V SYSTEMU PLAN 80A UMISTEN
NA ADRESACH E000 AZ EFFF. PODLE DELKY PAMETI RAM UMISTUJE
INTERPRET VNITRNI PROMENNE. PRO SVOU FUNKCI POTREBUJE NEJMENE
JEDEN KILOBYTE UZIVATELSKE PAMETI RAM.
OPROTI SLOZITEJSIM INTERPRETUM BASICU, "TINY" NEPROVADI
ZAKODOVANI PROGRAMU DO SPECIALNIHO KODU (TJ. PREVOD KLICOVYCH
SLOV PROGRAMU NA JEDNOBYTOVE ZNAKY). TIM SE SICE ZKRATI
INTERPRET, AVSAK ZPOMALI PROVADENI PROGRAMU A HLAVNE SNIZI
VYUZITI PROGRAMOVE PAMETI. VKLADANY PROGRAM JE V PAMETI
ULOZEN TAK, JAK JEJ VIDIME NA OBRAZOVCE JEN S TIM ROZDILEM,
ZE CISLO RADKU NENI REPREZENTOVANO DEKADICKYM, NYBRZ BINARNIM
CISLEM. VYUZITI PAMETI LZE CASTECNE ZVYSIT, POKUD BUDEME
POUZIVAT POVOLENYCH ZKRATEK PRIKAZU.
PRI POPISU INTERPRETU JE POUZITO SYMBOLICKYCH PRAVIDEL
PRO ZKRACENI TEXTU. PRO ZDURAZNENI URCITYCH KODU JSOU TYTO
UZAVRENY DO UVOZOVEK, TAKZE NAPR. PISMENO A JE ZAPSANO "A".
HRANATE ZAVORKY "[" A "]" OZNACUJI NEPOVINNOU CAST OBJEKTU
JAZYKA, NAPR. "[N]" ZNAMENA NEPOVINNE UVEDENI PARAMETRU N.
LOMENE ZAVORKY "<" A ">" OZNACUJI URCITY OBJEKT, NAPR. PRO-
MENNA P JE OZNACENA "<P>". OZNACENIM "<N>" ROZUMIME HODNOTOVY
PARAMETR, KTERYM MUZE BYT CISLO, PROMENNA VYRAZ NEBO FUNKCE.
-------------------------------- 2 ------------------------
-------------------------------------------------------------
ZAKLADNI OBJEKTY JAZYKA:
========================
K ZAKLADNIH OBJEKTUM JAZYKA PATRI POVELY, INSTRUKCE, FUNKCE,
OPERATORY, PROMENNE, KONSTANTY A VYRAZY. PRO VYJADRENI TECHTO
OBJEKTU SE POUZIVA REZERVOVANYCH SLOV A NAZVU.
REZERVOVANA SLOVA:
------------------
LIST LLIST RUN NEW MONITOR RAM
LOAD SAVE NEXT LET CLS CLEAR
HARD DISPL IF GOTO GOSUB RETURN
REM FOR INPUT PRINT LPRINT END
STOP CALL OUTCHAR OUT OS I$
WAIT BEEP POKE MASK TAB BYTE
WORD PUT CLOSE PLOT DRAW MOVE
CURS INIT EDIT RND ABS SIZE
PEEK INCHAR HEX INM IN TOP
AREM LEN GET TO STEP
DEFINICE ZAKLADNICH OBJEKTU JAZYKA:
-----------------------------------
POVELY: SLOUZI K OVLADANI FUNKCE INTERPRETU A SLEDOVANI
CHODU PROGRAMU.
INSTRUKCE: PRIKAZY, KTERE VYKONAVA PROGRAM NEBO KTERE LZE
VYVOLAT PRIMO.
FUNKCE: CINNOSTI, JEJICHZ VYSLEDKEM JE VZDY CISELNA NEBO
RETEZOVA HODNOTA.
OPERATORY: ARITMETICKE, LOGICKE, TEXTOVE A RELACNI OPERACE
PROMENNE: ZAKLADNI OBJEKTY PRO ULOZENI PROMENNYCH HODNOT
KONSTANTY: ZAKLADNI OBJEKTY NEMENNE HODNOTY
VYRAZY: OBJEKTY VYTVARENE Z FUNKCI, PROMENNYCH A KONSTANT
POMOCI OPERATORU.
ARITMETICKE OPERATORY:
----------------------
+ ... SECITANI
- ... ODECITANI
/ ... CELOCISELNE DELENI
* ... NASOBENI
( ... LEVA ZAVORKA
) ... PRAVA ZAVORKA
-------------------------------- 3 ------------------------
-------------------------------------------------------------
RELACNI OPERAIORY:
------------------
> ... VETSI
>= ... VETSI NEBO ROVNO
= ... ROVNO
# ... NEROVNO
< ... MENSI
<= ... MENSI NEBO ROVNO
LOGICKE OPERATORY:
------------------
"TINY BASIC" VLASTNI LOGICKE OPERTORY NEMA. PRO LOGICKY SOU-
CET VSAK LZE POUZIT OPERACI SCITANI '+', PRO LOGICKY SOUCIN
OPERACI NASOBENI '*', NEBOT VYSLEDEK JAKO LOGICKA PROMENNA SE
TESTUJE NA NULOVOST NEBO NENULOVOST.
PRIKLAD: \10 A=5
\20 B=0
\30 IF A+B THEN PRINT "SOUCET:TRUE"
\40 IF A*B THEN PRINT "SOUCIN:TRUE"
\RUN
SOUCET:TRUE
READY
\
TEXTOVY OPERATOR:
-----------------
JE TVOREN JEDNODUCHOU UVOZOVKOU. JEHO HODNOTA JE DEKADICKE
CISLO ODPOVIDAJICI ASCII KODU ZNAKU, UZAVRENEHO V TOMTO OPE-
RATORU. POZN. ASCII JE NORMA PRO ZNAKY A JEJICH CISELNOU
REPREZENTACI (AMERICAN STANDART CODE FOR INFORMATION INTER-
CHANGE).
PRIKLAD: \10 PRINT "A",'A',"___B",'B'
\RUN
A 65___B 66
READY
\
KONSTANTY:
----------
CISELNA KONSTANTA JE CELE CISLO OD -32767 DO +32767. ZNAK "+"
LZE U KLADNE KONSTANTY VYNECHAT. PRO ZNAMENKO JE
VYHRAZEN BIT D15 (NEJVYSSI), NULOVY BIT D15 ZNAMENA
KLADNE CISLO, JEDNICKOVY BIT D15 ZNAMENA ZAPORNE CISLO.
PRIKLAD: A = -2468 B = 0 C = +654 D = 27432
-------------------------------- 4 ------------------------
-------------------------------------------------------------
RETEZOVA KONSTANTA JE SKUPINA ZNAKU ASCII UZAVRENA DO
DVOJITYCH UVOZOVEK. POKUD TIMTO RETEZCEM KONCI RADEK,
NENI NUTNE PSAT DRUHOU UVOZOVKU.
PRIKLAD: PRINT "12345678","AHOJ
CISLO RADKU:
------------
CISLO RADKU JE CHARAKTERISTICKYM OZNACENIM RADKU PROGRAMU A
NAHRAZUJE NAVESTI, UKAZUJICI NA TENTO RADEK. JE TO CELE
KLADNE CISLO V ROZSAHU 1 AZ 32767. NAPISEME-LI RADEK S CISLEM
SHODNYM S CISLEM JIZ EXISTUJICIHO RADKU, BUDE STARY RADEK
VYMAZAN A NAHRAZEN NOVYM. DOPORUCUJE SE CISLOVANI RADKU S
KROKEM 10, CIMZ JE USNADNENO POZDEJSI LADENI PROGRAMU.
JEDNODUCHA CISELNA PROMENNA:
----------------------------
OZNACUJI SE VELKYMI PISMENY A,B,...,Z. LZE TEDY POUZIT
MAXIMALNE 26 JEDNODUCHYCH PROMENNYCH. ROZSAH HODNOTY CISELNE
PROMENNE SE POHYBUJE V ROZSAHU CELYCH CISEL OD -32767 PO
+32767. TYTO PROMENNE MAJI PEVNE VYHRAZENE MISTO V PAMETI
(ZABIRAJI DVA BYTY) A EXISTUJI TEDY VZDY, I KDYZ NEBYLY
POUZITY V PROGRAMU.
POZN. PRI STARTU PROGRAMU PRIKAZEM "RUN" SE JEDNODUCHE CISEL-
NE PROMENNE NENULUJI, K TOMU SLOUZI PRIKAZ "CLEAR".
PRIKLAD: A=5,B=7,C=9999,B=-7777
INDEXOVANA CISELNA PROMENNA:
----------------------------
"TINY BASIC" MA JEDINOU INDEXOVANOU PROMENNOU. OZNACUJE SE
@(P), KDE PROMENNA P UDAVA INDEX A MUZE BYT V ROZSAHU 0 AZ
32767. KAZDY PRVEK TOHOTO POLE MUZE MIT CELOCISELNOU HODNOTO
OD -32767 PO +32767. JEONOTLIVE POLOZKY INDEXOVANE CISELNE
PROMENNE JSOU UKLADANY OD KONCE PROGRAMOVE PAMETI. PRI JEJIM
POUZIVANI JE TEDY NUTNE KONTROLOVAT ROZSAH VOLNE PAMETI PRI
VYTVARENI PROGRAMU (VIZ. HLASENI CHYBY "SORRY").
PRIKLAD: \10 FOR I=1 TO 100
\20 @(I)=0
\30 NEXT I
\40 PRINT "INDEXOVA PROMENNA @(1) AZ @(100)"
\50 PRINT "VYNULOVANA."
\RUN
INDEXOVA PROMENNA @(1) AZ @(100)
VYNULOVANA.
READY
\
-------------------------------- 5 ------------------------
-------------------------------------------------------------
TVORBA PROGRAMU:
================
PROGRAM SE SKLADA Z JEDNOTLIVYCH RADKU, OPATRENYCH CISLEM
RADKU. NA RADCICH SE NACHAZEJI JEDNOTLIVE UKONY POPSANE PRI-
KAZY. PRI PROVADENI PROGRAMU SE VZDY PROVADEJI UKONY PODLE
VZESTUPNYCH CISEL RADKU, NA NICHZ JSOU UVEDENY. CISLA RADKU
TVORI TEZ ADRESU-UKAZATEL PRO INSTRUKCE SKOKU. PRO VYTVARENI
PROGRAMU PLATI NEKOLIK ZAKLADNICH PRAVIDEL:
- RADEK ULOZIME DO PAMETI POCITACE TAK, ZE JEJ VYPISEME
POMOCI KLAVESNICE A ZA NEJ STISKNEME KLAVESU "CR" (LOMENA
SPKA VLEVO: <--' )
- PRI PSANI PROGRAMU SETRIDUJE INTERPRET "TINY BASIC"
VKLADANE RADKY PODLE VELIKOSTI JEJICH CISLA AUTOMATICKY, NENI
TREBA VKLADAT RADKY PODLE JAKEHOKOLIV PORADI
- PRI VLOZENYCH DVOU RADCICH SE STEJNYM CISLEM JE TEN, KTERY
BYL VLOZEN JAKO PRVNI VYMAZAN, PLATI POZDEJI VLOZENY RADEK
- PRI VZNIKU CHYBY PRI PSANI LZE PRED ULOZENIM RADKU DO
PAMETI ZAPSANE ZNAKY VYMAZAT KLAVESAMI "DEL" NEBO "BS". PO
ZAPISU DO PAMETI STISKNUTIM KLAVESY "CR" LZE CHYBU OPRAVIT
PREPSANIM CELEHO RADKU NEBO POUZITIM EDICNIHO PRIKAZU "EDIT".
U MATICOVE KLAVESNICE TS5220004 SLOUZI PRO VYMAZ ZNAKU
KLAVESA SE SIPKOU VLEVO.
- U PRIRAZOVACIHO PRIKAZU SMI BYT FUNKCE POUZE NA JEHO PRAVE
STRANE, FUNKCI NELZE HODNOTU PRIRAZOVAT
- NA LEVE STRANE PRIRAZOVACIHO PRIKAZU SE SMI NACHAZET POUZE
NAZEV PROMENNE (TJ. "A" AZ "Z")
- POKUD JE SYSTEM KONFIGUROVANY JAKO MAGNETOPASKOVY, LZE
SESTAVENY PROGRAM ZAZNAMENAT NA KAZETU PRIKAZEM "SAVE" NEBO
PRECIST PROGRAM Z KAZETY PRIKAZEM "LOAD"
- PO SPUSTENI PROGRAMU PRIKAZEM "RUN" SE JEDNOTLIVE RADKY
PRED INTERPRETACI (PROVEDENIM) KONTROLUJI. DOJDE-LI K CHYBE,
OBJEVI SE HLASENI CHYBY A VYPISE SE RADEK S OTAZNIKEM ZA
PUVODCEM CHYBY
-------------------------------- 6 ------------------------
-------------------------------------------------------------
POVELY:
=======
POVELY UMOZNUJI OPERATOROVI RIDIT CHOD PROGRAMU A JEHO EDICI.
DALE UMOZNUJI VYTVORENY PROGRAM ULOZIT NA PASKU, NEBO Z PASKY
PRECIST STARY PROGRAM. POVELY JSOU ZADAVANY BEZ
PREDCHAZEJICIHO CISLA RADKU.
[L]LIST [N1][+N2]
-----------------
PRIKAZ PROVADEJICI VYPIS ULOZENEHO V PAMETI PROGRAMU. PRITOM
PRIKAZ LIST PROVADI VYPIS NA OBRAZOVKU (PRES MONITOROVSKE
CO), LLIST PROVADI VYPIS NA TISKARNU (PRES MONITOROVSKE LO).
CISLO N1 OZNACUJE PRVNI RADEK VYPISU, CISLO N2 OZNACUJE POCET
RADKU VYPISU. OBE CISLA N1 I N2 NEJSOU POVINNA. (ZKRATKA "L."
NEBO "LL.").
PRIKLAD: LIST 20
LLIST 100+15
L. 55+3
RUN
---
PRIKAZ SLOUZI KE SPUSTENI PROGRAMU POCINAJE RADKEM S
NEJNIZSIM CISLEM. BEH PROGRAMU SE PRERUSI PO DOSAZENI KONCE
PROGRAMU, PRIKAZU "STOP", PRIKAZU "END", PRI VZNIKU CHYBY
NEBO PRI PRERUSENI PROGRAMU KLAVESAMI 'CTRL-C' NEBO TLACITKEM
"INT" U SYSTEMU PLAN SOA. (ZKRATKA "R.")
NEW
---
PRIKAZ UMOZNUJICI VYMAZ PROGRAMOVE PAMETI. VE SKUTECNOSTI
VSAK PROVADI POUZE INICIOVANI PROMENNE "TXTUNF" UKAZUJICI NA
KONEC PROGRAMU. DO TETO PROMENNE SE NASTAVI ADRESA ZACATKU
PROGRAMOVE PAMETI. PROMENNA "TXTUNF" JE UMISTENA NA ADRESE
003BH A 003CH (PRVNI JE NIZSI BYTE). ZACATEK PROGRAMOVE
PAMETI "TXTBGN" MA ADRESU 009BH. (ZKRATKA "N.").
RAM N
-----
POVEL UMOZNUJICI MENIT ROZDELENI PAMETI "TINY BASICU" TIM, ZE
VNUTI INTERPRETU NOVY KONEC PAMETI PRO PROGRAM. TENTO JE
URCEN PARAMETREM N PRIKAZU A MUZE BYT V ROZSAHU (TXTBGN+32)
AZ PO HODNOTU URCENOU MONITOROVSKYM PODPROGRAMEM MEMCHK. Z
TOHO PLYNE, ZE MINIMALNI MOZNY PROSTOR PRO PROGRAM V BASICU
JE 32 BYTE. PRIKAZEM LZE VYTVORIT PROSTOR PRO UZIVATELSKE
PROGRAMY NAPSANE V ASSEMBLERU. POZN. PRI STUDENEM STARTU
-------------------------------- 7 ------------------------
-------------------------------------------------------------
INTERPRETU JE ROZSAH PROGRAMOVE PAMETI NASTAVEN VZDY NA KONEC
DOSTUPNE PAMETI RAM, TJ. NA MAXIMALNE MOZNOU HODNOTU. (ZKRAT-
KA "RA.").
LOAD
----
PRIKAZ UMOZNUJICI ZAVEDENI PROGRAMU Z PASKY (AT UZ DERNE NEBO
MAGNETOFONOVE) DO PROGRAMOVE PAMETI. POKUD JE POUZIT SYSTEM V
MAGNETOPASKOVE VERZI, SE PAK PO VLOZENI PRIKAZU VYPISE DOTAZ
NA NAZEV PROGRAMU:
NAME:
PO JEHO VLOZENI UKONCENEM "CR" SE OBJEVI DOTAZ, ZDA BYL
MEGNETOFON PREPNUT NA SNIMANI:
PLAY DONE?
PO STISKNUTI LIBOVOLNE KLAVESY SE ZACNE PROGRAM NACITAT DO
PAMETI. POKUD NASTANE CHYBA OHLASI SE DVOJITYM KRIZKEM "#".
UKONCENI NAHRAVANI PROGRAMU JE OZNACENO VYPISEM LOMITKA "\".
POZN. FORMAT PROGRAMU NA PASCE JE DEFINOVAN U PRIKAZU "SAVE".
(ZKRATKA POVELU "LO.">.
SAVE
----
PRIKAZ UMOZNUJE ULOZIT PROGRAM Z PAMETI SYSTEMU NA PASKU (AT
UZ DERNOU NEBO MAGNETOFONOVOU). POKUD JE POUZIT SYSTEM V
MAGNETOPASKOVE VERZI, PAK SE PO VLOZENI TOHOTO PRIKAZU OBJEVI
DOTAZ NA NAZEV POSLEDNIHO PROGRAMU ULOZENEHO NA KAZETE:
LAST NAME:
PO JEHO VLOZENI UKONCENEM "CR" SE VYPISE DOTAZ, ZDA BYL
MAGNETOFON PREPNUT NA SNIMANI:
PLAY DONE?
PO STISKNUTI LIBOVOLNE KLAVESY SE ZACNE VYHLEDAVAT KONEC
UDANEHO PROGRAMU. PO JEHO NALEZENI SE VYPISE DOTAZ NA NAZEV
PRAVE UKLADANEHO PROGRAMU:
NEW NAME:
PO JEHO VLOZENI UKONCENEM "CR" SE OBJEVI DOTAZ, ZDA BYL
MAGNETOFON PREPNUT NA ZAPIS:
RECORD DONE?
PO STISKNUTI LIBOVOLNE KLAVESY SE ZACNE PROGRAM ZAPISOVAT NA
KAZETU. PRI ZAZNAMU POSLEDNIHO UZAVIRACIHO BLOKU SE VYPISE
-------------------------------- 8 ------------------------
-------------------------------------------------------------
"CLOSED". UKONCENI ZAZNAMU JE OZNAMENO VYPISEM LOMITKA "\".
(ZKRATKA POVELU "S.").
POZN. FORMAT DAT NA PASCE MA JEDNOTNY TVAR:
1) ZNAK "$" (KOD 24H)
2) POCET BYTU PROGRAMU (ROZDIL PROMENNYCH TXTUNF A
TXTBGN), VE DVOU BYTECH, PRVNI NIZZSI BYTE
3) JEDNOTLIVE BYTE PROGRAMOVE PAMETI POCINAJE TXTBGN
4) ZNAK "SUB" (KOD 1AH)
MONITOR
-------
POVEL UMOZNUJICI SKOK DO MONITORU (NA ADRESU F839H, TJ.
"NEXT"). SAMOTNY PRIKAZ PROMENNE INTERPRETU NEOVLIVNI, TAKZE
LZE BEZ JAKYCHKOLI VEDLEJSICH UCINKU PREJIT PRIKAZEM "C" Z
MONITORU ZPET DO INTERPRETU "TINY BASICU". (ZKRATKA "M.").
EDIT N
------
POVEL PRO VYVOLANI JEDNORADKOVEHO EDITORU. UMOZNUJE PROVADET
UPRAVY JEDNOTLIVYCH ZNAKU NA RADKU S CISLEH DANYM PARAMETREM
N. POKUD TAKOVY RADEK NEEXISTUJE, VYBERE SE RADEK S
NEJBLIZSIM NASLEDUJICIM CISLEM. JEDNORADKOVY EDITOR JE RIZEN
SPECIALNIMI ZNAKY, KTERE POSUNUJI KURZOREM NA OBRAZOVCE.
POSUN VLEVO PROVADI KLAVESY 'CTRL-S', POSUV VPRAVO 'CTRL-D',
VYMAZ ZNAKU VPRAVO OD KURZORU ZAJISTI KLAVESA "CTRL-X". NOVE
ZNAKY SE VKLADAJI VLEVO OD KURZORU. UKONCENI EDICE SE DOSAHNE
STISKNUTIM KLAVESY "CR". U MATICOVE KLAVESNICE TS5220004
SLOUZI PRO POSUN KURZORU KLAVESY SE SIPKAMI. "CTRL-S"
NAHRAZUJE KLAVESA S SIPKOU VLEVO, "CTRL-D" NAHRAZUJE KLAVESA
S SIPKOU VPRAVO, "CTRL-X" NAHRAZUJE KLAVESA S SIPKOU DOLU.
-------------------------------- 9 ------------------------
-------------------------------------------------------------
INSTRUKCE:
==========
UMOZNUJI ZADAVANI CINNOSTI V PROGRAMU. POKUD JSOU NAPSANY BEZ
CISLA RADKU, PROVADEJI SE JAKO POVELY.
BEEP <N>
--------
PRIKAZ VYSLANI ZVUKOVYCH SIGNALU V POCTU DANEM PARAMETREM N V
ROZSAHU 0 AZ 32767. JEDNOTLIVE SIGNALY SE VYSILAJI V ODSTU-
PECH 0.1 SEKUNDY.
BYTE (<N>)
----------
PRIKAZ PRO ZOBRAZENI PARAMETRU N V ROZSAHU 0 AZ 255 JAKO
HEXADECIMALNIHO CISLA.
PRIKLAD: \10 BYTE (15)
\RUN
0F
READY
\
CALL <N>
--------
PRIKAZ SKOKU DO PODPROGRAMU (USEKU PROGRAMU V ASSEMBLERU
ZAKONCENEM KODEM "C9H", TJ. RET) NA ADRESU <N>, KDE N MUZE
BYT V ROZSAHU -32767 AZ 32767, POKUD JE ZAPORNE, UKAZUJE NA
HORNI POLOVINU PAMETOVEHO PROSTORU. (ZKRATKA "CA.").
PRIKLAD: CALL HEX(F800) ZAJISTI STUDENY START SYSTEMU
CLEAR
-----
PRIKAZ PRO NULOVANI VSECH 26 JEDNODUCHYCH POMENNYCH "A" AZ
"Z". INDEXOVANA PROMENNA SE TIMTO PRIKAZEM NENULUJE, PRO TUTO
FUNKCI JE TREBA VYTVORIT PROGRAMOVY CYKLUS. (ZKRATKA "CLE.").
PRIKLAD: \10 CLEAR
\20 FOR I=1 TO 100 : @(I)=0 : NEXT I
\30 PRINT "VSECHNY PROMENNE VYNULOVANY
\RUN
VSECHNY PROMENNE VYNULOVANY
READY
\
-------------------------------- 10 ------------------------
-------------------------------------------------------------
PRIKLAD: \1 REM POZOR - TRVA I NEKOLIK DESITEK MINUT
\10 FOR I=0 TO SIZE/2
\20 @(I) = 0
\30 NEXT I
\40 PRINT "CELA PROGRAMOVA PAMET VYNULOVANA"
\RUN
CELA PROGRAMOVA PAMET VYNULOVANA
READY
\
CLOSE
-----
PRIKAZ PRO UZAVRENI DATOVEHO SOUBORU VYTVORENEHO PRIKAZEM
"PUT". POUZITI PRIKAZU "CLOSE" BEZ PREDCHOZIHO POUZITI PRIKA-
ZU "PUT" ZNAMENA UZAVIRANI NEOTEVRENEHO SOUBORU A JE HLASENO
JAKO CHYBA DVOJITYM KRIZKEH "#". PRI PROVADENI PRIKAZU SE NA
OBRAZOVCE OBJEVI PRIZNAK UZAVIRANI SOUBORU - NAPIS "CLOSED".
TENTO PRIKAZ LZE POUZIVAT POUZE U SYSTEMU PLAN80A V MAGNETO-
PASKOVE VERZI.
CLS
---
PRIKAZ PRO VYMAZ CELE OBRAZOVKY A NASTAVI KURZOR NA ZACATEK
PRVNIHO RADKU. (ZKRATKA "C.").
CURS <N1>,<N2>
--------------
PRIKAZ PRO PREMISTENI ZNAKOVEHO KUZRORU NA POZICI DANOU
PARAMETRY N1 A N2. PARAMETR NI V ROZSAHU 0 AZ 47 URCUJE
POZICI SLOUPCE A PARAMETR N2 V ROZSAHU 0 AZ 31 URCUJE POZICI
RADKU. POZICE VLEVO NAHORE MA SOURADNICI [0,0], VPRAVO DOLE
MA SOURADNICI [47,31].
DRAW N1,N2
----------
GRAFICKY PRIKAZ UMOZNUJICI SPOJIT NAPOSLEDY NAKRESLENY BODR
NEBO BOD URCENY SOURADNICEMI PRIKAZU "MOOVE" S BODEM O
SOURADNICICH N1 A N2. PARAMETR N1 O ROZSAHU 0 AZ 143 URCUJE
SOURADNICI X (VODOROVNA OSA), PARAMETR N2 O ROZSAHU 0 AZ 64
URCUJE SOURADNICI Y (SVISLA OSA). OBA BODY SE SPOJUJI PRIMKOU
POMOCI ZAKLADNIHO INTERPOLATORU. PO UKONCENI TOHOTO PRIKAZU
JE GRAFICKY KURZOR PREMISTEN NA POZICI [N1,N2].
-------------------------------- 11 -----------------------
-------------------------------------------------------------
END
---
PRIKAZ SLOUZICI PRO UKONCENI BEHU PROGRAMU. NENI POVINNY,
POKUD ZA POSLEDNI INSTRUKCI HLAVNIHO PROGRAMU NENASLEDUJI
INSTRUKCE PODPROGRAMU. (ZKRATKA "E.").
FOR <P> = <N1> TO <N2> [STEP <N3>] ... NEXT <P>
-----------------------------------------------
PRIKAZ CYKLU. JEHO TELO ZACINA RADKEM, NA KTEREM JE UVEDEN A
KONCI RADKEM, NA NEMZ JE PRIKAZ "NEXT P". CINNOST PRIKAZU
SPOCIVA V DOSAZOVANI DO PROMENNE <P> HODNOT, POCINAJE HODNO-
TOU <N1> A KONCE HODNOTOU <N2>. POKUD NENI UVEDEN KROK, JE
IMPLICITNE ROVEN JEDNE. POKUD JE UVEDEN, JE ROVEN <N3>.
PRITOM N1, N2 A N3 MOHOU BYT PARAMETRY V ROZSAHU -32767 AZ
32767. PRO VSECHNY TAKTO ZISKANE HODNOTY PROMENNE <P> SE
PROVEDE PRUCHOD TELEM CYKLU. PRIKAZY CYKLU MOHOU BYT V SOBE
VNORENY, NESMI SE VSAK KRIZIT.
PRIKLAD: \10 FOR I = 1 TO 100
\20 FOR J = -10 TO +10 STEP 2
\30 PRINT I,J
\40 NEXT J
\50 NEXT I
PRIKLAD: \10 FOR I=Z TO INCHAR
\20 NEXT I
GOSUB <N> ... RETURN
--------------------
SKOK DO PODPROGRAMU, JEZ ZACINA RADKEM S CISLEM N A KONCI
RADKEM S PRIKAZEM RETURN. PRIKAZ "GOSUB" LZE POUZIT I
UPROSTRED RADKU S VICE PRIKAZY. PO NAVRATU Z PODPROGRAMU SE
SPRAVNE BUDE POKRACOVAT NA NASLEDUJICIM PRIKAZU. DOPORUCIJE
SE PSAT PODPROGRAMY NA RADKY S VYSOKYMI CISLY (NAPR. 10000),
JE PRITOM NUTNE ZAJISTIT, ABY POSLEDNI INSTRUKCI HLAVNIHO
PROGRAMU BYLA INSTRUKCE "END" NA RADKU S CISLEM NIZSIM, NEZ
CISLO PRVNIHO RADKU PODPROGRAMU (NAPR. 9999). PARAMETR N MUZE
MIT ROZSAH 1 AZ 32767 A MUSI BYT SHODNY S CISLEM EXISTUJICIHO
RADKU. (ZKRATKY "GOS." A "RET.").
PRIKLAD: \10 PRINT "1",
\20 PRINT "2", : GOSUB 1000 : PRINT "3",
\30 PRINT "5",
\40 END
\1000 PRINT "4",
\1010 RETURN
\RUN
12435
READY
\
-------------------------------- 12 -----------------------
-------------------------------------------------------------
GOTO <N>
--------
PRIKAZ NEPODMINENEHO SKOKU NA RADEK S CISLEM N. PARAMETR MUSI
MIT HODNOTU V ROZSAHU OD 1 AZ 32767 A MUSI BYT ROVEN CISLU
EXISTUJICIHO RADKU. TIMTO PRIKAZEM LZE NAHRADIT PRIKAZ
PREPINACE. (ZKRATKA "G.").
PRIKLAD: \10 GOTO 20
\20 IF A=5 N=100
\30 IF A=7 N=200
\40 GOTO N
HARD, DISPL
-----------
PRIKAZY UMOZNUJICI RIDIT VYPIS BUD NA TISKARNU (HARD) NEBO
NA OBRAZOVKU (DISPL). TAT0 CINNOST JE V NEKTERYCH CASTO
POUZIVANYCH PRIKAZECH (NAPR. PRINT, LIST) OBSAZENA, ZADAVA SE
PREDPONOU "L" PRED TENTO PRIKAZ PRO TISK NA TISKARNU NEBO
NEUVEDENIM TETO PREDPONY PRO ZOBRAZOVANI NA OBRAZOVCE. FYZIC-
KY ZNAMENA TISK NA TISKARNE POUZITI MONITOROVSKEHO PODPROGRA-
MU "LO", ZOBRAZOVANI NA OBRAZOVCE POUZITI MONITOROVSKEHO
PODPROGRAMU "CO". (ZKRATKY "H."F "D.").
I$ <N>
------
PRIKAZ VSTUPU RETEZCE ZNAKU UKONCENEHO "CR" Z KLAVESNICE.
ZNAKY JSOU POSTUPNE UKLADANY DO PAMETI POCINAJE ADRESOU DANOU
HODNOTOU PARAMETRU N V ROZSAHU -32767 AZ 32767. ZAPORNA
ADRESA UKAZUJE DO HORNI POLOVINY PAMETOVEHO PROSTORU. ZA
RETEZEC SE ULOZI KOD 00H. POCET ZNAKU RETEZCE LZE ZJISTIT
POMOCI FUNKCE "LEN".
PRIKLAD: \1 REM PAMET RAM > 3 KBYTE
\10 I$ 1000
\20 O$ 1000
\RUN
ABCBEFGHIJK
ABCDEFGHIJK
READY
\
IF <PODMINKA> <PRIKAZ>
----------------------
PODMINENY PRIKAZ. PODMINKA JE IVORENA VYRAZEM VYTVORENYM
POMOCI RELACNICH OPERATORU (MISTO AND LZE POUZIT "*", MISTO
OR LZE POUZIT '+'). POKUD JE PODMINKA VYHODNOCENA JAKO PRAV-
DIVA (NENULOVA HODNOTA) PAK SE PROVEDE ZA NI UMISTENY PRIKAZ.
-------------------------------- 13 -----------------------
-------------------------------------------------------------
POKUD JE PODMINKA VYHODNOCENA JAKO NEPRAVDIVA (NULOVA HODNO-
TA), PAK SE POKRACUJE NA NASLEDUJICIM RADKU PROGRAMU.
PRIKLAD: 10 IF (A>2)*(A<7) PRINT"A JE 3 AZ 6"
20 IF (A=1)+(A=5) PRINT"A JE 1 NEBO 5
INIT
----
PRIKAZ PRO INICIACI PROGRAMU OVLADAJICIHO MAGNETOFON V
MAGNETOPASKOVE VERZI SYSTEMU PLAN 80A. DOPORUCUJE SE PROVEST
TENTO PRIKAZ PRED JAKOUKOLI MANIPULACI S DATY CTENYMI NEBO
ZAPISOVANYMI NA MAGNETICKOU PASKU. PRIKAZ LZE POUZIVAT POUZE
U SYSTEMU PLAN80A V MAGNETOPASKOVE VERZI.
INPUT ["RETEZEC"[,]] <SEZNAM>
-----------------------------
PRIKAZ VSTUPU HODNOT Z KLAVESNICE A JEJICH POSTUPNEHO PRIRA-
ZENI PROMENNYM UVEDENYM V SEZNAMU. JEDNOTLIVE PROMENNE SE
ODDELUJI CARKOU. PRED SEZNAM JE MOZNO UMISTIT RETEZEC, KTERY
SE TISKNE PRED VSTUPEM HODNOT. POKUD ZA RETEZ NAPISEME CARKU,
PAK SE NAZEV PROMENNE ZOBRAZI PRED VSTUPEM HODNOTY. CEKANI NA
HODNOTU SE PROJEVI ZOBRAZENIM DVOJTECKY. HODNOTU UKONCUJEME
ZNAKEM "CR".
PRIKLAD: \10 INPUT A,B,C
\20 INPUT "VSTUP ",D
\30 INPUT "ZADEJ VAHU " E
\RUN
A:125"CR"
B:333"CR"
C:555"CR"
VSTUP D:666"CR"
ZADEJ VAHU :777"CR"
READY
\
LET
---
PRIRAZOVACI PRIKAZ UMOZNUJE ULOZIT DO PROMENNE URCITOU HODNO-
TU. SAMOTNE LET V PRIRAZOVACIM PRIKAZE NENI POVINNE. NA JEDNE
RADCE MUZE BYT I VICE PRIRAZENI, ODDELENYCH OD SEBE CARKAMI.
(ZKRATKA "LE.").
PRIKLAD: \10 LET A=5
\20 B=7,C=10
\30 LET D=236,E=5432,F='R'
-------------------------------- 14 -----------------------
-------------------------------------------------------------
MASK <N>
--------
PRIKAZ PRO NASTAVENI MASKY VSTUPNI FUNKCE INM. PARAMETR N MA
SMYSL V ROZSAHU 0 AZ 255.
PRIKLAD: \10 MASK 8 : REM SLEDUJE SE BIT D3
MOVE <N1>,<N2>
--------------
PRIKAZ PRO POSUN GRAFICKEHO KURZORU NA POZICI DANOU PARAMETRY
N1 A N2. PARAMETR N1 JE V ROZSAHU OD 0 PO 143 A URCUJE
SOURADNICI X (VODOROVNA OSA), PARAMETR N2 JE V ROZSAHU OD 0
PO 63 A URCUJE SOURADNICI Y (SVISLA OSA). POLOHU GRAFICKEHO
KURZORU OVLIVNUJI TEZ GRAFICKE PRIKAZY "DRAW" A "PLOT".
O$ <N>
------
PRIKAZ PRO ZOBRAZENI ZNAKOVEHO RETEZCER ULOZENEHO V PAMETI OD
ADRESY DANE PARAMETREM N V ROZSAHU -32767 AZ 32767 (ZAPORNA
ADRESA UKAZUJE NA HORNI POLOVINU PAMETOVEHO PROSTORU). ZOBRA-
ZOVANI SE UKONCI PO DOSAZENI PRVNIHO NULOVEHO BYTU V PAMETI.
OUT <N1>,<N2>
-------------
PRIKAZ VYSTUPU HODNOTY <N2> NA PORT <N1>. OBA PARAMETRY MAJI
SMYSL V ROZSAHU 0 AZ 255 (ZKRATKA "OUT").
PRIKLAD: 10 OUT HEX(12),3
OUTCHAR (<N>)
-------------
PRIKAZ PRO VYSTUP ZNAKU, KTERY ODPOVIDA KODU ASCII <N>.
PARAMETR N MUSI MIT HODNOTOU V ROZSAHU 0 AZ 255. UMOZNUJE
VYSTUP NESTANDARTNICH ZNAKU. (ZKRATKA "O.").
PRIKLAD: 10 REM PRECHOD NA NOVY RADEK
20 OUTCHAR (HEX(0A)) : OUTCHAR (HEX(0D))
PLOT N1,N2
----------
PRIKAZ PLOT PROVEDE ZOBRAZENI BODU O SOURADNICICH DANYCH
PARAMETRY N1 V ROZSAHU 0 AZ 143, N2 V ROZSAHU 0 AZ 63.
PARAMETR N1 URCUJE OSU X (VODOROVNOU), N2 OSU Y (SVISLOU). PO
-------------------------------- 15 -----------------------
-------------------------------------------------------------
UKONCENI PRIKAZU JE GRAFICKY KURZOR UMISTEN NA POZICI [N1,N2].
POKE <N1>,<N2>
--------------
PRIKAZ PRO ULOZENI HODNOTY <N2> NA ADRESU <N1>. ADRESA N1
MUZE BYT V ROZSAHU -32767 AZ 32767, JE-LI ZAPORNA, UKAZUJE NA
HORNI POLOVINU ADRESOVEHO PROSTORU PAMETI. PARAMETR N2 MUZE
MIT HODNOTU 0 AZ 255. (ZKRATKA "PO.").
PRIKLAD: 10 POKE HEX(8000),0
PUT (<N>)
---------
PRIKAZ PRO ULOZENI PARAMETRU N V ROZSAHU -32767 AZ 32767 NA
PASKU. POKUD JDE O SYSTEM PLAN 80A V MAGNETOPASKOVE VERZI,
PAK PRI PRVEM VYSKYTU TOHOTO PRIKAZU SI SYSTEM VYZADA
INFORMACE PRO OTVERENI DATOVEHO SOUBORU PRO ZAPIS. VYPISE SE
ZADOST O NAZEV POSLEDNIHO SOUBORU ZAPSANEHO NA KAZETE:
LAST NAME:
PO JEHO ZADANI UKONCENEHO ZNAKEM "CR" SE OBJEVI DOTAZ, ZDA
BYL MAGNETOFON PREPNUT NA SNIMANI:
PLAY DONE?
PO STISKNUTI LIBOVOLNE KLAVESY SE ZACNE VYHLEDAVAT KONEC
UVEDENEHO SOUBORU. AZ SE NAJDE, VYPISE SE DOTAZ NA NAZEV
PRAVE ZAPISOVANEHO DATOVEHO SOUBORU:
NEW NAME:
PO JEHO ZADANI UKONCENEHO ZNAKEM "CR" SE VYPISE DOTAZ, ZDA
BYL MAGNETOFON PREPNUT NA ZAPIS:
RECORD DONE?
PO STISKNUTI LIBOVOLNE KLAVESY SE ZACNE POSTUPNE ZAPLNOVAT
BUFFER OBSLUZNEHO PROGRAMU MAGNETOFONU. PO DOSAZENI KAZDYCH
256 BYTU (TZN. PO KAZDYCH 128 VYVOLANI PRIKAZU PUT) SE CELY
BLOK ZAPISE NA KAZETU.
POZOR! PO ZAZNAMU VSECH CISEL DATOVEHO SOUBORU JE NUTNE PRED
JAKOUKOLI MANIPULACI S KAZETOU PRAVE VYTVORENY SOUBOR
UZAVRIT PRIKAZEM "CLOSE". JINAK MUZE DOJIT K POSKOZE-
NI PRAVE VYTVORENEHO SOUBORU.
-------------------------------- 16 ----------------------
-------------------------------------------------------------
[L]PRINT [*1,] [#<N1>,] [<P>,] ["RETEZEC"] [,]
----------------------------------------------
PRIKAZ TISKU. PRIKAZ "PRINT" PROVADI VYPIS NA OBRAZOVKU,
PRIKAZ "LPRINT" PROVADI VYPIS NA TISKARNU. PRVNI NEPOVINNY
PARAMETR JE TVORENY HVEZDICKOU A CISLEM JEDNA "*1". POKUD JE
V PRIKAZE UVEDEN, PAK SE TISK PROVADI INVERZNE (TJ. POZADI A
ZNAK SI PROHODI BARVU). DRUHY PARAMETR JE TVOREN DVOJITYM
KRIZKEM A HODNOTOU OBJEKTU "#<N>". TENTO PARAMETR LZE UVEST
PRED KAZDOU PROMENNOU SEZNAMU A UDAVA, NA KOLIK MIST SE
PROVEDE TISK HODNOTY (IMPLICITNE JDE O 8 ZNAKU). POKUD MA
HODNOTA VIC PLATNYCH CIFER, NEZ UDAVA PARAMETR, TISKNOU SE
VSECHNY. NULY ZLEVA SE NETISKNOU. SEZNAM JE TVOREN
CISLY, PROMENNYMI, VYRAZY NEBO FUNKCEMI ODDELENYMI CARKAMI.
POMOCI PRIKAZU PRINT LZE TISKNOUT I RETEZCE, UZAVRENE DO
UVOZOVEK. POKUD UVEDEME CARKU NA KONEC RADKU, BUDE SE NASLE-
DUJICI PRIKAZ TISKU PROVADET NA STEJNY TISKOVY RADEK ZA PRAVE
VYTISTENE SYMBOLY. (ZKRATKA "P.").
PRIKLAD: \10 A=5,B=7
\20 PRINT A,B,"CCCC"
\30 PRINT *1," ZLATAVA "
\40 PRINT #5,A,#10,B," ","CCCC",
\50 PRINT " HHHH"
\60 PRINT "PEPA HRAJE NA KLARINET"
\RUN
_______5_______7CCCC
_ZLATAVA_ (INVERZNI TISK)
____5_________7____CCCC HHHH
PEPA HRAJE NA KLARINET
READY
\
REM
---
PRIKAZ PRO VYTVARENI POZNAMEK V PROGRAMU. NEPROVADI ZADNOU
CINNOST. (ZKRATKA "REM").
PRIKLAD: \10 REM ZBYTEK RADKU JE POUZE POZNAMKA
STOP
----
PRIKAZ PRO ZASTAVENI CHODU PROGRAMU. MA STEJNOU FUNKCI JAKO
PRIKAZ "END" S TIM, ZE NAVIC ZAJISTI VYPIS HVEZDICKY A RADKU
S PRIKAZEM STOP. POUZIVA SE PRI LADENI PROGRAMU, PRO SLEDOVA-
NI BEHU PROGRAMU PRI VETVENI A POD. ZA PRIKAZEM "STOP" SE
NESMI NA STEJNEM RADKU NACHAZET DALSI PRIKAZ ODDELENY DVOJ-
TECKOU. PRIKAZ STOP VSAK MUZE BYT POSLEDNIM PRIKAZEM VICENA-
SOBNEHO PRIKAZOVEHO RADKU. (ZKRATKA "S.").
PRIKLAD: \10 IF A=0 PRINT"PRI NULE ZASTAV":STOP
-------------------------------- 17 -----------------------
-------------------------------------------------------------
TAB (<N>)
---------
PRIKAZ PRO TISK <N> MEZER NA OBRAZOVCE, KDE N JE PARAMETR V
ROZSAHU 0 AZ 48 UZAVRENY DO ZAVOREK. (ZKRATKA "T.">.
PRIKLAD: \10 TAB(5),PRINT 5
\20 TAB(7),PRINT "JIRKA MA PROGRAMATOR"
\RUN
-----5
_______JIRKA MA PROGRAMATOR
READY
\
WAIT <N>
--------
PRIKAZ CASOVE PRODLEVY DANE HODNOTOU PARAMETRU N V ROZSAHU 1
AZ 32767 (U SYSTEMU PLAN 80A JDE O MILISEKUNDY). CEKANI NELZE
PRERUSIT STISKNUTIM KLAVES 'CTRL-C'.
WORD (<N>)
----------
PRIKAZ PRO ZOBRAZENI PARAMETRU N V ROZSAHU OD -32767 PO 32767
JAKO HEXADECIMALNI CISLO.
PRIKLAD: \10 WORD (32767)
\RUN
7FFF
READY
\
-------------------------------- 18 -----------------------
-------------------------------------------------------------
FUNKCE
======
ABS <<N>)
---------
VYSTUPNI HODNOTOU TETO FUNKCE JE ABSOLUTNI HODNOTA PARAMETRU
N V ROZSAHU -32767 AZ 32767.
AREM
----
VYSTUPNI HODNOTOU TETO FUNKCE JE ADRESA POSLEDNI POZNAMKY
DEFINOVANE PRIKAZEM REM. TO UMOZNUJE VYTVORIT POMOCI PRIKAZU
REM PROGRAMOVY NEBO DATOVY SEGMENT (POMOCI ASCII KODU VKLADA-
NYCH ZNAKU) A ZJISTIT JEHO POLOHU V PAMETI.
GET
---
VYSTUPNI HODNOTOU FUNKCE JE HODNOTA PRECTENA Z PASKY V
ROZSAHU -32767 AZ 32767. PRI SYSTEMU PLAN 80A V
MAGNETOPASKOVE VERZI SE PRI PRVEM VYSKYTU TETO FUNKCE SYSTEM
ZEPTA NA INFORMACI, NUTNOU K OTEVRENI SOUBORU PRO CTENI.
OBJEVI SE DOTAZ NA NAZEV SOUBORU:
NAME:
PO JEHO ZADANI UKONCENEM KLAVESOU "CR" SE VYPISE DOTAZ, ZDA
BYL MAGNETOFON PREPNUT NA SNIMANI:
PLAY DONE?
PO STISKNUTI LIBOVOLNE KLAVESY SE ZACNE VYHLEDAVAT URCENY
SOUBOR. POKUD SE NAJDE, PRECTE SE PRVNI DATOVY BLOK DO
BUFFERU. JEDEN BLOK OBASAHUJE 255 BYTU, COZ STACI NA 128
VOLANI FUNKCE "GET". POKUD SE PRI CTENI OBJEVI DVOJITY KRIZEK
"#", NASTALA CHYBA A NELZE ZARUCIT SPRAVNOST CTENYCH DAT.
POZOR: PO PRECTENI VSECH DAT JE PRED DALSI MANIPULACI S
PASKOU NUTNE OTEVRENY SOUBOR PRO CTENI UZAVRIT PRIKA-
ZEM "INIT".
HEX (H)
-------
VYSLEDNOU HODNOTOU TETO FUNKCE JE DEKADICKA HODNOTA, KTERA
ODPOVIDA HEXADECIMALNIMU CISLU "H", ZADANEMU JAKO PARAMETR
FUNKCE. JEJI HODNOTA JE -32767 AZ +32767, JE-LI ZAPORNA,
ODPOVIDA HEXADECIMALNIM CISLUM V ROZSAHU 8000H AZ FFFFH.
-------------------------------- 19 ------------------------
-------------------------------------------------------------
IN (N)
------
VYSTUPNI HODNOTOU FUNKCE JE DEKADICKE CISLO V ROZSAHU 0 AZ
255 PRECTENE Z VSTUPNIHO PORTU DANEHO PARAMETREM N V ROZSAHU
0 AZ 255.
INCHAR
------
JE OBDOBOU FUNKCE "INKEY". MA HODNOTU 00H, POKUD NEBYLA
STISKNUTA KLAVESA. POKUB BYLA, PAK MA DEKADICKOU HODNOTU V
ROZSAHU 0 AZ 255 ODPOVIDAJICI ASCII KODU ZNAKU STISKNUTE
KLAVESY.
INM (N)
-------
VYSTUPNI HODNOTOU FUNKCE JE DEKADICKE CISLO V ROZSAHU 0 AZ
255, ODPOVIDAJICI LOGICKEMU SOUCINU HODNOTY MASKY NASTAVENE
PRIKAZEM "MASK" A HODNOTY VSTUPNIHO PORTU DANEHO PARAMETREM N
V ROZSAHU 0 AZ 255.
LEN
---
VYSTUPNI HODNOTOU TETO FUNKCE JE POCET ZNAKU RETEZCE
VLOZENEHO PRIKAZEM I$.
PEEK (<N>)
----------
VYSLEDNOU HODNOTOU FUNKCE V ROZSAHU 0 AZ 255 JE HODNOTA BYTU
DANEHO ADRESOU ROVNOU PARAMETRU N V ROZSAHU -32767 AZ +32767.
ZAPORNA ADRESA UKAZUJE NA VYSSI POLOVINU PAMETI.
RND (<N>)
---------
VYSLEDNOU HODNOTOU TETO FUNKCE JE PSEUDONAHODNE CISLO V
ROZSAHU OD 0 PO HODNOTU PARAMETRU N. POKUD JE HODNOTA
PARAMETRU N NULOVA, INICIALIZUJE SE GENERACE OPAKOVATELNE
RADY PSEUDONAHODNYCH CISEL, FUNKCE RND(0) MA HODNOTU 0.
MAXIMALNI HODNOTA PARAMETRU N JE 32767.
-------------------------------- 20 -----------------------
-------------------------------------------------------------
PRIKLAB: \10 PRINT RND(0)
\20 FOR I=1 TO 5
\30 PRINT #4,RND(100),
\40 NEXT I
\50 PRINT
\60 GOTO 10
\RUN
0
71 53 8 5 54
0
71 53 8 5 54
.
.
.
SIZE
----
HODNOTOU FUNKCE JE POCET BYTU ZBYVAJICI VOLNE PAMETI RAM.
TOP
---
HODNOTOU FUNKCE JE ADRESA PRVNI VOLNE BUNKY ZA PROGRAMOVYM
TEXTEM.
-------------------------------- 21 -----------------------
-------------------------------------------------------------
HLASENI CHYB
============
WHAT? ... SYNTAKTICKA CHYBA (NAPR. PREKLEP)
HOU? ... PREKROCENI CISELNEHO ROZSAHU, NEPROVEDITELNY
PRIKAZ NEBO FUNKCE
SORRY ... PREKROCENI POVOLENYCH MEZI PAMETI NEBO JEJI ZA-
PLNENI
-------------------------------- 22 -----------------------
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1
1 TITLE 'PLAN 80A MONITOR V.2.Q'
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25 ;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX;
26 ;X X;
27 ;X X;
28 ;X PLAN-80A V.2.Q 27.09.88 X;
29 ;X X;
30 ;X MONITOR PRO ZAKLADNI VERZE S KLAVESNICI TS5220004 X;
31 ;X X;
32 ;X X;
33 ;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX;
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-1
57
58
59
60
61
62
63
64 ; PREDPOKLADANE ROZDELENI PAMETI
65 ; ==============================
66 ;
67 ;
68 ; E000 - EFFF EPROM S TINY BASICEM
69 ; F000 - F7FF EPROM S MAGNETOFONEM
70 ; F800 - FFFF EPROM S MONITOREM
71 ;
72 ; 0000 - 0FFF STAT. RAM (2114)
73 ; 1000 - DFFF DYN. RAM (4116)
74 ;
75 ; (OBLASTI DYNAMICKE PAMETI, KTERE SE PREKRIVAJI S
76 ; EPROM NEBO RAM MAJI OBVODOVE BLOKOVANOU AKTIVACI)
77 ;
78 ;
79 ; P O Z O R: PREDPOKLADA SE SEMIGRAFIKA !
80 ;
81 ;
82 ; PREDPOKLADANE VYUZITI PAMETI RAM
83 ; ================================
84 ;
85 ;
86 ; 0000 C3 SKOK NA STUDENY START MONITORU
87 ; 0001 00
88 ; 0002 F8
89 ; 0003 55 I/O BYTE (NENI VYUZITY)
90 ; 0004 RAMEND-LOW KONEC PROGRAMOVE RAM
91 ; 0005 REMEND-HIGH
92 ; 0038 C3 SKOK DO OBSLUHY PRERUSENI RST7
93 ; 0039 INTER-LOW
94 ; 003A INTER-HIGH
95 ;
96 ;
97 ; POZN.: EXISTUJI TRI RUZNE KONCE PAMETI RAM:
98 ; 1. FYZICKY KONEC RAM (CALL GETEND)
99 ; 2. KONEC PROGRAMOVE RAM ([RAMEND])
100 ; 3. KONEC UZIVATELSKE RAM (CALL MEMCK)
101 ; (U MAGNETOFONU ZMENSENY O BUFFER)
102 ;
103 ; INSTRUKCE SKOKU DO MONITOROVSKE OBSLUHY
104 ; PRERUSENI SE NASTAVUJE VZDY PO VLOZENI
105 ; DRUHEHO OPERANDU PRIKAZU GOTO NA ADRESU
106 ; RST7 = 0038H.
107 ;
108 ;
109 ; 0006 ZACATEK UZIVATELSKE PAMETI
110 ;
111 ; DISRAM ZACATEK PAMETI DISPLEJE, VRCHOL ZASOBNIKU:
112 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-2
113 ; RAM = 1 K ... DISRAM = 0200 ... 8 RADKU
114 ; RAM = 2 K ... DISRAM = 0400 ... 16 RADKU
115 ; RAM = 3 K ... DISRAM = 0400 ... 16 RADKU
116 ; RAM > 3 K ... DISRAM = RAMEND - 0800 ... 32 RADKU
117 ;
118 ; DISPLEJ VYUZIVA Z KAZDYCH 64 BYTU PAMATI POUZE
119 ; PRVNICH 48 (JEDEN RADEK), ZBYLYCH 16 BYTU V PRV-
120 ; NICH 9 RADCICH (PO ADRDIS + 023FH) VYUZIVA MONITOR
121 ; NEBO BASIC. OSTATNI 16-TICE V RADCICH 9-32 JSOU
122 ; NEPOUZITE. POKUT JE POUZITA DYNAMICKA PAMET, PAK
123 ; JE DISPLEJ ULOZEN NA POSLEDNI DVE KILA KVADRU S
124 ; NEJVYSSI ADRESOU (REFRES POMOCI ZOBRAZENI).
125 ;
126 ;;
127 ; VYUZITI 16-TIC BYTU V PRVNICH 8 RADCICH DISRAM :
128 ;
129 ; RADEK: 0
130 ;
131 ; DISRAM + 30H -
132 ; DISRAM + 31H UREND = NIZSI BYTE ADRESY KONCE UZIV. RAM
133 ; DISRAM + 32H VYSSI BYTE ADRESY KONCE UZIV. RAM
134 ; DISRAM + 33H MSTACK = NIZSI BYTE ADRESY VRCHOLU ZASOBNIKU
135 ; DISRAM + 34H VYSSI BYTE ADRESY VRCHOLU ZASOBNIKU
136 ; DISRAM + 35H LINECO = CITAC RADKU
137 ; DISRAM + 36H CHARCO = CITAC ZNAKU NA RADKU
138 ; DISRAM + 37H LINENO = POCET RADKU V OBRAZE
139 ; DISRAM + 38H CHARNO = POCET ZNAKU NA RADKU
140 ; DISRAM + 39H -
141 ; DISRAM + 3AH -
142 ; DISRAM + 3BH - (REZERVOVANO PRO VYSSI VERZE)
143 ; DISRAM + 3CH -
144 ; DISRAM + 3DH -
145 ; DISRAM + 3EH -
146 ; DISRAM + 3FH -
147 ;
148 ;
149 ; RADEK: 1
150 ;
151 ; DISRAM + 70H BRADR = VYSSI BYTE ADRESY PRERUSENI (VIZ 'GOTO')
152 ; DISRAM + 71H NIZSI BYTE ADRESY PRERUSENI (VIZ 'GOTO')
153 ; DISRAM + 72H BRCODE = KOD INSTRUKCE NA TETO ADRESE (VIZ 'GOTO')
154 ; DISRAM + 73H SPREG = NIZSI BYTE <SP> (VIZ 'GOTO')
155 ; DISRAM + 74H VYSSI BYTE <SP> (VIZ 'GOTO')
156 ; DISRAM + 75H HREG = OBSAH REG <H> (VIZ 'GOTO')
157 ; DISRAM + 76H LREG = OBSAH REG <L> (VIZ 'GOTO')
158 ; DISRAM + 77H DREG = OBSAH REG <D> (VIZ 'GOTO')
159 ; DISRAM + 78H EREG = OBSAH REG <E> (VIZ 'GOTO')
160 ; DISRAM + 79H BREG = OBSAH REG <B> (VIZ 'GOTO')
161 ; DISRAM + 7AH CREG = OBSAH REG <C> (VIZ 'GOTO')
162 ; DISRAM + 7BH AREG = OBSAH REG <A> (VIZ 'GOTO')
163 ; DISRAM + 7CH FREG = OBSAH REG <F> (VIZ 'GOTO')
164 ; DISRAM + 7DH INOUT = VYHRAZENO PRO PRIKAZY IN/OUT
165 ; DISRAM + 7EH -"-
166 ; DISRAM + 7FH -"-
167 ;
168 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-3
169 ; RADEK: 2
170 ;
171 ; DISRAM + B0H CONINP = KOD INSTRUKCE JMP NEBO RET (PRO CI)
172 ; DISRAM + B1H NIZSI BYTE ADRESY SKOKU
173 ; DISRAM + B2H VYSSI BYTE ADRESY SKOKU
174 ; DISRAM + B3H CONOUT = KOD INSTRUKCE JMP NEBO RET (PRO CO)
175 ; DISRAM + B4H NIZSI BYTE ADRESY SKOKU
176 ; DISRAM + B5H VYSSI BYTE ADRESY SKOKU
177 ; DISRAM + B6H READIN = KOD INSTRUKCE JMP NEBO RET (PRO RI)
178 ; DISRAM + B7H NIZSI BYTE ADRESY SKOKU
179 ; DISRAM + B8H VYSSI BYTE ADRESY SKOKU
180 ; DISRAM + B9H USRRI = KOD INSTRUKCE JMP NEBO RET (DUMMY)
181 ; DISRAM + BAH NIZSI BYTE ADRESY SKOKU
182 ; DISRAM + BBH VYSSI BYTE ADRESY SKOKU
183 ; DISRAM + BCH PUNOUT = KOD INSTRUKCE JMP NEBO RET (PRO PO)
184 ; DISRAM + BDH NIZSI BYTE ADRESY SKOKU
185 ; DISRAM + BEH VYSSI BYTE ADRESY SKOKU
186 ; DISRAM + BFH -
187 ;
188 ;
189 ; RADEK: 3
190 ;
191 ; DISRAM + F0H USRPO = KOD INSTRUKCE JMP NEBO RET (DUMMY)
192 ; DISRAM + F1H NIZSI BYTE ADRESY SKOKU
193 ; DISRAM + F2H VYSSI BYTE ADRESY SKOKU
194 ; DISRAM + F3H LSTOUT = KOD INSTRUKCE JMP NEBO RET (PRO LO)
195 ; DISRAM + F4H NIZSI BYTE ADRESY SKOKU
196 ; DISRAM + F5H VYSSI BYTE ADRESY SKOKU
197 ; DISRAM + F6H CONSTA = KOD INSTRUKCE JMP NEBO RET (PRO CSTS)
198 ; DISRAM + F7H NIZSI BYTE ADRESY SKOKU
199 ; DISRAM + F8H VYSSI BYTE ADRESY SKOKU
200 ; DISRAM + F9H -
201 ; DISRAM + FAH -
202 ; DISRAM + FBH -
203 ; DISRAM + FCH -
204 ; DISRAM + FDH -
205 ; DISRAM + FEH -
206 ; DISRAM + FFH -
207 ;
208 ;
209 ; RADEK: 4
210 ;
211 ; DISRAM + 130H NAME1 = 16-TI BITOVY NAZEV SOUBORU (PRO CTENI)
212 ; DISRAM + 131H
213 ; DISRAM + 132H
214 ; DISRAM + 133H
215 ; DISRAM + 134H
216 ; DISRAM + 135H
217 ; DISRAM + 136H
218 ; DISRAM + 137H
219 ; DISRAM + 138H
220 ; DISRAM + 139H
221 ; DISRAM + 13AH
222 ; DISRAM + 13BH
223 ; DISRAM + 13CH
224 ; DISRAM + 13DH
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-4
225 ; DISRAM + 13EH
226 ; DISRAM + 13FH
227 ;
228 ;
229 ; RADEK: 5
230 ;
231 ; DISRAM + 170H NAME2 = 16-TI BITOVY NAZEV SOUBORU (PRO ZAPIS)
232 ; DISRAM + 171H
233 ; DISRAM + 172H
234 ; DISRAM + 173H
235 ; DISRAM + 174H
236 ; DISRAM + 175H
237 ; DISRAM + 176H
238 ; DISRAM + 177H
239 ; DISRAM + 178H
240 ; DISRAM + 179H
241 ; DISRAM + 17AH
242 ; DISRAM + 17BH
243 ; DISRAM + 17CH
244 ; DISRAM + 17DH
245 ; DISRAM + 17EH
246 ; DISRAM + 17FH
247 ;
248 ;
249 ; RADEK: 6
250 ;
251 ; DISRAM + 1B0H PNADR = NIZSI BYTE ADRESY BUFFERU DEROVACE
252 ; DISRAM + 1B1H VYSSI BYTE ADRESY BUFFERU DEROVACE
253 ; DISRAM + 1B2H PNPOI = ADRESY UKAZATELE BUFFERU DEROVACE
254 ; DISRAM + 1B3H RDADR = NIZSI BYTE ADRESY BUFFERU SNIMACE
255 ; DISRAM + 1B4H VYSSI BYTE ADRESY BUFFERU SNIMACE
256 ; DISRAM + 1B5H RDPOI = ADRESY UKAZETELE BUFFERU SNIMACE
257 ; DISRAM + 1B6H PBLKC = CITAC BLOKU DEROVACE
258 ; DISRAM + 1B7H PFILC = CITAC SOUBORU DEROVACE
259 ; DISRAM + 1B8H RBLKC = CITAC BLOKU SNIMACE
260 ; DISRAM + 1B9H RFILC = CITAC SOUBORU SNIMACE
261 ; DISRAM + 1BAH PNSTS = STATUS LOGICKEHO ZARIZENI PRO ZAPIS
262 ; DISRAM + 1BBH RDSTS = STATUS LOGICKEHO ZARIZENI PRO CTENI
263 ; DISRAM + 1BCH -
264 ; DISRAM + 1BDH -
265 ; DISRAM + 1BEH -
266 ; DISRAM + 1BFH -
267 ;
268 ;
269 ; RADEK: 7
270 ;
271 ; DISRAM + 1F0H TMPAR = POMOCNA OBLAST
272 ; DISRAM + 1F1H
273 ; DISRAM + 1F2H
274 ; DISRAM + 1F3H
275 ; DISRAM + 1F4H
276 ; DISRAM + 1F5H
277 ; DISRAM + 1F6H
278 ; DISRAM + 1F7H
279 ; DISRAM + 1F8H
280 ; DISRAM + 1F9H
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-5
281 ; DISRAM + 1FAH
282 ; DISRAM + 1FBH
283 ; DISRAM + 1FCH
284 ; DISRAM + 1FDH
285 ; DISRAM + 1FEH
286 ; DISRAM + 1FFH
287 ;
288 ;
289 ; RADEK: 8
290 ;
291 ; DISRAM + 230H KEYCD = VZORKY KLAVESNICE
292 ; DISRAM + 231H -"-
293 ; DISRAM + 232H -"-
294 ; DISRAM + 233H -"-
295 ; DISRAM + 234H ZNAK = VSTUPNI ZNAK
296 ; DISRAM + 235H UPLO = HORNI/DOLNI
297 ; DISRAM + 236H CTRL = RIDICI ZNAKY
298 ; DISRAM + 237H NUM = CISLICE
299 ; DISRAM + 238H CTN = CITAC BLIKANI KURZORU
300 ; DISRAM + 239H -
301 ; DISRAM + 23AH -
302 ; DISRAM + 23BH -
303 ; DISRAM + 23CH -
304 ; DISRAM + 23DH -
305 ; DISRAM + 23EH -
306 ; DISRAM + 23FH -
307 ;
308 ;
309 ;
310 ; PREDPOKLADANE VYUZITI V/V PORTU
311 ; ===============================
312 ;
313 ;--------------------------------------------------------------------
314 ;I A7 A5 A3 I A1 A0 I A1 A0 I A1 A0 I A1 A0 I
315 ;I A6 A4 A2 I 0 0 I 0 1 I 1 0 I 1 1 I
316 ;I--------------I------------I------------I------------I------------I
317 ;I X X 0 0 0 0 I ST/OP (RW) I ST/OP (RW) I ST/OP (RW) I ST/OP (RW) I
318 ;I--------------I------------I------------I------------I------------I
319 ;I X X 0 0 0 1 I D '12 (RO) I D '12 (RO) I D '12 (RO) I D '12 (RO) I
320 ;I--------------I------------I------------I------------I------------I
321 ;I X X 0 0 1 0 I A '55 (RW) I B '55 (RW) I C '55 (RW) I CT'55 (RW) I
322 ;I--------------I------------I------------I------------I------------I
323 ;I X X 0 0 1 1 I KEY? (WO) I KEY? (WO) I KEY? (WO) I KEY? (WO) I
324 ;I--------------I------------I------------I------------I------------I
325 ;I X X 0 1 0 0 I BEEP (WO) I BEEP (WO) I BEEP (WO) I BEEP (WO) I
326 ;I--------------I------------I------------I------------I------------I
327 ;I X X 0 1 0 1 I '14 M (WO) I '14 M (WO) I '14 M (WO) I '14 M (WO) I
328 ;I--------------I------------I------------I------------I------------I
329 ;I X X 0 1 1 0 I ADRES (RW) I ADRES (RW) I ADRES (RW) I ADRES (RW) I
330 ;I--------------I------------I------------I------------I------------I
331 ;I X X 0 1 1 1 I ADRET (WO) I ADRET (WO) I ADRET (WO) I ADRET (WO) I
332 ;--------------------------------------------------------------------
333 ;
334 ; KDE: X '55 JE REGISTR X OBVODU 8255
335 ; D '12 JE VYSTUPNI PORT OBVODU 3212
336 ; ST/OP JE OBOUSMERNY PORT STAVOVE INFORMACE/VYSTUPU
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-6
337 ; '14 M JE MASKOVACI PORT OBVODU 8214
338 ; ADRES JE SIGNAL NULOVANI REGISTRU ADRESY ZOBRAZOVANI
339 ; ADRET JE SIGNAL ZAPISU ADRESY DO REGISTRU ZOBRAZOVANI
340 ; KEY? JE TEST PRITOMNOSTI SOFTWAROVE KLAVESNICE
341 ; (WO) JE POUZE VYSTUPNI PORT (VZHLEDEM K SYSTEMU)
342 ; (RO) JE POUZE VSTUPNI PORT (POUZE OPERACE CTENI)
343 ; (RW) JE OBOUSMERNY PORT
344 ;
345 ;
346 ;
347 ; OBLAST DEFINIC
348 ; ==============
349 ;
350 0000 RAMBEG EQU 0000H ; PRVNI ADRESA MAMETI RAM
351 F800 MONIT EQU 0F800H ; PRVNI ADRESA MONITORU
352 F000 TAPREC EQU 0F000H ; PRVNI ADRESA PROGRAMU MAGNETOFON
353 E000 BASIC EQU 0E000H ; STUDENY START TINY BASICU
354 E003 CONIT EQU 0E003H ; TEPLY START TINY BASICU
355 ;
356 F001 TINIT EQU TAPREC + 1 ; ADRESA INICIACE PROGRAMU MAGNETOFON
357 F004 TJOIN EQU TAPREC + 4 ; ADRESA INICIACE MAGNETOFONU
358 F007 TQUAF EQU TAPREC + 7 ; ADRESA PRIKAZU CTENI BIN. SOUBORU
359 F00A TPUT EQU TAPREC + 0AH ; ADRESA PRIKAZU ZAPISU BIN. SOUBORU
360 F00D TAPP EQU TAPREC + 0DH ; ADRESA PRIKAZU BEZPR. ZAPISU BIN. SOUBORU
361 F010 TLOAD EQU TAPREC + 10H ; ADRESA PRIKAZU OVLADANI MOTORKU
362 F013 TDIR EQU TAPREC + 13H ; ADRESA PRIKAZU DIRECTORY PASKY
363 F016 TUNNA EQU TAPREC + 16H ; ADRESA PRIKAZU POJMENOVANI NOVE PASKY
364 F019 TKI EQU TAPREC + 19H ; ADRESA PRIKAZU CTENI BYTU
365 F01C TKO EQU TAPREC + 1CH ; ADRESA PRIKAZU ZAPISU BYTU
366 F01F TWR EQU TAPREC + 1FH ; ADRESA PRIKAZU VYDEROVANI HEX. SOBORU
367 F022 TRD EQU TAPREC + 22H ; ADRESA PRIKAZU PRECTENI HEX. SOUBORU
368 F025 TEOF EQU TAPREC + 25H ; ADRESA PRIKAZU UZAVRENI HEX. SOUBORU
369 F028 TCLOS EQU TAPREC + 28H ; ADRESA PODPROGRAMU UZAVRENI SOUBORU
370 ;
371 ;
372 000E SO EQU 0EH ; ZNAK 'SO' = POMOCNY ZNAK
373 0020 SPC EQU 20H ; ZNAK 'SP' = MEZERA
374 00A0 ETX EQU 0A0H ; ZNAK 'ETX' = KONEC TEXTU
375 0003 EOT EQU 03H ; ZNAK 'EOT' = KONEC VYSILANI
376 001A SUBS EQU 1AH ; ZNAK 'SUB' = CTRL Z
377 001B ESC EQU 1BH ; ZNAK 'ESC' = CTRL [
378 000B VT EQU 0BH ; ZNAK 'VT' = POSUN NAHORU
379 0009 HT EQU 09H ; ZNAK 'HT' = TABELACE
380 000C FF EQU 0CH ; ZNAK 'FF' = VYMAZ OBRAZOVKY
381 000D CR EQU 0DH ; ZNAK 'CR' = POSUN NA ZACATEK RADKU
382 0008 BS EQU 08H ; ZNAK 'BS' = ZNAK ZPET
383 000A LF EQU 0AH ; ZNAK 'LF' = NOVY RADEK
384 007F DEL EQU 07FH ; ZNAK 'DEL' = VYMAZ ZNAKU
385 001D HOME EQU 1DH ; ZNAK 'HOME' = CTRL ]
386 001E DL EQU 1EH ; ZNAK 'DELETE LINE' = CTRL ^
387 001F DSCR EQU 1FH ; ZNAK 'DELETE SCREEN' = CTRL _
388 0007 BELL EQU 07H ; ZNAK 'BELL' = ZVONEK
389 0000 BLANK EQU 0 ; ZNAK 'BLANK' = CTRL @
390 ;
391 0000 JMPMON EQU 0000H ; SKOK DO STUDENEHO STARTU MONITORU
392 0003 IOBYT EQU 0003H ; ADRESA I/O-BYTU
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-7
393 0004 RAMEND EQU 0004H ; ADRESA KONCE RAM
394 0038 INTADR EQU 0038H ; SKOK DO OBSLUHY RST7
395 0031 UREND EQU 31H ; ADRESA KONCE UZIVATELSKE PAMETI
396 0033 MSTACK EQU 33H ; ADRESA VRCHOLU ZASOBNIKU
397 0035 LINECO EQU 35H ; ADRESA CITACE RADKU
398 0036 CHARCO EQU 36H ; ADRESA CITACE ZNAKU
399 0037 LINENO EQU 37H ; ADRESA POCTU RADKU V OBRAZE
400 0038 CHARNO EQU 38H ; ADRESA POCTU ZNAKU V OBRAZE
401 003C ADRLO EQU 3CH ; POMOCNA ADRESA
402 003D ADRHI EQU 3DH ; POMOCNA ADRESA
403 0070 BRADR EQU 70H ; ADRESA V PC PRI PRERUSENI
404 0072 BRCODE EQU 72H ; KOD INSTRUKCE PRI PRERUSENI
405 0073 SPREG EQU 73H ; NOVY OBSAH (SP) PO GOTO
406 0075 HREG EQU 75H ; NOVY OBSAH (H) PO GOTO
407 0076 LREG EQU 76H ; NOVY OBSAH (L) PO GOTO
408 0077 DREG EQU 77H ; NOVY OBSAH (D) PO GOTO
409 0078 EREG EQU 78H ; NOVY OBSAH (E) PO GOTO
410 0079 BREG EQU 79H ; NOVY OBSAH (B) PO GOTO
411 007A CREG EQU 7AH ; NOVY OBSAH (C) PO GOTO
412 007B AREG EQU 7BH ; NOVY OBSAH (A) PO GOTO
413 007C FREG EQU 7CH ; NOVY OBSAH (F) PO GOTO
414 007D INOUT EQU 7DH ; POMOCNA PROMENA PRIKAZU INPUT A OUTPUT
415 00B0 CONINP EQU 0B0H ; SKOK NA HANDLER KONZOLY - KLAVESNICE
416 00B3 CONOUT EQU 0B3H ; SKOK NA HANDLER KONZOLY - OBRAZOVKY
417 00B6 READIN EQU 0B6H ; SKOK NA HANDLER SNIMACE
418 00BC PUNOUT EQU 0BCH ; SKOK NA HANDLER DEROVACE
419 00F0 USRPO EQU 0F0H ; ADRESA NEPOUZIVANEHO SKOKU
420 00F3 LSTOUT EQU 0F3H ; SKOK NA HANDLER TISKARNY
421 00F6 CONSTA EQU 0F6H ; SKOK NA HANDLER STATUSU KONZOLY
422 0130 NAME1 EQU 130H ; JMENO PROGRAMU PRECTENE Z KAZETY
423 0170 NAME2 EQU 170H ; JMENO HLEDANEHO PROGRAMU NA KAZETE
424 01B0 PNADR EQU 1B0H ; ADRESA BUFFERU DEROVACE
425 01B3 RDADR EQU 1B3H ; ADRESA BUFFERU SNIMACE
426 01B2 PNPOI EQU 1B2H ; ADRESA UKAZATELE DEROVACE
427 01B5 RDPOI EQU 1B5H ; ADRESA UKAZATELE SNIMACE
428 01B6 PBLKC EQU 1B6H ; ADRESA CITACE BLOKU DEROVACE
429 01B8 RBLKC EQU 1B8H ; ADRESA CITACE BLOKU SNIMACE
430 01B7 PFILC EQU 1B7H ; ADRESA CITACE SOUBORU DEROVACE
431 01B9 RFILC EQU 1B9H ; SDRESA CITACE SOUBORU SNIMACE
432 01BB RDSTS EQU 1BBH ; ADRESA STAVU LOGICKEHO ZARIZENI PRO CTENI
433 01BA PNSTS EQU 1BAH ; ADRESA STAVU LOGICKEHO ZARIZENI PRO ZAPIS
434 01F0 TMPAR EQU 1F0H ; POMOCNA OBLAST PRO CTENI SOUBORU Z KAZETY
435 0230 KEYCD EQU 230H ; POLE VZORKU ZNAKU Z KLAVESNICE
436 0235 ZNAK EQU 235H ; VSTUPNI ZNAK Z KLAVESNICE
437 0236 UPLO EQU 236H ; PRIZNAK VSTUPU HORNICH ZNAKU
438 0237 CTRL EQU 237H ; PRIZNAK VSTUPU RIDICICH ZNAKU
439 0238 NUM EQU 238H ; PRIZNAK VSTUPU CISLIC
440 0239 CTN EQU 239H ; CITAC BLIKANI KURZORU
441 ;
442 0040 STCKLN EQU 64 ; DELKA ZASOBNIKU
443 ;
444 00C3 KEYBAS EQU 0C3H ; KLIC PRO ROZPOZNAVANI BASICU
445 E000 ADRBAS EQU BASIC ; ADRESA - " -
446 0055 KEYTPR EQU 055H ; KLIC PRO ROZPOZNAVANI MAGNETOFONU
447 F000 ADRTPR EQU TAPREC ; ADRESA - " -
448 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-8
449 0004 ADRCIN EQU 04H ; DATOVY PORT 8212
450 0000 ADRCST EQU 00H ; STAVOVY PORT 8216
451 0008 RDYCIN EQU 08H ; MASKA STAVOVEHO BITU KLAVESNICE
452 0004 REPCIN EQU 04H ; MASKA STAVOVEHO BITU OPAKOVANI ZNAKU X KLAV.
453 0002 RDYRE1 EQU 02H ; MASKA STAVOVEHO BITU ZARIZENI 1
454 0001 RDYRE2 EQU 01H ; MASKA STAVOVEHO BITU ZARIZENI 2
455 0008 ADRPA EQU 08H ; ADRESA PORTU PA
456 0009 ADRPB EQU 09H ; ADRESA PORTU PB
457 000A ADRPC EQU 0AH ; ADRESA PORTU PC
458 000B ADRCT EQU 0BH ; ADRESA RIDICIHO PORTU
459 0090 CTRLWD EQU 90H ; RIDICI SLOVA PA=IN, PB=OUT, PC=OUT, M0 VSE
460 0001 PC0SET EQU 01H ; NASTAVENI PC0
461 0000 PC0RES EQU 00H ; NULOVANI PC0
462 0003 PC1SET EQU 03H ; NASTAVENI PC1
463 0002 PC1RES EQU 02H ; NULOVANI PC1
464 0008 PC4SET EQU 08H ; NASTAVENI PC4
465 0009 PC4RES EQU 09H ; NULOVANI PC4
466 0010 ADRBIP EQU 10H ; ADRESA ZVUKOVEHO PORTU
467 0000 ADROUT EQU 00H ; ADRESA VYSTUPNIHO PORTU 8216
468 0008 MSKWD EQU 08H ; MASKA OBVODU 8214, POVOLUJE VSECHNY PRERUSENI
469 0014 ADRMSK EQU 14H ; ADRESA MASKOVEHO PORTU OBVODU 8214
470 0018 ADRES EQU 18H ; ADRESA PRO NULOVANI REGISTRU ADRESY ZOBRAZOVANI
471 001F ADSET EQU 1FH ; ADRESA PRO NASTAVENI REGISTRU ADRESY ZOBRAZOVANI
472 0050 BEEPLN EQU 80 ; DELKA PIPNUTI
473 0060 BEEPFQ EQU 60H ; VYSKA PIPNUTI
474 ;
475 ;---------------------------------------------------------------------
476 ;
477 .PHASE MONIT
478 ;
479 ;
480 ;
481 ; TABULKA SKOKU DO ZAKLADNICH PODPROGRAMU:
482 ;
483 F800 C3 F85A JMP COLDST ; STUDENY START MONITORU
484 F803 C3 FE7A JMP CI ; VSTUP Z KONZOLY <A>
485 F806 C3 FE37 JMP RI ; VSTUP ZE SERIOVEHO PORTU <A>
486 F809 C3 FA21 JMP CO ; VYSTUP NA KONZILU <C>
487 F80C C3 FE30 JMP PO ; VYSTUP NA SERIOVY PORT <C>
488 F80F C3 FE29 JMP LO ; VYSTUP NA TISKARNU
489 F812 C3 FE69 JMP CSTS ; STAVOVY PORT KONZOLY <A>
490 F815 C3 FE1E JMP IOCHK ; ZJISTENI I/O-BYTU <A>
491 F818 C3 FE22 JMP IOSET ; NASTAVENI I/O-BYTU <C>
492 F81B C3 FE13 JMP MEMCK ; ZJISTENI KONCE UZIV. PAMETI RAM <AB>
493 F81E C3 FE3E JMP IODEF ; VASTAVENI UZIVATELSKYCH V/V <C>
494 F821 C3 FB12 JMP INTER ; SKOK DO OSERENI PRERUSENI
495 F824 C3 FB0C JMP CRLF ; NOVY RADEK
496 F827 C3 FA8A JMP EXPR ; VSTUP PARAMETRU, POCET C <C>
497 F82A C3 F931 JMP ERROR ; VYPIS '#' NA OBRAZOVKU
498 F82D C3 FAC1 JMP ASHEX ; PREVOD ASCII NA HEX, <A>
499 F830 C3 FA0C JMP DADR ; ZOBRAZENI OBSAHU <HL>
500 F833 C3 FA11 JMP DBYTE ; ZOBRAZENI OBSAHU <A>
501 F836 C3 FDE4 JMP HILO ; DEKREMENTACE <HL> A SROVNANI S <DE>
502 F839 C3 F8E4 JMP NEXT ; TEPLY START MONITORU
503 F83C C3 FA79 JMP SPACE ; MEZERA NA CO
504 F83F C3 F9F2 JMP CINCR ; VSTUP NA ROZPOZNANI PRIKAZU
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-9
505 F842 C3 FD16 JMP IMTEXT ; ZOBRAZENI TEXTU <HL>, D8
506 F845 C3 F9D2 JMP ADRKUP ; ADRESA KURZORU DO <HL>
507 F848 C3 FAD3 JMP HXASC ; PREVOD HEX NA ASCII
508 F84B C3 FE02 JMP TIMER ; CEKANI <BC> MILISEKUND
509 F84E C3 FA01 JMP GETADR ; ADRESA SKRYTE PROMENNE DO <HL>
510 F851 C3 F9CD JMP STJMB ; ULOZ <DE> NA [<HL>,<HL+1>]
511 F854 C3 FA6B JMP ECHO ; VSTUP A ZOBRAZENI ZNAKU
512 F857 C3 FDA7 JMP BACST ; KROK ZPET NA OBRAZOVCE
513 ;
514 ;
515 ; M O N I T
516 ; =========
517 ;
518 ; UVODNI CAST MONITORU, KTERA UMOZNUJE
519 ; RESTART (STUDENY I TEPLY) SYSTEMU. PROVADI
520 ; NASTAVOVANI PRACOVNICH PROMENNYCH, ZJISTUJE
521 ; ROZSAH PAMETI RAM A NASTAVI SPOJOVACI ADRESY.
522 ; OBSAHUJE TAKE VYHODNOCENI PRIKAZU OPERATORA.
523 ;
524 F85A 21 0006 COLDST: LXI H,6 ; NASTAVENI PROZATIMNIHO VRCHOLU ZASOBNIKU
525 F85D F9 SPHL ; NA ADRESU 0006H ZAMEZI POSKOZENI UZIV. PAM.
526 F85E CD F96F CALL GETDIS ; ADRESA DISRAM <HL>, POCET RADKU <C>
527 F861 F9 SPHL ; NASTAVENI SKUTECNEHO VRCHOLU ZASOBNIKU
528 F862 22 0004 SHLD RAMEND ; NASTAVY KONEC PROGRAMOVE RAM
529 F865 EB XCHG
530 F866 21 FFC0 LXI H,-STCKLN ; DELKA ZASOBNIKU
531 F869 19 DAD D ; KONEC UZIVATELSKE PAMETI
532 F86A EB XCHG
533 F86B E5 PUSH H
534 F86C 21 0031 LXI H,UREND
535 F86F CD FA01 CALL GETADR ; ADRESA PROMENNE U(SER)R(AM)END
536 F872 CD F9CD CALL STJMB ; ULOZENI KONCE UZIV. RAM
537 F875 E3 XTHL ; NA VRCHOL ZASOBNIKU ADRESA MSTACK
538 F876 7C MOV A,H
539 F877 EB XCHG ; POSLEDNI ADRESA V <DE>
540 F878 3C INR A
541 F879 E6 F8 ANI 11111000B ; VYBER BITU A15-A11 (PO DVOU KILECH)
542 F87B 0F RRC
543 F87C 0F RRC
544 F87D 0F RRC ; POSUNUTI O 3 BITY DOPRAVA
545 F87E D3 18 OUT ADRES ; VYNULOVANI REGISTRU ADRESY ZOBRAZOVANE RAM
546 F880 D3 1F OUT ADSET ; NASTAVENI PLATNE ADRESY ZOBRAZOVANE RAM
547 F882 E1 POP H ; ADRESA MSTACK DO <HL>
548 F883 CD F9CD CALL STJMB ; VRCHOL ZASOBNIKU DO MSTACK
549 F886 36 00 MVI M,0 ; KURZOR NA PRVNI RADEK (LINECO = 0)
550 F888 23 INX H
551 F889 36 00 MVI M,0 ; KURZOR NA POCATEK PRVEHO RADKU (CHARCO = 0)
552 F88B 23 INX H
553 F88C 71 MOV M,C ; POCET RADKU (Z PODPROGRAMU GETDIS)
554 F88D 23 INX H
555 F88E 36 2F MVI M,2FH ; POCET ZNAKU NA RADKU JE 48
556 ;
557 F890 D5 PUSH D
558 F891 21 00B0 LXI H,CONINP
559 F894 11 FE81 LXI D,CI4
560 F897 CD F9C7 CALL STJMP ; NASTAVENI SKOKU PRO VSTUP Z KLAVESNICE
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-10
561 F89A 11 FA28 LXI D,CO2
562 F89D CD F9CA CALL STJMA ; NASTAVENI SKOKU VYSTUP NA OBRAZOVKU
563 F8A0 21 00F6 LXI H,CONSTA
564 F8A3 11 FE70 LXI D,CSTS1
565 F8A6 CD F9C7 CALL STJMP ; NASTAVENI SKOKU PRO STATUS KONZOLY
566 F8A9 D1 POP D
567 ;
568 F8AA CD F9C1 CALL GETSPR ; ADRESA PROMENNE SPREG
569 F8AD 1B DCX D
570 F8AE 1B DCX D
571 F8AF 73 MOV M,E
572 F8B0 23 INX H
573 F8B1 72 MOV M,D ; NASTAVENI POCATECNICH HODNOTY UKAZ. ZASOB.
574 ;
575 F8B2 CD FD16 COLD2: CALL IMTEXT
576 F8B5 0C 50 4C 41 DB FF,'PLAN80A MON V2Q',BELL OR 80H
577 F8B9 4E 38 30 41
578 F8BD 20 4D 4F 4E
579 F8C1 20 56 32 51
580 F8C5 87
581 ;
582 F8C6 11 FA21 LXI D,CO ; ADRESA OBSLUHY CO
583 F8C9 0E 06 MVI C,6 ; V/V ZARIZENI LO
584 F8CB CD FE3E CALL IODEF ; NASTAVENI SKOKU LO --> CO
585 ;
586 F8CE 3E 08 MVI A,MSKWD
587 F8D0 D3 14 OUT ADRMSK ; NASTAVENI MASKY OBVODU 8214
588 ;
589 F8D2 CD FBCF COLD0: CALL CHKTPR ; JE PRITOMEN MAGNETOFON ?
590 F8D5 CC F001 CZ TINIT ; INICIACE OBVODU MAGNETOFONU A PRIRAZENI PO,RI
591 ;
592 F8D8 3E 90 MVI A,CTRLWD
593 F8DA D3 0B OUT ADRCT
594 ;
595 F8DC 3A E000 LDA ADRBAS ; JE PRITOMEN BASIC
596 F8DF FE C3 CPI KEYBAS
597 F8E1 CA E000 JZ BASIC ; ANO - SKOK DO BASICU
598 ;
599 F8E4 CD F9BB NEXT: CALL GETSTK ; ADRESA PROMENNE MSTACK
600 F8E7 CD F93C CALL NEXT6 ; UKAZATEL ZASOBNIKU DO <HL>
601 F8EA F9 SPHL ; NASTAVENI UKAZATELE ZASOBNIKU
602 ;
603 F8EB 21 0000 LXI H,JMPMON
604 F8EE 11 F85A LXI D,COLDST
605 F8F1 CD F9CA CALL STJMA ; NASTAVENI SKOKU DO STUDENEHO STARTU MONITORU
606 ;
607 F8F4 CD FB0C CALL CRLF ; PRECHOD NA NOVY RADEK
608 F8F7 0E 2E MVI C,'.'
609 F8F9 CD FA21 CALL CO ; VYCKAVACI TECKA NA DISPLAY
610 F8FC CD FA6B CALL ECHO ; VSTUP A ZOBRAZENI ZNAKU
611 F8FF 11 F8E4 LXI D,NEXT ; NAVRATOVA ADRESA PRO RETURN
612 F902 D5 PUSH D ; SIMULACE CALL PRO PRIZNAK
613 F903 01 1702 LXI B,(CTEND SHL 8) OR 2 ; <B>...DELKA TABULKY <C>...2...(EXPR)
614 F906 21 F941 LXI H,CTABL ; ZACATEK TABULKY
615 F909 D6 41 SUI 'A' ; PREVOD NA 0-26
616 F90B FA F931 JM ERROR ; ZNAK ASCII < KOD 'A' ?
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-11
617 F90E B8 CMP B ; SROVNANI KODU S DELKOU TABULKY
618 F90F D2 F931 JNC ERROR ; ZNAK ASCII > KOD 'X' ?
619 F912 CD F937 CALL GETTAB
620 F915 7C MOV A,H ; VYSSI BYTE ADRESY PRIKAZU
621 F916 E6 FC ANI 0FCH ; VYBER BITU A15 AZ A10
622 F918 FE F8 CPI MONIT SHR 8 ; SROVNANI S ADRESOU MONITORU
623 F91A D2 F928 JNC NEXT4 ; PROVED MONITOROVSKY PRIKAZ
624 F91D FE F0 CPI TAPREC SHR 8 ; SROVNANI S ADRESAMI MAGNETOFONU
625 F91F DA F929 JC NEXT2 ; PROVED PRIKAZ V BASICU
626 F922 CD FBCF CALL CHKTPR ; PROGRAM MAGNETOFONU PRITOMEN?
627 F925 C2 F931 JNZ ERROR ; NENI --> CHYBA
628 F928 E9 NEXT4: PCHL ; PROVED PRIKAZ
629 F929 3A E000 NEXT2: LDA ADRBAS
630 F92C FE C3 CPI KEYBAS ; JE PRITOMEN TINY BASIC?
631 F92E CA F928 JZ NEXT4 ; ANO - PROVED PRIKAZ BASICU
632 ;
633 ;
634 ;
635 ; E R R O R
636 ; =========
637 ;
638 ; PODPROGRAM ERROR PROVADI VYPIS HLASENI O VYSKYTU CHYBY
639 ; VE FORME DVOJITEHO KRIZKU (#).
640 ;
641 ; POSKOZENE REGISTRY: - - -
642 ;
643 F931 C5 ERROR: PUSH B
644 F932 0E 23 MVI C,'#' ; KOD ZNAKU #
645 F934 C3 FA85 JMP WQUA0 ; VYPIS ZNAKU #
646 ;
647 ;
648 ;
649 ; G E T T A B
650 ; ===========
651 ;
652 ; PODPROGRAM PRO VYVOLANI ADRESY PRIKAZU Z TABULKY DO <HL>, OFFSET JE
653 ; V <A>, ADRESA POCATKU TABULKY JE V <HL>
654 ;
655 ; POSKOZENE REGISTRY: A,F,H,L,D,E
656 ;
657 F937 87 GETTAB: ADD A ; ZDVOJNASOBENI ODSTUPU (ADRESA...2 BYTY)
658 F938 16 00 MVI D,0 ; VYNULOVANI VYSSIHO BYTU OFFSETU
659 F93A 5F MOV E,A ; ULOZENI NIZSIHO BYTU OFFSETU
660 F93B 19 DAD D ; VYPOCET VYSLEDNE ADRESY DO <HL>
661 F93C 7E NEXT6: MOV A,M ; DOLNI BYTE ADRESY PRIKAZU
662 F93D 23 INX H ; INKREMENTACE UKAZATELE
663 F93E 66 MOV H,M ; HORNI BYTE ADRESY
664 F93F 6F MOV L,A ; ADRESA PRIKAZU V <HL>
665 F940 C9 RET
666 ;
667 ;
668 ;
669 ; TABULKA ADRES OBSLUH PRIKAZU
670 ; ============================
671 ;
672 F941 F00D CTABL: DW TAPP ; A...(APPEND) PRIPOJENI BINARNIHO SOUBORU
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-12
673 F943 E000 DW BASIC ; B...(BASIC) STUDENY START BASICU
674 F945 E003 DW CONIT ; C...(CONTINUE) TEPLY START BASICU
675 F947 FC61 DW DISPL ; D...(DISPLAY) ZOBRAZENI OBSAH PAMETI
676 F949 F025 DW TEOF ; E...(END OF FILE) ZAPIS UZAV. HEX. SOUBORU
677 F94B FCBD DW FILL ; F...(FILL) VYPLNENI PAMETI ZNAKEM
678 F94D FC1A DW GOTO ; G...(GOTO) SKOK DO PROGRAMU
679 F94F F931 DW ERROR ; H...
680 F951 FCF7 DW INPUT ; I...(INPUT) VSTUP Z PORTU
681 F953 F004 DW TJOIN ; J...(JOIN) NASTAVENI ADRES MAGNETOFONU
682 F955 F028 DW TCLOS ; K...(CLOSE) UZAVRENI ZAPSANEHO SOUBORU
683 F957 F010 DW TLOAD ; L...(LOAD) OVLADANI MOTORKU MAGNETOFONU
684 F959 FCD0 DW MOVE ; M...(MOVE) PRESUN OBLASTI PAMETI
685 F95B F931 DW ERROR ; N...
686 F95D FCDD DW OUTPT ; O...(OUTPUT) VYSTUP NA PORT
687 F95F F00A DW TPUT ; P...(PUT) ZAPIS BINARNIHO SOUBORU NA PASKU
688 F961 F007 DW TQUAF ; Q...(QUAFF) CTENI BINARNIHO SOUBORU Z PASKY
689 F963 F022 DW TRD ; R...(READ) CTENI HEX. SOUBORU Z PASKY
690 F965 FBD5 DW SUBST ; S...(SUBSTITUTE) ZMENA OBSAHU PAMETI
691 F967 F013 DW TDIR ; T...(TAPE) VYPIS NAZVU VSECH SOBORU
692 F969 F016 DW TUNNA ; U...(UNNAMED) POJMENOVANI NOVE KAZETY
693 F96B F931 DW ERROR ; V...
694 F96D F01F DW TWR ; W...(WRITE) ZAPIS HEX. SOUBORU NA PASKU
695 0017 CTEND EQU ($-CTABL)/2 ; POCET POLOZEK TABULKY
696 ;
697 ; NAVRAT Z PRIKAZU VZDY: RET
698 ;
699 ;
700 ; G E T D I S
701 ; ===========
702 ;
703 ;
704 ; PODPROGRAM GETDIS PROVADI ZJISTENI KONCE PAMETI RAM> PRI
705 ; SVE CINNOSTI PREDPOKLADA SPOJITOU OBLAST PAMETI (BEZ ME-
706 ; OSAZENEHO ADRESOVEHO PROSTORU), KTERY PROHLEDAVA PO KILECH OD
707 ; KONCE. DALE PROVADI VYPOCET ADRESY ZACATKU OBRAZOVE
708 ; PAMETI A JI PRISLUSEJICI POCET RADKU. VYCHAZI Z ADRESY KONCE
709 ; PAMETI RAM. POSKYTUJE POSLEDNI BUNKU PAMETI RAM.
710 ; ADRESU OBRAZOVE PAMETI ULOZI DO <HL>, POCET RADKU DO <C>.
711 ;
712 ; POSKOZENE REGISTRY: A,F,B,C,D,E,H,L
713 ;
714 F96F 21 03FF GETDIS: LXI H,03FFH ; ADRESA KONCE PAM.PROSTORU + 3FF
715 F972 11 FC00 LXI D,0FC00H ; DVOKOVY DOPLNEK 1 KILA
716 F975 19 GETD0: DAD D ; VYPOCET DALSI ADRESY
717 F976 7E MOV A,M
718 F977 2F CMA ; INVERZE PUVODNIHO OBSAHU
719 F978 77 MOV M,A ; TESTOVACI ZAPIS
720 F979 BE CMP M ; OBSAH PLATNY ?
721 F97A C2 F975 JNZ GETD0 ; NE - DALSI KILO
722 F97D 7C MOV A,H ; HORNI BYTE ADRESY
723 F97E EB XCHG ; ULOZENI ADRESY KONCE RAM
724 F97F E6 FC ANI 0FCH ; VYBER 'KILOVICH' BITU
725 F981 21 01FF LXI H,1FFH ; ADRESA DISRAM PRO 1 KILO RAM
726 F984 0E 07 MVI C,7 ; 8 RADKU
727 F986 C8 RZ ; RAM = 1K
728 F987 FE 04 CPI 4
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-13
729 F989 29 DAD H ; ADRESA DIRAM PRO 2 KILA
730 F98A 23 INX H
731 F98B 0E 0F MVI C,0FH ; 16 RADKU
732 F98D C8 RZ ; RAM = 2K
733 F98E FE 08 CPI 8
734 F990 26 07 MVI H,7 ; ADRESA DISRAM PRO 3 KILA
735 F992 C8 RZ ; RAM = 3K
736 F993 EB XCHG ; OBNOVENI ADRESY KONCE RAM
737 F994 11 F800 LXI D,0F800H ; DVOJKOVY DOPLNEK 2 KIL
738 F997 19 DAD D ; VYPOCET ADRESY DISRAM PRO 4K AZ 15K RAM
739 F998 0E 1F MVI C,1FH ; 32 RADKU
740 F99A C9 RET
741 ;
742 ;
743 ;
744 ;
745 ; N U M L I N
746 ; ===========
747 ;
748 ; PODPROGRAM PRO ZJISTENI ADRESY PROMENNE S POCTEM ZOBRAZOVANYCH
749 ; RADKU NA OBRAZOVCE. VYSLEDNA ADRESA JE V <HL>.
750 ;
751 ; POSKOZENE REGISTRY: H,L
752 ;
753 F99B 21 0037 NUMLIN: LXI H,LINENO ; ODSTUP PROMENNE S POCTEM RADKU
754 F99E CD FA01 NUML0: CALL GETADR ; ZJISTENI ADRESY TETO PROMENE
755 F9A1 C9 RET
756 ;
757 ;
758 ;
759 ; N U M C H R
760 ; ===========
761 ;
762 ; PODPROGRAM PRO ZJISTENI ADRESY PROMENNE S POCTEM ZNAKU,
763 ; ULOZI SE DO <HL>.
764 ;
765 ; POSKOZENE REGISTRY: H,L
766 ;
767 F9A2 21 0038 NUMCHR: LXI H,CHARNO
768 F9A5 C3 F99E JMP NUML0
769 ;
770 ;
771 ;
772 ; J A D R
773 ; =======
774 ;
775 ; PODPROGRAM PRO SKOK NA ADRESU DANOU ODSTUPEM V <HL> OD ADRESY
776 ; DISRAM, PREDPOKLADA OBSAH <HL> V ZASOBNIKU, TENTO OBSAH OBNOVY.
777 ;
778 ; POSKOZENE REGISTRY: H,L,SP
779 ;
780 F9A8 CD FA01 JADR: CALL GETADR ; VYPOCET FYZICKE ADRESY
781 F9AB E3 XTHL ; OBNOVENI <HL>
782 F9AC C9 RET ; SKOK NA VYPOCTENOU ADRESU
783 ;
784 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-14
785 ;
786 ; G E T L I N
787 ; ===========
788 ;
789 ; PODPROGRAM PRO ZJISTENI OBSAHU CITACE RADKU A JEHO ULOZENI DO <A>
790 ;
791 ; POSKOZENE REGISTRY: H,L,A
792 ;
793 F9AD 21 0035 GETLIN: LXI H,LINECO ; ODSTUP CITACE RADKU
794 F9B0 C3 F9B6 JMP GETC0
795 ;
796 ;
797 ;
798 ; G E T C H R
799 ; ===========
800 ;
801 ; PODPROGRAM PRO ZJISTENI OBSAHU CITACE ZNAKU A JEHO ULOZENI DO <A>
802 ;
803 ; POSKOZENE REGISTRY: H,L,A
804 ;
805 F9B3 21 0036 GETCHR: LXI H,CHARCO ; ODSTUP CITACE ZNAKU
806 F9B6 CD FA01 GETC0: CALL GETADR ; VYPOCET ADRESY CITACE ZNAKU
807 F9B9 7E MOV A,M ; PRICTENI OBSAHU CITACE ZNAKU
808 F9BA C9 RET
809 ;
810 ;
811 ;
812 ; G E T S T K
813 ; ===========
814 ;
815 ; PODPROGRAM PRO ZJISTENI ADRESY PROMENE MSTACK (VRCHOL ZASOBNIKU
816 ; PRO MONITOR).
817 ;
818 ; POSKOZENE REGISTRY: H,L
819 ;
820 F9BB 21 0033 GETSTK: LXI H,MSTACK ; ODSTUP PROMENNE MSTACK
821 F9BE C3 F9B6 JMP GETC0 ; VYPOCET ADRESY PROMENNE MSTACK
822 ;
823 ;
824 ; G E T S P R
825 ; ===========
826 ;
827 ; PODPROGRAM PRO ZJISTENI ADRESY PROMENNE SPREG (VRCHOL ZASOBNIKU
828 ; PRO UZIVATELE).
829 ;
830 ; POSKOZENE REGISTRY: H,L
831 ;
832 F9C1 21 0073 GETSPR: LXI H,SPREG
833 F9C4 C3 F9B6 JMP GETC0
834 ;
835 ;
836 ;
837 ; S T J M P
838 ; =========
839 ;
840 ; PODPROGRAM ULOZI DO <HL> ADRESU URCENOU ODSTUPEM OD DISRAM ULOZENYM
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-15
841 ; V <HL>, PAK ULOZI KOD 0C3H NA ADRESU <HL>, ABSAH <E> NA
842 ; ADESU <HL+1> A <D> NA ADRESU <HL+2>. PO VYSTUPU Z PODPROGRAMU
843 ; JE V <HL> HODNOTA ZVETSENA O 3 (HL+2).
844 ;
845 ; POSKOZENE REGISTRY: H,L
846 ;
847 F9C7 CD FA01 STJMP: CALL GETADR ; VYPOCET ADRESY A ULOZENI DO <HL>
848 F9CA 36 C3 STJMA: MVI M,0C3H ; KOD INSTRUKCE SKOKU DO [<HL>]
849 F9CC 23 INX H
850 F9CD 73 STJMB: MOV M,E ; ULOZENI DOLNIHO BYTU ADRESY SKOKU
851 F9CE 23 INX H
852 F9CF 72 MOV M,D ; ULOZENI HORNIHO BYTU ADRESY SKOKU
853 F9D0 23 INX H
854 F9D1 C9 RET
855 ;
856 ;
857 ;
858 ; A D R K U R
859 ; ===========
860 ;
861 ; PODPROGRAM ADRKUR VYPOCITA ZE SOURADNICOVYCH UKAZATELU
862 ; LINECO (CITAC RADKU) A CHARCO (CITAC ZNAKU) FYZICKOU
863 ; ADRESU PRISLUSNEHO MISTA V OBRAZOVE PAMETI DISRAM.
864 ; VYSLEDNOU ADRESU UKLADA DO <HL>.
865 ;
866 ; POSKOZENE REGISTRY: H,L
867 ;
868 F9D2 F5 ADRKUP: PUSH PSW
869 F9D3 D5 PUSH D
870 F9D4 11 0040 LXI D,64 ; POCET BYTU NA JEDEN RADEK
871 F9D7 CD F9AD CALL GETLIN ; OBSAH CITACE RADKU DO <A>
872 F9DA 2A 0004 LHLD RAMEND
873 F9DD 23 INX H ; ZACATEK OBRAZOVE PAMETI V <HL>
874 F9DE 3D ADRK2: DCR A
875 F9DF FA F9E6 JM ADRK1 ; PRES VSECHNY RADKY ?
876 F9E2 19 DAD D ; VYPOCET BYTU V PREDCH. RADCICH
877 F9E3 C3 F9DE JMP ADRK2
878 F9E6 E5 ADRK1: PUSH H
879 F9E7 16 00 MVI D,0
880 F9E9 CD F9B3 CALL GETCHR ; OBSAH CITACE ZNAKU DO <A>
881 F9EC 5F MOV E,A
882 F9ED E1 POP H ; OBNOVENI <HL>
883 F9EE 19 DAD D ; PRICTENI POCTU ZNAKU V PRUB. RADKU
884 F9EF D1 POP D
885 F9F0 F1 POP PSW
886 F9F1 C9 RET
887 ;
888 ;
889 ;
890 ; C I N C R
891 ; =========
892 ;
893 ; PODPROGRAM CINCR PROVADI VSTUP, ZOBRAZENI A ANALIZU
894 ; ZNAKU Z KLAVESNICE. ZNAK JE V REGISTRU <A>, POLE
895 ; JEHO HODNOTY NASTAVUJE PRIZNAKY NASLEDOVNE:
896 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-16
897 ; ZNAK FF-C FF-Z
898 ; , SP 0 1
899 ; CR 1 1
900 ; OSTATNI 0 0
901 ;
902 ;
903 ; POSKOZENE REGISTRY: A,F
904 ;
905 F9F2 CD FA6B CINCR: CALL ECHO ; VSTUP A ZOBRAZENI ZNAKU
906 F9F5 FE 2C ANAL: CPI ',' ; ANAJIZATOR ZNAKU V <A>
907 F9F7 C8 RZ
908 F9F8 FE 20 CPI SPC
909 F9FA C8 RZ ; PRO , A SP ... FF-Z = 1, FF-C = 0
910 F9FB FE 0D CPI CR
911 F9FD 37 STC
912 F9FE C8 RZ ; PRO CR ... FF-Z = 1, FF-C = 1
913 F9FF 3F CMC
914 FA00 C9 RET ; JINY ZNAK ... FF-Z = 0, FF-C = 0
915 ;
916 ;
917 ;
918 ;
919 ; G E T A D R
920 ; ===========
921 ;
922 ; PODPROGRAM GETADR UMOZNUJE VYPOCET ADRESY
923 ; PROMENNYCH UMISTENYCH V NEVIUZITE CASTI
924 ; PAMETI RAM URCENE PRO UCHOVANI OBRAZU. VSTUPNI
925 ; PROMENOU JE ODSTUP OD ZACATKU DISRQM, UKLADA
926 ; SE DO <HL>, VYSLEDNA ADRESA JE V <HL>
927 ;
928 ; POSKOZENE REGISTRY: H,L
929 ;
930 FA01 D5 GETADR: PUSH D
931 FA02 F5 PUSH PSW
932 FA03 EB XCHG ; ULOZENI ODSTUPU DO <DE>
933 FA04 2A 0004 LHLD RAMEND ; ADRESA KONCE PROGRAMOVE PAMETI
934 FA07 23 INX H ; ADRESA ZACATKU OBRAZOVE RAM
935 FA08 19 DAD D ; VYPOCET VYSLEDNE ADRESY DO <HL>
936 FA09 F1 POP PSW ; FF-C JE POSKOZENO INSTRUKCI DAD
937 FA0A D1 POP D
938 FA0B C9 RET
939 ;
940 ;
941 ;
942 ; D A D R
943 ; =======
944 ;
945 ; PODPROGRAM DADR (DBYTE) SLOUZI K ZOBRAZENI ADRESY
946 ; (BYTU) ULOZENEHO V REGISTRECH <HL> (V REG. <A>) NA
947 ; OBRAZOVCE POMOCI HEXADECIMALNI NOTACE.
948 ;
949 ; POSKOZENE REGISTRY: A,F,C
950 ;
951 FA0C 7C DADR: MOV A,H ; VYSSI BYTE ADRESY
952 FA0D CD FA11 CALL DBYTE ; JEJI ZOBRAZENI
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-17
953 FA10 7D MOV A,L ; NIZSI BYTE ADRESY
954 FA11 F5 DBYTE: PUSH PSW
955 FA12 0F RRC
956 FA13 0F RRC
957 FA14 0F RRC
958 FA15 0F RRC ; DELENI <A> / 16
959 FA16 E6 0F ANI 0FH ; HORNI NIBBLE
960 FA18 CD FA1E CALL DBYT0 ; PREVOD A ZOBRAZENI
961 FA1B F1 POP PSW ; OBNOVENI ODSAHU <A>
962 FA1C E6 0F ANI 0FH ; DOLNI NIBBLE
963 FA1E CD FAD3 DBYT0: CALL HXASC ; PREVOD0HEX --> ASCII0<C>
964 ;
965 ;
966 ;
967 ; C O
968 ; ===
969 ;
970 ;
971 ; PODPROGRAM CO PROVADI VYSTUP ZNAKU ULOZENEHO V REGISTRU
972 ; <C> NA OBRAZOVKU NA MISTO URCENE SOURADNICEMI LINECO A
973 ; CHARCO. SOUCASNE SIMULUJE CHOVANI OBVODOVE KONZOLY
974 ; PRO ZNAKY FF,BS,CR,LF,HT,HOME,DL,DSCR A BELL.
975 ;
976 ; POSKOZENE REGISTRY: - - -
977 ;
978 FA21 E5 CO: PUSH H
979 FA22 21 00B3 LXI H,CONOUT ; SPOJOVACI ADRESA
980 FA25 C3 F9A8 JMP JADR ; SKOK NA NI
981 ;
982 FA28 E5 CO2: PUSH H
983 FA29 F5 PUSH PSW
984 FA2A 79 MOV A,C
985 FA2B 21 FA68 LXI H,CO0 ; NAVRATOVA ADRESA
986 FA2E E5 PUSH H ; SIMULACE CALL
987 FA2F FE 0D CPI CR ; JDE O ZNAK 'CR' ?
988 FA31 CA FB02 JZ CARRET ; ZACATEK RADKU
989 FA34 FE 0A CPI LF ; JDE A ZNAK 'LF' ?
990 FA36 CA FADD JZ LINEF ; O JEDEN RADEK DOLU
991 FA39 79 MOV A,C ; OBNOVENI <A>
992 FA3A FE 08 CPI BS ; JDE O ZNAK 'BS' ?
993 FA3C CA FDA7 JZ BACST ; POSUN ZPET
994 FA3F FE 0C CPI FF ; JDE O ZNAK 'FF' ?
995 FA41 CA FD86 JZ FORFI ; VYMAZ DISRAM
996 FA44 FE 1D CPI HOME ; JDE O ZNAK 'HOME' ?
997 FA46 CA FD7A JZ GHOME ; DO LEVEHO HOR. ROHU
998 FA49 FE 1E CPI DL ; JDE O ZNAK 'DL' ?
999 FA4B CA FDC9 JZ DELLIN ; VYMAZ RADKU
1000 FA4E FE 1F CPI DSCR ; JDE O ZNAK 'DS' ?
1001 FA50 CA FD89 JZ DELSCR ; VYMAZ OBRAZOVKY
1002 FA53 FE 07 CPI BELL ; JDE O ZNAK 'BELL' ?
1003 FA55 CA FDEF JZ BEEPS ; PIPNUTI
1004 ;
1005 FA58 E1 POP H ; SPLACHNUTI NAVR. AD.
1006 FA59 CD F9D2 CALL ADRKUP ; ADRESA KURZORU <HL>
1007 FA5C 71 MOV M,C ; VYPIS ZNAKU
1008 FA5D CD F9B3 CALL GETCHR ; CISLO ZNAKU V <A>
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-18
1009 FA60 34 INR M ; DALSI POZICE
1010 FA61 CD F9A2 CALL NUMCHR ; ADRESA POCTU ZNAKU
1011 FA64 BE CMP M ; NA KONCI RADKU ?
1012 FA65 CC FB0C CZ CRLF ; ANO - NOVY RADEK
1013 FA68 F1 CO0: POP PSW
1014 FA69 E1 POP H
1015 FA6A C9 RET
1016 ;
1017 ;
1018 ;
1019 ;
1020 ; E C H O
1021 ; =======
1022 ;
1023 ; PODPROGRAM ECHO PROVADI VSTUP A ZOBRAZENI ZNAKU Z
1024 ; KLAVESNICE. ZNAK JE ULOZEN V REGISTRU <A>.
1025 ;
1026 ; POSKOZENE REGISTRY: A,F
1027 ;
1028 FA6B C5 ECHO: PUSH B
1029 FA6C CD FE7A CALL CI ; VSTUP ZNAKU
1030 FA6F 4F MOV C,A
1031 FA70 CD FA21 CALL CO ; ZOBRAZENI ZNAKU
1032 FA73 79 MOV A,C
1033 FA74 C1 POP B
1034 FA75 C9 RET
1035 ;
1036 ;
1037 ;
1038 ; S D A D R
1039 ; =========
1040 ;
1041 ; PODPROGRAM PRO ZOBRAZENI <HL> A MEZERY NA OBRAZOVCE.
1042 ;
1043 ; POSKOZENE REGISTRY: A,F,C
1044 ;
1045 FA76 CD FA0C SDADR: CALL DADR ; ZOBRAZENI <HL>
1046 ;
1047 ;
1048 ;
1049 ; S P A C E
1050 ; =========
1051 ;
1052 ; PODPROGRAM SPACE PROVEDE VYPIS MEZERY NA OBRAZOVKU.
1053 ;
1054 ; POSKOZENE REGISTRY: - - -
1055 ;
1056 FA79 C5 SPACE: PUSH B
1057 FA7A 0E 20 MVI C,SPC ; KOD MEZERY DO <C>
1058 FA7C C3 FA85 JMP WQUA0 ; PROVEDENI VYPISU
1059 ;
1060 ;
1061 ;
1062 ; E D A D R
1063 ; =========
1064 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-19
1065 ; PODPROGRAM PRO ZOBRAZENI <HL> A ROVNITKA NA OBRAZOVCE.
1066 ;
1067 ; POSKOZENE REGISTRY: A,F,C
1068 ;
1069 FA7F CD FA0C EDADR: CALL DADR ; ZOBRAZENI <HL>
1070 ;
1071 ;
1072 ;
1073 ; E Q U A T E
1074 ; ===========
1075 ;
1076 ; PODPROGRAM EQUATE PROVEDE VYPIS ROVNITKA NA OBRAZOVKU.
1077 ;
1078 ; POSKOZENE REGISTRY: - - -
1079 ;
1080 FA82 C5 EQUATE: PUSH B
1081 FA83 0E 3D MVI C,'=' ; ZNAK ROVNITKO DO <C>
1082 FA85 CD FA21 WQUA0: CALL CO ; ZOBRAZENI ROVNITKA
1083 FA88 C1 POP B
1084 FA89 C9 RET
1085 ;
1086 ;
1087 ;
1088 ; E X P R
1089 ; =======
1090 ;
1091 ; PODPROGRAM EXPR UMOZNUJE CSTYP PARAMETRU (ADRES,BYTU)
1092 ; DO PROGRAMU. POCET PARAMETRU JE V REGISTRU <C>.
1093 ; JEDNOTLIVE PARAMETRY UKLADA POSTUPNE DO ZASOBNIKU.
1094 ;
1095 ; POSKOZENE REGISTRY: A,F,B,C,H,L,SP
1096 ;
1097 FA8A F5 EXPR: PUSH PSW
1098 FA8B F1 EXPR0: POP PSW
1099 FA8C CD FA82 CALL EQUATE ; ROVNITKO NA DISPLEJ
1100 FA8F 21 0000 LXI H,0 ; VYNULOVANI <HL>
1101 FA92 CD FA6B EXPR1: CALL ECHO ; VSTUP A ZOBRAZENI ZNAKU
1102 FA95 FE 1B CPI ESC ; JDE O ZNAL 'ESC' ?
1103 FA97 CA F8E4 JZ NEXT ; POKUT ANO -> PRERUS PRIKAZ
1104 FA9A 47 MOV B,A ; ULOZENI ZNAKU DO <B>
1105 FA9B CD FAC1 CALL ASHEX ; PREVOD ZNAKU Z ASCII NA HEX
1106 FA9E DA FAAA JC EXPR2 ; NEJDE O HEXADECIMALNI CIFRU ?
1107 FAA1 29 DAD H
1108 FAA2 29 DAD H
1109 FAA3 29 DAD H
1110 FAA4 29 DAD H ; VYNASOBENI <HL> * 16
1111 FAA5 B5 ORA L ; PRIDANI DALSIHO NYBBLU
1112 FAA6 6F MOV L,A ; DO <HL>
1113 FAA7 C3 FA92 JMP EXPR1 ; VSTUP DALSI CIFRY
1114 FAAA C6 30 EXPR2: ADI '0' ; OPRAVA KODU PO ASHEX
1115 FAAC CD F9F5 CALL ANAL ; ANALIZATOR ZNAKU
1116 FAAF CA FAB8 JZ EXPR3 ; PRIJAT UKONCOVACI ZNAK 'SP' , ',' , 'CR'
1117 FAB2 CD F931 CALL ERROR ; HLASENI NESMISLNEHO OPERANDU - SPLACHNOUT
1118 FAB5 C3 FA8A JMP EXPR ; VSTUP NAHRADNIHO OPERANDU
1119 FAB8 E3 EXPR3: XTHL ; ULOZENI ZIZKANEHO OPERANDU DO ZASOBNIKU
1120 FAB9 E5 PUSH H ; OBNOVENI NARATOVE ADRESY
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-20
1121 FABA F5 PUSH PSW
1122 FABB 0D DCR C ; DEKREMENTACE CITACE OPERANDU
1123 FABC C2 FA8B JNZ EXPR0 ; VSECHNY OPERANDY NACTENY ?
1124 FABF F1 POP PSW
1125 FAC0 C9 RET
1126 ;
1127 ;
1128 ;
1129 ;
1130 ; A S H E X
1131 ; =========
1132 ;
1133 ; PODPROGRAM ASHEX ROVADI PREVOD HEX. CISLA ZADA-
1134 ; NEHO POMOCI ASCII ZNAKU NA HEX. HODNOTU. PUNODNI
1135 ; ZNAKY V REGISTRU <A>, VYSLEDEK V REGISTRU <A>.
1136 ; AUTOMATICKY POSOUVA RAD PRI VICENASOBNEM VOLANI,
1137 ; TAKZE LZE PREVADET AZ CTYR-NIBBLOVA HEX. CISLA.
1138 ;
1139 ; POSKOZENE REGISTRY: A,F
1140 ;
1141 FAC1 D6 30 ASHEX: SUI '0'
1142 FAC3 D8 RC ; JE KOD ZNAKU < 30H ?
1143 FAC4 C6 E9 ADI 0E9H
1144 FAC6 D8 RC ; JE KOD ZNAKY > 46H ?
1145 FAC7 C6 06 ADI 6
1146 FAC9 F2 FACF JP ASHE0 ; JDE O PISMENOVY KOD (A-F) ?
1147 FACC C6 07 ADI 7
1148 FACE D8 RC ; JDE O ZNAKY : (3AH) AZ (60H) ?
1149 FACF C6 0A ASHE0: ADI 10 ; POSUN NA NOVOU DEKADU
1150 FAD1 B7 ORA A ; NULOVANI PRIZNAKU NESMISLNEHO KODU
1151 FAD2 C9 RET ; FF-C = 0 => OK
1152 ;
1153 ;
1154 ;
1155 ; H X A S C
1156 ; =========
1157 ;
1158 ; PODPROGRAM HXASC PROVADI PREVOD HEX. HODNOTY
1159 ; NA KOD EKVIVALENTNIHO ZNAKU ASCII. HEX. HODNOTA
1160 ; JE V REGISTRU <A>, KOD ZNAKU V REGISTRU <C>.
1161 ;
1162 ; POSKOZENE REGISTRY: C
1163 ;
1164 FAD3 F5 HXASC: PUSH PSW
1165 FAD4 C6 90 ADI 90H ; PREHODNI KONSTANTA
1166 FAD6 27 DAA
1167 FAD7 CE 40 ACI 40H ; VYTVORENI KODU ZNAKU
1168 FAD9 27 DAA
1169 FADA 4F MOV C,A ; ULOZENI KODU DO <C>
1170 FADB F1 POP PSW
1171 FADC C9 RET
1172 ;
1173 ;
1174 ;
1175 ; L I N E F
1176 ; =========
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-21
1177 ;
1178 ;
1179 ; PODPROGRAM LINEF PROVADI PRECHOD NA NOVY RADEK.
1180 ; POKUT JDE O RADEK POSLRDNI, PAK SLEDUJE PRI-
1181 ; TOMNOST EXP-MONITORU. PRI JEHO PRITOMNOSTI VY-
1182 ; VOLA PODPROGRAM ROLL (POSUV OBSAHU OBRAZOVKY
1183 ; O JEDEN RADEK NAHORU, STARY PRVNI RADEK SE STRACI).
1184 ; PRI NEPRITOMNOSTI EXPANDU PROVEDE PRECHOD NA PRV-
1185 ; NI ZOBRAZOVANY RADEK. POZICE KURZORU V RADKU ZUSTANE
1186 ; NEZMENENA.
1187 ;
1188 ; POSKOZENE REGISTRY: - - -
1189 ;
1190 ;
1191 FADD F5 LINEF: PUSH PSW
1192 FADE E5 PUSH H
1193 FADF CD F9AD CALL GETLIN ; OBSAK CITACE RADKU
1194 FAE2 E5 PUSH H
1195 FAE3 CD F99B CALL NUMLIN ; ADRESA BUNKY S POCTEM RADKU
1196 FAE6 BE CMP M ; NA POSLEDNIM RADKU ?
1197 FAE7 DA FAFA JC LINE1
1198 FAEA CA FAF1 JZ LINE0 ; ZMENA POCTU RADKU ?
1199 FAED 7E MOV A,M ; NOVY POCET RADKU
1200 FAEE E1 POP H ; KURZOR NA POSLEDNI RADEK
1201 FAEF E5 PUSH H
1202 FAF0 77 MOV M,A
1203 FAF1 CD FD37 LINE0: CALL ROLL ; ROLOVANI DISPLAYE, KURZOR NEPOSUNE
1204 FAF4 CD FDC9 CALL DELLIN ; VYMAZ CASTI RADKU OD KURZORU
1205 FAF7 C3 FAFE JMP LINE2
1206 FAFA 3C LINE1: INR A
1207 FAFB E1 POP H ; KURZOR NA DALSI RADEK
1208 FAFC E5 PUSH H
1209 FAFD 77 MOV M,A
1210 FAFE E1 LINE2: POP H
1211 FAFF E1 POP H
1212 FB00 F1 POP PSW
1213 FB01 C9 RET
1214 ;
1215 ;
1216 ;
1217 ; C A R R E T
1218 ; ===========
1219 ;
1220 ; PODPROGRAM CARRET UMISTI KURZOR NA ZACATEK PRAZDNEHO RADKU.
1221 ;
1222 ; POSKOZENE REGISTRY: - - -
1223 ;
1224 FB02 E5 CARRET: PUSH H
1225 FB03 F5 PUSH PSW
1226 FB04 CD F9B3 CALL GETCHR ; V <HL> ADRESA CITACE ZNAKU
1227 FB07 36 00 MVI M,0
1228 FB09 F1 POP PSW
1229 FB0A E1 POP H
1230 FB0B C9 RET
1231 ;
1232 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-22
1233 ;
1234 ; C R L F
1235 ;
1236 ; PODPROGRAM CRLF PROVEDE PRECHOD NA ZACATEK NASLEDUJICIHO RADKU,
1237 ; KTERY CELY VYMAZE (POKUD JE PRITOMEN EXPAND).
1238 ;
1239 ; POSKOZENE REGISTRY: - - -
1240 ;
1241 FB0C CD FB02 CRLF: CALL CARRET ; KURZOR NA ZACATEK RADKU
1242 FB0F C3 FADD JMP LINEF ; KURZOR NA NASLEDUJICI RADEK
1243 ;
1244 ;
1245 ;
1246 ; I N T E R
1247 ; =========
1248 ;
1249 ; INTER OSETRUJE PRERUSENI. OBSAHY REGISTRU SE
1250 ; ULOZI DO PRACOVNIHO POLE PAMETI PRIKAZU GOTO.
1251 ; DALE SE ZJISTI, ZDA SLO O PRERUSENI PROGRAMOVE
1252 ; NEBO OBVODOVE. POKUT BYLO PROGRAMOVE, URCI
1253 ; SE POMOCI OBSAHU PROMENNE BRADR, ZDA SLO O PRE-
1254 ; RUSENI VYVOLANE PRERUSOVACI ADRESOU PRIKAZU
1255 ; GOTO. POKUT ANO, OBNOVI SE PUVODNI KOD NA
1256 ; TETO ADRESE. ABSAH VSECH REGISTRU SE ZABRAZI
1257 ; A PROVEDE SE SKOK NA HORKY START MONITORU.
1258 ;
1259 ; POSKOZENE REGISTRY: A,F,B,C,D,E,H,L,SP
1260 ;
1261 FB12 E5 INTER: PUSH H
1262 FB13 D5 PUSH D
1263 FB14 C5 PUSH B
1264 FB15 F5 PUSH PSW
1265 FB16 21 0000 LXI H,0
1266 FB19 39 DAD SP ; V <HL> VRCHOL ZASOBNIKU
1267 FB1A EB XCHG
1268 FB1B 21 007C LXI H,FREG
1269 FB1E CD FA01 CALL GETADR ; ADSTUP PROMENNE 'FRAG'
1270 FB21 06 08 MVI B,8
1271 FB23 1A INTER2: LDAX D
1272 FB24 13 INX D
1273 FB25 77 MOV M,A
1274 FB26 2B DCX H
1275 FB27 05 DCR B
1276 FB28 C2 FB23 JNZ INTER2 ; ULOZENI REGISTRU DO PRAC. POLE
1277 FB2B 13 INX D
1278 FB2C 13 INX D ; SPLACHNUTI POSUNU VRCHOLU OD RST
1279 FB2D 72 MOV M,D
1280 FB2E 2B DCX H
1281 FB2F 73 MOV M,E ; ULOZENI PUV. VRCHOLU ZASOBNIKU
1282 FB30 F1 POP PSW
1283 FB31 C1 POP B
1284 FB32 D1 POP D
1285 FB33 E1 POP H ; OBNOVENI ABSAHU REGISTRU
1286 FB34 CD FB0C INTER3: CALL CRLF ; NOVY RADEK
1287 FB37 C5 PUSH B ; [SP]=<BC>,<ADR>
1288 FB38 E5 PUSH H
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-23
1289 FB39 21 5043 LXI H,5043H ; KODY 'PC' DO <HL>
1290 FB3C CD FBC3 CALL INTER1 ; VYPIS 'PC='
1291 FB3F E1 POP H
1292 FB40 C1 POP B ; [SP]=<ADR>
1293 FB41 E3 XTHL ; [SP] <--> <HL>
1294 FB42 C5 PUSH B ; [SP]=<BC>,<HL>
1295 FB43 F5 PUSH PSW ; [SP]=<AF>,<BC>,<HL>
1296 FB44 2B DCX H ; ADRESA PRERUSUJICI INSTRUKCE RSTX
1297 FB45 CD FA7F CALL EDADR ; ZOBRAZENI <HL>=ADR A VYPIS =
1298 FB48 7E MOV A,M
1299 FB49 CD FA11 CALL DBYTE ; ZOBRAZENI [HL]=[ADR]...INSTR
1300 FB4C E5 PUSH H
1301 FB4D 21 0070 LXI H,BRADR ; ODSTUP PROMENNE 'BRADR'
1302 FB50 CD FA01 CALL GETADR ; ADRESA 'BRADR' DO <HL>
1303 FB53 7E MOV A,M
1304 FB54 E1 POP H ; OBNOVENI <HL>
1305 FB55 BD CMP L
1306 FB56 C2 FB70 JNZ INTER0 ; POKUT NE - POKRACUJ V ZOBRAZOVANI
1307 FB59 E5 PUSH H
1308 FB5A 21 0071 LXI H,BRADR + 1
1309 FB5D CD FA01 CALL GETADR
1310 FB60 7E MOV A,M
1311 FB61 E1 POP H
1312 FB62 BC CMP H
1313 FB63 C2 FB70 JNZ INTER0 ; TO STEJNE PRO HI-BYTE ADRESY BREAKU
1314 FB66 E5 PUSH H
1315 FB67 21 0072 LXI H,BRCODE
1316 FB6A CD FA01 CALL GETADR
1317 FB6D 7E MOV A,M
1318 FB6E E1 POP H
1319 FB6F 77 MOV M,A ; OBNOVENI KODU INSTRUKCE PRI BREAKU
1320 FB70 F1 INTER0: POP PSW ; [SP]=<BC>,<HL>
1321 FB71 C1 POP B ; [SP]=<HL>
1322 FB72 E1 POP H ; [SP]=
1323 FB73 CD FA79 CALL SPACE
1324 FB76 C5 PUSH B ; [SP]=<BC>
1325 FB77 F5 PUSH PSW ; [SP]=<AF>,<BC>
1326 FB78 E5 PUSH H
1327 FB79 21 484C LXI H,484CH ; KODY 'HL' DO <HL>
1328 FB7C CD FBC3 CALL INTER1 ; VYPIS 'HL='
1329 FB7F E1 POP H
1330 FB80 CD FA7F CALL EDADR ; ZOBRAZENI <HL> A VYPIS =
1331 FB83 7E MOV A,M
1332 FB84 CD FA11 CALL DBYTE ; ZOBRAZENI [HL]
1333 FB87 CD FA79 CALL SPACE
1334 FB8A E5 PUSH H
1335 FB8B 21 5350 LXI H,5350H ; KODY 'SP' DO <HL>
1336 FB8E CD FBC3 CALL INTER1 ; VYPIS 'SP='
1337 FB91 E1 POP H
1338 FB92 21 0004 LXI H,4
1339 FB95 39 DAD SP ; VYPOCET HODNOTY SP PRI PRERUSENI
1340 FB96 CD FA7F CALL EDADR ; ZOBRAZENI TETO ADRESY A '='
1341 FB99 CD F93C CALL NEXT6 ; V <HL> VRCHOL ZASOBNIKU PRI PRERUSENI
1342 FB9C CD FA0C CALL DADR ; ZOBRAZENI TETO ADRESY
1343 FB9F CD FB0C CALL CRLF ; NOVY RADEK
1344 FBA2 21 4146 LXI H,4146H ; KODY 'AF' DO <HL>
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-24
1345 FBA5 CD FBC3 CALL INTER1 ; VYPIS 'AF='
1346 FBA8 E1 POP H ; [SP]=<BC>
1347 FBA9 CD FA76 CALL SDADR ; ZOBRAZENI <HL>=<AF> A ' '
1348 FBAC 21 4243 LXI H,4243H ; KODY 'BC' DO <HL>
1349 FBAF CD FBC3 CALL INTER1 ; VYPIS 'BC='
1350 FBB2 E1 POP H ; [SP] = JAKO PRED PRERUSENIM
1351 FBB3 CD FA76 CALL SDADR ; ZOBRAZENI <HL>=<BC> A ' '
1352 FBB6 21 4445 LXI H,4445H ; KODY 'DE' DO <HL>
1353 FBB9 CD FBC3 CALL INTER1 ; VYPIS 'DE='
1354 FBBC EB XCHG ; VYMENA <HL> <--> <DE>
1355 FBBD CD FA0C CALL DADR ; ZOBRAZENI <HL>=<DE>
1356 FBC0 C3 F8E4 JMP NEXT ; NAVRAT DO MONITORU
1357 ;
1358 FBC3 4C INTER1: MOV C,H
1359 FBC4 CD FA21 CALL CO ; ZOBRAZENI OBSAHU <H> ASCII
1360 FBC7 4D MOV C,L
1361 FBC8 CD FA21 CALL CO ; ZOBRAZENI OBSAHU <L> ASCII
1362 FBCB CD FA82 CALL EQUATE ; ZOBRAZENI '='
1363 FBCE C9 RET
1364 ;
1365 ;
1366 ;
1367 ; C H K P R
1368 ; =========
1369 ;
1370 ; PODPROGRAM CHKTPR ZJISTUJE PRITOMNOST
1371 ; PROGRAM OBSLUHY MAGNETOFONU. JE-LI
1372 ; PRITOMEN, JE FF-Z NASTAVEN, NENI-LI PRITOMEN,
1373 ; JE FF-Z NULOVAN.
1374 ;
1375 ; POSKOZENE REGISTRY: A,F
1376 ;
1377 FBCF 3A F000 CHKTPR: LDA ADRTPR ; CTENI Z CHAR. BUNKY OBSLUHY MGF
1378 FBD2 FE 55 CPI KEYTPR ; SROVNANI S KLICEM
1379 FBD4 C9 RET
1380 ;
1381 ;
1382 ;
1383 ;*****************************************************************
1384 ;
1385 ; P R I K Z Y
1386 ; ###########
1387 ;
1388 ;
1389 ;
1390 ; S U B S T
1391 ; =========
1392 ;
1393 ; PRIKAZ SUBST UMOZNUJE ZAMENIT OBSAH LIBOVOLNE BUNKY
1394 ; PAMETI NOVYM OBSAHEM. MA JEDINY VSTUPNI PARAMETR -
1395 ; ADRESU PRVNI PREPISOVANE BUNKY A SOUBOR PRACOVNICH
1396 ; PARAMETRU - NOVE OBSAHY PO SOBE JDOUCICH BUNEK POCI-
1397 ; NAJE URCENOU PRVNI BUNKOU. "SP" NEMENI OBSAH - INKRE-
1398 ; MENTUJE ADRESU, "CR" UKONCI PRIKAZ. PRI CHYBE V ZADAVANI
1399 ; PRVEHO ZNAKU SE OPRAVA PROVEDE STISKNUTIM LIBOVOLNE
1400 ; KLAVESY MIMO HEXADECIMALNICH A RIDICICH ZNAKU. TIM SE
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-25
1401 ; PUVODNI ZNAK IGNORUJE A VYPISE SE ZNOVU ROVNITKO.
1402 ; PRI CHYBE V DRUHEM ZNAKU JE TREBA ZADAT OBA ZNAKY ZNOVU
1403 ; OPAKOVANIM CELEHO PRIKAZU SUBST.
1404 ;
1405 FBD5 0D SUBST: DCR C ; VSTUP JEDNOHO OPERANDU
1406 FBD6 CD FA8A CALL EXPR ; PROVEDENI VSTUPU
1407 FBD9 CD FB0C CALL CRLF ; NOVY RADEK
1408 FBDC E1 POP H ; POCATECNI ADRESA DO <HL>
1409 FBDD CD FA76 SUBS0: CALL SDADR ; ZOBRAZENI ADRESY
1410 FBE0 7E MOV A,M ; PRECTI OBSAH PAMETI
1411 FBE1 CD FA11 CALL DBYTE ; ZOBRAZ OBSAH PAMETI
1412 FBE4 CD FA79 CALL SPACE ; ZOBRAZ MEZERU
1413 FBE7 CD F9F2 SUBS1: CALL CINCR ; VSTUP,ECHO A ANALIZA ZNAKU
1414 FBEA D8 RC ; PRO 'CR' UKONCI PRIKAZ
1415 FBEB CA FC13 JZ SUBS4 ; PRO 'SP' A ',' DALSI BUNKA
1416 FBEE CD FAC1 CALL ASHEX ; PRI OSTATNICH ZNACICH PREVOD NA HEX
1417 FBF1 DC F931 CC ERROR ; HLASENI CHYBY
1418 FBF4 DA FBE7 JC SUBS1 ; VSTUP NAHRADNIHO ZNAKU
1419 FBF7 47 MOV B,A ; ULOZENI HORNI CIFRY DO <B>
1420 FBF8 CD F9F2 SUBS2: CALL CINCR ; ECHO A ANALIZA ZNAKU
1421 FBFB CA FC12 JZ SUBS3 ; PRO 'CR','SP',',' KONEC VSTUPU
1422 FBFE CD FAC1 CALL ASHEX ; OSTATNI = DOLNI CIFRA, PREVOD
1423 FC01 DC F931 CC ERROR ; HLASENI CHYBY
1424 FC04 DA FBE7 JC SUBS1 ; VSTUP NAHRADNIHO CISLA
1425 FC07 4F MOV C,A ; DOLNI CIFRA DO <C>
1426 FC08 78 MOV A,B ; HORNI CIFRA DO <A>
1427 FC09 0F RRC
1428 FC0A 0F RRC
1429 FC0B 0F RRC
1430 FC0C 0F RRC ; NASOBENI HORNI CIFRY * 16
1431 FC0D 81 ADD C ; PRICTENI DOLNI CIFRY
1432 FC0E 77 MOV M,A ; ULOZENI NOVEHO OBSAHU RAM
1433 FC0F C3 FC13 JMP SUBS4 ; NOVA BUNKA
1434 FC12 70 SUBS3: MOV M,B ; ULOZENI JEDNOCIFERNEHO CISLA
1435 FC13 23 SUBS4: INX H ; INKREMENTACE UKAZATELE PAMETI
1436 FC14 CD FB0C CALL CRLF ; PRECHOD NA NOVY RADEK
1437 FC17 C3 FBDD JMP SUBS0 ; DALSI BUNKA
1438 ;
1439 ;
1440 ;
1441 ;
1442 ;
1443 ; G O T O
1444 ; =======
1445 ;
1446 ; PRIKAZ GOTO UMOZNUJE START UZIVATELSKYCH PROGRAMU.
1447 ; MA DVA VSTUPNI PARAMETRY: STARTOVACI ADRESU PROGRAMU
1448 ; A NEPOVINNOU (PRI STISKU "SP" PO START. ADRESE) ADRESU
1449 ; PRERUSENI BEHU PROGRAMU S VYPISEM OBSAHU REGISTRU (V
1450 ; TOMTO PRIPADE SE NA ADRESU 38H UKLADA SKOK DO INTER).
1451 ; OBSAHY ZUSTAVAJI ZACHOVANY V PRACOVNI OBLASTI PAMETI A
1452 ; OBNOVI SE PRI OPETNEM SPUSTENI PROGRAMU PRIKAZEM GOTO.
1453 ; PRI SPOUSTENI PROGRAMU LZE POCATECNI HODNOTY REGISTRU
1454 ; CPU NASTAVIT NAPR. PRIKAZEM SUBST V PRISLUSNE PRACOVNI
1455 ; OBLASTI PAMETI (SPREG - HREG).
1456 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-26
1457 FC1A E1 GOTO: POP H ; SPLACHNUTI NAVRATOVE ADR. NA NEXT
1458 FC1B 21 0072 LXI H,BRCODE ; ODSTUP PROMENNE 'BRCODE'
1459 FC1E CD FA01 CALL GETADR ; ADRESA PROMENNE 'BRCODE' DO <HL>
1460 FC21 36 FF MVI M,0FFH ; VYPLNENI PROMENNE 'BRCODE'
1461 FC23 0D DCR C ; VSTUP JEDINEHO PARAMETRU
1462 FC24 CD FA8A CALL EXPR ; VSTUP STARTOVACI ADRESY
1463 FC27 DA FC47 JC GOTO0 ; NEBUDE ADRESA PRERUSENI ?
1464 FC2A 21 0038 LXI H,INTADR
1465 FC2D 11 FB12 LXI D,INTER
1466 FC30 CD F9CA CALL STJMA ; NASTAVENI SKOKU OBSLUHY RST 7
1467 FC33 0E 01 MVI C,1
1468 FC35 CD FA8A CALL EXPR ; VSTUP ADRESY PRERUSENI
1469 FC38 D1 POP D ; ADRESA PRERUSENI DO <DE>
1470 FC39 21 0070 LXI H,BRADR ; ODSTUP PROMENNE 'BRADR'
1471 FC3C CD FA01 CALL GETADR ; ADRESA PROMENNE 'BRADR'
1472 FC3F CD F9CD CALL STJMB ; ULOZENI ADRESY PRERUSENI DO 'BRADR'
1473 FC42 1A LDAX D ; KOD INSTRUKCE NA ADRESE PRERUSENI
1474 FC43 77 MOV M,A ; ULOZENI TOHOTO KODU DO 'BRCODE'
1475 FC44 3E FF MVI A,0FFH ; KOD INSTRUKCE RST7
1476 FC46 12 STAX D ; ULOZENI KODU RST7 NA ADRESU PRERUSENI
1477 FC47 CD F9C1 GOTO0: CALL GETSPR ; ADRESA PROMENNE 'SPREG'
1478 FC4A 5E MOV E,M
1479 FC4B 23 INX H
1480 FC4C 56 MOV D,M ; V <DE> NOVY OBSAH UKAZATELE ZASOBNIKU
1481 FC4D 23 INX H
1482 FC4E 0E 08 MVI C,8
1483 FC50 7E GOTO1: MOV A,M ; CTENI OBSAHU REGISTRU Z PR. OBL. RAM
1484 FC51 1B DCX D
1485 FC52 23 INX H
1486 FC53 12 STAX D ; UKLADANI OBSAHU REG. DO NOVEHO ZAS.
1487 FC54 0D DCR C
1488 FC55 C2 FC50 JNZ GOTO1 ; VSECHNY REGISTRY ULOZENY ?
1489 FC58 EB XCHG ; VRCHOL NOVEHO ZASOBNIKU V <HL>
1490 FC59 D1 POP D ; STARTOVACI ADRESA V <DE>
1491 FC5A F9 SPHL ; NASTAVENI NOVEHO OBSAHU UKAZATELE
1492 FC5B F1 POP PSW
1493 FC5C C1 POP B
1494 FC5D E1 POP H
1495 FC5E EB XCHG
1496 FC5F E3 XTHL ; NASTAVENI POC. OBSAHU REGISTRU
1497 FC60 C9 RET ; SKOK DO UZIV. PROGRAMU
1498 ;
1499 ;
1500 ; D I S P L
1501 ; =========
1502 ;
1503 ; PRIKAZ DISPL UMOZNUJE ZOBRAZIT LIBOVOLNEHO USEKU
1504 ; PAMETI. MA DVA OPERANDY: POCATECNI A KONCOVOU ADRESU
1505 ; ZOBRAZOVANE OBLASTI. INFORMACE JE ZOBRAZOVANA HEXA-
1506 ; DECIMALNE I POMOCI ASCII ZNAKU. TAM, KDE JE OBSAH BYTU
1507 ; KODEM MALEHO PISMENE NEBO RIDICIHO ZNAKU, ZOBRAZI
1508 ; SE V DOPLNKOVEM POLI TECKA.
1509 ;
1510 FC61 CD FA8A DISPL: CALL EXPR ; VSTUP DVOU ADRES
1511 FC64 D1 POP D ; KONCOVA ADRESA
1512 FC65 13 INX D ; INKREMENTACE <DE> PRO UKONCENI
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-27
1513 FC66 E1 POP H ; POCATECNI ADRESA
1514 FC67 CD FE69 DISP0: CALL CSTS ; STATUS KONZOLY ?
1515 FC6A CA FC77 JZ DISP1 ; NEBILA STISKNUTA KLAVESA ?
1516 FC6D CD FE7A CALL CI ; VSTUP ZNAKU
1517 FC70 CD F9F5 CALL ANAL ; JEHO ANALIZA
1518 FC73 D8 RC ; POKUT JDE O 'CR' - KONEC
1519 FC74 CD FE7A CALL CI ; POKUT NE, POKRACUJ PO DALSIM ZNAKU
1520 FC77 CD FB0C DISP1: CALL CRLF ; PRECHOD NA NOVY RADEK
1521 FC7A CD FA76 CALL SDADR ; ZOBRAZENI ADRESY OSMICE
1522 FC7D CD FA79 CALL SPACE ; MEZERY NA DISPLAY
1523 FC80 E5 PUSH H ; ADRESA OSMICE DO ZASOBNIKU
1524 FC81 06 08 MVI B,8 ; CITAC ZNAKU
1525 FC83 7E DISP2: MOV A,M ; PRECTI ZNAK
1526 FC84 CD FA11 CALL DBYTE ; ZOBRAZ HEX OBSA BUNKY
1527 FC87 CD FA79 CALL SPACE ; MEZERA NA DISPLAY
1528 FC8A CD FDE4 CALL HILO ; INKREMENTACE <HL> A SROVNANI S <DE>
1529 FC8D CA FC94 JZ DISP3 ; PRECTEN CELY POZADOVANY USEK PAMETI?
1530 FC90 05 DCR B ; DEKREMENTACE CITACE BUNEK
1531 FC91 C2 FC83 JNZ DISP2 ; PRECTENA CELA OSMICE ?
1532 FC94 E1 DISP3: POP H ; OBNOVENI ADRESY OSMICE
1533 FC95 06 08 MVI B,8 ; CITAC ZNAKU
1534 FC97 CD FA79 CALL SPACE ; MEZERA NA DISPLAY
1535 FC9A E5 PUSH H
1536 FC9B CD F9B3 CALL GETCHR ; ADRESA CITACE ZNAKU DO <HL>
1537 FC9E 36 1F MVI M,1FH
1538 FCA0 E1 POP H ; POSUN KURZORU NA URCENOU POZICI
1539 FCA1 7E DISP4: MOV A,M ; PRICTI ZNAK
1540 FCA2 4F MOV C,A ; ULOZ HO DO <C>
1541 FCA3 D6 20 SUI 20H ; JDE O RIDICI ZNAK ?
1542 FCA5 DA FCAD JC DISP5 ; ANO - ZOBRAZ TECKU
1543 FCA8 D6 40 SUI 40H ; JDE O MALE PISMENO ?
1544 FCAA DA FCAF JC DISP6 ; ANO - ZOBRAZ TECKU
1545 FCAD 0E 2E DISP5: MVI C,2EH ; KOD TECKY DO <C>
1546 FCAF CD FA21 DISP6: CALL CO ; ZOBRAZENI ZNAKU NEBO TECKY
1547 FCB2 CD FDE4 CALL HILO ; INKREMENTACE <HL> A SROVNANI S <DE>
1548 FCB5 C8 RZ ; ZOBRAZEN CELI USEK PAMETI ?
1549 FCB6 05 DCR B
1550 FCB7 C2 FCA1 JNZ DISP4 ; ZOBRAZENA CELA OSMICE ?
1551 FCBA C3 FC67 JMP DISP0 ; ZOBRAZENI DALSI OSMICE
1552 ;
1553 ;
1554 ;
1555 ; F I L L
1556 ; =======
1557 ;
1558 ; PRIKAZ FILL ZAPLNI OBSAH URCENE OBLASTI PAMETI ZADANYM
1559 ; ZNAKEM. MA TRI OPERANDY: POCATECNI A KONCOVOU ADRESU
1560 ; PAMETOVE OBLASTI A HEXADECIMALNI JEDNOBYTOVY OBSAH.
1561 ;
1562 FCBD CD FCC8 FILL: CALL INADR ; VSTUP TRI PARAMETRU
1563 FCC0 71 FILL0: MOV M,C ; PREPIS BUNKY PAMETI
1564 FCC1 CD FDE4 CALL HILO ; INKREMANTACE <HL> A SROVNANI S <DE>
1565 FCC4 C2 FCC0 JNZ FILL0 ; ZAPLNEN CELY USEK?
1566 FCC7 C9 RET
1567 ;
1568 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-28
1569 ;
1570 ;
1571 FCC8 0C INADR: INR C ; PRI PARAMETRY
1572 FCC9 CD FA8A CALL EXPR ; VSTUP DVOU ADRES A OBSAHU
1573 FCCC C1 POP B ; OBSAH DO <C>
1574 FCCD D1 POP D ; KONCOVA ADRESA DO <DE>
1575 FCCE E1 POP H ; POCATECNI ADRESA DO <HL>
1576 FCCF C9 RET
1577 ;
1578 ;
1579 ;
1580 ;
1581 ; M O V E
1582 ; =======
1583 ;
1584 ; PRIKAZ MOVE PRENASI OBSAH ZADANE OBLASTI PAMETI NA
1585 ; JINE MISTO V PAMETI. MA TRI VSTUPNI PARAMETRY: POCA-
1586 ; TECNI A KONCOVOU ADRESU ZDROJOVE OBLASTI A ADRESU URCENI
1587 ;
1588 FCD0 CD FCC8 MOVE: CALL INADR ; VSTUP TRI PARAMETRU
1589 FCD3 7E MOVE0: MOV A,M ; CTENI BYTU
1590 FCD4 02 STAX B ; ULOZENI BYTU
1591 FCD5 03 INX B ; INKREMENTACE KAM
1592 FCD6 CD FDE4 CALL HILO ; INKREMENTACE ODKUD A SROVNANI S POKUD
1593 FCD9 C2 FCD3 JNZ MOVE0 ; PRENESENA CELA OBLAST ?
1594 FCDC C9 RET
1595 ;
1596 ;
1597 ;
1598 ; O U T P U T
1599 ; ===========
1600 ;
1601 ; PRIKAZ OUTPUT UMOZNUJE ZAPSAT NA LIBOVOLNY PORT
1602 ; ZADANOU HODNOTU
1603 ;
1604 FCDD CD FA8A OUTPT: CALL EXPR
1605 FCE0 C1 POP B ; VYSLANY OBSAH <C>
1606 FCE1 D1 POP D ; CISLO PORTU V <E>
1607 FCE2 21 007D LXI H,INOUT ; ODSTUP PROMENNE OPOUT
1608 FCE5 CD FA01 CALL GETADR ; ADRESA PROMENNE OPOUT V <HL>
1609 FCE8 E5 PUSH H ; ULOZENI STARTOVACI ADRESY
1610 FCE9 36 D3 MVI M,0D3H ; KOD INSTRUKCE OUT
1611 FCEB 23 INX H
1612 FCEC 73 MOV M,E ; CISLO PORTU
1613 FCED 23 INX H
1614 FCEE 36 C9 MVI M,0C9H ; KOD INSTRUKCE RET
1615 FCF0 21 FCF6 LXI H,OUTP0 ; NAVRATOVA ADRESA
1616 FCF3 E3 XTHL ; MAVR. ADR. V [<SP>], START. V <HL>
1617 FCF4 79 MOV A,C ; VYSILANY OBSAH
1618 FCF5 E9 PCHL ; SIMULACE INSTRUKCE CALL OPOUT
1619 FCF6 C9 OUTP0: RET
1620 ;
1621 ;
1622 ;
1623 ; I N P U T
1624 ; =========
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-29
1625 ;
1626 ; PRIKAZ INPUT UMOZNUJE PRECIST HODNOTU LIBOVOLNEHO
1627 ; PORTU (0-FF) A ZOBRAZIT JI NA DISPLEJ. K TOMU POU-
1628 ; ZIVA OBLASTI VYHRAZENE PAMETI, KAM SIMULUJE KOD
1629 ; INSTRUKCE IN.
1630 ;
1631 FCF7 0D INPUT: DCR C
1632 FCF8 CD FA8A CALL EXPR ; VSTUP CISLA PORTU
1633 FCFB C1 POP B ; ULOZENI CISLA PORTU DO <C>
1634 FCFC 21 007D LXI H,INOUT
1635 FCFF CD FA01 CALL GETADR ; V <HL> ADRESA POM. USEKU PAMETI
1636 FD02 E5 PUSH H
1637 FD03 36 DB MVI M,0DBH ; INSTRUKCE IN
1638 FD05 23 INX H
1639 FD06 71 MOV M,C ; ADRESA PORTU
1640 FD07 23 INX H
1641 FD08 36 C9 MVI M,0C9H ; INSTRUKCE RET
1642 FD0A 21 FD0F LXI H,INPU0
1643 FD0D E3 XTHL ; NAVRATOVA ADRESA
1644 FD0E E9 PCHL ; SIMULACE INSTRUKCE CALL
1645 FD0F CD FA82 INPU0: CALL EQUATE
1646 FD12 CD FA11 CALL DBYTE ; ZOBRAZENI OBSAHU PORTU
1647 FD15 C9 RET
1648 ;
1649 ;
1650 ;
1651 ;******************************************************************
1652 ;
1653 ; POMOCNE PODPROGRAMY
1654 ; *******************
1655 ;
1656 ;
1657 ; I M T E X T
1658 ; ===========
1659 ;
1660 ; PODPROGRAM IMTEXT UMOZNUJE VYPIS RETEZCU ZNAKU
1661 ; UMISTENEHO BAZPROSTREDNE ZA VOLANIM NA OBRAZOVKU,
1662 ; POSLEDNIM (TISKNUTYM) ZNAKEM JE ZNAK D D7=1.
1663 ; POZOR: NESTANDARTNE POUZIVA ZASOBNIK.
1664 ;
1665 ; POSKOZENE REGISTRY: H,L,C,A,F
1666 ;
1667 FD16 E3 IMTEXT: XTHL
1668 FD17 7E IMTX0: MOV A,M ; CTI ZNAK
1669 FD18 E6 7F ANI 7FH ; VYBER ASCII BITY
1670 FD1A 4F MOV C,A
1671 FD1B CD FA21 CALL CO ; ZOBRAZ ZNAK
1672 FD1E 7E MOV A,M
1673 FD1F 07 RLC ; POSLEDNI ZNAK ?
1674 FD20 23 INX H
1675 FD21 D2 FD17 JNC IMTX0 ; NE - ZABRAZ DALSI ZNAK
1676 FD24 E3 XTHL
1677 FD25 C9 RET
1678 ;
1679 ;
1680 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-30
1681 ; I N V C H R
1682 ; ===========
1683 ;
1684 ; PODPROGRAM INVCHR UMOZNUJE INVERTOVAT ZOBRAZOVANI
1685 ; ZNAKU NA OBRAZOVCE (BILY ZNAK A CERNE POZADI CI
1686 ; NAOPAK). PRI NASTAVENEM FF-Z PROVEDE INVERZI DOSAVAD-
1687 ; NIHO STAVU, PRI NULOVEM FF-Z NASTAVI VZDY D7
1688 ; KODU ZNAKU DANEHO KURZOREM DO NULY.
1689 ;
1690 ; POSKOZENE REGISTRY: - - -
1691 ;
1692 FD26 F5 INVCHR: PUSH PSW
1693 FD27 E5 PUSH H
1694 FD28 CD F9D2 CALL ADRKUP ; ADRESA ZNAKU DO <HL>
1695 FD2B 7E MOV A,M ; CTENI KODU ZNAKU
1696 FD2C 17 RAL ; D7 ZNAK DO FF-C
1697 FD2D CA FD31 JZ INVC0 ; INVERTOVAT ?
1698 FD30 37 STC ; D7 DO 1
1699 FD31 3F INVC0: CMC ; INVERZE D7
1700 FD32 1F RAR ; OBNOVENI KODU ZNAKU S UPRAVENYM D7
1701 FD33 77 MOV M,A ; PREPIS KODU ZNAKU
1702 FD34 E1 POP H
1703 FD35 F1 POP PSW
1704 FD36 C9 RET
1705 ;
1706 ;
1707 ;
1708 ;
1709 ; R O L L
1710 ; =======
1711 ;
1712 ; PODPROGRAM ROLL PROVADI ROLOVANI OBSAHU OBRAZOVKY
1713 ; (TJ. OBRAZOVE PAMETI DISRAM) O JEDEN RADEK NAHORU.
1714 ; PRITOM HORNI RADEK SE ZTRACI, SPODNI RADEK ZUSTAVA
1715 ; NEPORUSEN (ZDVOJUJE SE).
1716 ;
1717 ; POSKOZENE REGISTRY: - - -
1718 ;
1719 FD37 F5 ROLL: PUSH PSW
1720 FD38 C5 PUSH B
1721 FD39 D5 PUSH D
1722 FD3A E5 PUSH H ; UKLID VSEHO
1723 FD3B CD F9A2 CALL NUMCHR
1724 FD3E 46 MOV B,M ; POCET ZNAKU
1725 FD3F CD F99B CALL NUMLIN
1726 FD42 4E MOV C,M ; POCET ROLOVANYCH RADKU V <C>
1727 FD43 79 MOV A,C
1728 FD44 B7 ORA A
1729 FD45 FE 00 CPI 0
1730 FD47 CA FD73 JZ ROLL2
1731 FD4A 2A 0004 LHLD RAMEND
1732 FD4D 23 INX H ; <HL> ADRESA 0. RADKU
1733 FD4E 11 FFC0 LXI D,-64 ; ZAPORNY POCET BYTE NA RADKU
1734 FD51 EB XCHG
1735 FD52 19 DAD D ; <DE> ADRESA -1. RADKU
1736 FD53 EB XCHG
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-31
1737 FD54 D5 PUSH D
1738 FD55 E5 PUSH H
1739 FD56 E1 ROLL0: POP H
1740 FD57 D1 POP D
1741 FD58 C5 PUSH B
1742 FD59 01 0040 LXI B,64 ; POCET BYTU NA RADEK
1743 FD5C 09 DAD B
1744 FD5D EB XCHG
1745 FD5E 09 DAD B ; <HL> ADRESA I+1 NIHO RADKU
1746 FD5F EB XCHG ; <DE> ADRESA I TEHO RADKU
1747 FD60 C1 POP B ; <B> CITAC ZNAKU, <C> CITAC RADKU
1748 FD61 D5 PUSH D
1749 FD62 E5 PUSH H
1750 FD63 7E ROLL1: MOV A,M
1751 FD64 12 STAX D
1752 FD65 13 INX D
1753 FD66 23 INX H
1754 FD67 05 DCR B
1755 FD68 F2 FD63 JP ROLL1 ; ROLOVANY VSECHNY ZNAKY?
1756 FD6B CD F9A2 CALL NUMCHR
1757 FD6E 46 MOV B,M
1758 FD6F 0D DCR C
1759 FD70 C2 FD56 JNZ ROLL0 ; ROLOVANY VSECHNY RADKY?
1760 FD73 E1 ROLL2: POP H
1761 FD74 D1 POP D
1762 FD75 E1 POP H
1763 FD76 D1 POP D
1764 FD77 C1 POP B
1765 FD78 F1 POP PSW
1766 FD79 C9 RET
1767 ;
1768 ;
1769 ;
1770 ; G H O M E
1771 ; =========
1772 ;
1773 ; PODPROGRAM GHOME PREMISTI KURZOR DO LEVEHO HORNIHO
1774 ; ROHU OBRAZOVKY.
1775 ;
1776 ; POSKOZENE REGISTRY: - - -
1777 ;
1778 FD7A E5 GHOME: PUSH H
1779 FD7B CD F99B CALL NUMLIN ; ADRESA POCTU RADKU
1780 FD7E 2B DCX H
1781 FD7F 36 00 MVI M,0 ; VYNULOVANI CITACE ZNAKU
1782 FD81 2B DCX H
1783 FD82 36 00 MVI M,0 ; VYNULOVANI CITACE RADKU
1784 FD84 E1 POP H
1785 FD85 C9 RET
1786 ;
1787 ;
1788 ;
1789 ; F O R F I
1790 ; =========
1791 ; PODPROGRAM FORFI PROVEDE VYMAZ CELE OBRAZOVKY A UMISTI
1792 ; KURZOR DO LENEHO HORNIHO ROHU OBRAZOVKY.
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-32
1793 ;
1794 ; POSKOZENE REGISTRY: - - -
1795 ;
1796 FD86 CD FD7A FORFI: CALL GHOME ; KURZOR DO LEVEHO HORNIHO ROHU
1797 ;
1798 ;
1799 ;
1800 ; D E L S C R
1801 ; ===========
1802 ;
1803 ; PODPROGRAM DELSCR PROVEDE VYMAZ OBRAZOVKY POCITACE
1804 ; (VCETNE) RADKU, NA KTEREM JE KURZOR.
1805 ;
1806 ; POSKOZENE REGISTRY: - - -
1807 ;
1808 FD89 F5 DELSCR: PUSH PSW
1809 FD8A C5 PUSH B
1810 FD8B D5 PUSH D
1811 FD8C E5 PUSH H
1812 FD8D CD F99B CALL NUMLIN
1813 FD90 4E MOV C,M ; POCET RADKU
1814 FD91 CD FD7A CALL GHOME
1815 FD94 CD F9AD CALL GETLIN ; <HL> CITAC RADKU
1816 FD97 CD FDC9 DELS0: CALL DELLIN ; VYMAZ RADKU
1817 FD9A 34 INR M
1818 FD9B 0D DCR C
1819 FD9C F2 FD97 JP DELS0 ; VSECHNY RADKY?
1820 FD9F CD FD7A CALL GHOME
1821 FDA2 E1 POP H
1822 FDA3 D1 POP D
1823 FDA4 C1 POP B
1824 FDA5 F1 POP PSW
1825 FDA6 C9 RET
1826 ;
1827 ;
1828 ;
1829 ; B A C S T
1830 ; =========
1831 ;
1832 ; PODPROGRAM BACST POSOUVA KURZOR O JEDNU POZICI
1833 ; DOLEVA. PRI DOSAZENI PRVNIHO ZNAKU NA PRVNIM RADKU
1834 ; ZADNOU DALSI CINNOST NEPROVADI.
1835 ;
1836 ; POSKOZENE REGISTRY: - - -
1837 ;
1838 FDA7 F5 BACST: PUSH PSW
1839 FDA8 E5 PUSH H
1840 FDA9 CD F9B3 CALL GETCHR ; POCET ZNAKU V <A>, ADRESA CITACE V <HL>
1841 FDAC 3D DCR A
1842 FDAD FA FDB4 JM BAC0 ; NA ZACATKU RADKY ?
1843 FDB0 77 MOV M,A
1844 FDB1 C3 FDC6 JMP BAC1
1845 FDB4 CD F9AD BAC0: CALL GETLIN
1846 FDB7 3D DCR A
1847 FDB8 FA FDC6 JM BAC1 ; NA PRVNIM RADKU ?
1848 FDBB 77 BAC2: MOV M,A
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-33
1849 FDBC CD F9B3 CALL GETCHR
1850 FDBF E5 PUSH H
1851 FDC0 CD F9A2 CALL NUMCHR
1852 FDC3 7E MOV A,M ; POCET ZNAKU
1853 FDC4 E1 POP H
1854 FDC5 77 MOV M,A ; KURZOR NA KONEC PREDCHOZIHO RADKU
1855 FDC6 E1 BAC1: POP H
1856 FDC7 F1 POP PSW
1857 FDC8 C9 RET
1858 ;
1859 ;
1860 ;
1861 ; D E L L I N
1862 ; ===========
1863 ;
1864 ; PODPROGRAM DELLIN VYMAZE RADEK OD MISTA KURZORU.
1865 ;
1866 ; POSKOZENE REGISTRY: - - -
1867 ;
1868 FDC9 F5 DELLIN: PUSH PSW
1869 FDCA C5 PUSH B
1870 FDCB E5 PUSH H
1871 FDCC CD F9B3 CALL GETCHR ; POCET ZOBRAZENYCH ZNAKU V <A>
1872 FDCF 2F CMA ; DOPLNEK
1873 FDD0 3C INR A
1874 FDD1 CD F9A2 CALL NUMCHR
1875 FDD4 86 ADD M ; POCET MAZANYCH ZNAKU V <A>
1876 FDD5 47 MOV B,A
1877 FDD6 CD F9D2 CALL ADRKUP ; ADRESA KURZORU
1878 FDD9 36 20 DELL0: MVI M,SPC ; ZNAK MEZERA
1879 FDDB 23 INX H
1880 FDDC 05 DCR B
1881 FDDD F2 FDD9 JP DELL0 ; VYMAZAN CELI RADEK ?
1882 FDE0 E1 POP H
1883 FDE1 C1 POP B
1884 FDE2 F1 POP PSW
1885 FDE3 C9 RET
1886 ;
1887 ;
1888 ;
1889 ; H I L O
1890 ; =======
1891 ;
1892 ; PODPROGRAM HILO PROVEDE INKREMENTACI PARU <HL> A
1893 ; JEHO SROVNANI S PAREM <DE>. VYSLEDEK ULOZI DO PRIZNA-
1894 ; KU FF-Z. PODPROGRAM COMP PROVADI POUZE SROVNANI.
1895 ; PRI NASTAVENEM FF-C JE <HL> > <DE>.
1896 ; POKUT JE <HL>=FFFFH UKONCI SE S FF-Z=1, FF-C=1.
1897 ;
1898 ; POSKOZENE REGISTRY: A,F,H,L
1899 ;
1900 FDE4 23 HILO: INX H ; INKREMENTACE <HL>
1901 FDE5 7C MOV A,H
1902 FDE6 B5 ORA L
1903 FDE7 37 STC
1904 FDE8 C8 RZ ; NAVRAT PRI <HL>=0000, FF-Z = 1, FF-C = 1
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-34
1905 FDE9 7A COMP: MOV A,D
1906 FDEA BC CMP H ; SROVNANI <H> S <D>
1907 FDEB C0 RNZ ; NAVRAT PRI NEROVNOSTI, FF-Z = 0, FF-C...VZTAH
1908 FDEC 7B MOV A,E ; MEZI <HL> A <DE>
1909 FDED BD CMP L ; SROVNANI <L> S <E>
1910 FDEE C9 RET ; PRI ROVNOSTI <HL>=<DE>...FF-Z = 1, FF-C = 0
1911 ;
1912 ;
1913 ;
1914 ; B E E P S
1915 ; =========
1916 ;
1917 ; PODPROGRAM BEEP PROVADI GENERACI ZVUKOVEHO
1918 ; SIGNALU ZADANE DELKY BEEPLN A VYSKY BEEPFQ.
1919 ;
1920 ; POSKOZENE REGISTRY: - - -
1921 ;
1922 FDEF F5 BEEPS: PUSH PSW
1923 FDF0 D5 PUSH D
1924 FDF1 16 50 MVI D,BEEPLN ; DELKA TONU
1925 FDF3 3E 60 BEEP0: MVI A,BEEPFQ ; VYSKA TONU
1926 FDF5 3D BEEP1: DCR A
1927 FDF6 C2 FDF5 JNZ BEEP1
1928 FDF9 15 DCR D ; CIKLUS PRO DELKU
1929 FDFA D3 10 OUT ADRBIP ; BUZENI REPRODUKTORU
1930 FDFC C2 FDF3 JNZ BEEP0 ; UKONCIT TON ?
1931 FDFF D1 POP D
1932 FE00 F1 POP PSW
1933 FE01 C9 RET
1934 ;
1935 ;
1936 ;
1937 ; T I M E R
1938 ; =========
1939 ;
1940 ; PODPROGRAM V VYTVORENI PRODLEVY <BC> MILISEKUND.
1941 ;
1942 ; POSKOZENE REGISTRY:
1943 ;
1944 FE02 F5 TIMER: PUSH PSW
1945 FE03 C5 PUSH B
1946 FE04 3E 6F TIME0: MVI A,6FH
1947 FE06 3D TIME1: DCR A
1948 FE07 C2 FE06 JNZ TIME1
1949 FE0A 0B DCX B
1950 FE0B 78 MOV A,B
1951 FE0C B1 ORA C
1952 FE0D C2 FE04 JNZ TIME0
1953 FE10 C1 POP B
1954 FE11 F1 POP PSW
1955 FE12 C9 RET
1956 ;
1957 ;
1958 ;
1959 ; M E M C K
1960 ; =========
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-35
1961 ;
1962 ;
1963 ; PODPROGRAM MEMCK ULOZI DO REGISTRU <B> HORNI A DO REGISTRU
1964 ; <A> DOLNI BYTE ADRESY KONCE UZIVATELSKE PAMETI. TU ZISKA TAK,
1965 ; ZE OD ADRESY PONCE PAMETI RAM 'RAMEND' ODECTE DELKU ZASOBNIKU
1966 ; STKLN.
1967 ;
1968 ; POSKOZENE REGISTRY: A,F,B
1969 ;
1970 FE13 E5 MEMCK: PUSH H
1971 FE14 21 0031 LXI H,UREND ; PROMENA S KONCEM UZIV. RAM
1972 FE17 CD F9B6 CALL GETC0 ; VYPOCET ADRESY PROMENNE A CTENI NIZSIHO BYTU
1973 FE1A 23 INX H
1974 FE1B 46 MOV B,M ; VYSSI BYTE
1975 FE1C E1 POP H
1976 FE1D C9 RET
1977 ;
1978 ;
1979 ;
1980 ; I O C H K
1981 ; =========
1982 ;
1983 ;
1984 ; PODPROGRAM IOCHK ULOZI DO REGISTRU <A> PLATNY I.O-BYT,
1985 ; TJ. OBSAH ADRESY 0003H.
1986 ;
1987 ; POSKOZENE REGISTRY: A
1988 ;
1989 FE1E 3A 0003 IOCHK: LDA IOBYT
1990 FE21 C9 RET
1991 ;
1992 ;
1993 ;
1994 ;
1995 ; I O S E T
1996 ; =========
1997 ;
1998 ;
1999 ; PODPROGRAM IOSET PROVEDE ULOZENI OBSAHU REGISTRU <C> NA
2000 ; ADRESU 0003H, TJ. UPRAVU STAVAJICIHO I/O-BYTU.
2001 ;
2002 ; POSKOZENE REGISTRY: - - -
2003 ;
2004 FE22 F5 IOSET: PUSH PSW
2005 FE23 79 MOV A,C ; NOVY I/O-BYTE
2006 FE24 32 0003 STA IOBYT ; ULOZENI NOVEHO I/O-BYTU
2007 FE27 F1 POP PSW
2008 FE28 C9 RET
2009 ;
2010 ;
2011 ;
2012 ;
2013 ; L O
2014 ; ===
2015 ;
2016 ; JDE O SKOK NA SPOJOVACI ADRESU PRO VYSTUP NA TISKARNU.
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-36
2017 ;
2018 ; POSKOZENE REGISTRY: - - -
2019 ;
2020 FE29 E5 LO: PUSH H ; UKLID <HL>
2021 FE2A 21 00F3 LXI H,LSTOUT
2022 FE2D C3 F9A8 JMP JADR ; SKOK NA SPOJOVACI ADRESU
2023 ;
2024 ;
2025 ;
2026 ;
2027 ; P O
2028 ; ===
2029 ;
2030 ; JDE O SKOK NA SPOJOVACI ADRESU PRO SERIOVY VYSTUP.
2031 ;
2032 ; POSKOZENE REGISTRY: - - -
2033 ;
2034 FE30 E5 PO: PUSH H ; UKLID <HL>
2035 FE31 21 00BC LXI H,PUNOUT
2036 FE34 C3 F9A8 JMP JADR ; SKOK NA SPOJOVACI ADRESU
2037 ;
2038 ;
2039 ;
2040 ; R I
2041 ; ===
2042 ;
2043 ;
2044 ; JDE O SKOK NA SPOJOVACI ADRESU PRO SERIOVY VSTUP.
2045 ;
2046 ; POSKOZENE REGISTRY: - - -
2047 ;
2048 FE37 E5 RI: PUSH H ; UKLID <HL>
2049 FE38 21 00B6 LXI H,READIN
2050 FE3B C3 F9A8 JMP JADR ; SKOK NA SPOJOVACI ADRESU
2051 ;
2052 ;
2053 ;
2054 ; I O D E F
2055 ; =========
2056 ;
2057 ; PODPROGRAM IODEF UMOZNUJE NASTAVIT UZIVATELSKE ADRESY
2058 ; PRO ZARIZENI. DRUH ZARIZENI JE URCEN OBSAHEM REGISTRU
2059 ; <C> NASLEDOVNE:
2060 ; 0 ... CI
2061 ; 1 ... CO
2062 ; 2 ... RI
2063 ; 3 ... DUMMY
2064 ; 4 ... PO
2065 ; 5 ... DUMMY
2066 ; 6 ... LO
2067 ; 7 ... CSTS
2068 ; ADRESA UZIVATELSKEHO PROGRAMU JE V REGISTRU <DE>.
2069 ;
2070 ; POSKOZENE REGISTRY: A,F
2071 ;
2072 FE3E E5 IODEF: PUSH H
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-37
2073 FE3F C5 PUSH B
2074 FE40 21 0004 LXI H,RAMEND ; BUNKA S KONCEM RAM
2075 FE43 79 MOV A,C ; ZARIZENI
2076 FE44 FE 08 CPI 8 ; CHYBA?
2077 FE46 D2 F931 JNC ERROR
2078 FE49 FE 05 CPI 5
2079 FE4B 21 00B0 LXI H,CONINP ; ADRESA PRO PRVNI 4 ZARIZENI
2080 FE4E DA FE57 JC IODEF1
2081 FE51 D6 05 SUI 5 ; OPRAVA CISLA ZARIZENI PRO DRUHY BLOK
2082 FE53 4F MOV C,A
2083 FE54 21 00F0 LXI H,USRPO ; ADRESA PRO ZBYLE 4 ZARIZENI
2084 FE57 81 IODEF1: ADD C ; <C> * 3 --> <C>
2085 FE58 81 ADD C
2086 FE59 4F MOV C,A
2087 FE5A 06 00 MVI B,0
2088 FE5C CD FA01 CALL GETADR ; VYPOCET FYZICKYCH SPOJOVACICH ADRES
2089 FE5F 09 DAD B ; PRICTENI OFFSETU
2090 FE60 36 C3 MVI M,0C3H ; INSTRUKCE SKOKU
2091 FE62 23 INX H
2092 FE63 73 MOV M,E ; DOLNI BYTE ADRESY SKOKU
2093 FE64 23 INX H
2094 FE65 72 MOV M,D ; HORNI BYTE ADRESY SKOKU
2095 FE66 C1 POP B
2096 FE67 E1 POP H
2097 FE68 C9 RET
2098 ;
2099 ;
2100 ;
2101 ; C S T S
2102 ; =======
2103 ;
2104 ; PODPROGRAM CSTS ZJISTUJE STAV KLAVESNICE:
2105 ; <A> = FFH, FF-Z = 0 ... OBSAHUJE PLATNY ZNAK
2106 ; <A> = 00H, FF-Z = 1 ... NEMA PLATNY ZNAK
2107 ;
2108 ; POSKOZENE REGISTRY: A,F
2109 ;
2110 FE69 E5 CSTS: PUSH H
2111 FE6A 21 00F6 LXI H,CONSTA ; ODSTUP SPOJOVACI ADRESY
2112 FE6D C3 F9A8 JMP JADR ; SKOK NA SPOJOVACI ADRESU
2113 ;
2114 FE70 AF CSTS1: XRA A
2115 FE71 D3 09 OUT ADRPB
2116 FE73 DB 04 IN ADRCIN
2117 FE75 3C INR A ; STISKNUTA KLAVESA?
2118 FE76 C8 RZ ; NE
2119 FE77 3E FF MVI A,0FFH
2120 FE79 C9 RET ; ANO
2121 ;
2122 ;
2123 ;
2124 ;
2125 ;
2126 ; C I
2127 ; ===
2128 ;
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-38
2129 ; PODPROGRAM CI UMOZNUJE VSTUP ZNAKU Z KLAVESNICE.
2130 ;
2131 ; POSKOZENE REGISTRY: A,F
2132 ;
2133 FE7A E5 CI: PUSH H
2134 FE7B 21 00B0 LXI H,CONINP ; SPOJOVACI ADRESA
2135 FE7E C3 F9A8 JMP JADR
2136 ;
2137 FE81 C5 CI4: PUSH B
2138 FE82 D5 PUSH D
2139 FE83 E5 PUSH H
2140 ;
2141 ; INICIALIZACE OBLASTI VZORKU A PROMENNICH
2142 ;
2143 FE84 CD FFAD CI1: CALL GETKCD ; ADRESA OBL.VZORKU
2144 FE87 06 05 MVI B,5
2145 FE89 36 FF CI2: MVI M,0FFH ; ZAPLNENA 0FFH
2146 FE8B 23 INX H
2147 FE8C 05 DCR B
2148 FE8D F2 FE89 JP CI2 ; CELA OBLAST ?
2149 FE90 36 00 MVI M,0 ; UPLO
2150 FE92 23 INX H
2151 FE93 36 00 MVI M,0 ; CTRL
2152 FE95 23 INX H
2153 FE96 36 00 MVI M,0 ; NUM
2154 FE98 23 INX H
2155 FE99 34 INR M ; CTN
2156 FE9A 3E 16 MVI A,22 ; CIKLUS BLIKANI KURZORU
2157 FE9C BE CMP M
2158 FE9D CC FD26 CZ INVCHR ; BLIKANI KURZORU
2159 FEA0 D2 FEA5 JNC CI20
2160 FEA3 36 00 MVI M,0
2161 ;
2162 ; VYTVORENI SOUBORU VZORKU
2163 ;
2164 FEA5 CD FFAD CI20: CALL GETKCD ; ADRESA OBL. VZORKU
2165 FEA8 06 DF MVI B,0DFH ; VYBER RADKU
2166 FEAA 78 CI3: MOV A,B
2167 FEAB 0F RRC
2168 FEAC D2 FEB9 JNC CI84 ; VSECHNY RADKY
2169 FEAF 47 MOV B,A
2170 FEB0 D3 09 OUT ADRPB ; AKTIVACE RADKU
2171 FEB2 DB 04 IN ADRCIN ; CTENI SLOUPCU
2172 FEB4 77 MOV M,A ; ULOZENI VZORKU
2173 FEB5 23 INX H
2174 FEB6 C3 FEAA JMP CI3 ; DALSI VZOREK
2175 ;
2176 ; TEST NA USTALENI KLAVES
2177 ;
2178 FEB9 0E 40 CI84: MVI C,64 ; POCET TESTU SHODY
2179 FEBB 0D CI5: DCR C
2180 FEBC CA FED6 JZ CI7 ; VSECHNY TESTY
2181 FEBF CD FFAD CALL GETKCD ; ADRESA OBL. VZORKU
2182 FEC2 06 DF MVI B,0DFH ; VYBER RADEK
2183 FEC4 78 CI6: MOV A,B
2184 FEC5 0F RRC
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-39
2185 FEC6 D2 FEBB JNC CI5 ; VSECHNY RADKY
2186 FEC9 47 MOV B,A
2187 FECA D3 09 OUT ADRPB ; AKTIVUJ RADK
2188 FECC DB 04 IN ADRCIN ; SLEDUJ SLOUPCE
2189 FECE BE CMP M ; SROVNEJ VZOREK
2190 FECF C2 FE84 JNZ CI1 ; PRI NESHODE ZNOVU
2191 FED2 23 INX H
2192 FED3 C3 FEC4 JMP CI6 ; DALSI VZOREK
2193 ;
2194 ; VYHODNOCENI VZORKU
2195 ;
2196 FED6 06 04 CI7: MVI B,4 ; <B> CITAC RADKU
2197 FED8 CD FFAD CALL GETKCD ; ADRESA OBL. VZORKU
2198 FEDB EB XCHG
2199 FEDC 1A CI8: LDAX D ; VZOREK V <A>
2200 FEDD 13 INX D
2201 FEDE FE FF CPI 0FFH
2202 FEE0 C4 FF68 CNZ CI9 ; PLATNY - DEKODOVAT
2203 FEE3 05 DCR B ; DALSI KOD
2204 FEE4 F2 FEDC JP CI8 ; NE-DALSI RADEK
2205 ;
2206 ; GENERACE VYSLEDNEHO KODU ZNAKU
2207 ;
2208 FEE7 21 0235 LXI H,ZNAK
2209 FEEA CD FA01 CALL GETADR
2210 FEED EB XCHG
2211 FEEE 1A LDAX D
2212 FEEF FE FF CPI 0FFH ; NEPLATNY ZNAK?
2213 FEF1 CA FE84 JZ CI1 ; ANO - NOVY ZNAK
2214 ;
2215 FEF4 CD FD26 CALL INVCHR ; UPRAV POZADI
2216 ;
2217 FEF7 21 0236 CI41: LXI H,UPLO ; POMOCNE ZNAKY
2218 FEFA CD FA01 CALL GETADR
2219 FEFD 7E MOV A,M
2220 FEFE B7 ORA A
2221 FEFF CA FF0E JZ CI42
2222 FF02 1A LDAX D
2223 FF03 D6 41 SUI 'A'
2224 FF05 6F MOV L,A
2225 FF06 26 00 MVI H,0
2226 FF08 01 FFDC LXI B,TABUP
2227 FF0B 09 DAD B
2228 FF0C 7E MOV A,M
2229 FF0D 12 STAX D
2230 ;
2231 FF0E 21 0238 CI42: LXI H,NUM ; CISLICE
2232 FF11 CD FA01 CALL GETADR
2233 FF14 7E MOV A,M
2234 FF15 B7 ORA A
2235 FF16 CA FF33 JZ CI43
2236 FF19 0E 30 MVI C,30H
2237 FF1B 21 FFF6 LXI H,TABNUM
2238 FF1E 1A CI44: LDAX D
2239 FF1F BE CMP M
2240 FF20 C2 FF28 JNZ CI45
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-40
2241 FF23 79 MOV A,C
2242 FF24 12 STAX D
2243 FF25 C3 FF33 JMP CI43
2244 FF28 23 CI45: INX H
2245 FF29 0C INR C
2246 FF2A 79 MOV A,C
2247 FF2B FE 3A CPI 3AH
2248 FF2D DA FF1E JC CI44
2249 FF30 C3 FE84 JMP CI1 ; CHYBNE KLAVESY
2250 ;
2251 FF33 21 0237 CI43: LXI H,CTRL ; RIDICI ZNAKY
2252 FF36 CD FA01 CALL GETADR
2253 FF39 7E MOV A,M
2254 FF3A B7 ORA A
2255 FF3B CA FF42 JZ CI40
2256 FF3E 1A LDAX D
2257 FF3F E6 1F ANI 1FH
2258 FF41 12 STAX D
2259 ;
2260 FF42 CD FDEF CI40: CALL BEEPS ; BEEP
2261 ;
2262 ; TEST UVOLNENI KLAVESY
2263 ;
2264 FF45 0E 00 CI15: MVI C,0 ; POCET TESTU
2265 FF47 0D CI11: DCR C
2266 FF48 CA FF63 JZ CI99 ; OPAKUJ ZNAK
2267 FF4B CD FFAD CALL GETKCD ; ADRESA OBL. VZORKU
2268 FF4E 06 DF MVI B,0DFH
2269 FF50 37 STC
2270 FF51 78 CI55: MOV A,B
2271 FF52 0F RRC
2272 FF53 D2 FF47 JNC CI11 ; VSECHNY RADKY?
2273 FF56 47 MOV B,A
2274 FF57 D3 09 OUT ADRPB
2275 FF59 DB 04 IN ADRCIN
2276 FF5B BE CMP M ; STEJNY KOD?
2277 FF5C C2 FF63 JNZ CI99 ; NE - DALSI ZNAK
2278 FF5F 23 INX H
2279 FF60 C3 FF51 JMP CI55
2280 ;
2281 FF63 1A CI99: LDAX D
2282 FF64 E1 POP H
2283 FF65 D1 POP D
2284 FF66 C1 POP B
2285 FF67 C9 RET
2286 ;
2287 ; PODPROGRAM VYHODNOCENI KODU
2288 ;
2289 FF68 D5 CI9: PUSH D
2290 FF69 0E 00 MVI C,0 ; CITAC SLOUPCU
2291 FF6B 0F CI14: RRC
2292 FF6C F5 PUSH PSW
2293 FF6D D4 FF7C CNC CI10 ; AKTIVNI?
2294 FF70 F1 POP PSW
2295 FF71 57 MOV D,A
2296 FF72 0C INR C
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-41
2297 FF73 79 MOV A,C
2298 FF74 FE 08 CPI 8
2299 FF76 7A MOV A,D
2300 FF77 DA FF6B JC CI14
2301 FF7A D1 POP D
2302 FF7B C9 RET
2303 ;
2304 FF7C 78 CI10: MOV A,B ; CITAC RADKU
2305 FF7D E6 07 ANI 07H
2306 FF7F 07 RLC
2307 FF80 07 RLC
2308 FF81 07 RLC
2309 FF82 B1 ORA C
2310 FF83 6F MOV L,A
2311 FF84 26 00 MVI H,0 ; OFFSET
2312 FF86 11 FFB4 LXI D,KTAB ; TABULKA KODU
2313 FF89 19 DAD D
2314 FF8A 7E MOV A,M
2315 ;
2316 FF8B 21 0236 CI30: LXI H,UPLO
2317 FF8E CD FA01 CALL GETADR
2318 FF91 FE 1D CPI 1DH ; UPLO?
2319 FF93 C2 FF98 JNZ CI31
2320 FF96 77 MOV M,A
2321 FF97 C9 RET
2322 ;
2323 FF98 23 CI31: INX H
2324 FF99 FE 1E CPI 1EH ; CTRL?
2325 FF9B C2 FFA0 JNZ CI32
2326 FF9E 77 MOV M,A
2327 FF9F C9 RET
2328 ;
2329 FFA0 23 CI32: INX H
2330 FFA1 FE 1F CPI 1FH ; NUM?
2331 FFA3 C2 FFA8 JNZ CI33
2332 FFA6 77 MOV M,A
2333 FFA7 C9 RET
2334 ;
2335 FFA8 2B CI33: DCX H
2336 FFA9 2B DCX H
2337 FFAA 2B DCX H
2338 FFAB 77 MOV M,A ; ULOZ DO PROM. ZNAK
2339 FFAC C9 RET
2340 ;
2341 FFAD 21 0230 GETKCD: LXI H,KEYCD ; VYPOCET
2342 FFB0 CD FA01 CALL GETADR ; ADRESY OBL. VZORKU
2343 FFB3 C9 RET
2344 ;
2345 FFB4 04 KTAB: DB 004H ; [00H] = '->'
2346 FFB5 00 DB 000H ; [01H] = 'UC/UL'
2347 FFB6 1D DB 01DH ; [02H] = 'UP/LO'
2348 FFB7 41 DB 041H ; [03H] = 'A'
2349 FFB8 51 DB 051H ; [04H] = 'Q'
2350 FFB9 1E DB 01EH ; [05H] = 'CTRL'
2351 FFBA 0D DB 00DH ; [06H] = 'CR'
2352 FFBB 50 DB 050H ; [07H] = 'P'
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-42
2353 FFBC 08 DB 008H ; [08H] = '<-'
2354 FFBD 1F DB 01FH ; [09H] = '0-9'
2355 FFBE 58 DB 058H ; [0AH] = 'X'
2356 FFBF 44 DB 044H ; [0BH] = 'D'
2357 FFC0 45 DB 045H ; [0CH] = 'E'
2358 FFC1 4D DB 04DH ; [0DH] = 'M'
2359 FFC2 4B DB 04BH ; [0EH] = 'K'
2360 FFC3 49 DB 049H ; [0FH] = 'I'
2361 FFC4 FF DB 0FFH ; [10H] = 'DUMMY'
2362 FFC5 FF DB 0FFH ; [11H] = 'DUMMY'
2363 FFC6 56 DB 056H ; [12H] = 'V'
2364 FFC7 47 DB 047H ; [13H] = 'G'
2365 FFC8 54 DB 054H ; [14H] = 'T'
2366 FFC9 42 DB 042H ; [15H] = 'B'
2367 FFCA 48 DB 048H ; [16H] = 'H'
2368 FFCB 59 DB 059H ; [17H] = 'Y'
2369 FFCC 20 DB 020H ; [18H] = ' '
2370 FFCD FF DB 0FFH ; [19H] = 'DUMMY'
2371 FFCE 43 DB 043H ; [1AH] = 'C'
2372 FFCF 46 DB 046H ; [1BH] = 'F'
2373 FFD0 52 DB 052H ; [1CH] = 'R'
2374 FFD1 4E DB 04EH ; [1DH] = 'N'
2375 FFD2 4A DB 04AH ; [1EH] = 'J'
2376 FFD3 55 DB 055H ; [1FH] = 'U'
2377 FFD4 18 DB 018H ; [20H] = 'DOWN'
2378 FFD5 1B DB 01BH ; [21H] = 'CS'
2379 FFD6 5A DB 05AH ; [22H] = 'Z'
2380 FFD7 53 DB 053H ; [23H] = 'S'
2381 FFD8 57 DB 057H ; [24H] = 'W'
2382 FFD9 05 DB 005H ; [25H] = 'UP'
2383 FFDA 4C DB 04CH ; [26H] = 'L'
2384 FFDB 4F DB 04FH ; [27H] = 'O'
2385 ;
2386 FFDC 2D TABUP: DB 02DH ; '-' ... A
2387 FFDD 3F DB 03FH ; '?' ... B
2388 FFDE 3A DB 03AH ; ':' ... C
2389 FFDF 3D DB 03DH ; '=' ... D
2390 FFE0 23 DB 023H ; '#' ... E
2391 FFE1 5E DB 05EH ; '^' ... F
2392 FFE2 5F DB 05FH ; '_' ... G
2393 FFE3 3C DB 03CH ; '<' ... H
2394 FFE4 28 DB 028H ; '(' ... I
2395 FFE5 3E DB 03EH ; '>' ... J
2396 FFE6 5B DB 05BH ; '[' ... K
2397 FFE7 5D DB 05DH ; ']' ... L
2398 FFE8 2E DB 02EH ; '.' ... M
2399 FFE9 2C DB 02CH ; ',' ... N
2400 FFEA 29 DB 029H ; ')' ... O
2401 FFEB 40 DB 040H ; '@' ... P
2402 FFEC 21 DB 021H ; 'VYKRICNIK' ... Q
2403 FFED 24 DB 024H ; '$' ... R
2404 FFEE 2B DB 02BH ; '+' ... S
2405 FFEF 25 DB 025H ; '%' ... T
2406 FFF0 27 DB 027H ; ''' ... U
2407 FFF1 3B DB 03BH ; ';' ... V
2408 FFF2 22 DB 022H ; '"' ... W
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE 1-43
2409 FFF3 2F DB 02FH ; '/' ... X
2410 FFF4 26 DB 026H ; '&' ... Y
2411 FFF5 2A DB 02AH ; '*' ... Z
2412 ;
2413 FFF6 50 TABNUM: DB 'P' ; 0
2414 FFF7 51 DB 'Q' ; 1
2415 FFF8 57 DB 'W' ; 2
2416 FFF9 45 DB 'E' ; 3
2417 FFFA 52 DB 'R' ; 4
2418 FFFB 54 DB 'T' ; 5
2419 FFFC 59 DB 'Y' ; 6
2420 FFFD 55 DB 'U' ; 7
2421 FFFE 49 DB 'I' ; 8
2422 FFFF 4F DB 'O' ; 9
2423 ;
2424 ;*****************************************************************
2425 ;
2426 .DEPHASE
2427 END
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE S
Macros:
Symbols:
E000 ADRBAS 0010 ADRBIP 0004 ADRCIN
0000 ADRCST 000B ADRCT 0018 ADRES
003D ADRHI F9E6 ADRK1 F9DE ADRK2
F9D2 ADRKUP 003C ADRLO 0014 ADRMSK
0000 ADROUT 0008 ADRPA 0009 ADRPB
000A ADRPC F000 ADRTPR 001F ADSET
F9F5 ANAL 007B AREG FACF ASHE0
FAC1 ASHEX FDB4 BAC0 FDC6 BAC1
FDBB BAC2 FDA7 BACST E000 BASIC
FDF3 BEEP0 FDF5 BEEP1 0060 BEEPFQ
0050 BEEPLN FDEF BEEPS 0007 BELL
0000 BLANK 0070 BRADR 0072 BRCODE
0079 BREG 0008 BS FB02 CARRET
0036 CHARCO 0038 CHARNO FBCF CHKTPR
FE7A CI FE84 CI1 FF7C CI10
FF47 CI11 FF6B CI14 FF45 CI15
FE89 CI2 FEA5 CI20 FEAA CI3
FF8B CI30 FF98 CI31 FFA0 CI32
FFA8 CI33 FE81 CI4 FF42 CI40
FEF7 CI41 FF0E CI42 FF33 CI43
FF1E CI44 FF28 CI45 FEBB CI5
FF51 CI55 FEC4 CI6 FED6 CI7
FEDC CI8 FEB9 CI84 FF68 CI9
FF63 CI99 F9F2 CINCR FA21 CO
FA68 CO0 FA28 CO2 F8D2 COLD0
F8B2 COLD2 F85A COLDST FDE9 COMP
00B0 CONINP E003 CONIT 00B3 CONOUT
00F6 CONSTA 000D CR 007A CREG
FB0C CRLF FE69 CSTS FE70 CSTS1
F941 CTABL 0017 CTEND 0239 CTN
0237 CTRL 0090 CTRLWD FA0C DADR
FA1E DBYT0 FA11 DBYTE 007F DEL
FDD9 DELL0 FDC9 DELLIN FD97 DELS0
FD89 DELSCR FC67 DISP0 FC77 DISP1
FC83 DISP2 FC94 DISP3 FCA1 DISP4
FCAD DISP5 FCAF DISP6 FC61 DISPL
001E DL 0077 DREG 001F DSCR
FA6B ECHO FA7F EDADR 0003 EOT
FA82 EQUATE 0078 EREG F931 ERROR
001B ESC 00A0 ETX FA8A EXPR
FA8B EXPR0 FA92 EXPR1 FAAA EXPR2
FAB8 EXPR3 000C FF FCBD FILL
FCC0 FILL0 FD86 FORFI 007C FREG
FA01 GETADR F9B6 GETC0 F9B3 GETCHR
F975 GETD0 F96F GETDIS FFAD GETKCD
F9AD GETLIN F9C1 GETSPR F9BB GETSTK
F937 GETTAB FD7A GHOME FC1A GOTO
FC47 GOTO0 FC50 GOTO1 FDE4 HILO
001D HOME 0075 HREG 0009 HT
FAD3 HXASC FD16 IMTEXT FD17 IMTX0
FCC8 INADR 007D INOUT FD0F INPU0
FCF7 INPUT 0038 INTADR FB12 INTER
'PLAN 80A MONITOR V.2.Q' MACRO-80 3.44 09-Dec-81 PAGE S-1
FB70 INTER0 FBC3 INTER1 FB23 INTER2
FB34 INTER3 FD31 INVC0 FD26 INVCHR
0003 IOBYT FE1E IOCHK FE3E IODEF
FE57 IODEF1 FE22 IOSET F9A8 JADR
0000 JMPMON 00C3 KEYBAS 0230 KEYCD
0055 KEYTPR FFB4 KTAB 000A LF
FAF1 LINE0 FAFA LINE1 FAFE LINE2
0035 LINECO FADD LINEF 0037 LINENO
FE29 LO 0076 LREG 00F3 LSTOUT
FE13 MEMCK F800 MONIT FCD0 MOVE
FCD3 MOVE0 0008 MSKWD 0033 MSTACK
0130 NAME1 0170 NAME2 F8E4 NEXT
F929 NEXT2 F928 NEXT4 F93C NEXT6
0238 NUM F9A2 NUMCHR F99E NUML0
F99B NUMLIN FCF6 OUTP0 FCDD OUTPT
01B6 PBLKC 0000 PC0RES 0001 PC0SET
0002 PC1RES 0003 PC1SET 0009 PC4RES
0008 PC4SET 01B7 PFILC 01B0 PNADR
01B2 PNPOI 01BA PNSTS FE30 PO
00BC PUNOUT 0000 RAMBEG 0004 RAMEND
01B8 RBLKC 01B3 RDADR 01B5 RDPOI
01BB RDSTS 0008 RDYCIN 0002 RDYRE1
0001 RDYRE2 00B6 READIN 0004 REPCIN
01B9 RFILC FE37 RI FD37 ROLL
FD56 ROLL0 FD63 ROLL1 FD73 ROLL2
FA76 SDADR 000E SO FA79 SPACE
0020 SPC 0073 SPREG 0040 STCKLN
F9CA STJMA F9CD STJMB F9C7 STJMP
001A SUBS FBDD SUBS0 FBE7 SUBS1
FBF8 SUBS2 FC12 SUBS3 FC13 SUBS4
FBD5 SUBST FFF6 TABNUM FFDC TABUP
F00D TAPP F000 TAPREC F028 TCLOS
F013 TDIR F025 TEOF FE04 TIME0
FE06 TIME1 FE02 TIMER F001 TINIT
F004 TJOIN F019 TKI F01C TKO
F010 TLOAD 01F0 TMPAR F00A TPUT
F007 TQUAF F022 TRD F016 TUNNA
F01F TWR 0236 UPLO 0031 UREND
00F0 USRPO 000B VT FA85 WQUA0
0235 ZNAK
No Fatal error(s)
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1
1 TITLE 'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X'
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 ;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
23 ;X X
24 ;X X
25 ;X PLAN-80A V.3.X 27.09.88 X
26 ;X X
27 ;X OVLADACI PROGRAM MODEMU KAZETOVEHO MAGNETOFONU X
28 ;X X
29 ;X X
30 ;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-1
57 ;################################################################
58 ;
59 ; POZOR: U MODEMU MAGNETOPASKOVE MAGNETICKE JEDNOTKY
60 ; BYLO POZADANO O OCHRANU AUTORSKYM ASVEDCENIM.
61 ; PV-7752-85
62 ; TENTO PROGRAM JE FUNKCNI SOUCASTI MODEMU.
63 ; JE ZAKAZANO KOPIRONAT NEBO POZIVAT TOHOTO
64 ; PROGRAMU NEBO JEHO CASTI BEZ SOUHLASU MAJITELE
65 ; PATENTU: LAMORATORNI PRISTROJE
66 ; NA OKRAJI 335
67 ; (C) 1985 PRAHA - PETRINY
68 ;
69 ;################################################################
70 ;
71 ; PREDPOKLADA SE ZAKLADNI RYCHLOST 2400 BD, PRO KTEROU JSOU
72 ; VYTVARENY MEZERY (0.8S A 0.01S). PRI NIZSICH RYCHLOSTECH
73 ; BUDOU MEZERY PRISLUSNE DELSI.
74 ;
75 ; KODOVANI NUL A JEDNICEK JE NASLEDUJICI:
76 ;
77 ; 0 ... F = 1600 HZ ... T = 62.5 US
78 ; 1 ... F = 3200 HZ ... T = 31.25 US
79 ;
80 ; DOVOLENE KOLISANI FREKVENCE ... +/- 10 %
81 ;
82 ;
83 ; KODEM JE OVLADAN POMOCI OBVODU STIKU mhb 8255 NASLEDOVNE:
84 ;
85 ; PORT PC : VYSTUPNI
86 ;
87 ; PC0 ... VYSTUPNI DATA
88 ; PC1 ... ZABLOKOVANI DEMODULATORU NA HODNOTU 0
89 ; PC2 ... ZABLOKOVANI DEMODULATORU NA HODNOTU 1
90 ; PC3 ... OVLADANI MOTORKU (LED MOTOREK)
91 ; PC4 ... ZABLOKOVANI MODULATORU (UZEMNENI VYSTUPU)
92 ; PC5 ... LED CTENI
93 ; PC6 ... LED CHYBA
94 ; PC7 ... LED ZAPIS
95 ;
96 ; PORT PA: VSTUPNI
97 ;
98 ; PA0 ... VSTUPNI DATA
99 ; PA1 ... SYNCHRONIZACE ZAPISU
100 ; PA2 ... NEPOUZITO
101 ; PA3 ... NEPOUZITO
102 ; PA4 ... NEPOUZITO
103 ; PA5 ... NEPOUZITO
104 ; PA6 ... NEPOUZITO
105 ; PA7 ... SYNCHRONIZACE CTENI
106 ;
107 ; PORT PB: VSTUPNI (NENI POUZIT)
108 ;
109 ;
110 ; PRO ROZBEH MOTORKU SE VYCLENUJE DOBA WAITTR MS. PO KTEROU
111 ; JE MODEM ZABLOKOVANY.
112 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-2
113 ; DOPORUCUJE SE POUZIT PASKY TYPU:
114 ; - ORWO K-60 CHROMDIOXID
115 ; - AUDIOSTAR HS_I60
116 ;
117 ; CINOST PRIKAZU A POPIS MODEMU VIZ:
118 ; "UZIVATELSKY A SERVISNI MANUAL"
119 ;
120 ;################################################################
121 ;
122 ; OBLAST DEFINIC:
123 ;
124 F000 TAPREC EQU 0F000H
125 ;
126 F800 COLDST EQU 0F800H
127 F803 CI EQU 0F803H
128 F806 RI EQU 0F806H
129 F809 CO EQU 0F809H
130 F80C PO EQU 0F80CH
131 F80F LO EQU 0F80FH
132 F812 CSTS EQU 0F812H
133 F815 IOCHK EQU 0F815H
134 F818 IOSET EQU 0F818H
135 F81B MEMCK EQU 0F81BH
136 F81E IODEF EQU 0F81EH
137 F821 INTER EQU 0F821H
138 F824 CRLF EQU 0F824H
139 F827 EXPR EQU 0F827H
140 F82A ERROR EQU 0F82AH
141 F82D ASHEX EQU 0F82DH
142 F830 DADR EQU 0F830H
143 F833 DBYTE EQU 0F833H
144 F836 HILO EQU 0F836H
145 F839 NEXT EQU 0F839H
146 F83C SPACE EQU 0F83CH
147 F83F CINCR EQU 0F83FH
148 F842 IMTXT EQU 0F842H
149 F845 ADRKUR EQU 0F845H
150 F848 HXASC EQU 0F848H
151 F84B TIMER EQU 0F84BH
152 F84E GETADR EQU 0F84EH
153 F851 STJMB EQU 0F851H
154 F854 ECHO EQU 0F854H
155 F857 BACST EQU 0F857H
156 ;
157 ; DEFINICE ODSTUPU SKRYTYCH PROMENNYCH DO DISRAM
158 ;
159 0031 UREND EQU 31H
160 0035 LINECO EQU 35H
161 0130 NAME1 EQU 130H
162 0170 NAME2 EQU 170H
163 01B0 PNADR EQU 1B0H
164 01B2 PNPOI EQU 1B2H
165 01B3 RDADR EQU 1B3H
166 01B5 RDPOI EQU 1B5H
167 01B6 PBLKC EQU 1B6H
168 01B7 PFILC EQU 1B7H
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-3
169 01B8 RBLKC EQU 1B8H
170 01B9 RFILC EQU 1B9H
171 01BA PNSTS EQU 1BAH
172 01BB RDSTS EQU 1BBH
173 01F0 TMPAR EQU 1F0H
174 ;
175 ; DEFINICE I/O PORTU
176 ;
177 0004 ADRCIN EQU 04H ; DATOVY PORT CI
178 0000 ADRDCT EQU 00H ; STAVOVY PORT CI
179 0008 RDYCIN EQU 08H ; MASKA STAVOVEHO BITU KLAVESNICE (RDY=0)
180 0008 ADRPA EQU 08H ; ADRESA PORTU PA OBVODU 8255
181 0009 ADRPB EQU 09H ; ADRESA PORTU PB OBVODU 8255
182 000A ADRPC EQU 0AH ; ADRESA PORTU PC OBVODU 8255
183 000B ADRCT EQU 0BH ; ADRESA RIDICIHO PORTU OBVODU 8255
184 0092 CTRLWD EQU 92H ; RIDICI SLOVO PA-IN,PB-IN,PC-OUT,M0
185 0010 PASWD EQU 10H ; MASIVACNI SLOVO INTERFACE
186 0000 PC0RES EQU 00H ; NOLOVANI PC0
187 0001 PC0SET EQU 01H ; NASTAVENI PC0
188 0002 PC1RES EQU 02H ; NOLOVANI PC1
189 0003 PC1SET EQU 03H ; NASTAVENI PC1
190 0006 PC3RES EQU 06H ; NOLOVANI PC3
191 0007 PC3SET EQU 07H ; NASTAVENI PC3
192 0008 PC4RES EQU 08H ; NOLOVANI PC4
193 0009 PC4SET EQU 09H ; NASTAVENI PC4
194 000A PC5RES EQU 0AH ; NOLOVANI PC5
195 000B PC5SET EQU 0BH ; NASTAVENI PC5
196 000C PC6RES EQU 0CH ; NOLOVANI PC6
197 000D PC6SET EQU 0DH ; NASTAVENI PC6
198 000E PC7RES EQU 0EH ; NOLOVANI PC7
199 000F PC7SET EQU 0FH ; NASTAVENI PC7
200 0140 GAPBIT EQU 320 ; POCET JEDNICKOVICH BITU PRO 100 MS
201 0B40 G1LEN EQU 2880 ; POCET JEDNICKOVICH BITU PRO 900 MS
202 00A0 G2LEN EQU 160 ; POCET JEDNICKOVICH BITU PRO 50 MS
203 7D00 G3LEN EQU 32000 ; POCET JEDNICKOVICH BITU PRO 10 MS
204 0064 WAITTR EQU 100 ; POCET MS CEKANI NA ROZBEHNUTI MOTORKU
205 ;
206 ; DEFINICE KONSTANT
207 ;
208 0020 SPC EQU 20H
209 00A0 ETX EQU 0A0H
210 0003 EOT EQU 03H
211 000D CR EQU 0DH
212 0008 BS EQU 08H
213 000A LF EQU 0AH
214 007F DEL EQU 7FH
215 0007 BELL EQU 07H
216 0000 BLANK EQU 00H
217 001A SUBS EQU 1AH
218 001B ESC EQU 1BH
219 00EF COMLEN EQU 239 ; DELKA ZOBRAZOVANE POZNAMKY
220 000B NAMLEN EQU 11 ; DELKA NAZVU
221 00FF BUFLEN EQU 255 ; DELKA BUFFERU
222 ;
223 ;
224 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-4
225 ;################################################################
226 ;
227 ;
228 ; C H Y B O V N I K
229 ; =================
230 ;
231 ; PRI VYSKYTU KRITICKE CHYBY SE PRERUSI VESKERA PRACE, ZASTAVI
232 ; SE MAGNETOFON, PASIVUJI SE STATUSY A NULUJI CITACE. DALE SE
233 ; SKOCI DO OBSTUHY PRERUSENI TAK, ABI V PC BYLA ADRESA CHYBY,
234 ; KTERA NASTALA.
235 ;
236 F0AA EER1 EQU ERR1 ; CHYBA HANDLERU PO
237 F032 EER2 EQU ERR2 ; POSLEDNE ZAPSANY SOUBOR NEBIL UZAVREN
238 F0EA EER3 EQU ERR3 ; CHYBA V OBSAHU PAMETI PRI READ
239 F0F5 EER4 EQU ERR4 ; CHYBA V KONTROLNIM SOUCTU PRI READ
240 F10A EER5 EQU ERR5 ; CHYBA V KONTROLNIM SOUCTU PRI READ
241 F139 EER6 EQU ERR6 ; CHYBA HANDLERU RI
242 F170 EER7 EQU ERR7 ; MENE NEZ 1 KBYTE UZIV. PAMETI
243 F1D9 EER8 EQU ERR8 ; CTENI NEBINARNIHO SOUBORU PRIKAZEM QUAFF
244 F1DF EER9 EQU ERR9 ; CHYBI LEVA ADR. ZAVORKA PRI CTENI BIN. SOUB.
245 F1EE EER10 EQU ERR10 ; CHYBI PRAVA ADR. ZAVORKA PRI CTENI BIN. SOUB.
246 F1F7 EER11 EQU ERR11 ; CHYBA V KONTR. SOUCTU ADR. CASTI BIN. SOUB.
247 F213 EER12 EQU ERR12 ; CHYBA V KONTR. SOUCTU DAT. CASTI BIN. SOUB.
248 F21B EER13 EQU ERR13 ; CHYBI UKONCOVACI ZNAK SUBS = 1AH U BIN. SOUB.
249 F358 EER14 EQU ERR14 ; UZAVIRANI NEOTEVRENEHO SOUBORU
250 F456 EER15 EQU ERR15 ; CHYBI KONCOVY PARAMBLE PRI RDBUF
251 F45A EER16 EQU ERR16 ; CHYBA V KONTROLNIM SOUCTU PRI RDBUF
252 F466 EER17 EQU ERR17 ; POSLEDNE ZAPSANY SOUBOR NEBYL UZAVREN
253 F4BB EER18 EQU ERR18 ; POSLEDNE CTENY SOUBOR NEBYL UZAVREN
254 F585 EER19 EQU ERR19 ; CHYBA V SOUSLEDNOSTI BLOKU
255 F58D EER20 EQU ERR20 ; CHYBA V SOUSLEDNOSTI SOUBORU
256 F755 EER21 EQU ERR21 ; PRERUSENI FUNKCE KLAVESOU 'ESC'
257 F721 EER22 EQU ERR22 ; CHYBA HANDLERU PO
258 ;
259 ;
260 ;
261 ;################################################################
262 ;
263 ; OBLAST SPOJOVACICH ADRES
264 ; ************************
265 ;
266 ;
267 .PHASE TAPREC
268 ;
269 F000 55 DB 055H ; PRIZNAKOVY KOD MAGNETOFONU
270 ;
271 F001 C3 F155 JMP JOIN ; INICIACE A PRIRAZENI ADRES
272 F004 C3 F18C JMP JOIN0 ; PASIVACE STATUSU A PRIRAZENI ADRES
273 F007 C3 F1BE JMP QUAFF ; CTENI BINARNIHO SOUBORU Z KAZETY
274 F00A C3 F221 JMP PUT ; ULOZENI BINARNIHO SOUBORU NA KAZETU
275 F00D C3 F385 JMP APEND ; ULOZENI BIN. SOUBORU BEZPROSTREDNE
276 F010 C3 F25D JMP LOAD ; ZAPNUTI MOTORKU
277 F013 C3 F266 JMP DIR ; DIRECTORY PASKY
278 F016 C3 F29E JMP UNNAM ; POJMENOVANI NOVE PASKY
279 F019 C3 F2DB JMP KI ; VSTUP BYTU Z KAZETY
280 F01C C3 F322 JMP KO ; VYSTUP BYTU NA KAZETU
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-5
281 F01F C3 F02B JMP WRITE ; ZAPIS HEX. SOUBORU
282 F022 C3 F0AB JMP READ ; CTENI HEX. SOUBORU
283 F025 C3 F13C JMP EOF ; UZAVRENI HEX. SOUBORU
284 F028 C3 F350 JMP CLOSE ; UZAVRENI SOUBORU
285 ;
286 ;
287 ;
288 ;################################################################
289 ;
290 ; OBLAST PRIKAZU
291 ; **************
292 ;
293 ;
294 ; W R I T E
295 ; =========
296 ;
297 ; PRIKAZ PRO VYDEROVANI PRES ZARIZENI PO OBLASTI PAMETI O
298 ; ZADAVYCH ADRESACH ZACATKU A KONCE V HEXADECIMALNI FORME
299 ; PODLE NORMY INTEL. ZAPIS JE TVOREN BLOKY PRO DATA, Z NICHZ
300 ; PRVNI AZ PREDPOSLEDNI OBSAHUJE 16 BYTU, POSLEDNI MUZE
301 ; OBSAHOVAT MENE, PODLE VELIKOSTI OBLASTI PAMETI. NA KONCI
302 ; JE UZAVIRACI BLOK OBSAHUJICI STARTOVACI ADRESU. FORMAT
303 ; BLOKU MA TVAR:
304 ;
305 ; CR,LF,':',N,A,T,D,D,D,...,D,C
306 ;
307 ; KDE: CR JE ZNAK 'CR' = 0DH
308 ; LF JE ZNAK 'LF' = 0AH
309 ; ':' JE ZNAK ':' = 3AH
310 ; N JE POCET BYTU DAT, NULOVY INDIKUJE UZAVIRACI BLOK
311 ; A JE ADRESA UMISTENI PRVEHO BYTU DAT
312 ; T JE TYP BLOKU, 0...DATOVY, 1...UZAVIRACI (TEZ 0)
313 ; D JSOU JEDNOTLIVE BYTY DAT HEXADECIMALNE, NAPRED
314 ; HORNI A PAK DOLNI NIBBLE
315 ; C JE KONTROLNI SOUCET Z HODNOT N,A,T,D. SOUCET
316 ; VSECH HODNOT N,A,T,D,C MA DAT NULU!
317 ;
318 ; POSLEDNI, UZAVIRACI BLOK MA TVAR:
319 ;
320 ; CR,LF,':',00,A,T,C
321 ;
322 ; KDE: A JE STARTOVACI ADRESA
323 ; T JE TYP BLOKU (1)
324 ; C JE KONTROLNI SOUCET (DVOJKOVY DOPLNEK)
325 ;
326 ;
327 F02B CD F7D9 WRITE: CALL GETPST ; V <HL> ADRESA STATUSU ZAPISU
328 F02E B7 ORA A ; JE PASIVNI ?
329 F02F C4 F758 CNZ BREA1 ; NE CHYBA
330 F032 36 00 ERR2: MVI M,0 ; PASIVACE STATUSU ZAPISU
331 F034 CD F827 CALL EXPR ; VSTUP DVOU ADRES
332 F037 D1 POP D ; KONCOVA ADRESA
333 F038 E1 POP H ; POCATECNI ADRESA
334 F039 7D WRIT1: MOV A,L
335 F03A C6 10 ADI 10H
336 F03C 4F MOV C,A
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-6
337 F03D 7C MOV A,H
338 F03E CE 00 ACI 0
339 F040 47 MOV B,A ; V <BC> JE <HL> + 16
340 F041 7B MOV A,E
341 F042 91 SUB C
342 F043 4F MOV C,A
343 F044 7A MOV A,D
344 F045 98 SBB B ; ROZDIL OD KONCOVE ADRESY
345 F046 DA F04E JC WRIT2 ; ZBIVA VICE NEZ 16 BYTU ?
346 F049 3E 10 MVI A,10H ; ANO
347 F04B C3 F051 JMP WRIT3 ; DALSI BLOK
348 F04E 79 WRIT2: MOV A,C ; NE
349 F04F C6 11 ADI 11H ; OBNOVENI POCTU V <A>
350 F051 B7 WRIT3: ORA A ; KONEC ?
351 F052 C8 RZ ; ANO --> MONITOR
352 F053 D5 PUSH D
353 F054 5F MOV E,A ; POCET BYTU
354 F055 AF XRA A ; PARAMETR
355 F056 47 MOV B,A ; TYP 0
356 F057 CD F06C CALL PBEG ; UVODNI BLOK
357 F05A 7E WRIT4: MOV A,M ; CTI ZNAK
358 F05B 23 INX H ; CITAC
359 F05C CD F089 CALL PBYTE ; VYSLI ZNAK
360 F05F 1D DCR E ; VSECHNY ZNAKY BLOKU ?
361 F060 C2 F05A JNZ WRIT4
362 F063 AF XRA A
363 F064 92 SUB D ; DVOJKOVY DOPLNEK KONTR. SOUCTU
364 F065 CD F089 CALL PBYTE ; VYSLI KONTROLNI SOUCET
365 F068 D1 POP D ; OBNOVENI KONCOVE ADRESY
366 F069 C3 F039 JMP WRIT1 ;DALSI BLOK
367 ;
368 F06C 57 PBEG: MOV D,A
369 F06D 0E 0D MVI C,CR
370 F06F CD F0A4 CALL POC ; DERUJ CR
371 F072 0E 0A MVI C,LF
372 F074 CD F0A4 CALL POC ; DRERUJ LF
373 F077 0E 3A MVI C,':'
374 F079 CD F0A4 CALL POC ; DERUJ DVOJTECKU
375 F07C 7B MOV A,E
376 F07D CD F089 CALL PBYTE ; DERUJ POCET BYTU BLOKU
377 F080 7C MOV A,H
378 F081 CD F089 CALL PBYTE ; DERUJ HORNI BYTE ADRESY
379 F084 7D MOV A,L
380 F085 CD F089 CALL PBYTE ; DERUJ DOLNI BYTE ADRESY
381 F088 78 MOV A,B
382 F089 F5 PBYTE: PUSH PSW
383 F08A 0F RRC
384 F08B 0F RRC
385 F08C 0F RRC
386 F08D 0F RRC
387 F08E E6 0F ANI 0FH
388 F090 CD F848 CALL HXASC
389 F093 CD F0A4 CALL POC ; DERUJ HORNI NIBBLE HEX.
390 F096 F1 POP PSW
391 F097 F5 PUSH PSW
392 F098 E6 0F ANI 0FH
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-7
393 F09A CD F848 CALL HXASC
394 F09D CD F0A4 CALL POC ; DERUJ DOLNI NIBBLE HEX.
395 F0A0 F1 POP PSW
396 F0A1 82 ADD D
397 F0A2 57 MOV D,A ; KONTROLNI SOUCET
398 F0A3 C9 RET
399 ;
400 F0A4 CD F80C POC: CALL PO ; VYSTUP NA DEROVAC
401 F0A7 DC F758 CC BREA1 ; NASTALA CHYBA ?
402 F0AA C9 ERR1: RET
403 ;
404 ;
405 ;
406 ; READ
407 ; ====
408 ;
409 ; PRIKAZ READ PROVADI CTENI SOUBORU V INTEL HEX FORME PRES
410 ; PODPROGRAM RI.
411 ;
412 F0AB CD F7BF READ: CALL GETRST ; V <HL> ADRESA STATUSU CTENI
413 F0AE 36 00 MVI M,0 ; PASIVACE STATUSU CTENI
414 F0B0 0D DCR C
415 F0B1 CD F827 CALL EXPR ; VSTUP OFFSETU
416 F0B4 E1 READ1: POP H ; DO <HL>
417 F0B5 E5 PUSH H
418 F0B6 CD F133 READ2: CALL RIC
419 F0B9 FE 0D CPI CR ; JDE O 'CR' ?
420 F0BB C2 F0B6 JNZ READ2 ; NE - CTI ZNOVU
421 F0BE CD F133 CALL RIC
422 F0C1 FE 0A CPI LF ; JDE O 'LF' ?
423 F0C3 C2 F0B6 JNZ READ2 ; NE - CTI ZNOVU
424 F0C6 CD F133 CALL RIC
425 F0C9 DE 3A SBI ':' ; JDE O DVOJTECKU ?
426 F0CB C2 F0B6 JNZ READ2 ; NE CTI ZNOVU
427 F0CE 57 MOV D,A ; VYNULOVANI KONTR. SOUCTU V <D>
428 F0CF CD F11A CALL READ5 ; VSTUP DELKY BLOKU
429 F0D2 CA F0F8 JZ READ3 ; KONEC PRI NULOVE DELCE
430 F0D5 5F MOV E,A ; CITAC BYTU DAT
431 F0D6 CD F11A CALL READ5 ; VYSSI BYTE ADRESY
432 F0D9 47 MOV B,A
433 F0DA CD F11A CALL READ5 ; NIZSI BYTE ADRESY
434 F0DD 4F MOV C,A
435 F0DE 09 DAD B ; SKOTUCNA ADRESA ( S OFFSETEM ) V <HL>
436 F0DF CD F11A CALL READ5 ; PRIZNAK (IMP. 0)
437 F0E2 CD F11A READ4: CALL READ5 ; VLASTNI KOD SOUBORU
438 F0E5 77 MOV M,A ; ULOZENI DO PAMETI
439 F0E6 BE CMP M ; KONTROLA OBSAHU
440 F0E7 C4 F758 CNZ BREA1 ; CHYBA V OBSAHU PAMETI ?
441 F0EA 23 ERR3: INX H ; INKREMENTACE ADRESY PAMETI
442 F0EB 1D DCR E ; DEKREMENTACE CITACE BYTU
443 F0EC C2 F0E2 JNZ READ4 ; VSECHNY BYTY BLOKU PRECTENY ?
444 F0EF CD F11A CALL READ5 ; CTENI KONR. SOUCTU
445 F0F2 C4 F758 CNZ BREA1 ; CHYBA V KONTR. SOUCTU ?
446 F0F5 C3 F0B4 ERR4: JMP READ1
447 F0F8 E5 READ3: PUSH H ; OFFSET
448 F0F9 CD F11A CALL READ5 ; VYSSI BYTE STARTOVACI ADRESY
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-8
449 F0FC 67 MOV H,A
450 F0FD CD F11A CALL READ5 ; NIZSI BYTE STARTOVACI ADRESY
451 F100 6F MOV L,A
452 F101 CD F11A CALL READ5 ; PRIZNAK
453 F104 CD F11A CALL READ5 ; KONTROLNI SOUCET
454 F107 C4 F758 CNZ BREA1 ; CHYBA V KONTROLNIM SOUCTU ?
455 F10A D1 ERR5: POP D ; OFFSET
456 F10B 7A MOV A,D
457 F10C B3 ORA E
458 F10D D1 POP D ; OPRAVA UKAZETELE ZASOBNIKU
459 F10E C0 RNZ ; NENULOVY OFFSET -> MONITOR
460 F10F 7C MOV A,H
461 F110 B5 ORA L
462 F111 F5 PUSH PSW
463 F112 E5 PUSH H
464 F113 CD F18C CALL JOIN0 ; PASIVACE PRIZNAKU
465 F116 E1 POP H
466 F117 F1 POP PSW
467 F118 C8 RZ ; NULOVA STARTOVACI ADRESA -> MONITOR
468 F119 E9 PCHL ; SKOK DO PROGRAMU
469 ;
470 F11A C5 READ5: PUSH B
471 F11B CD F133 CALL RIC
472 F11E CD F82D CALL ASHEX ; VYSSI NIBBLE
473 F121 07 RLC
474 F122 07 RLC
475 F123 07 RLC
476 F124 07 RLC
477 F125 4F MOV C,A
478 F126 CD F133 CALL RIC ; NIZSI NIBBLE
479 F129 CD F82D CALL ASHEX
480 F12C B1 ORA C
481 F12D 4F MOV C,A
482 F12E 82 ADD D ; KONTROLNI SOUCET
483 F12F 57 MOV D,A
484 F130 79 MOV A,C ; PRECTENY BYTE V <A>
485 F131 C1 POP B
486 F132 C9 RET
487 ;
488 F133 CD F806 RIC: CALL RI ; CTI BYTE ZE SNIMACE
489 F136 DC F758 CC BREA1 ; CHYBA NEBO PORUCHA ?
490 F139 E6 7F ERR6: ANI 7FH
491 F13B C9 RET
492 ;
493 ;
494 ; E O F
495 ; =====
496 ;
497 ; PRIKAZ EOF PROVEDE ZAKONCENI PRAVE VYSLANEHO SOUBORU
498 ; PRIKAZEM W.
499 ;
500 F13C 0D EOF: DCR C
501 F13D CD F827 CALL EXPR ; STARTONACI ADRESA
502 F140 E1 POP H
503 F141 06 01 MVI B,1 ; TYP 1
504 F143 AF XRA A
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-9
505 F144 5F MOV E,A ; NULOVY POCET BYTU
506 F145 CD F06C CALL PBEG ; PRIZNAK
507 F148 AF XRA A
508 F149 92 SUB D ; DVOJKOVY DOPLNEK KONTR. SOUCTU
509 F14A CD F089 CALL PBYTE
510 F14D CD F7D9 CALL GETPST ; OBSAH STATUSU ZAPISU DO <A>
511 F150 B7 ORA A
512 F151 C2 F350 JNZ CLOSE ; POKUD BYL AKTIVOVAN ZAPIS - UZAVRI BLOK
513 F154 C9 RET
514 ;
515 ;
516 ;
517 ; J O I N
518 ; =======
519 ;
520 ; PRIKAZ PRO ZAKLADNI INICIALIZACI PROGRAMONEHO VYBAVENI
521 ; MAGNETOFONU. VYSILA RIDICI SLOVO DO OBVODU 8255. NASTAVUJE
522 ; POCATECNI HODNOTU PORTU PC. NASTAVI ADRESU BUFFERU DEROVACE
523 ; PNADR, ADRESU BUFFERU SNIMACE RDADR, OBSAH UKAZATELE BUFFERU
524 ; DERONACE PNPOI A OBSAH UKAZATELE BUFFERU SNIMACE RDPOI. BUFFER
525 ; DEREVACE UMISTI DO 256 BUNEK POD ZASOBNIK, BUFFER SNIMACE
526 ; UMISTI POD BUFFER DEROVACE TEZ DO 256 BUNEK. UPRAVI OBSAH
527 ; BUNKY PRO KONEC UZIVATELSKE PAMETI UREND NA [UREND] - 512.
528 ; PRITOM KONTROLUJE, ZDA JE PRITOMNEHO NEJMENE 1 KILO UZIVATELSKE
529 ; PAMETI RAM (BEZ NEJ NELZE MAGNETOFON PROVOZOVAT). DALE NASTAVI
530 ; CITAC BLOKU DEROVACE PBLKC, CITAC SOUBORU DEROVAVACE PFILC, CITAC
531 ; BLOKU SNIMACE PRLKC A CITAC SOUBORU SNIMACE RFILC NA NULU.
532 ; NAVIC PASIVUJE BUNKY STATUSU CTENI RDSTS I ZAPISU PNSTS, KTERE
533 ; MAJI NULOVY PASIVNI OBSAH, NENULOVY (0FFH) AKTIVNI OBSAH.
534 ; NAKONEC SE PROVEDE PRIRAZENI SPOJOVACICH ADRES PO NA KO A
535 ; PI NA KI (VYSTUP A VSTUP JEDNOHO BYTU Z/NA KAZETU) A CELKOVA
536 ; PASIVACE A INICIACE MODEMU.
537 ;
538 ; POSKOZENE REGISTRY: A,F,B,C,D,E,H,L
539 ;
540 F155 CD F842 JOIN: CALL IMTXT
541 F158 20 54 50 52 DB ' TPR V3','X' OR 80H ; OHLASENI
542 F15C 20 56 33 D8
543 F160 3E 92 MVI A,CTRLWD ; RIDICI SLOVO PRO '55
544 F162 D3 0B OUT ADRCT ; PA-IN,PB-IN,PC-OUT,M0
545 F164 CD F81B CALL MEMCK ; ZJISTENI KONCE USRAM
546 F167 60 MOV H,B
547 F168 6F MOV L,A ; KONEC UZIVATELSKE PAMETI V <HL>
548 F169 7C MOV A,H
549 F16A EB XCHG
550 F16B FE 03 CPI 3 ; MENE NEZ 1 KBYTE USRAM ?
551 F16D DC F758 CC BREA1 ; OHLASENI CHYBY
552 F170 CD F1B6 ERR7: CALL INI2 ; <DE>-255 -> <DE>
553 F173 21 01B0 LXI H,PNADR
554 F176 CD F1B0 CALL INI0 ; <DE> -> PNADR
555 F179 36 00 MVI M,0 ; 0 -> PNPOI
556 F17B 23 INX H
557 F17C CD F1B6 CALL INI2 ; <DE>-255 -> <DE>
558 F17F 1B DCX D ; ZVYSENI DELKY BUFFERU NA 256
559 F180 CD F1B3 CALL INI1 ; <DE> -> RDADR
560 F183 36 00 MVI M,0 ; 0 -> RDPOI
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-10
561 F185 21 0031 LXI H,UREND
562 F188 1B DCX D
563 F189 CD F1B0 CALL INI0 ; <DE> -> UREND
564 F18C 21 01B6 JOIN0: LXI H,PBLKC
565 F18F 11 0000 LXI D,0
566 F192 CD F1B0 CALL INI0 ; 0 -> PBLKC, PFILC
567 F195 CD F1B3 CALL INI1 ; 0 -> RBLKC, RFILC
568 F198 CD F1B3 CALL INI1 ; 0 -> PNSTS, RDSTS
569 F19B 11 F2DB LXI D,KI
570 F19E 0E 02 MVI C,2
571 F1A0 CD F81E CALL IODEF ; NASTAVENI SPOJOVACI ADRESY RI NA KI
572 F1A3 11 F322 LXI D,KO
573 F1A6 0E 04 MVI C,4
574 F1A8 CD F81E CALL IODEF ; NASTAVENI SPOJOVACI ADRESY PO NA KO
575 F1AB 3E 10 MVI A,PASWD
576 F1AD D3 0A OUT ADRPC ; PASIVACE INTERFACE MAGNETOFONU
577 F1AF C9 RET
578 ;
579 F1B0 CD F84E INI0: CALL GETADR ; VYPOCETI ADRESU SKRYTE PROMENNE
580 F1B3 C3 F851 INI1: JMP STJMB ; <E> -> [<HL>]; <D> -> [<HL>+1]; <HL>+2 -> <HL>
581 ;
582 F1B6 E5 INI2: PUSH H
583 F1B7 21 FF01 LXI H,-255
584 F1BA 19 DAD D
585 F1BB EB XCHG ; <DE> - 255 -> <DE>
586 F1BC E1 POP H
587 F1BD C9 RET
588 ;
589 ;
590 ;
591 ; Q U A F F
592 ; =========
593 ;
594 ; PRIKAZ QUAFF SPOUZI KE CTENI BINARNIHO SOUBORU A JEHO ULOZENI
595 ; DO PAMETI SE ZADANYM OFFSETEM.
596 ;
597 F1BE 0D QUAFF: DCR C
598 F1BF CD F827 CALL EXPR ; VSTUP OFFSETU
599 F1C2 CD F4B4 CALL FIND ; OTEVRENI SOUBORU PRO CTENI
600 F1C5 06 00 MVI B,0 ; NULOVANI BUNKY KONTROLNIHO SOUCTU
601 F1C7 CD F72A CALL RINCH ; NACTI PRVNI DATOVY BLOK
602 F1CA F5 PUSH PSW
603 F1CB CD F7B3 CALL GETRDB ; V <HL> ADRESA BUFFERU
604 F1CE 7E MOV A,M ; PRIZNAK BLOKU V <A>
605 F1CF FE 42 CPI 'B' ; BINARNI SOUBOR ?
606 F1D1 CA F1D9 JZ QUA1 ; ANO - POKRACUJ VE CTENI
607 F1D4 FE 04 CPI 04H ; POSLEDNI BLOK ?
608 F1D6 C4 F758 CNZ BREA1 ; NE - CHYBA
609 F1D9 ERR8:
610 F1D9 F1 QUA1: POP PSW
611 F1DA FE 3C CPI '<' ; LEVA ADRESOVA ZAVORKA ?
612 F1DC C4 F758 CNZ BREA1 ; NE - CHYBA
613 F1DF CD F735 ERR9: CALL DRINCH ; KONCOVA ADRESA
614 F1E2 EB XCHG
615 F1E3 CD F735 CALL DRINCH ; POCATECNI ADRESA
616 F1E6 CD F72A CALL RINCH
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-11
617 F1E9 FE 3E CPI '>' ; PRAVA ADRESOVA ZAVORKA ?
618 F1EB C4 F758 CNZ BREA1 ; NE - CHYBA
619 F1EE C5 ERR10: PUSH B
620 F1EF CD F72A CALL RINCH ; KONTROLNI SOUCET ADRESOVE CASTI
621 F1F2 C1 POP B
622 F1F3 B8 CMP B ; KONTROLNI SOUCET SOUHLASI ?
623 F1F4 C2 F758 JNZ BREA1 ; NE - CHYBA
624 F1F7 06 00 ERR11: MVI B,0 ; NULOVANI BUNKY KONTROLNIHO SOUCTU
625 F1F9 E3 XTHL ; OFFSET V <HL>
626 F1FA E5 PUSH H
627 F1FB 19 DAD D ; KONCOVA ADRESA + OFFSET V <HL>
628 F1FC D1 POP D ; OFFSET V <DE>
629 F1FD E3 XTHL ; POCATECNI ADRESA V <HL>
630 F1FE 19 DAD D ; POCATECNI ADRESA + OFFSET V <HL>
631 F1FF D1 POP D ; KONCOVA ADRESA + OFFSET V <DE>
632 F200 CD F72A QUA0: CALL RINCH
633 F203 77 MOV M,A ; ULOZENI BYTU DAT DO PAMETI
634 F204 CD F836 CALL HILO ; <HL>+1 -> <HL>; <HL>=<DE> ?
635 F207 D2 F200 JNC QUA0 ; VSECHNY BYTY PRECTENY ?
636 F20A C5 PUSH B
637 F20B CD F72A CALL RINCH ; KONTROLNI SOUCET DATOVE CASTI
638 F20E C1 POP B
639 F20F B8 CMP B ; KONTROLNI SOUCET SOUHLASI ?
640 F210 C4 F758 CNZ BREA1 ; NE - CHYBA
641 F213 CD F72A ERR12: CALL RINCH
642 F216 FE 1A CPI SUBS ; UKONCOVACI ZNAK ?
643 F218 C4 F758 CNZ BREA1 ; NE - CHYBA
644 F21B CD F7BF ERR13: CALL GETRST ; V <HL> ADRESA STATUSU CTENI
645 F21E 36 00 MVI M,0 ; PASINACE STATUSU CTENI
646 F220 C9 RET
647 ;
648 ;
649 ;
650 ; P U T
651 ; =====
652 ;
653 ; PRIKAZ PRO VYPIS OBLASTI PAMETI O ZADANYCH ADRESACH V BINARNI
654 ; FORME NA KAZETU. SOUBOR NA KAZETE SE ZAPISUJE V BLOCICH. UVODNI
655 ; BLOK OBSAHUJE JMENO SOUBORU A POZNAMKU. NASLEDUJI DATOVE BLOKY,
656 ; Z NICHZ PRVNI OBSAHUJE POCATECNI A KONCOVOU ADRESU. BLOKY MAJI
657 ; KONSTANTNI DELKU A JSOU ODDELENY MAZERAMI DELKY 0.8 S.
658 ;
659 F221 CD F827 PUT: CALL EXPR ; VSTUP DVOU ADRES
660 F224 CD F45E CALL OPEN ; OTEVRENI SOUBORU PRO ZAPIS
661 F227 CD F7B9 PUT1: CALL GETPNB ; V <HL> ADRESA BUFFERU
662 F22A 36 42 MVI M,'B' ; PRIZNAK BINARNIHO SOUBORU
663 F22C 06 00 MVI B,0 ; NULOVANI KONTROLNIHO SOUCTU
664 F22E 0E 3C MVI C,'<' ; LEVA ADRESOVA ZAVORKA
665 F230 CD F715 CALL PUNCH
666 F233 E1 POP H ; KONCOVA ADRESA V <HL>
667 F234 CD F722 CALL DPUNCH ; WYDEROVANI KONCOVE ADRESY
668 F237 E3 XTHL ; POCATECNI ADRESA V <HL>
669 F238 CD F722 CALL DPUNCH ; VYDEROVANI POCATECNI ADRESY
670 F23B 0E 3E MVI C,'>' ; PRAVA ADRESOVA ZAVORKA
671 F23D CD F715 CALL PUNCH
672 F240 48 MOV C,B ; KONTROLNI SOUCET ADRESOVE CASTI
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-12
673 F241 CD F715 CALL PUNCH
674 F244 06 00 MVI B,0 ; NULOVANI BUNKY KONTROLNIHO SOUCTU
675 F246 D1 POP D ; KONCOVA ADRESA V <DE>
676 F247 4E PUT0: MOV C,M ; DATA Z PAMETI
677 F248 CD F715 CALL PUNCH
678 F24B CD F836 CALL HILO ; <HL>+1 -> <HL>; <HL>=<DE> ?
679 F24E D2 F247 JNC PUT0 ; VSECHNY BYTY ?
680 F251 48 MOV C,B ; KONTROLNI SOUCET
681 F252 CD F715 CALL PUNCH
682 F255 0E 1A MVI C,SUBS ; KONCOVY ZNAK
683 F257 CD F715 CALL PUNCH
684 F25A C3 F350 JMP CLOSE ; AZAVRENI SOUBORU
685 ;
686 ;
687 ;
688 ; L O A D
689 ; =======
690 ;
691 ; PRIKAZ LOAD PROVEDE ZAPNUTI MOTORKU MAGNETOFONU (PO KTREM
692 ; SE CEKA 0.3 S NA ROZBEHNUTI), VYPSANI 'REWIND DONE ?' NACEZ
693 ; SE CEKA NA STISKNUTI LIB. KLAVESY. V TETO DOBE LZE PROVADET
694 ; PREVIJENI A POD. PO STISKNUTI KLASVESY SE MOTOREK OPET ZASTAVI.
695 ;
696 ; POSKOZENE REGISTRY: A,F,C
697 ;
698 F25D CD F770 LOAD: CALL SETTR ; SPOSTENI MOTORKU A CEKANI 0.1 S
699 F260 CD F79E CALL DONETX ; ZOBRAZI ' DONE ?' A CEKANI NA KLAVESU
700 F263 C3 F765 JMP RESTR ; ZASTAVENI MOTORKU
701 ;
702 ;
703 ;
704 ; D I R E C T O R Y
705 ; =================
706 ;
707 ; PRIKAZ PROVEDE VYPIS NAZVU A POZNAMEK VSECH SOUBORU
708 ; Z KAZETY NA OBRAZOVKU.
709 ;
710 F266 CD F7BF DIR: CALL GETRST ; V <HL> ADRESA STATUSU CTENI
711 F269 35 DCR M ; AKTIVACE PRIZNAKU CTENI
712 F26A CD F787 CALL PLAYTX ; VYPIS 'PLAY DONE ?' A CEKANI NA KLAVESU
713 F26D CD F824 CALL CRLF
714 F270 21 01B3 DIR0: LXI H,RDADR ; V <HL> ODSTUP BUFFERU
715 F273 37 STC ; PRIZNAK CTENI
716 F274 CD F3FF CALL RDBUF ; CTI BLOK DO BUFFERU
717 F277 CD F7B3 CALL GETRDB ; V <HL> ADRESA BUFFERU
718 F27A 7E MOV A,M
719 F27B FE 3A CPI ':' ; JDE O NAZEV KAZETY ?
720 F27D CA F285 JZ DIR2 ; ANO - VYPIS
721 F280 FE 01 CPI 01H ; JDE O NAZEV SOUBORU ?
722 F282 C2 F270 JNZ DIR0 ; NE - CTI DALSI BLOK
723 F285 E5 DIR2: PUSH H
724 F286 CD F5DD CALL MAMTX ; ZOBRAZ NAZEV
725 F289 E1 POP H
726 F28A 11 000C LXI D,12 ; VYNECH PRIZNAK A NAZEV BLOKU
727 F28D 19 DAD D
728 F28E 7E DIR1: MOV A,M
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-13
729 F28F B7 ORA A
730 F290 CC F824 CZ CRLF
731 F293 CA F270 JZ DIR0 ; NENI POZNAMKA - DALSI SOUBOR
732 F296 4E MOV C,M
733 F297 F4 F809 CP CO ; ZOBRAZENI POZNAMKY
734 F29A 23 INX H
735 F29B C3 F28E JMP DIR1
736 ;
737 ;
738 ;
739 ; U N N A M E D
740 ; =============
741 ;
742 ; PRIKAZ SLOUZI PRO VYTVORENI UVODNIHO BLOKU NA KAZETE, KTERY
743 ; OBSAHUJE JEJI JMENO A POZNAMKU. TENTO BLOK JE SPECIFICKY
744 ; A VYSKYTUJE SE NA KAZETE JEDENKRAT A Z KAZDE STRANY.
745 ;
746 F29E CD F7D9 UNNAM: CALL GETPST ; V <HL> ADRESA STATUSU ZAPISU
747 F2A1 35 DCR M ; AKTIVACE STATUSU ZAPISU
748 F2A2 CD F842 CALL IMTXT
749 F2A5 0D 0A 43 41 DB CR,LF,'CASSETTE',0A0H ; TISK TEXTY
750 F2A9 53 53 45 54
751 F2AD 54 45 A0
752 F2B0 AF XRA A ; NULOVANO FF-C
753 F2B1 CD F4E7 CALL NAMIN ; VSTUP NAZVU A POZNAMKY
754 F2B4 CD F793 CALL RECTX ; VYPIS 'RECORD DONE ?' A CEKANI NA KLAVESU
755 F2B7 21 01B6 LXI H,PBLKC
756 F2BA 11 0000 LXI D,0
757 F2BD CD F1B0 CALL INI0 ; NULOVANI CITACE BLOKU A SOUBORU DEROVACE
758 F2C0 CD F7B9 CALL GETPNB ; V <HL> ADRESA BUFFERU PRO ZAPIS
759 F2C3 36 3A MVI M,':' ; PRIZNAK NAZVU KAZETY
760 F2C5 CD F770 CALL SETTR ; SPUSTENI MAGNETOFONU
761 F2C8 3E 02 MVI A,PC1RES
762 F2CA D3 0B OUT ADRCT ; ODBLOKOVANI CITACU MODEMU
763 F2CC 01 7D00 LXI B,G3LEN
764 F2CF CD F5BA CALL WRGAP ; ZAPIS UVODNI MEZERY 10 S
765 F2D2 CD F398 CALL WRBUF ; ZAPIS BUFFERU NA KAZETU
766 F2D5 CD F7D9 CALL GETPST ; V <HL> ADRESA STATUSU ZAPISU
767 F2D8 36 00 MVI M,0 ; PASIVACE STATUSU ZAPISU
768 F2DA C9 RET
769 ;
770 ;
771 ;
772 ; K I
773 ; ===
774 ;
775 ; PODPROGRAM UMOZNUJICI CTENI JEDNOHO BUTU Z KAZETY PRES
776 ; VYROVNAVACI BUFFER. PRECTENY BYTE JE V <A>. PRIZNAK CHYBY
777 ; FF-C JE NULOVAN, PRI ZNAKU 'SUBS' A PRI ASCII SOUBORU JE
778 ; NASTAVEN DO JEDNICKY (PRIZNAK VYBEHNUTI PASKY ZE SNIMACE).
779 ;
780 ; POSKOZENE REGISTRY: A,F
781 ;
782 F2DB C5 KI: PUSH B
783 F2DC D5 PUSH D
784 F2DD E5 PUSH H
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-14
785 F2DE CD F7BF CALL GETRST ; V <HL> ADRESA STATUSU CTENI, V <A> JEHO HODNOTA
786 F2E1 B7 ORA A ; BYL STATUS CTENI PASIVNI ?
787 F2E2 CC F4B4 CZ FIND ; ANO - OTEVRI SOUBOR PRO CTENI
788 F2E5 21 01B5 LXI H,RDPOI
789 F2E8 CD F7C2 CALL GETC0
790 F2EB E5 PUSH H ; ADRESA POINTRU SNIMACE
791 F2EC FE FF CPI 0FFH ; JE BUFFER PRAZDNY?
792 F2EE C2 F306 JNZ KI0 ; NE - ULOZ BYTE
793 F2F1 CD F7B3 CALL GETRDB ; V <HL> ADRESA BUFFERU SNIMACE
794 F2F4 7E MOV A,M
795 F2F5 FE 04 CPI 04H ; JDE O PRIZNAK KONCOVEHO BLOKU ?
796 F2F7 CA F316 JZ KI2 ; ANO - VYSLI PRIZNAK KONCE SOUBORU
797 F2FA 21 01B3 LXI H,RDADR ; ADRESA BUFFERU PRO CTENI
798 F2FD 37 STC ; PRIZNAK CTENI
799 F2FE CD F3FF CALL RDBUF ; ANO - CTI DALSI BLOK
800 F301 37 STC ; PRIZNAK CTENI
801 F302 CD F568 CALL CMPBUF ; ZOBRAZ NAZEV, KONTROLUJ CISLA BLOKU A SOUBORU
802 F305 AF XRA A ; POINTR NA NULU
803 F306 E1 KI0: POP H
804 F307 3C INR A ; INKREMENTUJ POINTR (NULTY ZNAK = PRIZNAK)
805 F308 77 MOV M,A ; NOVA HODNOTA POINTRU
806 F309 16 00 MVI D,0
807 F30B 5F MOV E,A ; V <DE> POINTR
808 F30C CD F7B3 CALL GETRDB ; V <HL> ADRESA BUFFERU
809 F30F 19 DAD D ; ADRESA NASLEDUJICIHO ZNAKU V BUFFERU
810 F310 7E MOV A,M
811 F311 B7 ORA A ; NULOVANI FF-C
812 F312 E1 KI1: POP H
813 F313 D1 POP D
814 F314 C1 POP B
815 F315 C9 RET
816 F316 E1 KI2: POP H
817 F317 CD F7BF CALL GETRST ; V <HL> ADRESA STATUSU SNIMACE
818 F31A 36 00 MVI M,0 ; PASINACE STATUSU SNIMACE
819 F31C 3E 1A MVI A,SUBS ; ZNAK "KONCE PASKY"
820 F31E 37 STC
821 F31F C3 F312 JMP KI1
822 ;
823 ;
824 ;
825 ; K O
826 ; ===
827 ;
828 ; PODPROGRAM UMOZNUJICI VYSTUP JEDNOHO BYTU MA KAZETU PRES
829 ; VYROVNAVACI BUFFER. VYSTUPNI BYT JE V <C>. PRIZNAK CHYBY
830 ; (FF-C) JE NULOVAN.
831 ;
832 ; POSKOZENE REGISTRY: FF'S
833 ;
834 F322 F5 KO: PUSH PSW
835 F323 D5 PUSH D
836 F324 E5 PUSH H
837 F325 C5 PUSH B
838 F326 CD F7D9 CALL GETPST ; V <A> STATUS ZAPISU
839 F329 B7 ORA A ; JE STATUS ZAPISU PASIVNI ? (FF-C = 0)
840 F32A CC F45E CZ OPEN ; ANO - OTEVRI SOUBOR PRO ZAPIS
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-15
841 F32D CC F5A2 CZ NULBUF ; NULOVANI OBSAHU BUFFERU PRO ZAPIS
842 F330 CD F7D3 CALL GETPPO ; V <HL> ADRESA, V <A> OBSAH UKAZATELE DEROVACE
843 F333 E5 PUSH H
844 F334 FE FF CPI 0FFH ; JE BUFFER PLNY ?
845 F336 C2 F33D JNZ KO0 ; NE - ZAPIS BYTE
846 F339 CD F398 CALL WRBUF ; ZAPIS BUFFERU
847 F33C AF XRA A ; NULOVANI POINTRU
848 F33D E1 KO0: POP H
849 F33E 3C INR A ; INKREMENTACE POINTRU (NULOVY BYTE - PRIZNAK)
850 F33F 77 MOV M,A ; NOVA HODNOTA POINTRU
851 F340 16 00 MVI D,0
852 F342 5F MOV E,A ; V <DE> OBSAH POINTRU
853 F343 CD F7B9 CALL GETPNB ; V <HL> ADRESA BUFFERU
854 F346 19 DAD D ; ADRESA DALSIHO VOLNEHO BYTU
855 F347 C1 POP B
856 F348 C5 PUSH B
857 F349 71 MOV M,C ; ULOZENI DALSIHO BYTU DO BUFFERU
858 F34A C1 POP B
859 F34B E1 POP H
860 F34C D1 POP D
861 F34D F1 POP PSW
862 F34E B7 ORA A ; NULOVANI PRIZNAKU CHYBY
863 F34F C9 RET
864 ;
865 ;
866 ;
867 ; C L O S E
868 ; =========
869 ;
870 ; PODPROGRAM SLOUZI K UZAVRENI ZAPSANEHO SOUBORU.
871 ;
872 F350 E5 CLOSE: PUSH H
873 F351 CD F7D9 CALL GETPST ; V <A> OBSAH V<HL> ADRESA STATUSU ZAPISU
874 F354 B7 ORA A ; JE ZAPISOVY STATUS AKTIVNI ?
875 F355 CC F758 CZ BREA1 ; NENI - CHYBA
876 F358 36 00 ERR14: MVI M,0 ; PASIVACE STATUSU ZAPISU
877 F35A CD F842 CALL IMTXT
878 F35D 0D 0A 43 4C DB CR,LF,'CLOSE','D' OR 80H ; TISK TEXTU 'CLOSED'
879 F361 4F 53 45 C4
880 F365 CD F7B9 CALL GETPNB ; V <DE> ADRESA BUFFERU
881 F368 E5 PUSH H
882 F369 EB XCHG
883 F36A CD F7D3 CALL GETPPO ; V <A> OBSAH UKAZATELE DEROVACE
884 F36D 6F MOV L,A
885 F36E 26 00 MVI H,0 ; V <HL> UKAZATEL
886 F370 EB XCHG
887 F371 19 DAD D ; V <HL> ADRESA POSLEDNIHO ULOZENEHO BYTU
888 F372 1C INR E
889 F373 CA F37D JZ CLOS1 ; SKOK PRI PLNEM BUFFERU
890 F376 23 CLOS0: INX H
891 F377 36 00 MVI M,BLANK ; NULOVANI ZBITKU BUFFERU
892 F379 1C INR E
893 F37A C2 F376 JNZ CLOS0 ; CELY BUFFER ZAPLNEN ?
894 F37D E1 CLOS1: POP H
895 F37E 36 04 MVI M,04H ; PRIZNAK KONCOVEHO BLOKU
896 F380 CD F398 CALL WRBUF ; ZAPIS BUFFERU
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-16
897 F383 E1 POP H
898 F384 C9 RET
899 ;
900 ;
901 ;
902 ; A P P E N D
903 ; ===========
904 ;
905 ; PODPROGRAM PRO ZAPIS BINARNIHO SOUBORU. MA STEJNE CHOVANI JAKO
906 ; PUT S TIM, ZE ZAPISUJE BEZPROSTREDNE BEZ VYHLEDAVANI.
907 ;
908 F385 CD F827 APEND: CALL EXPR ; VSTUP DVOU ADRES
909 F388 21 F227 LXI H,PUT1
910 F38B E5 PUSH H ; NAVRATOVA ADRESA SIMULOVANEHO CALL
911 F38C F5 PUSH PSW
912 F38D CD F7D9 CALL GETPST ; V <HL> ADRESA STATUSU ZAPISU
913 F390 E5 PUSH H
914 F391 CD F7E5 CALL GETPBC ; V <HL> ADRESA CITACE SOUBORU DEROVACE
915 F394 34 INR M ; INKREMENTACE CITACE SOUBORU
916 F395 C3 F487 JMP OPAPP ; SKOK DO OPEN ZA VYHLEDAVANI
917 ;
918 ;
919 ;
920 ;################################################################
921 ;
922 ; OBLAST PODPROGRAMU BLOKOVE UROVNE
923 ; *********************************
924 ;
925 ;
926 ;
927 ; W R B U F
928 ; =========
929 ;
930 ; PODPROGRAM SLOUZI K ZAPISU OBSAHU BUFFERU PRO ZAPIS PNBUF
931 ; NA KAZETU.
932 ;
933 ; POSKOZENE REGISTRY: A,F,B,C,D,E,H,L
934 ;
935 F398 21 01B6 WRBUF: LXI H,PBLKC
936 F39B 3E 0F MVI A,PC7SET
937 F39D D3 0B OUT ADRCT ; ZAPNUTI LED ZAPISU
938 F39F CD F7C2 CALL GETC0
939 F3A2 34 INR M ; INKREMENTACE CITACE BLOKU
940 F3A3 5E MOV E,M ; CITAC BLOKU V <E>
941 F3A4 23 INX H ; V <HL> ADRESA CITACE SOUBORU
942 F3A5 56 MOV D,M ; CITAC SOUBORU V <D>
943 F3A6 CD F7CD CALL GETNM2 ; V <HL> ADRESA OBLASTI NAME2
944 F3A9 E5 PUSH H ; ADRESA OBLASTI S NAZVEM SOUBORU
945 F3AA CD F7B9 CALL GETPNB ; V <HL> JE ADESA BUFFERU
946 F3AD E5 PUSH H
947 F3AE CD F7BF CALL GETRST ; V <HL> ADRESA V <A> OBSAH STATUSU CTENI
948 F3B1 B7 ORA A ; JE AKTIVOVAN STATUS CTENI ?
949 F3B2 C4 F793 CNZ RECTX ; ANO - VYPIS 'RECORD DONE ?' A CEKEJ NA KLAVESU
950 F3B5 E1 POP H ; V <HL> ADRESA BUFFERU
951 F3B6 CD F741 CALL BREAK ; PRERUSIT ?
952 F3B9 CD F770 CALL SETTR ; SPUSTENI MOTORKU
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-17
953 F3BC 3E 02 MVI A,PC1RES
954 F3BE D3 0B OUT ADRCT ; ODBLOKOVANI CITACU MODEMU
955 F3C0 01 0B40 LXI B,G1LEN
956 F3C3 CD F5BA CALL WRGAP ; ZAPIS MEZERI (G1LEN) BITU '1' [73/65]
957 F3C6 3E 10 MVI A,10H ; PREAMBLE [7]
958 F3C8 CD F693 CALL BYTOUT ; [103/50]
959 F3CB 3E 10 MVI A,10H ; DRUHY PREAMBLE [7]
960 F3CD CD F693 CALL BYTOUT ; [103/50]
961 F3D0 3E 10 MVI A,10H ; TRETI PREAMBLE [7]
962 F3D2 CD F693 CALL BYTOUT ; [103/50]
963 F3D5 01 0000 LXI B, (BUFLEN+1) AND 0FFH ; 0 -> <B>; DELKA -> <C> [10]
964 F3D8 CD F6FF CALL WRMEM ; ZAPIS Z PAMETI [125/66]
965 F3DB E1 POP H ; ADRESA NAZVU [10]
966 F3DC 0E 0B MVI C,NAMLEN ; DELKA JMENA [7]
967 F3DE CD F6FF CALL WRMEM ; ZAPIS JMENA [125/66]
968 F3E1 7B MOV A,E ; [5]
969 F3E2 CD F693 CALL BYTOUT ; CISLO BLOKU [103/50]
970 F3E5 7A MOV A,D ; [5]
971 F3E6 CD F693 CALL BYTOUT ; CISLO SOUBORU [103/50]
972 F3E9 78 MOV A,B ; [5]
973 F3EA CD F693 CALL BYTOUT ; KONTROLNI SOUCET [103/50]
974 F3ED 3E 10 MVI A,10H ; [7]
975 F3EF CD F693 CALL BYTOUT ; PREAMBLE [103/50]
976 F3F2 AF XRA A ; [4]
977 F3F3 CD F693 CALL BYTOUT ; ZAPIS 00H [103/50]
978 F3F6 01 00A0 LXI B,G2LEN ; [7]
979 F3F9 CD F5BA CALL WRGAP ; ZAPIS MEZERY (G2LEN) BITU '1' [73/65]
980 F3FC C3 F765 JMP RESTR ; ZASTAV MAGNETOFON
981 ;
982 ;
983 ;
984 ; R D B U F
985 ; =========
986 ;
987 ; PODPROGRAM PRO CTENI Z PASKY BLOKU A ULOZENI HO DO BUFFERU
988 ; DANEHO ODSTUPEM V <HL>. FF-C UDAVA, ZDA JDE O CTENI (FF-C = 1)
989 ; NEBO O ZAPIS (FF-C = 0). BLOK MA PEVNOU STRUKTURU:
990 ;
991 ; M,P,P,P,X,D,J,B,S,K,P,M,...
992 ;
993 ; KDE M JE MEZERA DELKY 0,8 S
994 ; P JE PREAMBLE HODNOTY 10H
995 ; X JE PRIZNAK BLOKU S VYZNAMEM:
996 ; 3AH ... NAZEV KAZETY
997 ; 41H ... ASCII BLOK
998 ; 42H ... BINARNI BLOK
999 ; 01H ... NAZEV SOUBORU A POZNAMKA
1000 ; 04H ... POSLEDNI BLOK SOUBORU
1001 ; D JE 255 BYTU DAT
1002 ; J JE NAZEV DELKY (NAMLEN) ZNAKU ASCII
1003 ; B JE CISLO BLOKU (1-255)
1004 ; S JE CISLO SOUBORU (1-255)
1005 ; K JE KONTROLNI SOUCET (OD X PO B)
1006 ;
1007 ;
1008 ; POSKOZENE REGISTRY: A,F,B,C,H,L
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-18
1009 ;
1010 F3FF D5 RDBUF: PUSH D
1011 F400 E5 PUSH H
1012 F401 3E 0B MVI A,PC5SET
1013 F403 D3 0B OUT ADRCT
1014 F405 21 01B8 LXI H,RBLKC
1015 F408 DA F40E JC RDBU3 ; SKOK PRO CTENI
1016 F40B 21 01B6 LXI H,PBLKC
1017 F40E CD F7C2 RDBU3: CALL GETC0
1018 F411 34 INR M ; INKREMENTACE CITACE BLOKU (PRVNI BLOK ... 1)
1019 F412 5E MOV E,M ; V <E> CITAC BLOKU
1020 F413 23 INX H ; V <HL> ADRESA CITACE SOUBORU (PRVNI SOUBOR ... 0)
1021 F414 56 MOV D,M ; V <D> CITAC SOUBORU
1022 F415 CD F7DF CALL GETTMP ; ADRESA POMOCNE OBLASTI
1023 F418 E3 XTHL ; V <HL> ODSTUP ADRESY BLOKU
1024 F419 CD F526 CALL NAMIA ; V <HL> ADRESA BLOKU
1025 F41C E5 PUSH H
1026 F41D CD F7D9 CALL GETPST ; V <A> STATUS ZAPISU
1027 F420 B7 ORA A ; JE ZAPISOVY STATUS AKTIVNI ?
1028 F421 C4 F787 CNZ PLAYTX ; ANO - VYPIS 'PLAY DONE ?' A CEKEJ NA KLAVESU
1029 F424 E1 POP H ; V <HL> ADRESA BUFFERU
1030 F425 CD F741 CALL BREAK ; PRERUSIT ?
1031 F428 CD F770 CALL SETTR ; SPUSTENI MOTORKU MAGNETOFONU
1032 F42B CD F5C8 RDBU0: CALL SRGAP ; NAJDI MEZERU [79/114]
1033 F42E 0E 03 MVI C,3 ; POCET PREAMBLU [7]
1034 F430 CD F6CA RDBU1: CALL BYTIN ; CTI BYTE [69/89]
1035 F433 FE 10 CPI 10H ; JDE O PREAMBLE ? [7]
1036 F435 C2 F42B JNZ RDBU0 ; NE - HLEDEJ ZNOVU MEZERU [10]
1037 F438 0D DCR C ; VSECHNY BYTY PREAMBLU ? [5]
1038 F439 C2 F430 JNZ RDBU1 ; NE - CTI DALSI BYTE [10]
1039 F43C 01 0000 LXI B,(BUFLEN+1) AND 0FFH ; NULUJ <B>, DELKA DO <C> [10]
1040 F43F CD F709 CALL RDMEM ; CTI DATA DO BUFFERU [86/122]
1041 F442 E1 POP H ; V <HL> ADRESA POMOCNE OBLASTI [10]
1042 F443 0E 0D MVI C,NAMLEN+2 ; DELKA NAZVU + CITACU [7]
1043 F445 CD F709 CALL RDMEM ; CTI JMENO A CITACE DO POM. OBLASTI [86/122]
1044 F448 48 MOV C,B ; KONTROLNI SOUCET DO <C> [5]
1045 F449 CD F6CA CALL BYTIN ; [69/89]
1046 F44C 91 SUB C ; KONTROLNI SOUCET SHODY ? [4]
1047 F44D F5 PUSH PSW ; SCHOVEJ PRIZNAK [11]
1048 F44E CD F6CA CALL BYTIN ; [69/89]
1049 F451 FE 10 CPI 10H ; PREAMBLE ?
1050 F453 C4 F758 CNZ BREA1 ; NE - CHYBA
1051 F456 F1 ERR15: POP PSW ; KONTROLNI SOUCTY SHODNE ?
1052 F457 C4 F758 CNZ BREA1 ; NE - CHYBA
1053 F45A D1 ERR16: POP D
1054 F45B C3 F765 JMP RESTR ; ZASTAV MOTOREK MAGNETOFONU
1055 ;
1056 ;
1057 ;
1058 ; O P E N
1059 ; =======
1060 ;
1061 ; PODPROGRAM SLOUZI K OTEVIRANI SOUBORU PRO ZAPIS. PRO VYHLE-
1062 ; DAVANI SOUBORU SE POUZIVA BUFFER PRO ZAPIS, TAKZE BUFFER PRO
1063 ; CTENI NENI POSKAZEN. UMOZNUJE TO SIMULTANNI NEZAVISLY ZAPIS
1064 ; PRI JIZ PROBIHAJICIM CTENI.
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-19
1065 ;
1066 ; POSKOZENE REGISTRY: H,L
1067 ;
1068 F45E F5 OPEN: PUSH PSW
1069 F45F CD F7D9 CALL GETPST ; V <HL> ADRESA, V <A> OBSAH STATUSU ZAPISU
1070 F462 B7 ORA A ; JE STATUS ZAPISU PASIVNI ?
1071 F463 C4 F758 CNZ BREA1 ; NE - CHYBA
1072 F466 E5 ERR17: PUSH H
1073 F467 CD F842 CALL IMTXT
1074 F46A 0D 0A 4C 41 DB CR,LF,'LAST',0A0H
1075 F46E 53 54 A0
1076 F471 AF XRA A
1077 F472 CD F4E7 CALL NAMIN ; VSTUP JMENA POSLEDNIHO SOUBORU
1078 F475 CD F787 CALL PLAYTX ; ZOBRAZ 'PLAY DONE ?' A CEKEJ NA KLAVESU
1079 F478 21 01B0 LXI H,PNADR
1080 F47B AF XRA A ; NULOVANI FF-C (ZAPIS)
1081 F47C CD F60B CALL SEARCH ; VYHLEDEJ KONEC POSL. SOUBORU
1082 F47F CD F7E5 CALL GETPBC ; NULOVANI CITACE BLOKU, V <HL> ADR. CIT. SOUB.
1083 F482 CD F7EF CALL GETCTN ; OBSAH CITACE SOUBORU DO <A>
1084 F485 77 MOV M,A
1085 F486 34 INR M ; INKREMENTACE CITACE SOUBORU
1086 F487 CD F842 OPAPP: CALL IMTXT
1087 F48A 0D 0A 4E 45 DB CR,LF,'NEW',0A0H
1088 F48E 57 A0
1089 F490 AF XRA A
1090 F491 CD F4E7 CALL NAMIN ; VSTUP JMENA NOVEHO SOUBORU
1091 F494 E1 POP H
1092 F495 35 DCR M ; AKTIVACE PRIZNAKU ZAPISU
1093 F496 CD F7B9 CALL GETPNB ; V <HL> ADRESA BUFFERU
1094 F499 E5 PUSH H
1095 F49A 36 01 MVI M,01H ; PRIZNAK NAZNU SOUBORU
1096 F49C CD F7BF CALL GETRST
1097 F49F B7 ORA A ; JE STATUS ZAPISU PASIVNI ?
1098 F4A0 CC F793 CZ RECTX ; ANO - VYPIS 'RECORD DONE ?' A CEKEJ NA KLAVESU
1099 F4A3 CD F398 CALL WRBUF ; ZAPIS BLOKU SE JMENEM SOUBORU
1100 F4A6 AF XRA A ; NULOVANI FF-C
1101 F4A7 CD F5A2 CALL NULBUF ; VYNULUJ ZAPISOVY BUFFER
1102 F4AA E1 POP H
1103 F4AB 36 41 MVI M,'A' ; PRIZNAK ASCII BLOKU
1104 F4AD CD F7D3 CALL GETPPO ; V <HL> ADRESA UKAZATELE
1105 F4B0 36 00 MVI M,0 ; VYNULOVANI UKAZATELE DEROVACE
1106 F4B2 F1 POP PSW
1107 F4B3 C9 RET
1108 ;
1109 ;
1110 ;
1111 ; F I N D
1112 ; =======
1113 ;
1114 ; PODPROGRAM SLOZI PRI VYHLADANI SOUBORU PRI CTENI.
1115 ;
1116 ; POSKOZENE REGISTRY: A,F,B,C,D,E,H,L,SP
1117 ;
1118 F4B4 CD F7BF FIND: CALL GETRST ; V <HL> ADRESA, V <A> OBSAH STATUSU CTENI
1119 F4B7 B7 ORA A ; JE PRIZNAK CTENI PASIVNI ?
1120 F4B8 C4 F758 CNZ BREA1 ; NE - CHYBA
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-20
1121 F4BB 35 ERR18: DCR M ; AKTIVACE PRIZNAKU CTENI
1122 F4BC CD F824 CALL CRLF
1123 F4BF 37 STC
1124 F4C0 CD F4E7 CALL NAMIN ; VSTUP JMENA SOUBORU
1125 F4C3 CD F7D9 CALL GETPST
1126 F4C6 B7 ORA A ; JE AKTIVNI PRIZNAK ZAPISU ?
1127 F4C7 CC F787 CZ PLAYTX ; NE - VYPIS 'PLAY DONE ?' A CEKEJ NA KLAVESU
1128 F4CA 21 01B5 LXI H,RDPOI
1129 F4CD CD F84E CALL GETADR
1130 F4D0 36 FF MVI M,0FFH ; POC. HODNOTA UKAZATELE BUFFERU SNIMACE
1131 F4D2 21 01B3 LXI H,RDADR
1132 F4D5 37 STC ; NASTAVENI FF-C (CTENI)
1133 F4D6 CD F60B CALL SEARCH ; HLEDEJ SOUBOR
1134 F4D9 21 01B8 LXI H,RBLKC
1135 F4DC CD F84E CALL GETADR ; V <HL> ADRESA CITACE BLOKU
1136 F4DF 36 01 MVI M,1 ; ULOZENI POC. HODNOTY
1137 F4E1 23 INX H ; V <HL> ADRESA CITACE SOUBORU
1138 F4E2 CD F7EF CALL GETCTN ; V <A> CISLO NALEZENEHO SOUBORU
1139 F4E5 77 MOV M,A ; NASTAVENI CITACE SOUBORU
1140 F4E6 C9 RET
1141 ;
1142 ;
1143 ;
1144 ; N A M I N
1145 ; =========
1146 ;
1147 ; PODPROGRAM PRO VSTUP NAZVU SOUBORU A POZNAMKY. VSTUPNIM
1148 ; PARAMETREM JE FF-C. POKUT JE NULOVY, JEDNA SE O ZAPIS
1149 ; A DO ZAPISOVEHO BUFFERU SE UKLADA JMENO A POZNAMKA V
1150 ; CELKOVE DELCE (COMLEN). SOUCASNE PVNICH (NAMLEN) ZNAKU SE
1151 ; POVAZUJE ZA JMENO A UKLADA SE DO OBLASTI NAME2. JE-LI
1152 ; FF-C JEDNICKOVY, JEDNA SE O CTENI A UKLADA SE POUZE
1153 ; (NAMLEN) ZNAKU DO OBLASTI NAME1.
1154 ;
1155 ; POSKOZENE REGISTRY: - - -
1156 ;
1157 F4E7 C5 NAMIN: PUSH B
1158 F4E8 D5 PUSH D
1159 F4E9 E5 PUSH H
1160 F4EA F5 PUSH PSW
1161 F4EB CD F592 CALL NULNAM ; VYNULUJ OBLAST NAME1/NAME2
1162 F4EE CD F842 CALL IMTXT
1163 F4F1 4E 41 4D 45 DB 'NAME',CR,LF,':' OR 80H
1164 F4F5 0D 0A BA
1165 F4F8 06 0B MVI B,NAMLEN ; PAAMETRY PRO CTENI
1166 F4FA CD F7C7 CALL GETNM1 ; V <HL> ADRESA OBLASTI NAME1
1167 F4FD F1 POP PSW
1168 F4FE F5 PUSH PSW
1169 F4FF DA F50B JC NAMI3 ; POKUT CTENI - SKOC
1170 F502 CD F5A2 CALL NULBUF ; VYNULOVANI BUFFERU PRO ZAPIS
1171 F505 06 EF MVI B,COMLEN ; PARAMETRY PRO ZAPIS
1172 F507 CD F7B9 CALL GETPNB ; V <HL> ADRESA ZAPIS. BUFFERU
1173 F50A 23 INX H ; PRI ZAPISE VYNECH MISTO NA PRIZNAK
1174 F50B CD F65A NAMI3: CALL ASCIN ; NACTI NAZEV/POZNAMKU
1175 F50E F1 POP PSW
1176 F50F F5 PUSH PSW
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-21
1177 F510 DA F521 JC NAMI1 ; PRI CTENI - NAVRAT
1178 F513 EB XCHG ; V <DE> ADRESA ULOZENI NAZVU
1179 F514 CD F7CD CALL GETNM2 ; V <HL> ADRESA OBLASTI NAME2
1180 F517 06 0B MVI B,NAMLEN ; CITAC ZNAKU
1181 F519 1A NAMI2: LDAX D ; CTI PISMENO NAZVU
1182 F51A 77 MOV M,A ; ULOZ JE DO OBLASTI NAME2
1183 F51B 13 INX D
1184 F51C 23 INX H
1185 F51D 05 DCR B ; VSECHNY ZNAKY ULOZENY ?
1186 F51E C2 F519 JNZ NAMI2 ; NE - ULOZ DALSI ZNAK
1187 F521 F1 NAMI1: POP PSW
1188 F522 E1 POP H
1189 F523 D1 POP D
1190 F524 C1 POP B
1191 F525 C9 RET
1192 ;
1193 F526 CD F84E NAMIA: CALL GETADR
1194 F529 7E MOV A,M ; [/<HL>/] -> <HL>
1195 F52A 23 INX H
1196 F52B 66 MOV H,M
1197 F52C 6F MOV L,A
1198 F52D C9 RET
1199 ;
1200 ;
1201 ;
1202 ; C M P N A M
1203 ; ===========
1204 ;
1205 ; PODPROGRAM SLOUZI KE SROVNANI DVOU JMEN PRI VYHLEDAVANI.
1206 ; HLAVNIM PRIZNAKEM RIDICIM CINNOST JE FF-C. JE-LI NULOVY,
1207 ; JDE O SROVNANI PRO ZAPIS, JE-LI JEDNICKOVY, JDE O SROVNANI
1208 ; PRO CTENI. PRI SROVNANI PRO ZAPIS SE SROVNAVAJI JMENA
1209 ; UMISTENA V POLI NAME2 (VZOR) A BUFFERU PNADR (OD 2 BYTU).
1210 ; PRI SROVNAVANI PRO CTENI SE SROVNAVAJI JMENA UMISTENA V
1211 ; POLI NAME1 (VZOR) A V BUFFERU RDADR (OD 2 BYTU). CELKEM
1212 ; SE SROVNAVA MAX. NAMLEN PISMEN. POKUT SE VE VZORU VYSKYTNE
1213 ; HVEZDICKA (*), PAK JSOU ZBIVAJICI PISMENA VE JMENECH PROGRAMU
1214 ; NEVYZNAMNA A STACI POUZE SCHODA PRDCHAZEJICICH. HVEZDICKA
1215 ; MUZE BYT I NA PRVEM MISTE. PRI JEJIM VYSKYTU A SPLNENI
1216 ; CASTECNE SHODY SE VYPISE NALEZENE JMENO A DOTAZ (?), VYZA-
1217 ; DUJICI POTVRZENI PISMENEM 'Y' NEBO ZAMITNUTI LIBOVOLNOU
1218 ; JINOU KLAVESOU. VYSLEDEK SROVNANI JE V <FF-Z>.
1219 ;
1220 ; POSKOZENE REGISTRY: A,F
1221 ;
1222 F52E C5 CMPNAM: PUSH B
1223 F52F E5 PUSH H
1224 F530 D5 PUSH D
1225 F531 06 0B MVI B,NAMLEN ; POCET PISMEN JMENA
1226 F533 CD F7C7 CALL GETNM1
1227 F536 11 01B3 LXI D,RDADR
1228 F539 DA F542 JC CMPN0
1229 F53C CD F7CD CALL GETNM2
1230 F53F 11 01B0 LXI D,PNADR
1231 F542 EB CMPN0: XCHG
1232 F543 CD F526 CALL NAMIA ; V <HL> ADRESA BUFFERU, V <DE> ADRESA VZORU
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-22
1233 F546 23 CMPN1: INX H ; UKAZATEL NAZVU
1234 F547 1A LDAX D ; CTI PISMENO ZE VZORU
1235 F548 FE 2A CPI '*' ; JE VA VZORU '*' ?
1236 F54A CA F55E JZ CMPN2 ; ANO - UKONCI SROVNAVANI - DOTAZ NA POTVRZENI
1237 F54D FE A0 CPI ETX
1238 F54F CA F564 JZ CMPN3 ; JE NAZEV KRATSI NEZ NAMLEN ?
1239 F552 BE CMP M ; SROVNANI DALSIHO PISMENA
1240 F553 C2 F564 JNZ CMPN3 ; NESHODA - UKONCI SROVNANI
1241 F556 13 INX D ; UKAZATEL VZORU
1242 F557 05 DCR B ; CITAC PISMEN
1243 F558 C2 F546 JNZ CMPN1 ; DALSI PISMENO
1244 F55B C3 F564 JMP CMPN3
1245 F55E CD F5DD CMPN2: CALL MAMTX ; ZOBRAZ NAZEV
1246 F561 CD F7A6 CALL REQTX ; DOTAZ Y/COKOLI
1247 F564 D1 CMPN3: POP D
1248 F565 E1 POP H
1249 F566 C1 POP B
1250 F567 C9 RET
1251 ;
1252 ;
1253 ;
1254 ; C M P B U F
1255 ; ===========
1256 ;
1257 ; PODPROGRAM PRO ZOBRAZENI NAZVU PRECTENEHO BLOKU PODPROGRAMEM
1258 ; RDBUF DO POMOCNE OBLASTI TMPAR, PRO KONTROLU SOUHLASU CISLA
1259 ; BLOKU A SOUBORU PRECTENICH A OBSAZENYCH V INTERNICH CITACICH.
1260 ;
1261 ; POSKOZENE REGISTRY: - - -
1262 ;
1263 F568 E5 CMPBUF: PUSH H
1264 F569 D5 PUSH D
1265 F56A C5 PUSH B
1266 F56B F5 PUSH PSW
1267 F56C CD F5F2 CALL NAMNUM ; ZOBRAZ NAZEV, CISLO BLOKU A SOUBORU
1268 F56F 2B DCX H ; V <HL> ADRESA CISLA BLOKU
1269 F570 EB XCHG
1270 F571 F1 POP PSW
1271 F572 F5 PUSH PSW
1272 F573 21 01B8 LXI H,RBLKC ; CITAC BLOKU PRI CTENI
1273 F576 DA F57C JC CMPBU0 ; PRI CTENI SKOC
1274 F579 21 01B6 LXI H,PBLKC ; CITAC BLOKU PRI ZAPISU
1275 F57C CD F84E CMPBU0: CALL GETADR ; V <HL> ADRESA CITACE BLOKU
1276 F57F 46 MOV B,M
1277 F580 1A LDAX D
1278 F581 B8 CMP B ; JE PRECTENO CISLO BLOKU SHODNE S OBSAHEM CITACE ?
1279 F582 C4 F758 CNZ BREA1 ; NE - CHYBA
1280 F585 23 ERR19: INX H ; V <HL> ADRESA CISLA SOUBORU
1281 F586 13 INX D ; V <DE> ADRESA CITACE SOUBORU
1282 F587 46 MOV B,M
1283 F588 1A LDAX D
1284 F589 B8 CMP B ; JE PRECTENE CISLO SOUBORU SHODNE S OBSAHEM CT. ?
1285 F58A C4 F758 CNZ BREA1 ; NE - CHYBA
1286 F58D F1 ERR20: POP PSW
1287 F58E C1 POP B
1288 F58F D1 POP D
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-23
1289 F590 E1 POP H
1290 F591 C9 RET
1291 ;
1292 ;
1293 ;
1294 ; N U L N A M
1295 ; ===========
1296 ; PODPROGRAM SPOUZI PRO VUPLNENI OBLASTI NAME1 (FF-C...1)
1297 ; NEBO NAME2 (FF-C...0) MEZERAMI.
1298 ;
1299 ; POSKOZENE REGISTRY: - - -
1300 ;
1301 F592 C5 NULNAM: PUSH B
1302 F593 E5 PUSH H
1303 F594 F5 PUSH PSW
1304 F595 06 0B MVI B,NAMLEN ; DELKA NAZVU
1305 F597 DC F7C7 CC GETNM1
1306 F59A D4 F7CD CNC GETNM2 ; V <HL> ADRESA OBLASTI S JMENEM
1307 F59D 3E 20 MVI A,' ' ; ZAPIS MEZERU
1308 F59F C3 F5B0 JMP NULB1
1309 ;
1310 ;
1311 ;
1312 ; N U L B U F
1313 ; ===========
1314 ;
1315 ; PODPROGRAM PRO VYPLNENI BUFFERU URCENEM <FF-C> BLANKY.
1316 ;
1317 F5A2 C5 NULBUF: PUSH B
1318 F5A3 E5 PUSH H
1319 F5A4 F5 PUSH PSW
1320 F5A5 06 FE MVI B,BUFLEN-1 ; DELKA BUFFERU - 1
1321 F5A7 DC F7B3 CC GETRDB
1322 F5AA D4 F7B9 CNC GETPNB ; V <HL> ADRESA BUFFERU
1323 F5AD 23 INX H ; NEMAZ PRIZNAK BLOKU
1324 F5AE 3E 00 MVI A,BLANK ; ZAPIS 00H
1325 F5B0 77 NULB1: MOV M,A
1326 F5B1 23 INX H
1327 F5B2 05 DCR B ; CELY BUFFER ZAOLNEN ?
1328 F5B3 C2 F5B0 JNZ NULB1 ; NE - DALSI BYTE
1329 F5B6 F1 POP PSW
1330 F5B7 E1 POP H
1331 F5B8 C1 POP B
1332 F5B9 C9 RET
1333 ;
1334 ;
1335 ;
1336 ; W R G A P [73/65]
1337 ; =========
1338 ;
1339 ; PODPROGRAM SLOUZI K ZAPISU MEZERY V DELCE <BC> BITU 01.
1340 ;
1341 ; POSKOZENE REGISTRY: A,F,B,C
1342 ;
1343 F5BA C5 WRGAP: PUSH B ; [11]
1344 F5BB 0E FF MVI C,0FFH ; [7]
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-24
1345 F5BD CD F6B4 CALL BITOUT ; ZAPIS JEDNICKY [38/30]
1346 F5C0 C1 POP B ; [10]
1347 F5C1 0B DCX B ; VSECHNY BYTY ZAPSANY ? [5]
1348 F5C2 78 MOV A,B ; [5]
1349 F5C3 B1 ORA C ; [4]
1350 F5C4 C8 RZ ; [5/11]
1351 F5C5 C3 F5BA JMP WRGAP ; NE - ZAPIS DALSI BIT [10]
1352 ;
1353 ;
1354 ;
1355 ; S R G A P [79/114]
1356 ; =========
1357 ;
1358 ; PODPROGRAM SLOUZI K VYHLEDAVANI MEZERY TAK, ZE CEKA
1359 ; NA SOUVISLOU POSLOUPNOST JEDNICEK V DELCE GAPBIT.
1360 ; NAJDE-LI NULU, HLEDA ZNOVU OD ZACATKU.
1361 ;
1362 ; POSKOZENE REGISTRY: A,F
1363 ;
1364 F5C8 C5 SRGAP: PUSH B ; [11]
1365 F5C9 01 0140 SRGA0: LXI B,GAPBIT ; POCET JEDNICKOVYCH BITU PRO 200 MS [10]
1366 F5CC CD F6F0 SRGA1: CALL BITIN ; [41/95]
1367 F5CF CC F741 CZ BREAK ; PRERUSIT ? [5/11]
1368 F5D2 CA F5C9 JZ SRGA0 ; NENI - HLEDEJ ZNOVU [10]
1369 F5D5 0B DCX B ; NALAZEN POZADOVANY POCET BITU ? [5]
1370 F5D6 78 MOV A,B ; [5]
1371 F5D7 B1 ORA C ; [4]
1372 F5D8 C2 F5CC JNZ SRGA1 ; NE - HLEDEJ ZNOVU [10]
1373 F5DB C1 POP B ; [10]
1374 F5DC C9 RET ; [10]
1375 ;
1376 ;
1377 ;
1378 ; N A M T X
1379 ; =========
1380 ;
1381 ; PODPROGRAM SLOUZI K ZOBRAZENI NAZVU Z POMOCNE OBLASTI
1382 ; TMPAR V DELCE (NAMLEN) ZNAKU.
1383 ;
1384 ; POSKOZENE REGISTRY: A,F,B,C,H,L
1385 ;
1386 F5DD 06 0B MAMTX: MVI B,NAMLEN ; DELKA JMEN
1387 F5DF CD F7DF CALL GETTMP ; V <HL> ADRESA OBLASTI TMPAR
1388 F5E2 CD F824 CALL CRLF
1389 F5E5 4E NAMT0: MOV C,M
1390 F5E6 7E MOV A,M
1391 F5E7 FE 20 CPI 20H
1392 F5E9 D4 F809 CNC CO ; ZOBRAZ ZNAK, IGNORUJ RIDICI ZNAKY
1393 F5EC 23 INX H
1394 F5ED 05 DCR B ; ZOBRAZENY VECHNY ZNAKY ?
1395 F5EE C2 F5E5 JNZ NAMT0 ; NE - ZOBRAZ DALSI
1396 F5F1 C9 RET
1397 ;
1398 ;
1399 ;
1400 ; N A M N U M
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-25
1401 ; ===========
1402 ;
1403 ; PODPROGRAM SLOUZI K ZABRAZENI JMENA SOUBORU Z POMOCNE OBLASTI
1404 ; PAMETI (TMPAR), CISLA BLOKU A CISLA SOUBORU. ZOBRAZUJE NA PRED-
1405 ; CHOZI RADEK.
1406 ;
1407 ; POSKOZENE REGISTRY: A,F,B,C,H,L
1408 ;
1409 F5F2 21 0035 NAMNUM: LXI H,LINECO
1410 F5F5 CD F84E CALL GETADR ; V <HL> ADRESA CITACE RADKU
1411 F5F8 35 DCR M ; SKOK NA PREDCHOZI RADEK
1412 F5F9 CD F5DD CALL MAMTX ; ZOBRAZENI NAZVU, NASTAVENI ADRESY DO <HL>
1413 F5FC CD F83C CALL SPACE
1414 F5FF 7E MOV A,M
1415 F600 CD F833 CALL DBYTE ; ZOBRAZ CISLO BLOKU
1416 F603 CD F83C CALL SPACE
1417 F606 23 INX H
1418 F607 7E MOV A,M
1419 F608 C3 F833 JMP DBYTE ; ZOBRAZ CISLO SOUBORU
1420 ;
1421 ;
1422 ;
1423 ; S E A R C H
1424 ; ===========
1425 ;
1426 ; PODPROGRAM SLOUZI K VYHLEDAVANI SOUBORU URCENEHO NAZVU.
1427 ; VSTUPNI PARAMETR JE FF-C, URCUJICI ZDA JDE O ZAPIS (PAK
1428 ; SE HLEDA KONEC UDANEHO SOUBORU) NEBO CTENI (PAK SE HLEDA
1429 ; PRVNI DATOVY BLOK SOUBORU). V <HL> JE ODSTUP ADRESY BUFFERU,
1430 ; DO KTEREHO SE NACITA PRI HLEDANI. HLEDANI SE DA PRERUSIT ESC.
1431 ; PRI HLEDANI SE ZOBRAZUJI U DATOVYCH BLOKU NAZEV A CISLO.
1432 ;
1433 ; POSKOZENE REGISTRY: A,F,H,L
1434 ;
1435 F60B F5 SEARCH: PUSH PSW
1436 F60C E5 PUSH H
1437 F60D D1 POP D ; V <DE> ODSTUP
1438 F60E D5 SEAR1: PUSH D
1439 F60F E1 POP H ; V <HL> ODSTUP
1440 F610 F1 POP PSW
1441 F611 F5 PUSH PSW
1442 F612 CD F3FF CALL RDBUF ; CTI BLOK DO BUFFERU
1443 F615 D5 PUSH D
1444 F616 E1 POP H ; V <HL> ODSTUP
1445 F617 CD F526 CALL NAMIA ; V <HL> ADRESA BUFFERU
1446 F61A 7E MOV A,M
1447 F61B FE 01 CPI 01H ; PRIZNAK NAZVU SOUBORU ?
1448 F61D CA F637 JZ SEAR2
1449 F620 FE 3A CPI ':' ; PRIZNAK NAZNU KAZETY ?
1450 F622 F5 PUSH PSW
1451 F623 C5 PUSH B
1452 F624 C4 F5F2 CNZ NAMNUM ; ZOBRAZ NAZEV SOUBORU, CISLO BLOKU A SOUBORU
1453 F627 C1 POP B
1454 F628 F1 POP PSW
1455 F629 C2 F60E JNZ SEAR1 ; NE - CTI DALSI BLOK
1456 F62C F1 POP PSW
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-26
1457 F62D F5 PUSH PSW
1458 F62E CD F52E CALL CMPNAM ; SROVNANI NAZVU PRO BLOK ':'
1459 F631 CA F658 JZ SEAR3 ; ZASTAVIT HNED ZA ?
1460 F634 C3 F60E JMP SEAR1 ; NE - CTI DALSI BLOKY
1461 F637 F1 SEAR2: POP PSW
1462 F638 F5 PUSH PSW
1463 F639 CD F52E CALL CMPNAM ; NAZVY JSOU ROVNY ?
1464 F63C C2 F60E JNZ SEAR1 ; NE - CTI DALSI NAZEV
1465 F63F F1 POP PSW
1466 F640 D8 RC ; PRI CTENI NAVRAT
1467 F641 D5 SEAR0: PUSH D
1468 F642 E1 POP H ; V <HL> ODSTUP
1469 F643 B7 ORA A ; PRIZNAK ZAPISU (FF-C=0)
1470 F644 CD F3FF CALL RDBUF ; CTI BLOK
1471 F647 C5 PUSH B
1472 F648 CD F5F2 CALL NAMNUM ; ZOBRAZ JMENO A CISLO
1473 F64B C1 POP B
1474 F64C D5 PUSH D
1475 F64D E1 POP H ; V <HL> ODSTUP
1476 F64E CD F526 CALL NAMIA ; V <HL> ADRESA BUFFERU
1477 F651 3E 04 MVI A,04H ; PRIZNAK KONCOVEHO BLOKU
1478 F653 BE CMP M ; JDE O KONCOVY BLOK ?
1479 F654 C2 F641 JNZ SEAR0 ; NE - CTI DALSI BLOK
1480 F657 C9 RET
1481 ;
1482 F658 F1 SEAR3: POP PSW
1483 F659 C9 RET ; NAVRAT PRO BLOK S NAZVEM KAZETY
1484 ;
1485 ;
1486 ;
1487 ;################################################################
1488 ;
1489 ; OBLAST PODPROGRAMU BYTOVE A BITOVE UROVNE
1490 ; *****************************************
1491 ;
1492 ;
1493 ; A S C I N
1494 ; =========
1495 ;
1496 ; PODPROGRAM PRO VSTUP ASCII ZNAKU V POCTU <B> A JEJICH
1497 ; ULOZENI POCINAJE ADRESOU <HL>. UKLADANI LZE PREDCASNE
1498 ; UKONCIT ZNAKEM CR, DO MONITORU LZE SKOCIT PO STISKNUTI
1499 ; ZNAKU ESC (CTRL [), CHYBNE ZNAKY LZE VYMAZAT ZNAKEM
1500 ; BS (08H). JAKO POSLEDNI ZNAK SE VKLADA ZNAK ETX.
1501 ;
1502 ; POSKOZENE REGISTRY: A,F
1503 ;
1504 F65A C5 ASCIN: PUSH B
1505 F65B E5 PUSH H
1506 F65C 48 MOV C,B ; POCET ZNAKU
1507 F65D CD F803 ASCI0: CALL CI ; VSTUP ZNAKU
1508 F660 FE 0D CPI CR ; JDE O 'CR' ?
1509 F662 CA F68E JZ ASCI3 ; ANO - PREDCASNE UKONCI VKLADANI
1510 F665 FE 1B CPI ESC ; JDE O 'ESC' ?
1511 F667 CC F752 CZ BREA2 ; ANO - SKOC DO MONITORU
1512 F66A FE 08 CPI BS ; JDE O 'BS'
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-27
1513 F66C C2 F682 JNZ ASCI2 ; ANO=VYMAZ, NE=ULOZ ZNAK
1514 F66F 79 ASCI1: MOV A,C
1515 F670 B8 CMP B ; VSECHNY ZNAKY VYMAZANY ?
1516 F671 CA F65D JZ ASCI0 ; ANO - VSTUP DALSIHO ZNAKU
1517 F674 2B DCX H ; UKAZATEL NA STARY ZNAK
1518 F675 04 INR B ; OPRAVA CITACE ZNAKU
1519 F676 CD F857 CALL BACST
1520 F679 CD F83C CALL SPACE
1521 F67C CD F857 CALL BACST ; VYMAZ ZNAKU I NA OBRAZOVCE
1522 F67F C3 F65D JMP ASCI0 ; VSTUP DALSIHO ZNAKU
1523 F682 77 ASCI2: MOV M,A ; ULOZ NOVY ZNAK DO PAMETI
1524 F683 23 INX H ; UKAZATEL
1525 F684 C5 PUSH B
1526 F685 4F MOV C,A
1527 F686 CD F809 CALL CO ; ZOBRAZENI ZNAKU
1528 F689 C1 POP B
1529 F68A 05 DCR B ; CITAC
1530 F68B C2 F65D JNZ ASCI0 ; VSECHNY ZNAKY ULOZENY ?
1531 F68E 36 A0 ASCI3: MVI M,ETX ; PRIZNAK KONCE
1532 F690 E1 POP H
1533 F691 C1 POP B
1534 F692 C9 RET
1535 ;
1536 ;
1537 ;
1538 ; B Y T O U T [103/50]
1539 ; ===========
1540 ;
1541 ; PODPROGRAM PRO ZAPIS BYTU <A> NA KAZETU. BYTE MA TVAR:
1542 ; 0,D7,D6,D5,D4,D3,D2,D1,D0,1,1
1543 ; V <B> SE VYTVARI KONTROLNI SOUCET.
1544 ;
1545 ; POSKOZENE REGISTRY: B,A,F
1546 ;
1547 F693 F5 BYTOUT: PUSH PSW ; [11]
1548 F694 80 ADD B ; [4]
1549 F695 47 MOV B,A ; KONTROLNI SOUCET [5]
1550 F696 F1 POP PSW ; [10]
1551 F697 C5 PUSH B ; [11]
1552 F698 0E 00 MVI C,0 ; [7]
1553 F69A CD F6B4 CALL BITOUT ; START BIT [38/30]
1554 F69D 4F MOV C,A ; [5]
1555 F69E 06 08 MVI B,8 ; CITAC BITU [7]
1556 F6A0 CD F6B4 BYTO0: CALL BITOUT ; [38/30]
1557 F6A3 79 MOV A,C ; [5]
1558 F6A4 0F RRC ; [4]
1559 F6A5 4F MOV C,A ; [5]
1560 F6A6 05 DCR B ; VSECHNY BITY ? [5]
1561 F6A7 C2 F6A0 JNZ BYTO0 ; NE - DALSI BIT [10]
1562 F6AA 0E FF MVI C,0FFH ; [7]
1563 F6AC CD F6B4 CALL BITOUT ; [38/30]
1564 F6AF CD F6B4 CALL BITOUT ; DVA STOP BITY [38/30]
1565 F6B2 C1 POP B ; [10]
1566 F6B3 C9 RET ; [10]
1567 ;
1568 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-28
1569 ;
1570 ; B I T O U T [38/30]
1571 ; ===========
1572 ;
1573 ; PODROGRA PRO ZAPIS BITU <C0> NA KAZETU. BIT SE ZAPISUJE
1574 ; INVERZNE (VYSSI FREKVENCE ODPOVIDA PC0=1).
1575 ;
1576 ; POSKOZENE REGISTRY: - - -
1577 ;
1578 F6B4 F5 BITOUT: PUSH PSW ; [11]
1579 F6B5 DB 08 BITO0: IN ADRPA ; [10]
1580 F6B7 E6 02 ANI 2 ; JE PA1 JEDNICKOVY ? [7]
1581 F6B9 CA F6B5 JZ BITO0 ; NE - CEKEJ NA VZESTUPNOU HRANU [10]
1582 F6BC DB 08 BITO1: IN ADRPA ; [10]
1583 F6BE E6 02 ANI 2 ; JE PA1 NULOVY ? [7]
1584 F6C0 C2 F6BC JNZ BITO1 ; NE - CEKEJ NA SESTUPNOU HRANU [10]
1585 F6C3 79 MOV A,C ; [5]
1586 F6C4 E6 01 ANI 1 ; VYBER <C0> [7]
1587 F6C6 D3 0B OUT ADRCT ; INSTRUKCE NASTAVENI/NULOVANI PC0 [10]
1588 F6C8 F1 POP PSW ; [10] (NYNI INTERFACE ZAPISUJE AUT. DRUHY KMYT)
1589 F6C9 C9 RET ; [10]
1590 ;
1591 ;
1592 ;
1593 ; B Y T I N [69/94]
1594 ; =========
1595 ;
1596 ; PODPROGRAM PRO VSTUP JEDNOHO BYTU Z KAZETY. BYTE MA TVAR:
1597 ;
1598 ; 0 , 1/0 , 1/0 , 1/0 , 1/0 , 1/0 , 1/0 , 1/0 , 1/0 , 1 , 1
1599 ; D7 D6 D5 D4 D3 D2 D1 D0
1600 ; START BIT 2 X STOP BIT
1601 ;
1602 ; POSKOZENE REGISTRY: A,F
1603 ;
1604 F6CA C5 BYTIN: PUSH B ; [11]
1605 F6CB CD F6F0 BYTI2: CALL BITIN ; CTI BIT [41/59]
1606 F6CE C2 F6CB JNZ BYTI2 ; CEKEJ NA NULOVY START BIT [10]
1607 F6D1 01 0800 LXI B,0800H ; CITAC BITU V <B>, POM. BUNKA V <C> [10]
1608 F6D4 CD F6F0 BYTI0: CALL BITIN ; CTI BIT [41/59]
1609 F6D7 B1 ORA C ; SKLADEJ BYTE [4]
1610 F6D8 0F RRC ; [4]
1611 F6D9 4F MOV C,A ; [5]
1612 F6DA 05 DCR B ; VSECH 8 BITU DAT PRECTENO ? [5]
1613 F6DB C2 F6D4 JNZ BYTI0 ; NE - CTI DALSI BIT [10]
1614 F6DE CD F6F0 CALL BITIN ; CTI BIT [41/59]
1615 F6E1 CC F741 CZ BREAK ; NEJDE O JEDNICKOVY STOP BIT - PRERUSIT ? [5/11]
1616 F6E4 CA F6CB JZ BYTI2 ; NULOVY STOP BIT - SPLACHNI BYTE [10]
1617 F6E7 CD F6F0 CALL BITIN ; CTI BIT [41/59]
1618 F6EA CA F6CB JZ BYTI2 ; NEJDE O JEDNICKOVY STOP BIT - SPLACHNI BYTE [10]
1619 F6ED 79 MOV A,C ; V <A> DATA [5]
1620 F6EE C1 POP B ; [10]
1621 F6EF C9 RET ; SPRAVNY NAVRAT - FF-C = 0 [10]
1622 ;
1623 ;
1624 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-29
1625 ; B I T I N [41/60]
1626 ; =========
1627 ;
1628 ; PODPROGRAM PRO CTENI BITU Z KAZETY. BIT SE CTE INVERZNE, TZN.
1629 ; VYSSI KMITOCET MA BIT 0.
1630 ;
1631 ; POSKOZENE REGISTRY: A,F
1632 ;
1633 F6F0 DB 08 BITIN: IN ADRPA ; [10]
1634 F6F2 B7 ORA A ; JE PA7 JEDNICKOVY ? [4]
1635 F6F3 F2 F6F0 JP BITIN ; NE - CEKEJ NA VZESTUPNOU HRANU [10]
1636 F6F6 DB 08 BITI0: IN ADRPA ; [10]
1637 F6F8 B7 ORA A ; JE PA7 NULOVY ? [4]
1638 F6F9 FA F6F6 JM BITI0 ; NE - CEKEJ NA SESTUPNOU HRANU [10]
1639 F6FC E6 01 ANI 01H ; VYBER DATOVY PA0 [7]
1640 F6FE C9 RET ; [10]
1641 ;
1642 ;
1643 ;
1644 ; W R M E M [125/66]
1645 ; =========
1646 ;
1647 ; PODPROGRAM PRO ZAPIS OBLASTI PAMETI, ZACINAJICI ADRESOU
1648 ; V <HL> A DELKY <C> BYTU.
1649 ;
1650 ; POSKOZENE REGISTRY: A,F,B,C,H,L
1651 ;
1652 F6FF 7E WRMEM: MOV A,M ; CTI BYTE Z PAMETI [5]
1653 F700 CD F693 CALL BYTOUT ; ZAPIS NA KAZETU [103/50]
1654 F703 0D DCR C ; VSECHNY BYTY ZAPSANY ? [5]
1655 F704 C8 RZ ; ANO - NAVRAT [5/11]
1656 F705 23 INX H ; [5]
1657 F706 C3 F6FF JMP WRMEM ; NE - ZAPIS DALSI BYTE [10]
1658 ;
1659 ;
1660 ;
1661 ; R D M E N [86/122]
1662 ; =========
1663 ;
1664 ; PODPROGRAM KE CTENI DAT V POCTU <C> BUTU A JEJICH ULOZENI
1665 ; DO PAMETI POCINAJE ADRESOU <HL>. KONTROLNI SOUCET VYTVARI V <B>.
1666 ;
1667 ; POSKOZENE REGISTRY: A,F,B,C,H,L
1668 ;
1669 F709 CD F6CA RDMEM: CALL BYTIN ; CTI BYTE Z KAZETY [69/89]
1670 F70C 77 MOV M,A ; ULOZ DO PAMETI [7]
1671 F70D 80 ADD B ; [5]
1672 F70E 47 MOV B,A ; KONTR. SOUCET DO <B> [5]
1673 F70F 0D DCR C ; VSECHNY RYTY PRECTENY ? [5]
1674 F710 C8 RZ ; ANO - NAVRAT [5/11]
1675 F711 23 INX H ; [5]
1676 F712 C3 F709 JMP RDMEM ; NE - CTI DALSI BYTE [10]
1677 ;
1678 ;
1679 ;
1680 ; P U N C H
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-30
1681 ; =========
1682 ;
1683 ; PODPROGRAM VYDEROVANI BYTU DAT A VYTVORENI KONTROLNIHO SOUCTU.
1684 ;
1685 ; POSKOZENE REGISTRY: A,B,F
1686 F715 CD F741 PUNCH: CALL BREAK ; PRERUSIT ?
1687 F718 79 MOV A,C
1688 F719 80 ADD B
1689 F71A 47 MOV B,A ; VYTVORENI KONTROLNIHO SOUCTU
1690 F71B CD F80C CALL PO
1691 F71E DC F758 CC BREA1 ; CHYBA ?
1692 F721 C9 ERR22: RET
1693 ;
1694 ;
1695 ;
1696 ; D P U N C H
1697 ; ===========
1698 ;
1699 ; PODPROGRAM VYDEROVANI DVOU BYTE DAT Z <HL>.
1700 ;
1701 ; POSKOZENE REGISTRY: A,B,F
1702 ;
1703 F722 4D DPUNCH: MOV C,L
1704 F723 CD F715 CALL PUNCH
1705 F726 4C MOV C,H
1706 F727 C3 F715 JMP PUNCH
1707 ;
1708 ;
1709 ;
1710 ; R I N C H
1711 ; =========
1712 ;
1713 ; PODPROGRAM PRECTENI BYTU DAT A VYTVORENI KONTROLNIHO SOUCTU.
1714 ;
1715 F72A CD F741 RINCH: CALL BREAK ; PRERUSIT ?
1716 F72D CD F806 CALL RI
1717 F730 F5 PUSH PSW
1718 F731 80 ADD B
1719 F732 47 MOV B,A ; VYTVORENI KONTROLNI SOUCET
1720 F733 F1 POP PSW
1721 F734 C9 RET
1722 ;
1723 ;
1724 ;
1725 ; D R I N C H
1726 ; ===========
1727 ;
1728 ; PODPROGRAM PRO PRECTENI DVOU BYTU A ULOZENI DO <HL>.
1729 ;
1730 ; POSKOZENE REGISTRY: A,H,L
1731 ;
1732 F735 CD F72A DRINCH: CALL RINCH
1733 F738 6F MOV L,A
1734 F739 CD F72A CALL RINCH
1735 F73C 67 MOV H,A
1736 F73D C9 RET
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-31
1737 F73E FE 41 CPI 'A' ; JDE A ASCII BLOK ?
1738 F740 C9 RET
1739 ;
1740 ;
1741 ;
1742 ;################################################################
1743 ;
1744 ; OBLAST POMOCNYCH PODPROGRAMU
1745 ; ****************************
1746 ;
1747 ;
1748 ;
1749 ; B R E A K
1750 ; =========
1751 ;
1752 ; PODPROGRAM BREAK SLEDUJE, ZDA BYLA STISKNUTA KLAVESA CTRL [
1753 ; TJ. ESC. POKUT NE, PROVEDE NAVRAT BEZ POSKOZENI REGISTRU.
1754 ; POKUT ANO, PROVEDE INICIACI MAGNETOFONU, VYPISE '#', SKOCI
1755 ; DO OBSLUHY PRUSENI (VYPISE OBSAH REGISTRU) A SKOCI DO
1756 ; MONITORU. NAVIC SE PRI CHYBE ROZNE PRISLUSNA LED.
1757 ;
1758 ; POSKOZENE REGISTRY: - - -
1759 ;
1760 F741 F5 BREAK: PUSH PSW
1761 F742 CD F812 CALL CSTS
1762 F745 C4 F74A CNZ BREA0
1763 F748 F1 POP PSW
1764 F749 C9 RET
1765 ;
1766 F74A CD F803 BREA0: CALL CI
1767 F74D FE 1B CPI ESC ; JDE O 'ESC' = CTRL [
1768 F74F C0 RNZ ; NE - NAVRAT
1769 F750 F1 POP PSW
1770 F751 F1 POP PSW ; NA VRCHOL ZASOBNIKU PUVODNI NANR. ADRESA
1771 F752 CD F758 BREA2: CALL BREA1 ; ZOBRAZ KOD CHYBY
1772 F755 C3 F839 ERR21: JMP NEXT ; SKOK DO MONITORU
1773 ;
1774 F758 F5 BREA1: PUSH PSW
1775 F759 CD F82A CALL ERROR ; ZOBRAZ "#"
1776 F75C CD F824 CALL CRLF
1777 F75F 3E 0D MVI A,PC6SET
1778 F761 D3 0B OUT ADRCT ; ROZNUTI LED CHYBA
1779 F763 F1 POP PSW
1780 F764 C9 RET
1781 ;
1782 ;
1783 ;
1784 ; R E S T R
1785 ; =========
1786 ;
1787 ; PODPROGRAM PRO VYPNUTI MOTORKU MAGNETOFONU A ZABLOKOVANI
1788 ; MODEMU. NEOVLIVNI STAV LED CHYBA.
1789 ;
1790 ; POSKOZENE REGISTRY: - - -
1791 ;
1792 F765 F5 RESTR: PUSH PSW
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-32
1793 F766 DB 0A IN ADRPC
1794 F768 E6 40 ANI 01000000B ; VYBER PRIZNAK CHYBY
1795 F76A F6 10 ORI 00010000B ; PASIVACE INTRFACE MAGNETOFONU
1796 F76C D3 0A OUT ADRPC
1797 F76E F1 POP PSW
1798 F76F C9 RET
1799 ;
1800 ;
1801 ;
1802 ; S E T T R
1803 ; =========
1804 ;
1805 ; PODPROGRAM PRO SPOSTENI MOTORKU MAGNETOFONU, PO SPOSTENI
1806 ; CEKA WAITTR MS NA ROZBEHNUTI.
1807 ;
1808 ; POSKOZENE REGISTRY: - - -
1809 ;
1810 F770 F5 SETTR: PUSH PSW
1811 F771 C5 PUSH B
1812 F772 3E 07 MVI A,PC3SET
1813 F774 D3 0B OUT ADRCT ; SPOSTENI MOTORKU
1814 F776 01 0064 LXI B,WAITTR
1815 F779 CD F84B CALL TIMER ; CEKEJ
1816 F77C DB 0A IN ADRPC
1817 F77E E6 E0 ANI 11100000B ; VYBER PRIZNAK CHYBY, CTENI A ZAPISU
1818 F780 F6 0F ORI 00001111B ; NASTAV GENERACI JEDNICKY
1819 F782 D3 0A OUT ADRPC ; GENERACE '1'
1820 F784 C1 POP B
1821 F785 F1 POP PSW
1822 F786 C9 RET
1823 ;
1824 ;
1825 ;
1826 ; P L A Y T X
1827 ; ===========
1828 ;
1829 ; PODPROGRAM SLOUZI K VYPSANI TEXTU 'PLAY '
1830 ;
1831 ; POSKOZENE REGISTRY: A,F,C,H,L
1832 ;
1833 F787 CD F842 PLAYTX: CALL IMTXT
1834 F78A 0D 0A 50 4C DB CR,LF,'PLA','Y' OR 80H ; ZOBRAZ TEXT
1835 F78E 41 D9
1836 F790 C3 F79E JMP DONETX ; ZOBRAZ 'DONE'
1837 ;
1838 ;
1839 ;
1840 ; R E C T X
1841 ; =========
1842 ;
1843 ; PODPROGRAM SLOUZI K ZOBRAZENI TEXTU 'RECORD '.
1844 ;
1845 ; POSKOZENE REGISTRY: A,F,C,H,L
1846 ;
1847 F793 CD F842 RECTX: CALL IMTXT
1848 F796 0D 0A 52 45 DB CR,LF,'RECOR','D' OR 80H ; ZOBRAZ TEXT
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-33
1849 F79A 43 4F 52 C4
1850 ;
1851 ;
1852 ;
1853 ; D O N E T X
1854 ; ===========
1855 ;
1856 ; PODPROGRAM SLOUZI K ZOBRAZENI TEXTU 'DONE '.
1857 ;
1858 ; POSKOZENE REGISTRY: A,F,C,H,L
1859 ;
1860 F79E CD F842 DONETX: CALL IMTXT
1861 F7A1 20 44 4F 4E DB ' DON','E' OR 80H ; ZOBRAZ TEXT
1862 F7A5 C5
1863 ;
1864 ;
1865 ;
1866 ; R E Q T X
1867 ; =========
1868 ;
1869 ; PODPROGRAM K ZOBRAZENI '?' A CEKANI NA KLAVESU. ZNAK SROVNA
1870 ; S 'Y' A NASTAVY <FF-Z>.
1871 ;
1872 ; POSKOZENE REGISTRY: A,F,C,H,L
1873 ;
1874 F7A6 CD F842 REQTX: CALL IMTXT
1875 F7A9 20 3F 3A 87 DB ' ?:',BELL OR 80H ; ZOBRAZ '?:'
1876 F7AD CD F854 CALL ECHO ; VSTUP A ZOBRAZENI ZNAKU
1877 F7B0 FE 59 CPI 'Y' ; JDE O 'Y'
1878 F7B2 C9 RET
1879 ;
1880 ;
1881 ;
1882 ; G E T R D B
1883 ; ===========
1884 ;
1885 ; PODPROGRAM ULOZI DO <HL> ADRESU BUFFERU SNIMACE.
1886 ;
1887 ; POSKOZENE REGISTRY: H,L
1888 ;
1889 F7B3 21 01B3 GETRDB: LXI H,RDADR
1890 F7B6 C3 F526 JMP NAMIA
1891 ;
1892 ;
1893 ;
1894 ; G E T P N B
1895 ; ===========
1896 ;
1897 ; PODPROGRAM ULOZI DO <HL> ADRESU BUFFERU DEROVACE.
1898 ;
1899 ; POSKOZENE REGISTRY: H,L
1900 ;
1901 F7B9 21 01B0 GETPNB: LXI H,PNADR
1902 F7BC C3 F526 JMP NAMIA
1903 ;
1904 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-34
1905 ;
1906 ; G E T R S T
1907 ; ===========
1908 ;
1909 ; PODPROGRAM ULOZI ADRESU STATUSU CTENI DO <HL> A JEHO HODNOTU
1910 ; DO <A>.
1911 ;
1912 ; POSKOZENE REGISTRY: H,L,A,F
1913 ;
1914 F7BF 21 01BB GETRST: LXI H,RDSTS
1915 F7C2 CD F84E GETC0: CALL GETADR
1916 F7C5 7E MOV A,M
1917 F7C6 C9 RET
1918 ;
1919 ;
1920 ;
1921 ; G E T N M 1
1922 ; ===========
1923 ;
1924 ; PODPROGRAM ULOZI ADRESU OBLASTI NAME1 DO <HL>.
1925 ;
1926 ; POSKOZENE REGISTRY: H,L
1927 ;
1928 F7C7 21 0130 GETNM1: LXI H,NAME1
1929 F7CA C3 F84E JMP GETADR
1930 ;
1931 ;
1932 ;
1933 ; G E T N M 2
1934 ; ===========
1935 ;
1936 ; PODPROGRAM ULOZI ADRESU OBLASTI NAME2 DO <HL>
1937 ;
1938 ; POSKOZENE REGISTRY: H,L
1939 ;
1940 F7CD 21 0170 GETNM2: LXI H,NAME2
1941 F7D0 C3 F84E JMP GETADR
1942 ;
1943 ;
1944 ;
1945 ; G E T P P O
1946 ; ===========
1947 ;
1948 ; PODPROGRAM ULOZI ADRESU UKAZATELE DEROVACE DO <HL>, JEHO
1949 ; OBSAH DO <A>.
1950 ;
1951 ; POSKOZENE REGISTRY: A,F,H,L
1952 ;
1953 F7D3 21 01B2 GETPPO: LXI H,PNPOI
1954 F7D6 C3 F7C2 JMP GETC0
1955 ;
1956 ;
1957 ;
1958 ; G E T P S T
1959 ; ===========
1960 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-35
1961 ; PODPROGRAM ULOZI ADRESU STATUSU ZAPISU DO <HL> A JEHO
1962 ; HODNOTU DO <A>.
1963 ;
1964 ; POSKOZENE REGISTRY: A,F,H,L
1965 F7D9 21 01BA GETPST: LXI H,PNSTS
1966 F7DC C3 F7C2 JMP GETC0
1967 ;
1968 ;
1969 ;
1970 ; G E T T M P
1971 ; ===========
1972 ;
1973 ; PODPROGRAM UMISTI DO <HL> ADRESU POMOCNE OBLASTI TMPAR
1974 ;
1975 ; POSKOZENE REGISTRY: H,L
1976 ;
1977 F7DF 21 01F0 GETTMP: LXI H,TMPAR
1978 F7E2 C3 F84E JMP GETADR
1979 ;
1980 ;
1981 ;
1982 ; G E T P B C
1983 ; ===========
1984 ;
1985 ; PODPROGRAM VYNULUJE CITACE BLOKU A DO <HL> ULOZI ADRESU CITACE
1986 ; SOUBORU.
1987 ;
1988 ; POSKOZENE REGISTRY: A,F,H,L
1989 ;
1990 F7E5 21 01B6 GETPBC: LXI H,PBLKC
1991 F7E8 CD F84E CALL GETADR
1992 F7EB 36 00 MVI M,0
1993 F7ED 23 INX H
1994 F7EE C9 RET
1995 ;
1996 ;
1997 ;
1998 ; G E T C T N
1999 ; ===========
2000 ;
2001 ; PODPROGRAM ULOZI CISLO SOUBORU NAPOSLED PRECTENEHO BLOKU
2002 ; POPROGRAMEM RDBUF DO <A>.
2003 ;
2004 ; POSKOZENE REGISTRY: A,F
2005 ;
2006 F7EF E5 GETCTN: PUSH H
2007 F7F0 D5 PUSH D
2008 F7F1 CD F7DF CALL GETTMP ; ADRESA POMOCNE OBLASTI
2009 F7F4 11 000C LXI D,12 ; ODSTUP CISLA SOUBORU
2010 F7F7 19 DAD D
2011 F7F8 7E MOV A,M
2012 F7F9 D1 POP D
2013 F7FA E1 POP H
2014 F7FB C9 RET
2015 ;
2016 ;
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE 1-36
2017 ;
2018 ;################################################################
2019 ;
2020 ;
2021 ;
2022 F7FC FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
2023 .DEPHASE
2024 END
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE S
Macros:
Symbols:
0004 ADRCIN 000B ADRCT 0000 ADRDCT
F845 ADRKUR 0008 ADRPA 0009 ADRPB
000A ADRPC F385 APEND F65D ASCI0
F66F ASCI1 F682 ASCI2 F68E ASCI3
F65A ASCIN F82D ASHEX F857 BACST
0007 BELL F6F6 BITI0 F6F0 BITIN
F6B5 BITO0 F6BC BITO1 F6B4 BITOUT
0000 BLANK F74A BREA0 F758 BREA1
F752 BREA2 F741 BREAK 0008 BS
00FF BUFLEN F6D4 BYTI0 F6CB BYTI2
F6CA BYTIN F6A0 BYTO0 F693 BYTOUT
F803 CI F83F CINCR F376 CLOS0
F37D CLOS1 F350 CLOSE F57C CMPBU0
F568 CMPBUF F542 CMPN0 F546 CMPN1
F55E CMPN2 F564 CMPN3 F52E CMPNAM
F809 CO F800 COLDST 00EF COMLEN
000D CR F824 CRLF F812 CSTS
0092 CTRLWD F830 DADR F833 DBYTE
007F DEL F266 DIR F270 DIR0
F28E DIR1 F285 DIR2 F79E DONETX
F722 DPUNCH F735 DRINCH F854 ECHO
F0AA EER1 F1EE EER10 F1F7 EER11
F213 EER12 F21B EER13 F358 EER14
F456 EER15 F45A EER16 F466 EER17
F4BB EER18 F585 EER19 F032 EER2
F58D EER20 F755 EER21 F721 EER22
F0EA EER3 F0F5 EER4 F10A EER5
F139 EER6 F170 EER7 F1D9 EER8
F1DF EER9 F13C EOF 0003 EOT
F0AA ERR1 F1EE ERR10 F1F7 ERR11
F213 ERR12 F21B ERR13 F358 ERR14
F456 ERR15 F45A ERR16 F466 ERR17
F4BB ERR18 F585 ERR19 F032 ERR2
F58D ERR20 F755 ERR21 F721 ERR22
F0EA ERR3 F0F5 ERR4 F10A ERR5
F139 ERR6 F170 ERR7 F1D9 ERR8
F1DF ERR9 F82A ERROR 001B ESC
00A0 ETX F827 EXPR F4B4 FIND
0B40 G1LEN 00A0 G2LEN 7D00 G3LEN
0140 GAPBIT F84E GETADR F7C2 GETC0
F7EF GETCTN F7C7 GETNM1 F7CD GETNM2
F7E5 GETPBC F7B9 GETPNB F7D3 GETPPO
F7D9 GETPST F7B3 GETRDB F7BF GETRST
F7DF GETTMP F836 HILO F848 HXASC
F842 IMTXT F1B0 INI0 F1B3 INI1
F1B6 INI2 F821 INTER F815 IOCHK
F81E IODEF F818 IOSET F155 JOIN
F18C JOIN0 F2DB KI F306 KI0
F312 KI1 F316 KI2 F322 KO
F33D KO0 000A LF 0035 LINECO
F80F LO F25D LOAD F5DD MAMTX
F81B MEMCK 0130 NAME1 0170 NAME2
'OVLADACI PROGRAM MODEMU MAGNETOFONU V.3.X' MACRO-80 3.44 09-Dec-81 PAGE S-1
F521 NAMI1 F519 NAMI2 F50B NAMI3
F526 NAMIA F4E7 NAMIN 000B NAMLEN
F5F2 NAMNUM F5E5 NAMT0 F839 NEXT
F5B0 NULB1 F5A2 NULBUF F592 NULNAM
F487 OPAPP F45E OPEN 0010 PASWD
F06C PBEG 01B6 PBLKC F089 PBYTE
0000 PC0RES 0001 PC0SET 0002 PC1RES
0003 PC1SET 0006 PC3RES 0007 PC3SET
0008 PC4RES 0009 PC4SET 000A PC5RES
000B PC5SET 000C PC6RES 000D PC6SET
000E PC7RES 000F PC7SET 01B7 PFILC
F787 PLAYTX 01B0 PNADR 01B2 PNPOI
01BA PNSTS F80C PO F0A4 POC
F715 PUNCH F221 PUT F247 PUT0
F227 PUT1 F200 QUA0 F1D9 QUA1
F1BE QUAFF 01B8 RBLKC 01B3 RDADR
F42B RDBU0 F430 RDBU1 F40E RDBU3
F3FF RDBUF F709 RDMEM 01B5 RDPOI
01BB RDSTS 0008 RDYCIN F0AB READ
F0B4 READ1 F0B6 READ2 F0F8 READ3
F0E2 READ4 F11A READ5 F793 RECTX
F7A6 REQTX F765 RESTR 01B9 RFILC
F806 RI F133 RIC F72A RINCH
F641 SEAR0 F60E SEAR1 F637 SEAR2
F658 SEAR3 F60B SEARCH F770 SETTR
F83C SPACE 0020 SPC F5C9 SRGA0
F5CC SRGA1 F5C8 SRGAP F851 STJMB
001A SUBS F000 TAPREC F84B TIMER
01F0 TMPAR F29E UNNAM 0031 UREND
0064 WAITTR F398 WRBUF F5BA WRGAP
F039 WRIT1 F04E WRIT2 F051 WRIT3
F05A WRIT4 F02B WRITE F6FF WRMEM
No Fatal error(s)
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1
1 TITLE 'PLAN80A TINY BASIC V3Q'
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 ;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
24 ;X X
25 ;X X
26 ;X PLAN-80A V.3.Q 27.09.88 X
27 ;X X
28 ;X T I N Y B A S I C X
29 ;X X
30 ;X X
31 ;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-1
57 ;*************************************************
58 ;
59 ; ZAKLADNI ADRESY
60 ;
61 0006 UZIRAM EQU 0006H ; ZACATEK UZIVATELSKE RAM
62 0004 RAMEND EQU 0004H ; ADR. OBSAHUJICI KONEC RAM
63 E000 BASIC EQU 0E000H ; POCATECNI ADRESA TINY BASICU
64 F028 TCLOSE EQU 0F028H ; UZAVRI SOUBOR
65 F004 JOIN0 EQU 0F004H ; INICIUJ MAGNETOFON
66 F000 ADRTPR EQU 0F000H ; POCATECNI ADRESA PROGRAMU MAGNETOFONU
67 ;
68 ; SPOJOVACI ADRESY NA MONITOR
69 ;
70 F803 CI EQU 0F803H ; VSTUP Z KONZOLY (A)
71 F809 COM EQU 0F809H ; VYSTUP NA KONZOLU (C)
72 F806 RI EQU 0F806H ; VSTUP ZE SNIMACE (MAGNETOFONU) (A)
73 F80C PO EQU 0F80CH ; VYSTUP NA DEROVAC (MAGNETOFON) (C)
74 F80F LO EQU 0F80FH ; VYSTUP NA TISKARNU (C)
75 F812 CSTS EQU 0F812H ; STAV KONZOLY (A)
76 F81B MEMCHK EQU 0F81BH ; KONEC UZIVATELSKE RAM (B,A)
77 F839 NEXTM EQU 0F839H ; TEPLY START MONITORU
78 F83C SPACE EQU 0F83CH ; ZOBRAZ MEZERU
79 F830 DADR EQU 0F830H ; VYPIS (HL) JAKO ASCII
80 F833 DBYTE EQU 0F833H ; VYPIS (A) JAKO ASCII
81 F82D ASHEX EQU 0F82DH ; ASCII NA HEX NIBBLE
82 F845 ADRKUR EQU 0F845H ; ADRESA KURZORU (HL)
83 F84B TIMER EQU 0F84BH ; PODPROGRAM CEKANI <BC> MS
84 ;
85 ; DEFINICE KONSTANT
86 ;
87 000D CR EQU 0DH ; CR
88 000A LF EQU 0AH ; LF
89 0003 CTRLC EQU 03H ; CTRL C
90 0018 CTRLX EQU 18H ; CTRL X
91 0004 CTRLD EQU 04H ; CTRL D
92 0019 CTRLY EQU 19H ; CTRL Y
93 0013 CTRLS EQU 13H ; CTRL S
94 0018 DOWN EQU 18H ; SIPKA DOLU
95 0008 LEFT EQU 08H ; SIPKA VLEVO
96 0004 RIGHT EQU 04H ; SIPKA VPRAVO
97 007F RUB EQU 7FH ; VYMAZ (DEL)
98 001A SUBS EQU 1AH ; SUB
99 0008 BS EQU 08H ; ZPETNY POSUV
100 0200 KILO EQU 512 ; KONSTANTA PRO RAM < 1 KBYTE
101 000C FF EQU 0CH ; NOVA STRANKA
102 0007 BELL EQU 07H ; ZVONEK
103 001B ESC EQU 1BH ; CTRL [
104 001D HOME EQU 1DH ; LEVY HORNI ROH OBRAZOVKY
105 001E DL EQU 1EH ; VYMAZ RADKY
106 001F DSCR EQU 1FH ; VYMAZ OBRAZOVKY
107 001A SUBS EQU 1AH ; CTRL Z
108 0035 LINECO EQU 35H ; CITAC LINEK
109 0055 KEYTPR EQU 55H ; PRIZNAK MAGNETOFONU
110 ;
111 ;*************************************************
112 ;
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-2
113 ;
114 .PHASE BASIC
115 ;
116 E000 C3 E01B BASPET: JMP START ; STUDENY START BASIC
117 E003 C3 E03E JMP RSTART ; TEPLY START BASIC
118 ;
119 E006 33 INTSTA: INX SP ; START PO BREAKU - RST 7
120 E007 33 INX SP ; OBNOVENI SP
121 E008 C3 E03E JMP RSTART
122 ;
123 E00B 2A 003B TOP: LHLD TXTUNF
124 E00E 23 INX H
125 E00F C9 RET
126 ;
127 E010 2A 0006 LENGHT: LHLD LEGT
128 E013 2B DCX H
129 E014 C9 RET
130 ;
131 E015 CD E7CF BEND: CALL ENDCHK
132 E018 C3 E03E JMP RSTART
133 ;
134 ; START
135 ;
136 E01B F3 START: DI
137 E01C 2A 0004 LHLD RAMEND ; KONEC PROGRAMOVE RAM V <HL>
138 E01F 2B DCX H
139 E020 2B DCX H
140 E021 F9 SPHL ; NASTAV SP
141 E022 CD EB81 CALL DISP ; CO:=CO
142 E025 AF XRA A ; A:=0
143 E026 32 0026 STA MODE ; FORMAT ZNAKU:= OBYCEJNY
144 E029 11 E0D8 LXI D,MSG1
145 E02C CD E893 CALL PRTSTG ; OHLASENI BASICU
146 E02F 21 009B LXI H,TXTBGN
147 E032 22 003B SHLD TXTUNF ; INICIACE UKAZATELE KONCE PROGRAMU
148 E035 CD E0CF CALL USREND ; V <HL> KONEC UZIVATELSKE OBLASTI RAM
149 E038 C3 E9F5 JMP RAM1 ; NASTAV RAM V BASICU
150 E03B 22 0027 START1: SHLD TXTEND
151 ;
152 ; RSTART - PRIHRATY START
153 ;
154 E03E CD E974 RSTART: CALL CRLF
155 E041 2A 0004 RSTAR1: LHLD RAMEND
156 E044 2B DCX H
157 E045 2B DCX H ; V <HL> (KONEC PROGRAMOVE RAM -2)
158 E046 F9 SPHL ; NASTAV SP
159 E047 3E C3 MVI A,0C3H ; OBSLUHA RST 7 TO RAM
160 E049 32 0038 STA RST7RA
161 E04C 21 E006 LXI H,INTSTA
162 E04F 22 0039 SHLD RST7RA+1
163 E052 11 E33D LXI D,OK ; DE:=ADR TEXTU 'READY'
164 E055 97 SUB A ; A:=0
165 E056 32 0026 STA MODE
166 E059 2F CMA ; A:=0FFH
167 E05A 32 000F STA MASKIN
168 E05D CD E893 CALL PRTSTG ; 'READY' NA OBRAZOVKU
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-3
169 E060 21 E067 LXI H,ST2+1
170 E063 22 0010 SHLD CURRNT
171 E066 21 0000 ST2: LXI H,0
172 E069 22 0018 SHLD LOPVAR ; POINTER PRO 'FOR':=0
173 E06C 22 0012 SHLD STKGOS
174 E06F 06 5C ST3: MVI B,5CH ; 5CH JAKO PROMT NA ZACATKU RADKU
175 E071 CD E811 CALL GETLN ; PREVEZMI RADEK BASIC Z KLAVESNICE
176 E074 D5 ST5: PUSH D ; V <DE> ADRESA POSL. ZNAKU + 1
177 E075 CD E9D8 CALL DBUFF ; V <DE> ADRESA BUFFERU
178 E078 CD E307 CALL TSTNUM ; VSTUP CISLA DO <HL>, V <DE> ADR. DAL. ZN.
179 E07B CD E2B0 CALL IGNB ; VYNECH MEZERY
180 E07E 7C MOV A,H
181 E07F B5 ORA L ; JE CISLO NULOVE
182 E080 C1 POP B ; V <BC> ADRESA POSL. ZNAKU + 1
183 E081 CA E9A5 JZ DIRECT ; PRI NULOVEM CISLE PROVED IHNED
184 E084 1B DCX D
185 E085 7C MOV A,H
186 E086 12 STAX D
187 E087 1B DCX D
188 E088 7D MOV A,L
189 E089 12 STAX D ; ZAPIS CISLO RADKU BINARNE
190 E08A C5 EDIST: PUSH B
191 E08B D5 PUSH D
192 E08C 79 MOV A,C
193 E08D 93 SUB E
194 E08E F5 PUSH PSW ; V <A> POCET ZNAKU
195 E08F CD E869 CALL FNDLN ; NAJDI ADRESU RADKU <HL>
196 E092 D5 PUSH D
197 E093 C2 E0A6 JNZ ST4 ; TAKOVY RADEK JESTE NENI - SKOC
198 E096 D5 PUSH D
199 E097 CD E887 CALL FNDNXT ; NAJDI ADRESU DALSIHO RADKU
200 E09A C1 POP B
201 E09B 2A 003B LHLD TXTUNF ; V <HL> ADRESA KONCE PROGRAMU
202 E09E CD E90F CALL MVUP ; STARY RADEK ZNIC
203 E0A1 60 MOV H,B
204 E0A2 69 MOV L,C
205 E0A3 22 003B SHLD TXTUNF ; NOVY KONEC PROGRAMU
206 E0A6 C1 ST4: POP B
207 E0A7 2A 003B LHLD TXTUNF
208 E0AA F1 POP PSW ; V <A> POCET ZNAKU
209 E0AB E5 PUSH H
210 E0AC FE 03 CPI 3 ; PRAZDNY RADEK ?
211 E0AE CA E03E JZ RSTART ; ANO - RESTART
212 E0B1 85 ADD L
213 E0B2 6F MOV L,A
214 E0B3 3E 00 MVI A,0
215 E0B5 8C ADC H
216 E0B6 67 MOV H,A ; NOVY KONEC PROGRAMU V <HL>
217 E0B7 CD E9E0 CALL DTXTE ; MAXIMALNI ADRESA V <DE>
218 E0BA CD E2AA CALL COMP ; PRETECENI ?
219 E0BD D2 E80A JNC QSORRY ; ANO - CHYBA
220 E0C0 22 003B SHLD TXTUNF ; NOVY KONEC PROGRAMU V <HL>
221 E0C3 D1 POP D ; ADRESA RADKU V <DE>
222 E0C4 CD E91A CALL MVDOWN ; VLOZ RADEK
223 E0C7 D1 POP D
224 E0C8 E1 POP H
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-4
225 E0C9 CD E90F CALL MVUP
226 E0CC C3 E06F JMP ST3
227 ;
228 ; ZJISTENI KONCE UZIVATELSKE OBLASTI PAMETI RAM
229 ;
230 E0CF C5 USREND: PUSH B
231 E0D0 CD F81B CALL MEMCHK
232 E0D3 60 MOV H,B
233 E0D4 6F MOV L,A
234 E0D5 2B DCX H
235 E0D6 C1 POP B
236 E0D7 C9 RET
237 ;
238 E0D8 20 20 54 49 MSG1: DB ' TINY BASIC V3Q',0
239 E0DC 4E 59 20 42
240 E0E0 41 53 49 43
241 E0E4 20 56 33 51
242 E0E8 00
243 ;
244 ; TABULKA KLICOVICH SLOV
245 ;
246 E0E9 4C 49 53 54 TAB1: DB 'LIST',0
247 E0ED 00
248 E0EE E39B DW LIST
249 E0F0 4C 4C 49 53 DB 'LLIST',0
250 E0F4 54 00
251 E0F6 E398 DW LLIST
252 E0F8 52 55 4E 00 DB 'RUN',0
253 E0FC E358 DW RUN
254 E0FE 4E 45 57 00 DB 'NEW',0
255 E102 E34F DW NEW
256 E104 4D 4F 4E 49 TXMON: DB 'MONITOR',0
257 E108 54 4F 52 00
258 E10C EBB1 DW MONIT
259 E10E 52 41 4D 00 DB 'RAM',0
260 E112 E9F2 DW RAM
261 E114 4C 4F 41 44 DB 'LOAD',0
262 E118 00
263 E119 EEEC DW LOAD
264 E11B 53 41 56 45 DB 'SAVE',0
265 E11F 00
266 E120 EF1E DW SAVE
267 E122 4E 45 58 54 TAB2: DB 'NEXT',0
268 E126 00
269 E127 E4ED DW NEXT
270 E129 4C 45 54 00 DB 'LET',0
271 E12D E5FE DW LET
272 E12F 43 4C 53 00 DB 'CLS',0
273 E133 E991 DW CLS
274 E135 43 4C 45 41 DB 'CLEAR',0
275 E139 52 00
276 E13B E55D DW CLEAR
277 E13D 48 41 52 44 DB 'HARD',0
278 E141 00
279 E142 E38C DW HARD
280 E144 44 49 53 50 DB 'DISPL',0
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-5
281 E148 4C 00
282 E14A E392 DW DISPL
283 E14C 49 46 00 DB 'IF',0
284 E14F E571 DW IFF
285 E151 47 4F 54 4F DB 'GOTO',0
286 E155 00
287 E156 E37B DW GOTO
288 E158 47 4F 53 55 DB 'GOSUB',0
289 E15C 42 00
290 E15E E44B DW GOSUB
291 E160 52 45 54 55 DB 'RETURN',0
292 E164 52 4E 00
293 E167 E46D DW RETURN
294 E169 52 45 4D 00 DB 'REM',0
295 E16D E54E DW REM
296 E16F 46 4F 52 00 DB 'FOR',0
297 E173 E488 DW FOR
298 E175 49 4E 50 55 DB 'INPUT',0
299 E179 54 00
300 E17B E58C DW INPUT
301 E17D 50 52 49 4E DB 'PRINT',0
302 E181 54 00
303 E183 E3E9 DW PRINT
304 E185 4C 50 52 49 DB 'LPRINT',0
305 E189 4E 54 00
306 E18C E3E6 DW LPRINT
307 E18E 45 4E 44 00 DB 'END',0
308 E192 E015 DW BEND
309 E194 53 54 4F 50 DB 'STOP',0
310 E198 00
311 E199 EB65 DW STOP
312 E19B 43 41 4C 4C DB 'CALL',0
313 E19F 00
314 E1A0 EA18 DW BCALL
315 E1A2 4F 55 54 43 DB 'OUTCHAR',0
316 E1A6 48 41 52 00
317 E1AA EB13 DW OUTCHR
318 E1AC 4F 55 54 00 DB 'OUT',0
319 E1B0 EA25 DW BOUT
320 E1B2 4F 24 00 DB 'O$',0
321 E1B5 EA84 DW O
322 E1B7 49 24 00 DB 'I$',0
323 E1BA EA91 DW I
324 E1BC 57 41 49 54 DB 'WAIT',0
325 E1C0 00
326 E1C1 EBB4 DW WAIT
327 E1C3 42 45 45 50 DB 'BEEP',0
328 E1C7 00
329 E1C8 EBC1 DW BEEP
330 E1CA 50 4F 4B 45 DB 'POKE',0
331 E1CE 00
332 E1CF EAC9 DW POKE
333 E1D1 4D 41 53 4B DB 'MASK',0
334 E1D5 00
335 E1D6 E9E8 DW MASK
336 E1D8 54 41 42 00 DB 'TAB',0
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-6
337 E1DC EA4B DW TAB
338 E1DE 42 59 54 45 DB 'BYTE',0
339 E1E2 00
340 E1E3 EADE DW BYTE
341 E1E5 57 4F 52 44 DB 'WORD',0
342 E1E9 00
343 E1EA EAE8 DW WORD
344 E1EC 50 55 54 00 DB 'PUT',0
345 E1F0 EF5D DW PUT
346 E1F2 43 4C 4F 53 DB 'CLOSE',0
347 E1F6 45 00
348 E1F8 EF70 DW CLOSE
349 E1FA 49 4E 49 54 DB 'INIT',0
350 E1FE 00
351 E1FF EF80 DW INIT
352 E201 50 4C 4F 54 DB 'PLOT',0
353 E205 00
354 E206 EBE6 DW PLOT
355 E208 44 52 41 57 DB 'DRAW',0
356 E20C 00
357 E20D EC92 DW DRAW
358 E20F 4D 4F 56 45 DB 'MOVE',0
359 E213 00
360 E214 ED6F DW MOVE
361 E216 43 55 52 53 DB 'CURS',0
362 E21A 00
363 E21B ED95 DW CURS
364 E21D 45 44 49 54 DB 'EDIT',0
365 E221 00
366 E222 EDC3 DW EDIT
367 E224 00 DB 0
368 E225 E5F8 DW DEFLT
369 E227 52 4E 44 00 TAB4: DB 'RND',0
370 E22B E71C DW RND
371 E22D 41 42 53 00 DB 'ABS',0
372 E231 E74F DW ABS
373 E233 53 49 5A 45 DB 'SIZE',0
374 E237 00
375 E238 E758 DW SIZE
376 E23A 50 45 45 4B DB 'PEEK',0
377 E23E 00
378 E23F EAC2 DW PEEK
379 E241 49 4E 43 48 DB 'INCHAR',0
380 E245 41 52 00
381 E248 EB1D DW INCHAR
382 E24A 48 45 58 00 DB 'HEX',0
383 E24E EB29 DW HEX
384 E250 49 4E 4D 00 DB 'INM',0
385 E254 EA61 DW INM
386 E256 49 4E 00 DB 'IN',0
387 E259 EA5C DW BIN
388 E25B 27 00 DB 27H,0 ; UVOZOVKA '
389 E25D EB05 DW QUOTE
390 E25F 54 4F 50 00 DB 'TOP',0
391 E263 E00B DW TOP
392 E265 41 52 45 4D DB 'AREM',0
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-7
393 E269 00
394 E26A E559 DW AREM
395 E26C 4C 45 4E 00 DB 'LEN',0
396 E270 E010 DW LENGHT
397 E272 47 45 54 00 DB 'GET',0
398 E276 EF54 DW GET
399 E278 00 DB 0
400 E279 E6FA DW XP40
401 E27B 54 4F 00 TAB5: DB 'TO',0
402 E27E E498 DW FR1
403 E280 00 DB 0
404 E281 E7D5 DW QWHAT
405 E283 53 54 45 50 TAB6: DB 'STEP',0
406 E287 00
407 E288 E4A4 DW FR2
408 E28A 00 DB 0
409 E28B E4AA DW FR3
410 E28D 3E 3D 00 TAB8: DB '>=',0
411 E290 E616 DW XP11
412 E292 23 00 DB '#',0
413 E294 E61C DW XP12
414 E296 3E 00 DB '>',0
415 E298 E622 DW XP13
416 E29A 3D 00 DB '=',0
417 E29C E631 DW XP15
418 E29E 3C 3D 00 DB '<=',0
419 E2A1 E629 DW XP14
420 E2A3 3C 00 DB '<',0
421 E2A5 E637 DW XP16
422 E2A7 00 DB 0
423 E2A8 E63D DW XP17
424 ;
425 ; COMP POROVNANI <HL> A <DE>
426 ; <HL> < <DE> ... CARRY
427 ; <HL> = <DE> ... ZERO
428 ;
429 E2AA 7C COMP: MOV A,H
430 E2AB BA CMP D
431 E2AC C0 RNZ
432 E2AD 7D MOV A,L
433 E2AE BB CMP E
434 E2AF C9 RET
435 ;
436 ; IGNB VYNECHANI MAEZER PODLE <DE>
437 ;
438 E2B0 1A IGNB: LDAX D
439 E2B1 FE 20 CPI ' '
440 E2B3 C0 RNZ
441 E2B4 13 INX D
442 E2B5 C3 E2B0 JMP IGNB
443 ;
444 ; FINI
445 ;
446 E2B8 F1 FINI: POP PSW
447 E2B9 CD E7BC CALL FIN
448 E2BC C3 E7D5 JMP QWHAT
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-8
449 ;
450 ; INDEXOVANA PROMENA
451 ;
452 E2BF CD E2B0 TSTV: CALL IGNB
453 E2C2 D6 40 SUI 40H
454 E2C4 D8 RC
455 E2C5 C2 E2E3 JNZ TV1
456 E2C8 13 INX D
457 E2C9 CD E70B CALL PARN
458 E2CC 29 DAD H
459 E2CD DA E331 JC QHOW
460 E2D0 D5 PUSH D
461 E2D1 EB XCHG
462 E2D2 CD E758 CALL SIZE
463 E2D5 CD E2AA CALL COMP
464 E2D8 DA E80B JC ASORRY
465 E2DB 2A 0027 LHLD TXTEND
466 E2DE CD E77B CALL SUBDE
467 E2E1 D1 POP D
468 E2E2 C9 RET
469 ;
470 ; VYPOCET ADRESY ULOZENI PROMENE
471 ;
472 E2E3 FE 1B TV1: CPI 1BH
473 E2E5 3F CMC
474 E2E6 D8 RC
475 E2E7 13 INX D
476 E2E8 21 0065 LXI H,VARBGN
477 E2EB 07 RLC
478 E2EC 85 ADD L
479 E2ED 6F MOV L,A
480 E2EE 3E 00 MVI A,0
481 E2F0 8C ADC H
482 E2F1 67 MOV H,A
483 E2F2 C9 RET
484 ;
485 ; TSTC POROVNANI TEXTU PODLE <DE> SE ZNAKEM
486 ; KTERY JE ZA CALL+3. JE-LI SHODNY POKRACUJE
487 ; SE NA CALL+5, JINAK NA ADRESE CALL+N+2.
488 ; N JE NA ADRESE CALL...+4
489 ;
490 E2F3 E3 TSTC: XTHL
491 E2F4 CD E2B0 CALL IGNB
492 E2F7 BE CMP M
493 E2F8 23 INX H
494 E2F9 CA E303 JZ TC2
495 E2FC C5 PUSH B
496 E2FD 4E MOV C,M
497 E2FE 06 00 MVI B,0
498 E300 09 DAD B
499 E301 C1 POP B
500 E302 1B DCX D
501 E303 13 TC2: INX D
502 E304 23 INX H
503 E305 E3 XTHL
504 E306 C9 RET
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-9
505 ;
506 ; TSTNUM PREVOD ASCII CISLA Z BUFFERU
507 ; NA BINARNI CISLO V <HL>, V <DE> ADRESA DALSIHO ZNAKU.
508 ;
509 E307 21 0000 TSTNUM: LXI H,0
510 E30A 44 MOV B,H
511 E30B CD E2B0 CALL IGNB ; VYNECH MEZERY
512 E30E FE 30 TN1: CPI '0' ; NULA ?
513 E310 D8 RC
514 E311 FE 3A CPI 3AH
515 E313 D0 RNC
516 E314 3E F0 MVI A,0F0H
517 E316 A4 ANA H
518 E317 C2 E331 JNZ QHOW
519 E31A 04 INR B
520 E31B C5 PUSH B
521 E31C 44 MOV B,H
522 E31D 4D MOV C,L
523 E31E 29 DAD H
524 E31F 29 DAD H
525 E320 09 DAD B
526 E321 29 DAD H
527 E322 1A LDAX D
528 E323 13 INX D
529 E324 E6 0F ANI 0FH
530 E326 85 ADD L
531 E327 6F MOV L,A
532 E328 3E 00 MVI A,0
533 E32A 8C ADC H
534 E32B 67 MOV H,A
535 E32C C1 POP B
536 E32D 1A LDAX D
537 E32E F2 E30E JP TN1
538 ;
539 ; QHOW OTAZKA HOW
540 ;
541 E331 D5 QHOW: PUSH D
542 E332 11 E338 AHOW: LXI D,HOW
543 E335 C3 E7D9 JMP ERROR
544 ;
545 ; TEXTY OTAZEK
546 ;
547 E338 48 4F 57 3F HOW: DB 'HOW?',CR
548 E33C 0D
549 E33D 52 45 41 44 OK: DB 'READY',CR
550 E341 59 0D
551 E343 57 48 41 54 WHAT: DB 'WHAT?',CR
552 E347 3F 0D
553 E349 53 4F 52 52 SORRY: DB 'SORRY',CR
554 E34D 59 0D
555 ;
556 ; NEW
557 ;
558 E34F CD E7CF NEW: CALL ENDCHK
559 E352 21 009B LXI H,TXTBGN
560 E355 22 003B SHLD TXTUNF
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-10
561 ;
562 ; RUN
563 ;
564 E358 CD E7CF RUN: CALL ENDCHK
565 E35B 11 009B LXI D,TXTBGN
566 E35E 21 0000 RUNNXL: LXI H,0
567 E361 CD E871 CALL FNDLP
568 E364 DA E03E JC RSTART
569 E367 EB RUNTSL: XCHG
570 E368 22 0010 SHLD CURRNT
571 E36B EB XCHG
572 E36C 13 INX D
573 E36D 13 INX D
574 E36E AF RUNSML: XRA A
575 E36F 32 0026 STA MODE ; NORMALNI ZNAK
576 E372 CD EB57 CALL CONT
577 E375 21 E121 LXI H,TAB2-1
578 E378 C3 E9A8 JMP EXEC
579 ;
580 ; GOTO
581 ;
582 E37B CD E60C GOTO: CALL EXPR
583 E37E D5 PUSH D
584 E37F CD E7CF CALL ENDCHK
585 E382 CD E869 CALL FNDLN
586 E385 C2 E332 JNZ AHOW
587 E388 F1 POP PSW
588 E389 C3 E367 JMP RUNTSL
589 ;
590 ; HARD
591 ;
592 E38C CD EB7A HARD: CALL PRNTST
593 E38F CD E2B8 CALL FINI
594 ;
595 ; DISPL
596 ;
597 E392 CD EB81 DISPL: CALL DISP
598 E395 CD E2B8 CALL FINI
599 ;
600 ; LIST
601 ;
602 E398 CD EB7A LLIST: CALL PRNTST
603 E39B CD E307 LIST: CALL TSTNUM
604 E39E 3E FF MVI A,0FFH
605 E3A0 32 000B STA LISTC
606 E3A3 CD E2B0 CALL IGNB
607 E3A6 FE 0D CPI CR
608 E3A8 C2 E3C9 JNZ LS4
609 E3AB CD E869 LS0: CALL FNDLN
610 E3AE DA E3E0 LS1: JC LS6
611 E3B1 3A 000B LDA LISTC
612 E3B4 FE FF CPI 0FFH
613 E3B6 CA E3BD JZ LS5
614 E3B9 3D DCR A
615 E3BA CA E03E JZ RSTART
616 E3BD 32 000B LS5: STA LISTC
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-11
617 E3C0 CD E8FA LS3: CALL PRTLN
618 E3C3 CD E871 CALL FNDLP
619 E3C6 C3 E3AE JMP LS1
620 E3C9 FE 2B LS4: CPI '+'
621 E3CB C2 E3AB JNZ LS0
622 E3CE 13 INX D
623 E3CF CD E2B0 CALL IGNB
624 E3D2 E5 PUSH H
625 E3D3 CD E307 CALL TSTNUM
626 E3D6 7D MOV A,L
627 E3D7 3C INR A
628 E3D8 3C INR A
629 E3D9 32 000B STA LISTC
630 E3DC E1 POP H
631 E3DD C3 E3AB JMP LS0
632 E3E0 CD EB81 LS6: CALL DISP
633 E3E3 C3 E041 JMP RSTAR1
634 ;
635 ; PRINT
636 ;
637 E3E6 CD EB7A LPRINT: CALL PRNTST
638 E3E9 0E 08 PRINT: MVI C,8
639 E3EB CD E2F3 CALL TSTC ; JDE O ":" ?
640 E3EE 3A DB ':'
641 E3EF 09 DB 9
642 E3F0 CD E974 CALL CRLF ; ANO - VICENASOBNY PRIKAZ
643 E3F3 CD EB81 CALL DISP
644 E3F6 C3 E36E JMP RUNSML
645 E3F9 CD E2F3 PR1: CALL TSTC ; JDE O CR ?
646 E3FC 0D DB CR
647 E3FD 09 DB 9
648 E3FE CD E974 CALL CRLF ; ANO - KONEC PRIKAZU
649 E401 CD EB81 PR6: CALL DISP
650 E404 C3 E35E JMP RUNNXL
651 E407 CD E2F3 PR0: CALL TSTC ; JDE O "*" ?
652 E40A 2A DB '*'
653 E40B 0E DB 14
654 E40C CD E60C CALL EXPR ; ANO - VSTUP PARAMETRU ZOBRAZENI
655 E40F 7D MOV A,L
656 E410 0F RRC
657 E411 0F RRC
658 E412 E6 C0 ANI 0C0H
659 E414 32 0026 STA MODE ; NASTAV REZIM ZOBRAZENI (0-NORM, 1-INVER)
660 E417 C3 E42C JMP PR3
661 E41A CD E2F3 CALL TSTC ; JDE O "#" ?
662 E41D 23 DB '#'
663 E41E 07 DB 7
664 E41F CD E60C CALL EXPR ; ANO - VSTUP PARAMETU IND. PROMENNE
665 E422 4D MOV C,L
666 E423 C3 E42C JMP PR3
667 E426 CD E8A1 CALL QTSTG
668 E429 C3 E440 JMP PR8
669 E42C CD E2F3 PR3: CALL TSTC ; JDE O "," ?
670 E42F 2C DB ','
671 E430 06 DB 6
672 E431 CD E7BC CALL FIN ; ANO - DALSI ARGUMENT
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-12
673 E434 C3 E407 JMP PR0
674 E437 CD E974 CALL CRLF
675 E43A CD EB81 CALL DISP
676 E43D CD E2B8 CALL FINI
677 E440 CD E60C PR8: CALL EXPR ; ZOBRAZ CISLO
678 E443 C5 PUSH B
679 E444 CD E8B6 CALL PRTNUM
680 E447 C1 POP B
681 E448 C3 E42C JMP PR3
682 ;
683 ; GOSUB
684 ;
685 E44B CD E945 GOSUB: CALL PUSHA
686 E44E CD E60C CALL EXPR
687 E451 D5 PUSH D
688 E452 CD E869 CALL FNDLN
689 E455 C2 E332 JNZ AHOW
690 E458 2A 0010 LHLD CURRNT
691 E45B E5 PUSH H
692 E45C 2A 0012 LHLD STKGOS
693 E45F E5 PUSH H
694 E460 21 0000 LXI H,0
695 E463 22 0018 SHLD LOPVAR
696 E466 39 DAD SP
697 E467 22 0012 SHLD STKGOS
698 E46A C3 E367 JMP RUNTSL
699 ;
700 ; RETURN
701 ;
702 E46D CD E7CF RETURN: CALL ENDCHK
703 E470 2A 0012 LHLD STKGOS
704 E473 7C MOV A,H
705 E474 B5 ORA L
706 E475 CA E7D5 JZ QWHAT
707 E478 F9 SPHL
708 E479 E1 POP H
709 E47A 22 0012 SHLD STKGOS
710 E47D E1 POP H
711 E47E 22 0010 SHLD CURRNT
712 E481 D1 POP D
713 E482 CD E929 CALL POPA
714 E485 CD E2B8 CALL FINI
715 ;
716 ; FOR
717 ;
718 E488 CD E945 FOR: CALL PUSHA
719 E48B CD E7A3 CALL SETVAL
720 E48E 2B DCX H
721 E48F 22 0018 SHLD LOPVAR
722 E492 21 E27A LXI H,TAB5-1
723 E495 C3 E9A8 JMP EXEC
724 ;
725 E498 CD E60C FR1: CALL EXPR
726 E49B 22 001C SHLD LOPLMT
727 E49E 21 E282 LXI H,TAB6-1
728 E4A1 C3 E9A8 JMP EXEC
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-13
729 ;
730 E4A4 CD E60C FR2: CALL EXPR
731 E4A7 C3 E4AD JMP FR4
732 ;
733 E4AA 21 0001 FR3: LXI H,1
734 E4AD 22 001A FR4: SHLD LOPINC
735 E4B0 2A 0010 LHLD CURRNT
736 E4B3 22 001E SHLD LOPLN
737 E4B6 EB XCHG
738 E4B7 22 0020 SHLD LOPPT
739 E4BA 01 000A LXI B,LF
740 E4BD 2A 0018 LHLD LOPVAR
741 E4C0 EB XCHG
742 E4C1 60 MOV H,B
743 E4C2 68 MOV L,B
744 E4C3 39 DAD SP
745 E4C4 3E DB 3EH
746 E4C5 09 FR7: DAD B
747 E4C6 7E MOV A,M
748 E4C7 23 INX H
749 E4C8 B6 ORA M
750 E4C9 CA E4E6 JZ FR8
751 E4CC 7E MOV A,M
752 E4CD 2B DCX H
753 E4CE BA CMP D
754 E4CF C2 E4C5 JNZ FR7
755 E4D2 7E MOV A,M
756 E4D3 BB CMP E
757 E4D4 C2 E4C5 JNZ FR7
758 E4D7 EB XCHG
759 E4D8 21 0000 LXI H,0
760 E4DB 39 DAD SP
761 E4DC 44 MOV B,H
762 E4DD 4D MOV C,L
763 E4DE 21 000A LXI H,LF
764 E4E1 19 DAD D
765 E4E2 CD E91A CALL MVDOWN
766 E4E5 F9 SPHL
767 E4E6 2A 0020 FR8: LHLD LOPPT
768 E4E9 EB XCHG
769 E4EA CD E2B8 CALL FINI
770 ;
771 ; NEXT
772 ;
773 E4ED CD E2BF NEXT: CALL TSTV
774 E4F0 DA E7D5 JC QWHAT
775 E4F3 22 0014 SHLD VARNXT
776 E4F6 D5 NX0: PUSH D
777 E4F7 EB XCHG
778 E4F8 2A 0018 LHLD LOPVAR
779 E4FB 7C MOV A,H
780 E4FC B5 ORA L
781 E4FD CA E7D6 JZ AWHAT
782 E500 CD E2AA CALL COMP
783 E503 CA E510 JZ NX3
784 E506 D1 POP D
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-14
785 E507 CD E929 CALL POPA
786 E50A 2A 0014 LHLD VARNXT
787 E50D C3 E4F6 JMP NX0
788 E510 5E NX3: MOV E,M
789 E511 23 INX H
790 E512 56 MOV D,M
791 E513 2A 001A LHLD LOPINC
792 E516 E5 PUSH H
793 E517 7C MOV A,H
794 E518 AA XRA D
795 E519 7A MOV A,D
796 E51A 19 DAD D
797 E51B FA E522 JM NX4
798 E51E AC XRA H
799 E51F FA E546 JM NX5
800 E522 EB NX4: XCHG
801 E523 2A 0018 LHLD LOPVAR
802 E526 73 MOV M,E
803 E527 23 INX H
804 E528 72 MOV M,D
805 E529 2A 001C LHLD LOPLMT
806 E52C F1 POP PSW
807 E52D B7 ORA A
808 E52E F2 E532 JP NX1
809 E531 EB XCHG
810 E532 CD E79A NX1: CALL CKHLDE
811 E535 D1 POP D
812 E536 DA E548 JC NX2
813 E539 2A 001E LHLD LOPLN
814 E53C 22 0010 SHLD CURRNT
815 E53F 2A 0020 LHLD LOPPT
816 E542 EB XCHG
817 E543 CD E2B8 CALL FINI
818 E546 E1 NX5: POP H
819 E547 D1 POP D
820 E548 CD E929 NX2: CALL POPA
821 E54B CD E2B8 CALL FINI
822 ;
823 ; REM
824 ;
825 E54E EB REM: XCHG
826 E54F 22 0024 SHLD ARMM
827 E552 EB XCHG
828 E553 21 0000 LXI H,0
829 E556 C3 E574 JMP IFFR
830 ;
831 ; AREM
832 ;
833 E559 2A 0024 AREM: LHLD ARMM
834 E55C C9 RET
835 ;
836 ;
837 ; CLEAR
838 ;
839 E55D 21 0065 CLEAR: LXI H,VARBGN
840 E560 D5 PUSH D
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-15
841 E561 11 0036 LXI D,54
842 E564 36 00 NULD20: MVI M,0 ; ZAPLN PROSTOR PRO PROMENNE 0
843 E566 23 INX H
844 E567 1B DCX D
845 E568 7A MOV A,D
846 E569 B3 ORA E
847 E56A C2 E564 JNZ NULD20
848 E56D D1 POP D
849 E56E CD E2B8 CALL FINI
850 ;
851 ; IF
852 ;
853 E571 CD E60C IFF: CALL EXPR
854 E574 7C IFFR: MOV A,H
855 E575 B5 ORA L
856 E576 C2 E36E JNZ RUNSML
857 E579 CD E889 CALL FNDSKP
858 E57C D2 E367 JNC RUNTSL
859 E57F C3 E03E JMP RSTART
860 ;
861 ; CHYBA VSTUPU
862 ;
863 E582 2A 0016 INPERR: LHLD STKINP
864 E585 F9 SPHL
865 E586 E1 POP H
866 E587 22 0010 SHLD CURRNT
867 E58A D1 POP D
868 E58B D1 POP D
869 ;
870 ; INPUT
871 ;
872 E58C INPUT:
873 E58C D5 IP1: PUSH D
874 E58D CD E8A1 CALL QTSTG
875 E590 C3 E59C JMP IP2
876 E593 CD E2BF CALL TSTV
877 E596 DA E5EC JC IP4
878 E599 C3 E5AE JMP IP3
879 E59C D5 IP2: PUSH D
880 E59D CD E2BF CALL TSTV
881 E5A0 DA E7D5 JC QWHAT
882 E5A3 1A LDAX D
883 E5A4 4F MOV C,A
884 E5A5 97 SUB A
885 E5A6 12 STAX D
886 E5A7 D1 POP D
887 E5A8 CD E893 CALL PRTSTG
888 E5AB 79 MOV A,C
889 E5AC 1B DCX D
890 E5AD 12 STAX D
891 E5AE D5 IP3: PUSH D
892 E5AF EB XCHG
893 E5B0 2A 0010 LHLD CURRNT
894 E5B3 E5 PUSH H
895 E5B4 21 E58C LXI H,IP1
896 E5B7 22 0010 SHLD CURRNT
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-16
897 E5BA 21 0000 LXI H,0
898 E5BD 39 DAD SP
899 E5BE 22 0016 SHLD STKINP
900 E5C1 D5 PUSH D
901 E5C2 06 3A MVI B,':'
902 E5C4 CD E811 CALL GETLN ; VYTISKNI NA OBRAZOVKU ':'
903 ; A PREVZEMI Z KLAVESNICE RADEK
904 E5C7 CD E9D8 CALL DBUFF ; DE:=ADR. ZACATKU RADKU S REAKCI
905 ; NA INPUT
906 E5CA 1A LDAX D ; A:=PRVNI ZNAK REAKCE
907 E5CB FE 1B CPI ESC ; IF <>ESC THEN
908 E5CD C2 E5DC JNZ NOBRK ; VYHODNOCENI VYRAZU
909 E5D0 D1 POP D ; ELSE OBNOV DE
910 E5D1 EB XCHG ; HL:=DE
911 E5D2 73 MOV M,E ; ULOZ
912 E5D3 23 INX H
913 E5D4 72 MOV M,D
914 E5D5 E1 POP H ; HL:=CURRNT
915 E5D6 22 0010 SHLD CURRNT ; ULOZ
916 E5D9 C3 EB6B JMP BREAK1 ; BREAK
917 E5DC CD E60C NOBRK: CALL EXPR ; VYHODNOCENI VYRAZU
918 E5DF D1 POP D
919 E5E0 EB XCHG
920 E5E1 73 MOV M,E
921 E5E2 23 INX H
922 E5E3 72 MOV M,D
923 E5E4 E1 POP H
924 E5E5 22 0010 SHLD CURRNT
925 E5E8 CD EB57 CALL CONT
926 E5EB D1 POP D
927 E5EC F1 IP4: POP PSW
928 E5ED CD E2F3 CALL TSTC
929 E5F0 2C DB ','
930 E5F1 03 DB 3
931 E5F2 C3 E58C JMP IP1
932 E5F5 CD E2B8 CALL FINI
933 ;
934 ;
935 ;
936 E5F8 1A DEFLT: LDAX D
937 E5F9 FE 0D CPI CR
938 E5FB CA E609 JZ LT1
939 ;
940 ; LET
941 ;
942 E5FE CD E7A3 LET: CALL SETVAL
943 E601 CD E2F3 CALL TSTC
944 E604 2C DB ','
945 E605 03 DB 3
946 E606 C3 E5FE JMP LET
947 E609 CD E2B8 LT1: CALL FINI
948 ;
949 ; EXPR VYHODNOCENI VYRAZU
950 ;
951 E60C CD E654 EXPR: CALL EXPR2
952 E60F E5 PUSH H
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-17
953 E610 21 E28C EXPR1: LXI H,TAB8-1
954 E613 C3 E9A8 JMP EXEC
955 E616 CD E63F XP11: CALL XP18
956 E619 D8 RC
957 E61A 6F MOV L,A
958 E61B C9 RET
959 E61C CD E63F XP12: CALL XP18
960 E61F C8 RZ
961 E620 6F MOV L,A
962 E621 C9 RET
963 E622 CD E63F XP13: CALL XP18
964 E625 C8 RZ
965 E626 D8 RC
966 E627 6F MOV L,A
967 E628 C9 RET
968 E629 CD E63F XP14: CALL XP18
969 E62C 6F MOV L,A
970 E62D C8 RZ
971 E62E D8 RC
972 E62F 6C MOV L,H
973 E630 C9 RET
974 E631 CD E63F XP15: CALL XP18
975 E634 C0 RNZ
976 E635 6F MOV L,A
977 E636 C9 RET
978 E637 CD E63F XP16: CALL XP18
979 E63A D0 RNC
980 E63B 6F MOV L,A
981 E63C C9 RET
982 E63D E1 XP17: POP H
983 E63E C9 RET
984 E63F 79 XP18: MOV A,C
985 E640 E1 POP H
986 E641 C1 POP B
987 E642 E5 PUSH H
988 E643 C5 PUSH B
989 E644 4F MOV C,A
990 E645 CD E654 CALL EXPR2
991 E648 EB XCHG
992 E649 E3 XTHL
993 E64A CD E79A CALL CKHLDE
994 E64D D1 POP D
995 E64E 21 0000 LXI H,0
996 E651 3E 01 MVI A,1
997 E653 C9 RET
998 E654 CD E2F3 EXPR2: CALL TSTC
999 E657 2D DB '-'
1000 E658 06 DB 6
1001 E659 21 0000 LXI H,0
1002 E65C C3 E686 JMP XP26
1003 E65F CD E2F3 CALL TSTC
1004 E662 2B DB '+'
1005 E663 00 DB 0
1006 E664 CD E690 CALL EXPR3
1007 E667 CD E2F3 XP23: CALL TSTC
1008 E66A 2B DB '+'
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-18
1009 E66B 15 DB 15H
1010 E66C E5 PUSH H
1011 E66D CD E690 CALL EXPR3
1012 E670 EB XP24: XCHG
1013 E671 E3 XTHL
1014 E672 7C MOV A,H
1015 E673 AA XRA D
1016 E674 7A MOV A,D
1017 E675 19 DAD D
1018 E676 D1 POP D
1019 E677 FA E667 JM XP23
1020 E67A AC XRA H
1021 E67B F2 E667 JP XP23
1022 E67E C3 E331 JMP QHOW
1023 E681 CD E2F3 CALL TSTC
1024 E684 2D DB '-'
1025 E685 92 DB 92H
1026 E686 E5 XP26: PUSH H
1027 E687 CD E690 CALL EXPR3
1028 E68A CD E785 CALL CHGSGN
1029 E68D C3 E670 JMP XP24
1030 E690 CD E6F4 EXPR3: CALL EXPR4
1031 E693 CD E2F3 XP31: CALL TSTC
1032 E696 2A DB '*'
1033 E697 2D DB 2DH
1034 E698 E5 PUSH H
1035 E699 CD E6F4 CALL EXPR4
1036 E69C 06 00 MVI B,0
1037 E69E CD E782 CALL CHKSGN
1038 E6A1 E3 XTHL
1039 E6A2 CD E782 CALL CHKSGN
1040 E6A5 EB XCHG
1041 E6A6 E3 XTHL
1042 E6A7 7C MOV A,H
1043 E6A8 B7 ORA A
1044 E6A9 CA E6B2 JZ XP32
1045 E6AC 7A MOV A,D
1046 E6AD B2 ORA D
1047 E6AE EB XCHG
1048 E6AF C2 E332 JNZ AHOW
1049 E6B2 7D XP32: MOV A,L
1050 E6B3 21 0000 LXI H,0
1051 E6B6 B7 ORA A
1052 E6B7 CA E6E6 JZ XP35
1053 E6BA 19 XP33: DAD D
1054 E6BB DA E332 JC AHOW
1055 E6BE 3D DCR A
1056 E6BF C2 E6BA JNZ XP33
1057 E6C2 C3 E6E6 JMP XP35
1058 E6C5 CD E2F3 CALL TSTC
1059 E6C8 2F DB '/'
1060 E6C9 4E DB 4EH
1061 E6CA E5 PUSH H
1062 E6CB CD E6F4 CALL EXPR4
1063 E6CE 06 00 MVI B,0
1064 E6D0 CD E782 CALL CHKSGN
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-19
1065 E6D3 E3 XTHL
1066 E6D4 CD E782 CALL CHKSGN
1067 E6D7 EB XCHG
1068 E6D8 E3 XTHL
1069 E6D9 EB XCHG
1070 E6DA 7A MOV A,D
1071 E6DB B3 ORA E
1072 E6DC CA E332 JZ AHOW
1073 E6DF C5 PUSH B
1074 E6E0 CD E765 CALL DIVIDE
1075 E6E3 60 MOV H,B
1076 E6E4 69 MOV L,C
1077 E6E5 C1 POP B
1078 E6E6 D1 XP35: POP D
1079 E6E7 7C MOV A,H
1080 E6E8 B7 ORA A
1081 E6E9 FA E331 JM QHOW
1082 E6EC 78 MOV A,B
1083 E6ED B7 ORA A
1084 E6EE FC E785 CM CHGSGN
1085 E6F1 C3 E693 JMP XP31
1086 E6F4 21 E226 EXPR4: LXI H,TAB4-1
1087 E6F7 C3 E9A8 JMP EXEC
1088 E6FA CD E2BF XP40: CALL TSTV
1089 E6FD DA E705 JC XP41
1090 E700 7E MOV A,M
1091 E701 23 INX H
1092 E702 66 MOV H,M
1093 E703 6F MOV L,A
1094 E704 C9 RET
1095 E705 CD E307 XP41: CALL TSTNUM
1096 E708 78 MOV A,B
1097 E709 B7 ORA A
1098 E70A C0 RNZ
1099 E70B CD E2F3 PARN: CALL TSTC
1100 E70E 28 DB '('
1101 E70F 09 DB 09
1102 E710 CD E60C CALL EXPR
1103 E713 CD E2F3 CALL TSTC
1104 E716 29 DB ')'
1105 E717 01 DB 1
1106 E718 C9 RET
1107 E719 C3 E7D5 JMP QWHAT
1108 ;
1109 ;
1110 ;
1111 ; GENERATOR NAHODNICH CISEL
1112 ;
1113 ; PRO PRACI POUZIVA PARAMETR RANPNT. PRINCIPEM CINNOSTI
1114 ; JE GENERACE TOHOTO PARAMETRU NACITANIM OBLASTI PAMETI,
1115 ; V NIZ JE NAHRAN INTERPRET. NAHODNA HODNOTA JE ZBITKEM
1116 ; PO DELENI PARAMETRU RANPNT UDANOU MAXIMALNI HODNOTOU.
1117 ;
1118 E71C CD E70B RND: CALL PARN ; HL:=MAX. HODNOTA
1119 E71F 7C MOV A,H
1120 E720 B7 ORA A
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-20
1121 E721 FA E331 JM QHOW ; IF ZAPORNA ERROR
1122 E724 B5 ORA L
1123 E725 D5 PUSH D
1124 E726 23 INX H
1125 E727 E5 PUSH H
1126 E728 C2 E731 JNZ RA2 ; IF 0 --> INICIUJ
1127 E72B 21 E000 LXI H,BASPET
1128 E72E 22 0022 SHLD RANPNT
1129 E731 2A 0022 RA2: LHLD RANPNT ; PARAMETR
1130 E734 11 EBB1 LXI D,MONIT
1131 E737 CD E2AA CALL COMP ; PARAMETR MIMO INTERPRET ?
1132 E73A DA E740 JC RA1
1133 E73D 21 E000 LXI H,BASPET ; ANO - INICIUJ
1134 E740 5E RA1: MOV E,M
1135 E741 23 INX H
1136 E742 56 MOV D,M
1137 E743 22 0022 SHLD RANPNT ; NOVY PARAMETR
1138 E746 E1 POP H ; MAX. HODNOTA DO <DE>
1139 E747 EB XCHG ; PSEUDONAHODNE CISLO DO <HL>
1140 E748 C5 PUSH B
1141 E749 CD E765 CALL DIVIDE ; <HL>/<DE> ... ZBITEK V <HL>
1142 E74C C1 POP B
1143 E74D D1 POP D
1144 E74E C9 RET
1145 ;
1146 ;
1147 ;
1148 ; ABS
1149 ;
1150 E74F CD E70B ABS: CALL PARN
1151 E752 1B DCX D
1152 E753 CD E782 CALL CHKSGN
1153 E756 13 INX D
1154 E757 C9 RET
1155 ;
1156 ; SIZE
1157 ;
1158 E758 2A 003B SIZE: LHLD TXTUNF
1159 E75B D5 PUSH D
1160 E75C EB XCHG
1161 E75D 2A 0027 LHLD TXTEND
1162 E760 CD E77B CALL SUBDE
1163 E763 D1 POP D
1164 E764 C9 RET
1165 ;
1166 ; DIVIE <HL>/<DE> --> <BC>, ZBITEK V <HL>
1167 ;
1168 E765 E5 DIVIDE: PUSH H
1169 E766 6C MOV L,H
1170 E767 26 00 MVI H,0
1171 E769 CD E770 CALL DV1
1172 E76C 41 MOV B,C
1173 E76D 7D MOV A,L
1174 E76E E1 POP H
1175 E76F 67 MOV H,A
1176 E770 0E FF DV1: MVI C,0FFH
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-21
1177 E772 0C DV2: INR C
1178 E773 CD E77B CALL SUBDE
1179 E776 D2 E772 JNC DV2
1180 E779 19 DAD D
1181 E77A C9 RET
1182 E77B 7D SUBDE: MOV A,L
1183 E77C 93 SUB E
1184 E77D 6F MOV L,A
1185 E77E 7C MOV A,H
1186 E77F 9A SBB D
1187 E780 67 MOV H,A
1188 E781 C9 RET
1189 ;
1190 E782 7C CHKSGN: MOV A,H
1191 E783 B7 ORA A
1192 E784 F0 RP
1193 E785 7C CHGSGN: MOV A,H ; ZMENA ZNAMENKA
1194 E786 B5 ORA L
1195 E787 C8 RZ ; CISLO JE NULA !
1196 E788 7C MOV A,H
1197 E789 F5 PUSH PSW
1198 E78A 2F CMA
1199 E78B 67 MOV H,A ; INVERZE HIGH BYTE
1200 E78C 7D MOV A,L
1201 E78D 2F CMA
1202 E78E 6F MOV L,A ; INVERZE LOW BYTE
1203 E78F 23 INX H ; PRICTENI 1
1204 E790 F1 POP PSW
1205 E791 AC XRA H
1206 E792 F2 E331 JP QHOW ; PRETECENI
1207 E795 78 MOV A,B
1208 E796 EE 80 XRI 80H ; INVERZE D7 V <B>
1209 E798 47 MOV B,A
1210 E799 C9 RET
1211 ;
1212 E79A 7C CKHLDE: MOV A,H
1213 E79B AA XRA D
1214 E79C F2 E7A0 JP CK1
1215 E79F EB XCHG
1216 E7A0 C3 E2AA CK1: JMP COMP
1217 ;
1218 ; SETVAL
1219 ;
1220 E7A3 CD E2BF SETVAL: CALL TSTV
1221 E7A6 DA E7D5 JC QWHAT
1222 E7A9 E5 PUSH H
1223 E7AA CD E2F3 CALL TSTC
1224 E7AD 3D DB '='
1225 E7AE 0A DB LF
1226 E7AF CD E60C CALL EXPR
1227 E7B2 44 MOV B,H
1228 E7B3 4D MOV C,L
1229 E7B4 E1 POP H
1230 E7B5 71 MOV M,C
1231 E7B6 23 INX H
1232 E7B7 70 MOV M,B
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-22
1233 E7B8 C9 RET
1234 E7B9 C3 E7D5 JMP QWHAT
1235 ;
1236 ; FIN
1237 ;
1238 E7BC CD E2F3 FIN: CALL TSTC
1239 E7BF 3A DB ':'
1240 E7C0 04 DB 4
1241 E7C1 F1 POP PSW
1242 E7C2 C3 E36E JMP RUNSML
1243 E7C5 CD E2F3 CALL TSTC
1244 E7C8 0D DB CR
1245 E7C9 04 DB 4
1246 E7CA F1 POP PSW
1247 E7CB C3 E35E JMP RUNNXL
1248 E7CE C9 RET
1249 ;
1250 ; ENDCHK
1251 ;
1252 E7CF CD E2B0 ENDCHK: CALL IGNB
1253 E7D2 FE 0D CPI CR
1254 E7D4 C8 RZ
1255 E7D5 D5 QWHAT: PUSH D
1256 E7D6 11 E343 AWHAT: LXI D,WHAT
1257 E7D9 97 ERROR: SUB A
1258 E7DA 32 0026 STA MODE ; NORMALNI ZOBRAZENI
1259 E7DD CD E893 CALL PRTSTG
1260 E7E0 CD EB81 CALL DISP
1261 E7E3 D1 POP D
1262 E7E4 1A LDAX D
1263 E7E5 F5 PUSH PSW
1264 E7E6 97 SUB A
1265 E7E7 12 STAX D
1266 E7E8 2A 0010 LHLD CURRNT
1267 E7EB E5 PUSH H
1268 E7EC 7E MOV A,M
1269 E7ED 23 INX H
1270 E7EE B6 ORA M
1271 E7EF D1 POP D
1272 E7F0 CA E03E JZ RSTART
1273 E7F3 7E MOV A,M
1274 E7F4 B7 ORA A
1275 E7F5 FA E582 JM INPERR
1276 E7F8 CD E8FA CALL PRTLN
1277 E7FB 1B DCX D
1278 E7FC F1 POP PSW
1279 E7FD 12 STAX D
1280 E7FE 3E 3F MVI A,03FH
1281 E800 CD E976 CALL OUTC
1282 E803 97 SUB A
1283 E804 CD E893 CALL PRTSTG
1284 E807 C3 E03E JMP RSTART
1285 E80A D5 QSORRY: PUSH D
1286 E80B 11 E349 ASORRY: LXI D,SORRY
1287 E80E C3 E7D9 JMP ERROR
1288 ;
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-23
1289 ;
1290 ;
1291 ; GETLN
1292 ;
1293 ; ULOZ RADEK DO BUFFERU, V <DE> ADRESA POSLRNIHO ZNAKU + 1
1294 ;
1295 E811 78 GETLN: MOV A,B ; VYTISKNI (B) - VESMES 5CH
1296 E812 CD E976 CALL OUTC
1297 E815 CD E9D8 CALL DBUFF ; DE:=UKAZATEL NA ZACATEK
1298 ; VYROVNAVACI PAMETI RADKU
1299 E818 CD F803 GL1: CALL CI ; A:= ZNAK Z KLAVESNICE
1300 E81B FE 1B CPI ESC
1301 E81D CA E818 JZ GL1 ; IGNORUJ ZNAK ESC
1302 E820 FE 7F CPI RUB ; IF RUB OUT THEN
1303 E822 CA E841 JZ GL3 ; OPRAV POSLEDNI ZNAK
1304 E825 FE 08 CPI BS ; IF BACK SPACE THEN
1305 E827 CA E841 JZ GL3 ; OPRAV POSLEDNI ZNAK
1306 E82A FE 18 CPI CTRLX ; IF CTRL X THEN
1307 E82C CA E851 JZ GL4 ; ZRUS RADEK
1308 E82F CD E976 CALL OUTC ; ECHO ZNAK NA OBRAZOVKU
1309 E832 12 STAX D ; ULOZ ZNAK DO VYROVNAVACI PAMETI
1310 ; RADKU
1311 E833 13 INX D ; INKREMENTUJ UKAZATEL VYROVNAVACI
1312 ; PAMETI RADKU
1313 E834 FE 0D CPI CR ; IF POSLEDNI ZNAK (CR) THEN
1314 E836 C8 RZ ; NAVRAT
1315 E837 7B MOV A,E ; ELSE A:=NIZSI BYTE UKAZATELE
1316 ; VYROVNAVACI PAMETI RADKU
1317 E838 E5 CXBUFE: PUSH H ; USCHOVEJ HL
1318 E839 2A 002B LHLD BUFEND ; HL:=ADR. KONEC VYROVNAVACI
1319 ; PAMETI RADKU
1320 E83C BD CMP L ; IF UKAZATEL VYROVNAVACI PAMETI <>
1321 ; ADR. KONCE RADKU THEN
1322 E83D E1 POP H ; OBNOV HL
1323 E83E C2 E818 JNZ GL1 ; PREVEZMI DALSI ZNAK Z KLAVESNICE
1324 ; ELSE OPRAVUJ POSLEDNI ZNAK A CEKEJ
1325 ; NA (CR)
1326 ; OPRAV POSLEDNI ZNAK
1327 E841 7B GL3: MOV A,E ; A:=NIZSI BYTE UKAZATELE VYROVNAVACI
1328 ; PAMETI RADKU
1329 E842 E5 CXBUFA: PUSH H ; USCHOVEJ HL
1330 E843 2A 0029 LHLD BUFFER ; HL:=ADR. ZACATKU VYROVNAVACI PAMETI
1331 ; RADKU
1332 E846 BD CMP L ; IF UKAZATEL NA ZACATKU VYROV. PAMETI
1333 E847 E1 POP H ; THEN OBNOV HL
1334 E848 CA E851 JZ GL4 ; NASTAV ZACATEK RADKU
1335 E84B CD E859 CALL GL5 ; ELSE ZRUS POSLEDNI ZNAK
1336 E84E C3 E818 JMP GL1 ; PREVEZMI DALSI ZNAK Z KLAVESNICE
1337 ; ZRUS RADEK
1338 E851 CD E974 GL4: CALL CRLF ; VYTISKNI NA OBRAZOVKU (CR),(LF)
1339 E854 06 5C MVI B,5CH ; VYTISKNI 5CH
1340 E856 C3 E811 JMP GETLN ; PREVEZMI Z KLAVESNICE NOVY RADEK
1341 ; OPRAV POSLEDNI ZNAK
1342 E859 1B GL5: DCX D ; DEKREMENTUJ UKAZATEL VYROVNAVACI
1343 ; PAMETI RADKU NA POSLEDNI
1344 ; PLATNY ZNAK
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-24
1345 E85A 3E 08 MVI A,8 ; A:=BACK SPACE
1346 E85C CD E976 CALL OUTC ; POSUN KURZORU O 1 MISTO VLEVO
1347 E85F 3E 20 MVI A,' ' ; A:=MEZERA
1348 E861 CD E976 CALL OUTC ; VYTISKNI NA MISTO NEPLATNEHO ZNAKU
1349 ; MEZERU
1350 E864 3E 08 MVI A,8 ; POSUN KURZORU ZPET NA MEZERU
1351 E866 C3 E976 JMP OUTC ; NAVRAT RETURNEM Z OUTC
1352 ;
1353 ;
1354 ;
1355 ; FNDLN
1356 ;
1357 ; NAJDI ADRESU RADKU S CISLEM <HL> A ULOZ JI DO <DE>
1358 ; NASTAV PRIZNAK FF-Z PRI ROVNOSTI. FF-C PRI NEEXISTENCI
1359 ;
1360 E869 7C FNDLN: MOV A,H
1361 E86A B7 ORA A
1362 E86B FA E331 JM QHOW
1363 E86E 11 009B LXI D,TXTBGN
1364 E871 E5 FNDLP: PUSH H
1365 E872 2A 003B LHLD TXTUNF
1366 E875 2B DCX H
1367 E876 CD E2AA CALL COMP
1368 E879 E1 POP H
1369 E87A D8 RC
1370 E87B 1A LDAX D
1371 E87C 95 SUB L
1372 E87D 47 MOV B,A
1373 E87E 13 INX D
1374 E87F 1A LDAX D
1375 E880 9C SBB H
1376 E881 DA E888 JC FL2
1377 E884 1B DCX D
1378 E885 B0 ORA B
1379 E886 C9 RET
1380 ;
1381 ;
1382 ;
1383 ; FNDNXT
1384 ;
1385 ; NAJDI KONEC RADKU, DO <HL> ULOZ ADRESU DALSIHO RADKU
1386 ;
1387 E887 13 FNDNXT: INX D
1388 E888 13 FL2: INX D
1389 E889 1A FNDSKP: LDAX D
1390 E88A FE 0D CPI CR
1391 E88C C2 E888 JNZ FL2
1392 E88F 13 INX D
1393 E890 C3 E871 JMP FNDLP
1394 ;
1395 ; PRTSTG
1396 ;
1397 E893 47 PRTSTG: MOV B,A
1398 E894 1A PS1: LDAX D
1399 E895 13 INX D
1400 E896 B8 CMP B
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-25
1401 E897 C8 RZ
1402 E898 CD E976 CALL OUTC
1403 E89B FE 0D CPI CR
1404 E89D C2 E894 JNZ PS1
1405 E8A0 C9 RET
1406 ;
1407 ; QTSTG
1408 ;
1409 E8A1 CD E2F3 QTSTG: CALL TSTC
1410 E8A4 22 DB '"'
1411 E8A5 0F DB 0FH
1412 E8A6 3E 22 MVI A,'"'
1413 E8A8 CD E893 QT1: CALL PRTSTG
1414 E8AB FE 0D CPI CR
1415 E8AD E1 POP H
1416 E8AE CA E401 JZ PR6
1417 E8B1 23 QT2: INX H
1418 E8B2 23 INX H
1419 E8B3 23 INX H
1420 E8B4 E9 PCHL
1421 E8B5 C9 RET
1422 ;
1423 ; PRTNUM
1424 ;
1425 E8B6 06 00 PRTNUM: MVI B,0
1426 E8B8 CD E782 CALL CHKSGN
1427 E8BB F2 E8C1 JP PN1
1428 E8BE 06 2D MVI B,2DH
1429 E8C0 0D DCR C
1430 E8C1 D5 PN1: PUSH D
1431 E8C2 11 000A LXI D,0AH ; PREVOD BIN --> DEC
1432 E8C5 D5 PUSH D
1433 E8C6 0D DCR C
1434 E8C7 C5 PUSH B
1435 E8C8 CD E765 PN2: CALL DIVIDE
1436 E8CB 78 MOV A,B
1437 E8CC B1 ORA C
1438 E8CD CA E8D8 JZ PN3
1439 E8D0 E3 XTHL
1440 E8D1 2D DCR L
1441 E8D2 E5 PUSH H
1442 E8D3 60 MOV H,B
1443 E8D4 69 MOV L,C
1444 E8D5 C3 E8C8 JMP PN2
1445 E8D8 C1 PN3: POP B
1446 E8D9 0D PN4: DCR C
1447 E8DA 79 MOV A,C
1448 E8DB B7 ORA A
1449 E8DC FA E8E7 JM PN5
1450 E8DF 3E 20 MVI A,20H
1451 E8E1 CD E976 CALL OUTC
1452 E8E4 C3 E8D9 JMP PN4
1453 E8E7 78 PN5: MOV A,B
1454 E8E8 B7 ORA A
1455 E8E9 C4 E976 CNZ OUTC
1456 E8EC 5D MOV E,L
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-26
1457 E8ED 7B PN6: MOV A,E
1458 E8EE FE 0A CPI LF
1459 E8F0 D1 POP D
1460 E8F1 C8 RZ
1461 E8F2 C6 30 ADI 30H
1462 E8F4 CD E976 CALL OUTC
1463 E8F7 C3 E8ED JMP PN6
1464 ;
1465 ;
1466 ;
1467 ; PRTLN
1468 ;
1469 ; ZOBRAZ RADEK VCETNE CISLA, V <DE> ADRESA LOW CISLA RADKU
1470 ;
1471 E8FA 1A PRTLN: LDAX D
1472 E8FB 6F MOV L,A
1473 E8FC 13 INX D
1474 E8FD 1A LDAX D
1475 E8FE 67 MOV H,A
1476 E8FF 13 INX D
1477 E900 0E 04 MVI C,4
1478 E902 CD E8B6 CALL PRTNUM
1479 E905 3E 20 MVI A,20H
1480 E907 CD E976 CALL OUTC
1481 E90A 97 SUB A
1482 E90B CD E893 CALL PRTSTG
1483 E90E C9 RET
1484 ;
1485 ;
1486 ;
1487 ; MVUP
1488 ;
1489 ; POSUN PAMETI OD <DE> PO <HL> NA <BC> (DOPREDU)
1490 ;
1491 E90F CD E2AA MVUP: CALL COMP
1492 E912 C8 RZ
1493 E913 1A LDAX D
1494 E914 02 STAX B
1495 E915 13 INX D
1496 E916 03 INX B
1497 E917 C3 E90F JMP MVUP
1498 ;
1499 ;
1500 ;
1501 ; MVDOWN
1502 ;
1503 ; POSUN PAMET Z <DE> PO <BC> NA <HL> (POZPATKU)
1504 ;
1505 E91A 78 MVDOWN: MOV A,B
1506 E91B 92 SUB D
1507 E91C C2 E922 JNZ MD1
1508 E91F 79 MOV A,C
1509 E920 93 SUB E
1510 E921 C8 RZ
1511 E922 1B MD1: DCX D
1512 E923 2B DCX H
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-27
1513 E924 1A LDAX D
1514 E925 77 MOV M,A
1515 E926 C3 E91A JMP MVDOWN
1516 ;
1517 ; POPA
1518 ;
1519 E929 C1 POPA: POP B
1520 E92A E1 POP H
1521 E92B 22 0018 SHLD LOPVAR
1522 E92E 7C MOV A,H
1523 E92F B5 ORA L
1524 E930 CA E943 JZ PP1
1525 E933 E1 POP H
1526 E934 22 001A SHLD LOPINC
1527 E937 E1 POP H
1528 E938 22 001C SHLD LOPLMT
1529 E93B E1 POP H
1530 E93C 22 001E SHLD LOPLN
1531 E93F E1 POP H
1532 E940 22 0020 SHLD LOPPT
1533 E943 C5 PP1: PUSH B
1534 E944 C9 RET
1535 ;
1536 ; PUSHA
1537 ;
1538 E945 D5 PUSHA: PUSH D ; USCHOVEJ DE
1539 E946 2A 0004 LHLD RAMEND
1540 E949 11 FFC4 LXI D,0FFC4H ; DVOJKOVY DOPLNEK (64-5)
1541 E94C 19 DAD D ; HL:=KONEC STACKU +5
1542 E94D D1 POP D ; OBNOV DE
1543 E94E CD E785 CALL CHGSGN ; ZMEN ZNAMENKO <HL>
1544 E951 C1 POP B
1545 E952 39 DAD SP ; PREKROCENI ZASOBNIKU?
1546 E953 D2 E80A JNC QSORRY ; ANO - CHYBA
1547 E956 2A 0018 LHLD LOPVAR
1548 E959 7C MOV A,H
1549 E95A B5 ORA L
1550 E95B CA E971 JZ PU1 ; JDE O CYKLUS ?
1551 E95E 2A 0020 LHLD LOPPT
1552 E961 E5 PUSH H
1553 E962 2A 001E LHLD LOPLN
1554 E965 E5 PUSH H
1555 E966 2A 001C LHLD LOPLMT
1556 E969 E5 PUSH H
1557 E96A 2A 001A LHLD LOPINC
1558 E96D E5 PUSH H
1559 E96E 2A 0018 LHLD LOPVAR
1560 E971 E5 PU1: PUSH H ; ULOZ PARAMETRY PROMENNE
1561 E972 C5 PUSH B
1562 E973 C9 RET
1563 ;
1564 ; CRLF , OUTC
1565 ;
1566 E974 3E 0D CRLF: MVI A,CR
1567 E976 F5 OUTC: PUSH PSW
1568 E977 FE 0D CPI CR
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-28
1569 E979 CA E981 JZ LINEF
1570 E97C CD 000C CALL CO
1571 E97F F1 H2: POP PSW
1572 E980 C9 RET
1573 E981 CD E987 LINEF: CALL CROUT
1574 E984 C3 E97F JMP H2
1575 E987 3E 0D CROUT: MVI A,CR
1576 E989 CD 000C CALL CO
1577 E98C 3E 0A MVI A,LF
1578 E98E C3 000C JMP CO
1579 ;
1580 ; NULOVANI DISPLEJE
1581 ;
1582 E991 C5 CLS: PUSH B
1583 E992 3E 0C MVI A,FF
1584 E994 CD 000C CALL CO
1585 E997 3E 1D MVI A,HOME
1586 E999 CD 000C CALL CO
1587 E99C 3E 1F MVI A,DSCR
1588 E99E CD 000C CALL CO
1589 E9A1 C1 POP B
1590 E9A2 CD E2B8 CALL FINI
1591 ;
1592 ; DIRECT MODUL
1593 ;
1594 E9A5 21 E0E8 DIRECT: LXI H,TAB1-1
1595 E9A8 CD E2B0 EXEC: CALL IGNB
1596 E9AB D5 PUSH D
1597 E9AC 1A EX1: LDAX D
1598 E9AD 13 INX D
1599 E9AE FE 2E CPI '.'
1600 E9B0 CA E9CA JZ EX3
1601 E9B3 23 INX H
1602 E9B4 BE CMP M
1603 E9B5 CA E9AC JZ EX1
1604 E9B8 3E 00 MVI A,0
1605 E9BA 1B DCX D
1606 E9BB BE CMP M
1607 E9BC CA E9D1 JZ EX5
1608 E9BF 23 EX2: INX H
1609 E9C0 BE CMP M
1610 E9C1 C2 E9BF JNZ EX2
1611 E9C4 23 INX H
1612 E9C5 23 INX H
1613 E9C6 D1 POP D
1614 E9C7 C3 E9A8 JMP EXEC
1615 E9CA 3E 00 EX3: MVI A,0
1616 E9CC 23 EX4: INX H
1617 E9CD BE CMP M
1618 E9CE C2 E9CC JNZ EX4
1619 E9D1 23 EX5: INX H
1620 E9D2 7E MOV A,M
1621 E9D3 23 INX H
1622 E9D4 66 MOV H,M
1623 E9D5 6F MOV L,A
1624 E9D6 F1 POP PSW
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-29
1625 E9D7 E9 PCHL
1626 ;
1627 ; DBUFF
1628 ;
1629 E9D8 E5 DBUFF: PUSH H
1630 E9D9 2A 0029 LHLD BUFFER
1631 E9DC 54 MOV D,H
1632 E9DD 5D MOV E,L
1633 E9DE E1 POP H
1634 E9DF C9 RET
1635 ;
1636 ;
1637 ;
1638 ; DTXTE
1639 ;
1640 E9E0 E5 DTXTE: PUSH H
1641 E9E1 2A 0027 LHLD TXTEND
1642 E9E4 54 MOV D,H
1643 E9E5 5D MOV E,L
1644 E9E6 E1 POP H
1645 E9E7 C9 RET
1646 ;
1647 ;
1648 ;
1649 ; MASKA
1650 ;
1651 E9E8 CD E60C MASK: CALL EXPR
1652 E9EB 7D MOV A,L
1653 E9EC 32 000F STA MASKIN
1654 E9EF CD E2B8 CALL FINI
1655 ;
1656 ; RAM
1657 ;
1658 E9F2 CD E60C RAM: CALL EXPR ; VSTUP PARAMETRU DO <HL>
1659 E9F5 EB RAM1: XCHG ; SCHOVEJ <HL> DO <DE>
1660 E9F6 21 00BB LXI H,TXTE ; MINIMALNI ADRESA KONCE PROGRAMU
1661 E9F9 CD E2AA CALL COMP
1662 E9FC D2 E80B JNC ASORRY ; CHYBA V PODTECENI MOZNE PROGRAMOVE RAM
1663 E9FF CD E0CF CALL USREND ; MAXIMALNI ADRESA KONCE PROGRAMU
1664 EA02 CD E2AA CALL COMP
1665 EA05 DA E80B JC ASORRY ; CHYBA V PRETECENI MOZNE PROGRAMOVE RAM
1666 EA08 EB XCHG ; OBNOV <HL>
1667 EA09 22 002B SHLD BUFEND ; NASTAVENI KONCE BUFFERU
1668 EA0C 11 FFC0 LXI D,0FFC0H ; DNOJKOVY DOPLNEK 64
1669 EA0F 19 DAD D ; PRO BUFFER VYHRAZENO 64 BYTE
1670 EA10 22 0029 SHLD BUFFER ; NASTAVENI UKAZATELE ZACATKU BUFFERU
1671 EA13 2B DCX H
1672 EA14 2B DCX H
1673 EA15 C3 E03B JMP START1
1674 ;
1675 ; CALL
1676 ;
1677 EA18 CD E60C BCALL: CALL EXPR
1678 EA1B D5 PUSH D
1679 EA1C 01 EA21 LXI B,HERE
1680 EA1F C5 PUSH B
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-30
1681 EA20 E9 PCHL
1682 EA21 D1 HERE: POP D
1683 EA22 CD E2B8 CALL FINI
1684 ;
1685 ; OUT
1686 ;
1687 EA25 CD E60C BOUT: CALL EXPR
1688 EA28 E5 PUSH H
1689 EA29 CD E2F3 CALL TSTC
1690 EA2C 2C DB ','
1691 EA2D 1A DB 1AH
1692 EA2E CD E60C CALL EXPR
1693 EA31 45 MOV B,L
1694 EA32 3E D3 MVI A,0D3H
1695 EA34 32 0008 STA IOBUFA
1696 EA37 E1 POP H
1697 EA38 7D MOV A,L
1698 EA39 32 0009 STA IOBUFB
1699 EA3C 3E C9 MVI A,0C9H
1700 EA3E 32 000A STA IOBUFC
1701 EA41 78 MOV A,B
1702 EA42 CD 0008 CALL IOBUFA
1703 EA45 CD E2B8 CALL FINI
1704 EA48 C3 E7D5 JMP QWHAT
1705 ;
1706 ;
1707 ; TAB
1708 ;
1709 EA4B CD E70B TAB: CALL PARN
1710 EA4E 7C A1: MOV A,H
1711 EA4F B5 ORA L
1712 EA50 CC E2B8 CZ FINI
1713 EA53 2B DCX H
1714 EA54 3E 20 MVI A,20H
1715 EA56 CD 000C CALL CO
1716 EA59 C3 EA4E JMP A1
1717 ;
1718 ; IN , INM
1719 ;
1720 EA5C CD EA6B BIN: CALL INEM
1721 EA5F 6F MOV L,A
1722 EA60 C9 RET
1723 EA61 CD EA6B INM: CALL INEM
1724 EA64 6F MOV L,A
1725 EA65 3A 000F LDA MASKIN
1726 EA68 A5 ANA L
1727 EA69 6F MOV L,A
1728 EA6A C9 RET
1729 EA6B CD E70B INEM: CALL PARN
1730 EA6E E5 PUSH H
1731 EA6F 3E DB MVI A,0DBH
1732 EA71 32 0008 STA IOBUFA
1733 EA74 E1 POP H
1734 EA75 7D MOV A,L
1735 EA76 32 0009 STA IOBUFB
1736 EA79 3E C9 MVI A,0C9H
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-31
1737 EA7B 32 000A STA IOBUFC
1738 EA7E CD 0008 CALL IOBUFA
1739 EA81 26 00 MVI H,0
1740 EA83 C9 RET
1741 ;
1742 ; O$
1743 ;
1744 EA84 CD E60C O: CALL EXPR
1745 EA87 D5 PUSH D
1746 EA88 EB XCHG
1747 EA89 AF XRA A
1748 EA8A CD E893 CALL PRTSTG
1749 EA8D D1 ZZZ4: POP D
1750 EA8E CD E2B8 CALL FINI
1751 ;
1752 ; I$
1753 ;
1754 EA91 CD E60C I: CALL EXPR
1755 EA94 D5 PUSH D
1756 EA95 EB XCHG
1757 EA96 2A 003B LHLD TXTUNF
1758 EA99 EB XCHG
1759 EA9A CD E2AA CALL COMP
1760 EA9D DA E80B JC ASORRY
1761 EAA0 CD E9D8 CALL DBUFF
1762 EAA3 CD E818 CALL GL1
1763 EAA6 44 MOV B,H
1764 EAA7 4D MOV C,L
1765 EAA8 EB XCHG
1766 EAA9 2B DCX H
1767 EAAA CD E9D8 CALL DBUFF
1768 EAAD D5 PUSH D
1769 EAAE CD E90F CALL MVUP
1770 EAB1 AF XRA A
1771 EAB2 02 STAX B
1772 EAB3 D1 POP D
1773 EAB4 23 INX H
1774 EAB5 CD E77B CALL SUBDE
1775 EAB8 EB XCHG
1776 EAB9 21 0006 LXI H,LEGT
1777 EABC 73 MOV M,E
1778 EABD 23 INX H
1779 EABE 72 MOV M,D
1780 EABF C3 EA8D JMP ZZZ4
1781 ;
1782 ; PEEK
1783 ;
1784 EAC2 CD E70B PEEK: CALL PARN
1785 EAC5 6E MOV L,M
1786 EAC6 26 00 MVI H,0
1787 EAC8 C9 RET
1788 ;
1789 ; POKE
1790 ;
1791 EAC9 CD E60C POKE: CALL EXPR
1792 EACC E5 PUSH H
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-32
1793 EACD CD E2F3 CALL TSTC
1794 EAD0 2C DB ','
1795 EAD1 09 DB 9
1796 EAD2 CD E60C CALL EXPR
1797 EAD5 7D MOV A,L
1798 EAD6 E1 POP H
1799 EAD7 77 MOV M,A
1800 EAD8 CD E2B8 CALL FINI
1801 EADB C3 E7D5 JMP QWHAT
1802 ;
1803 ; BYTE
1804 ;
1805 EADE CD E70B BYTE: CALL PARN
1806 EAE1 7D MOV A,L
1807 EAE2 CD EAF1 CALL WRIT2
1808 EAE5 CD E2B8 CALL FINI
1809 ;
1810 ;
1811 ;
1812 ; WORD
1813 ;
1814 EAE8 CD E70B WORD: CALL PARN
1815 EAEB CD F830 CALL DADR
1816 EAEE CD E2B8 CALL FINI
1817 ;
1818 ;
1819 ;
1820 ; WRIT2
1821 ;
1822 EAF1 F5 WRIT2: PUSH PSW
1823 EAF2 0F RRC
1824 EAF3 0F RRC
1825 EAF4 0F RRC
1826 EAF5 0F RRC
1827 EAF6 CD EAFA CALL IST
1828 EAF9 F1 POP PSW
1829 EAFA E6 0F IST: ANI 0FH
1830 EAFC C6 90 ADI 90H
1831 EAFE 27 DAA
1832 EAFF CE 40 ACI 40H
1833 EB01 27 DAA
1834 EB02 C3 E976 JMP OUTC
1835 ;
1836 ;
1837 ;
1838 ; QUOTE
1839 ;
1840 EB05 1A QUOTE: LDAX D
1841 EB06 13 INX D
1842 EB07 6F MOV L,A
1843 EB08 26 00 MVI H,0
1844 EB0A CD E2F3 CALL TSTC
1845 EB0D 27 DB 27H
1846 EB0E 01 DB 1
1847 EB0F C9 RET
1848 EB10 C3 E7D5 JMP QWHAT
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-33
1849 ;
1850 ; OUTCHAR
1851 ;
1852 EB13 CD E60C OUTCHR: CALL EXPR
1853 EB16 7D MOV A,L
1854 EB17 CD 000C CALL CO
1855 EB1A CD E2B8 CALL FINI
1856 ;
1857 ; INCHAR
1858 ;
1859 EB1D 21 0000 INCHAR: LXI H,0
1860 EB20 CD F812 CALL CSTS
1861 EB23 C8 RZ
1862 EB24 CD F803 CALL CI
1863 EB27 6F MOV L,A
1864 EB28 C9 RET
1865 ;
1866 ; HEX
1867 ;
1868 EB29 C5 HEX: PUSH B
1869 EB2A 21 0000 LXI H,0
1870 EB2D CD E2F3 CALL TSTC
1871 EB30 28 DB '('
1872 EB31 1D DB 1DH
1873 EB32 1A HNXTH: LDAX D
1874 EB33 FE 0D CPI CR
1875 EB35 CA E7D5 JZ QWHAT
1876 EB38 CD F82D CALL ASHEX
1877 EB3B DA E7D5 JC QWHAT
1878 EB3E 29 DAD H
1879 EB3F 29 DAD H
1880 EB40 29 DAD H
1881 EB41 29 DAD H
1882 EB42 06 00 MVI B,0
1883 EB44 4F MOV C,A
1884 EB45 09 DAD B
1885 EB46 13 INX D
1886 EB47 CD E2F3 CALL TSTC
1887 EB4A 29 DB ')'
1888 EB4B 03 DB 3
1889 EB4C C3 EB55 JMP POPRET
1890 EB4F C3 EB32 JMP HNXTH
1891 EB52 C3 E7D5 JMP QWHAT
1892 EB55 C1 POPRET: POP B
1893 EB56 C9 RET
1894 ;
1895 ;
1896 ;
1897 ; TEST TLACITKA BREAK
1898 ;
1899 EB57 CD F812 CONT: CALL CSTS ; IF KLAVESA VESTISKNUTA
1900 EB5A B7 ORA A ; THEN POKRACUJ
1901 EB5B C8 RZ
1902 EB5C CD F803 CALL CI
1903 EB5F FE 03 CPI CTRLC ; IF <> CTRL-C THEN
1904 EB61 C0 RNZ ; POKRACUJ
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-34
1905 EB62 C3 EB68 JMP BREAK ; ELSE BREAK
1906 ;
1907 EB65 CD E7CF STOP: CALL ENDCHK
1908 EB68 2A 0010 BREAK: LHLD CURRNT
1909 EB6B EB BREAK1: XCHG
1910 EB6C CD E974 CALL CRLF
1911 EB6F 3E 2A MVI A,'*'
1912 EB71 CD E976 CALL OUTC
1913 EB74 CD E8FA CALL PRTLN
1914 EB77 C3 E03E JMP RSTART
1915 ;
1916 ;
1917 ;
1918 ; ZMENA VYSTUPU
1919 ;
1920 EB7A 21 EB8C PRNTST: LXI H,LO1
1921 EB7D 22 000D SETCO: SHLD CO+1
1922 EB80 C9 RET
1923
1924 EB81 3E C3 DISP: MVI A,0C3H
1925 EB83 32 000C STA CO
1926 EB86 21 EB93 LXI H,OUTDIS
1927 EB89 C3 EB7D JMP SETCO
1928
1929 EB8C C5 LO1: PUSH B ; USCHOVEJ POCITADLO
1930 EB8D 4F MOV C,A
1931 EB8E CD F80F CALL LO
1932 EB91 C1 POP B ; OBNOV POCITADLO
1933 EB92 C9 RET
1934
1935 EB93 C5 OUTDIS: PUSH B ; USCHOVEJ POCITADLO
1936 EB94 4F MOV C,A
1937 EB95 CD EB9A CALL ECOM
1938 EB98 C1 POP B ; OBNOV POCITADLO
1939 EB99 C9 RET
1940 ;
1941 EB9A F5 ECOM: PUSH PSW
1942 EB9B 3A 0026 LDA MODE
1943 EB9E B7 ORA A
1944 EB9F CA EBAC JZ ECOM0 ; ZOBRAZ INVERZNE ?
1945 EBA2 79 MOV A,C
1946 EBA3 FE 20 CPI 20H
1947 EBA5 DA EBAC JC ECOM0 ; RIDICI ZNAKY NORMALNE
1948 EBA8 3E 80 MVI A,80H
1949 EBAA B1 ORA C
1950 EBAB 4F MOV C,A
1951 EBAC CD F809 ECOM0: CALL COM
1952 EBAF F1 POP PSW
1953 EBB0 C9 RET
1954 ;
1955 ;
1956 ; SKOK DO MONITORU
1957
1958 EBB1 C3 F839 MONIT: JMP NEXTM ; TEPLY START MONITORU
1959 ;
1960 ;
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-35
1961 ;
1962 ;*********************************************
1963 ;
1964 ; DOPLNUJICI CAST PRO PLAN80A
1965 ;
1966 ;*********************************************
1967 ;
1968 ;
1969 ; WAIT
1970 ;
1971 EBB4 CD E60C WAIT: CALL EXPR
1972 EBB7 C5 PUSH B ; USCHOVEJ BC
1973 EBB8 4D MOV C,L
1974 EBB9 44 MOV B,H
1975 EBBA CD F84B CALL TIMER ; CEKEJ <HL> MILISEKUND
1976 EBBD C1 POP B ; OBNOV BC
1977 EBBE CD E2B8 CALL FINI
1978 ;
1979 ;
1980 ;
1981 ; BEEP
1982 ;
1983 EBC1 CD E60C BEEP: CALL EXPR
1984 EBC4 C5 PUSH B ;USCHOVEJ PRACOVNI REGISTRY
1985 EBC5 D5 PUSH D
1986 EBC6 7C MOV A,H
1987 EBC7 B7 ORA A
1988 EBC8 FA E331 JM QHOW ; IF ZAPORNA ERROR
1989 EBCB B5 ORA L
1990 EBCC CA E331 JZ QHOW ; IF 0 ERROR
1991 EBCF EB XCHG ; <DE> POCET PIPNUTI DELKY 0.1 S
1992 EBD0 3E 07 BEEP0: MVI A,07H
1993 EBD2 CD 000C CALL CO
1994 EBD5 01 0064 LXI B,100
1995 EBD8 CD F84B CALL TIMER ; CEKEJ 100 MILISEKUND
1996 EBDB 1B DCX D
1997 EBDC 7A MOV A,D
1998 EBDD B3 ORA E ; VSECHNA PIPNUTI PROVEDENA ?
1999 EBDE C2 EBD0 JNZ BEEP0 ; NE - ZNOVU
2000 EBE1 D1 POP D ; OBNOV REGISTRY
2001 EBE2 C1 POP B
2002 EBE3 CD E2B8 CALL FINI
2003 ;
2004 ;
2005 ;
2006 ;
2007 ; PLOT
2008 ;
2009 ; PRIKAZ KRESLENI PLOT X,Y
2010 ;
2011 EBE6 CD E60C PLOT: CALL EXPR ; VSTUP 1. PARAMETRU ... X
2012 EBE9 C5 PUSH B
2013 EBEA E5 PUSH H
2014 EBEB 7D MOV A,L
2015 EBEC FE 90 CPI 144 ; X MAX?
2016 EBEE D2 E331 JNC QHOW
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-36
2017 EBF1 CD E2F3 CALL TSTC
2018 EBF4 2C DB ','
2019 EBF5 1B DB PLTF-$
2020 EBF6 CD E60C CALL EXPR ; VSTUP 2. PARAMETRU ... Y
2021 EBF9 7D MOV A,L
2022 EBFA 32 002E STA YKUR
2023 EBFD FE 40 CPI 64 ; Y MAX?
2024 EBFF D2 E331 JNC QHOW
2025 EC02 7D MOV A,L
2026 EC03 32 002D STA XKUR
2027 EC06 65 MOV H,L
2028 EC07 C1 POP B
2029 EC08 69 MOV L,C
2030 EC09 CD EC13 CALL PIXL ; VYKRESLI BOD NA <L>=X, <H>=Y
2031 EC0C C1 POP B
2032 EC0D CD E2B8 CALL FINI
2033 EC10 C3 E7D5 PLTF: JMP QWHAT
2034 ;
2035 ;
2036 ;
2037 ; PIXL
2038 ;
2039 ; PODPROGRAM ZOBRAZENI PIXLU GRAFIKY <H>=Y, <L>=X
2040 ;
2041 EC13 F5 PIXL: PUSH PSW
2042 EC14 C5 PUSH B
2043 EC15 D5 PUSH D
2044 EC16 E5 PUSH H
2045 EC17 7C MOV A,H ; Y - SOURADNICE
2046 EC18 B7 ORA A
2047 EC19 1F RAR ; Y/2
2048 EC1A 6F MOV L,A
2049 EC1B 26 00 MVI H,0
2050 EC1D 29 DAD H
2051 EC1E 29 DAD H
2052 EC1F 29 DAD H
2053 EC20 29 DAD H
2054 EC21 29 DAD H
2055 EC22 29 DAD H ; Y/2 * 64
2056 EC23 EB XCHG
2057 EC24 2A 0004 LHLD RAMEND
2058 EC27 23 INX H ; ADRESA PRVNIHO ZNAKU DISPLAYE
2059 EC28 19 DAD D ; Y/2 * 64 + ADRDIS
2060 EC29 EB XCHG
2061 EC2A E1 POP H
2062 EC2B E5 PUSH H
2063 EC2C 7D MOV A,L ; X - SOURADNICE
2064 EC2D CD EC87 CALL DIVTRI ; X/3
2065 EC30 69 MOV L,C
2066 EC31 26 00 MVI H,0
2067 EC33 19 DAD D ; Y/2*64 + ADRDIS + X/3 ... ADRESA ZNAKU
2068 EC34 7E MOV A,M
2069 EC35 E6 60 ANI 60H
2070 EC37 FE 60 CPI 60H ; JDE O GRAFICKY SYMBOL ?
2071 EC39 CA EC3E JZ PIXL0
2072 EC3C 36 20 MVI M,20H ; NE - VYMAZ ZNAKU
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-37
2073 EC3E E3 PIXL0: XTHL ; V <HL> SOURADNICE
2074 EC3F 7C MOV A,H ; Y - SOURADNICE
2075 EC40 E6 01 ANI 01H ; Y MOD 2
2076 EC42 47 MOV B,A
2077 EC43 3E 01 MVI A,1
2078 EC45 90 SUB B ; 1 - (Y MOD 2)
2079 EC46 47 MOV B,A
2080 EC47 87 ADD A
2081 EC48 80 ADD B ; (1 - (Y MOD 2)) * 3
2082 EC49 47 MOV B,A
2083 EC4A 7D MOV A,L ; X - SOURADNICE
2084 EC4B E1 POP H ; V <HL> ADRESA ZNAKU
2085 EC4C E5 PUSH H
2086 EC4D CD EC87 CALL DIVTRI ; X MOD 3
2087 EC50 80 ADD B ; (1 - (Y MOD 2))*3 + (X MOD 3)
2088 EC51 FE 05 CPI 5 ; JDE O NEPOKRITY PIXL ?
2089 EC53 CA EC79 JZ NEPOK ; ANO - SKOK
2090 ;
2091 EC56 47 POK: MOV B,A
2092 EC57 3E 80 MVI A,80H
2093 EC59 07 POK0: RLC
2094 EC5A 05 DCR B
2095 EC5B F2 EC59 JP POK0 ; GENERUJ MASKU POKRITEHO PIXLU
2096 EC5E 47 MOV B,A
2097 EC5F 7E MOV A,M
2098 EC60 B7 ORA A
2099 EC61 FA EC6E JM POK1 ; JE NASTAVEN D7=1 ?
2100 EC64 78 MOV A,B
2101 EC65 B6 ORA M
2102 EC66 E6 1F ANI 1FH
2103 EC68 F6 60 ORI 60H
2104 EC6A 77 MOV M,A ; NASTAVENI PIXLU 0 - 4 BEZ PIXLU 5
2105 EC6B C3 EC82 JMP PIXL1
2106 EC6E E6 1F POK1: ANI 1FH
2107 EC70 2F CMA
2108 EC71 B0 ORA B
2109 EC72 2F CMA
2110 EC73 F6 E0 ORI 0E0H
2111 EC75 77 MOV M,A ; NASTAVENI PIXLU 0 - 4 PRI PIXLU 5
2112 EC76 C3 EC82 JMP PIXL1
2113 ;
2114 EC79 7E NEPOK: MOV A,M
2115 EC7A B7 ORA A
2116 EC7B FA EC82 JM PIXL1 ; PIXL 5 JIZ NASTAVEN
2117 EC7E E6 1F ANI 1FH
2118 EC80 2F CMA
2119 EC81 77 MOV M,A ; NASTAVENI PIXLU 5
2120 ;
2121 EC82 E1 PIXL1: POP H
2122 EC83 D1 POP D
2123 EC84 C1 POP B
2124 EC85 F1 POP PSW
2125 EC86 C9 RET
2126 ;
2127 EC87 0E FF DIVTRI: MVI C,0FFH
2128 EC89 0C DIVT0: INR C
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-38
2129 EC8A D6 03 SUI 3
2130 EC8C D2 EC89 JNC DIVT0
2131 EC8F C6 03 ADI 3
2132 EC91 C9 RET
2133 ;
2134 ;
2135 ;
2136 ; DRAW - PRIKAZ SPOJENI DVOU BODU PRIMKOU
2137 ; XKUR,YKUR ... STARY BOD
2138 ; PARAMETRY ... NOVY BOD
2139 ;
2140 EC92 CD E60C DRAW: CALL EXPR
2141 EC95 C5 PUSH B
2142 EC96 E5 PUSH H
2143 EC97 7D MOV A,L
2144 EC98 FE 90 CPI 144 ; XNEW MAX?
2145 EC9A D2 E331 JNC QHOW
2146 EC9D CD E2F3 CALL TSTC
2147 ECA0 2C DB ','
2148 ECA1 14 DB DRAF-$
2149 ECA2 CD E60C CALL EXPR
2150 ECA5 7D MOV A,L
2151 ECA6 FE 40 CPI 64 ; YNEW MAX?
2152 ECA8 D2 E331 JNC QHOW
2153 ECAB 65 MOV H,L
2154 ECAC C1 POP B
2155 ECAD 69 MOV L,C ; <H> = YNEW, <L> = XNEW
2156 ECAE CD ECB8 CALL INTERP ; POMOCI INTERPOLATORU KRESLI
2157 ECB1 C1 POP B
2158 ECB2 CD E2B8 CALL FINI ; XKUR = XNEW, YKUR = YNEW
2159 ECB5 C3 E7D5 DRAF: JMP QWHAT
2160 ;
2161 ;
2162 ; INTERPOL - PODPROGRAM INTERPOLATOTU Z PMD-85
2163 ; <H> = YNEW, <L> = XNEW
2164 ;
2165 ECB8 F5 INTERP: PUSH PSW
2166 ECB9 C5 PUSH B
2167 ECBA D5 PUSH D
2168 ECBB E5 PUSH H
2169 ;
2170 ECBC 3A 002D LDA XKUR
2171 ECBF BD CMP L ; SVISLI SMER?
2172 ECC0 CA ED45 JZ INPO9 ; ANO - SKOK
2173 ECC3 DA ED51 JC INPO11 ; XOLD < XNEW ... SKOK
2174 ;
2175 ; XOLD > XNEW
2176 ;
2177 ECC6 95 SUB L
2178 ECC7 5F MOV E,A ; XOLD - XNEW
2179 ECC8 0E FF MVI C,0FFH ; SMER INTERPOLACE
2180 ECCA 3A 002E INPO1: LDA YKUR ; YOLD
2181 ECCD BC CMP H ; VODOROVNY SMER?
2182 ECCE CA ED4B JZ INPO10 ; ANO - SKOK
2183 ECD1 DA ED5A JC INPO12 ; YOLD < YNEW ... SKOK
2184 ;
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-39
2185 ; YOLD > YNEW
2186 ;
2187 ECD4 94 SUB H
2188 ECD5 57 MOV D,A ; YOLD - YNEW
2189 ECD6 06 FF MVI B,0FFH ; SMER INTERPOLACE
2190 ECD8 7B INPO2: MOV A,E
2191 ECD9 32 002F STA DELTAX ; ROZDIL X SOURADNIC
2192 ECDC 7A MOV A,D
2193 ECDD 32 0030 STA DELTAY ; ROZDIL Y SOURADNIC
2194 ECE0 BB CMP E ; DELTAX < DELTAY?
2195 ECE1 DA ED63 JC INPO13 ; ANO - SKOK
2196 ;
2197 ; DELTAX > DELTAY
2198 ;
2199 ECE4 63 MOV H,E
2200 ECE5 5A MOV E,D ;DELTAY
2201 ECE6 54 MOV D,H ;DELTAX
2202 ECE7 A7 ANA A
2203 ECE8 1F RAR
2204 ECE9 67 MOV H,A ; DELTAY / 2
2205 ;
2206 ; VLASTNI INTERPOLACE
2207 ;
2208 ECEA 2E 00 INPO3: MVI L,0 ; CITAC
2209 ECEC 7D INPO4: MOV A,L
2210 ECED BB CMP E ; KOMEC?
2211 ECEE CA ED6A JZ INPO14 ; ANO - NAVRAT Z PODPROGRAMU
2212 ECF1 2C INR L ; INKR. CITAC
2213 ECF2 7C MOV A,H
2214 ECF3 82 ADD D
2215 ECF4 67 MOV H,A ; DELTAX + DELTAY/2
2216 ECF5 DA ED34 JC INPO8 ; >255 ... SKOK
2217 ECF8 BB CMP E ; =>DELTAY ?
2218 ECF9 CA ED39 JZ INPOEX ; ROVNO ... SKOK
2219 ECFC D2 ED39 JNC INPOEX ; VETSI ... SKOK
2220 ECFF 3A 002F LDA DELTAX
2221 ED02 BB CMP E ; POSUN VE SMERU X?
2222 ED03 C2 ED0D JNZ INPO5 ; NE - SKOK
2223 ED06 3A 002D LDA XKUR ; XOLD
2224 ED09 81 ADD C
2225 ED0A 32 002D STA XKUR ; PROVET POSUN X
2226 ED0D 3A 0030 INPO5: LDA DELTAY
2227 ED10 BB CMP E ; POSUN VE SMERU Y?
2228 ED11 C2 ED1B JNZ INPO7 ; NE - SKOK
2229 ;
2230 ED14 3A 002E INPO6: LDA YKUR ; YOLD
2231 ED17 80 ADD B
2232 ED18 32 002E STA YKUR ; PROVED POSUN Y
2233 ED1B E5 INPO7: PUSH H
2234 ED1C F5 PUSH PSW
2235 ED1D 2A 002D LHLD XKUR
2236 ED20 7C MOV A,H
2237 ED21 FE 40 CPI 64
2238 ED23 D2 ED2F JNC INPO15
2239 ED26 7D MOV A,L
2240 ED27 FE 90 CPI 144
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-40
2241 ED29 D2 ED2F JNC INPO15
2242 ED2C CD EC13 CALL PIXL ; ZOBRAZ BOD [XKUR,YKUR]
2243 ED2F F1 INPO15: POP PSW
2244 ED30 E1 POP H
2245 ED31 C3 ECEC JMP INPO4 ; DALSI BOD
2246 ;
2247 ; DELTAX + DELTA/2 > 255
2248 ;
2249 ED34 7B INPO8: MOV A,E
2250 ED35 2F CMA
2251 ED36 84 ADD H
2252 ED37 67 MOV H,A ; BY JUMP HERE IS: LDA 6793
2253 ED38 3A DB 3AH ; BY JUMP HERE IS: SUB E
2254 ;
2255 ; DELTAX + DELTAY/2 => DELTAY
2256 ;
2257 ED39 93 INPOEX: SUB E
2258 ED3A 67 MOV H,A
2259 ED3B 3A 002D LDA XKUR ; XOLD
2260 ED3E 81 ADD C
2261 ED3F 32 002D STA XKUR ; XOLD
2262 ED42 C3 ED14 JMP INPO6
2263 ;
2264 ; XOLD = XNEW
2265 ;
2266 ED45 AF INPO9: XRA A
2267 ED46 5F MOV E,A
2268 ED47 4F MOV C,A
2269 ED48 C3 ECCA JMP INPO1
2270 ;
2271 ; YOLD = YNEW
2272 ;
2273 ED4B AF INPO10: XRA A
2274 ED4C 57 MOV D,A
2275 ED4D 47 MOV B,A
2276 ED4E C3 ECD8 JMP INPO2
2277 ;
2278 ; XOJD < XNEW
2279 ;
2280 ED51 5F INPO11: MOV E,A
2281 ED52 7D MOV A,L
2282 ED53 93 SUB E
2283 ED54 5F MOV E,A
2284 ED55 0E 01 MVI C,1
2285 ED57 C3 ECCA JMP INPO1
2286 ;
2287 ; YOLD < YNEW
2288 ;
2289 ED5A 57 INPO12: MOV D,A
2290 ED5B 7C MOV A,H
2291 ED5C 92 SUB D
2292 ED5D 57 MOV D,A
2293 ED5E 06 01 MVI B,1
2294 ED60 C3 ECD8 JMP INPO2
2295 ;
2296 ; DELTAX < DELTAY
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-41
2297 ;
2298 ED63 A7 INPO13: ANA A
2299 ED64 7B MOV A,E
2300 ED65 1F RAR
2301 ED66 67 MOV H,A
2302 ED67 C3 ECEA JMP INPO3
2303 ;
2304 ; UKONCENI INTERPOLACE
2305 ;
2306 ED6A E1 INPO14: POP H
2307 ED6B D1 POP D
2308 ED6C C1 POP B
2309 ED6D F1 POP PSW
2310 ED6E C9 RET
2311 ;
2312 ;
2313 ;
2314 ; MOVE - PRIKAZ POSUNU GRAFICKEHO KURZORU
2315 ;
2316 ED6F CD E60C MOVE: CALL EXPR
2317 ED72 C5 PUSH B
2318 ED73 E5 PUSH H
2319 ED74 7D MOV A,L
2320 ED75 FE 90 CPI 144 ; X MAX?
2321 ED77 D2 E331 JNC QHOW
2322 ED7A CD E2F3 CALL TSTC
2323 ED7D 2C DB ','
2324 ED7E 14 DB MOVF-$
2325 ED7F CD E60C CALL EXPR
2326 ED82 7D MOV A,L
2327 ED83 FE 40 CPI 64 ; Y MAX?
2328 ED85 D2 E331 JNC QHOW
2329 ED88 65 MOV H,L
2330 ED89 C1 POP B
2331 ED8A 69 MOV L,C
2332 ED8B 22 002D SHLD XKUR ; X --> XKUR, Y --> YKUR
2333 ED8E C1 POP B
2334 ED8F CD E2B8 CALL FINI
2335 ED92 C3 E7D5 MOVF: JMP QWHAT
2336 ;
2337 ;
2338 ;
2339 ; CURS
2340 ; ====
2341 ;
2342 ; PRIKAZ PRO NASTAVENI KURZORU.
2343 ;
2344 ED95 CD E60C CURS: CALL EXPR
2345 ED98 C5 PUSH B
2346 ED99 E5 PUSH H
2347 ED9A 7D MOV A,L
2348 ED9B FE 30 CPI 48
2349 ED9D D2 E331 JNC QHOW
2350 EDA0 CD E2F3 CALL TSTC
2351 EDA3 2C DB ','
2352 EDA4 1C DB CURF - $
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-42
2353 EDA5 CD E60C CALL EXPR
2354 EDA8 7D MOV A,L
2355 EDA9 FE 20 CPI 20H
2356 EDAB D2 E331 JNC QHOW
2357 EDAE D5 PUSH D
2358 EDAF 11 0035 LXI D,LINECO
2359 EDB2 2A 0004 LHLD RAMEND
2360 EDB5 23 INX H
2361 EDB6 19 DAD D
2362 EDB7 D1 POP D
2363 EDB8 77 MOV M,A
2364 EDB9 23 INX H
2365 EDBA C1 POP B
2366 EDBB 71 MOV M,C
2367 EDBC C1 POP B
2368 EDBD CD E2B8 CALL FINI
2369 EDC0 C3 E7D5 CURF: JMP QWHAT
2370 ;
2371 ;
2372 ;
2373 ; EDIT
2374 ;
2375 ; PRIKAZ PRO EDITACI JEDNOHO RADKU PROGRAMU.
2376 ;
2377 ; POSUN KURZORU VLRVO: BS, CTRL-S, SIPKA VLEVO
2378 ; POSUN KURZORU VPRAVO: CTRL-D, SIPKA VPRAVO
2379 ; VYMAZ ZNAKU VPRAVO OD KURZORU: CTRL-X,DEL
2380 ; UKONCENI EDITACE: CR
2381 ; PRERUSENI PRIKAZU: ESC,CS,CTRL-[
2382 ; VLOZENI ZNAKU VLEVO OD KURZORU: JINE ZNAKY > 20H
2383 ;
2384 EDC3 CD E307 EDIT: CALL TSTNUM ; PREVOD ASCII Z BUFFERU NA BIN V <HL>
2385 EDC6 CD E2B0 CALL IGNB ; VYNECH MEZERY
2386 EDC9 FE 0D CPI CR
2387 EDCB C2 E7D5 JNZ QWHAT ; CHYBA PRIKAZU
2388 EDCE CD E869 CALL FNDLN ; NAJDI ADRESU RADKU <DE>
2389 EDD1 DA E331 JC QHOW ; NENI TAKOVY ANI VETSI RADEK
2390 ;
2391 ; PRESUN RADEK Z PROGRAMU DO BUFFERU
2392 ;
2393 EDD4 D5 PUSH D
2394 EDD5 CD E887 CALL FNDNXT
2395 EDD8 EB XCHG ; V <HL> ADRESA NASL. RADKU
2396 EDD9 CD E9D8 CALL DBUFF
2397 EDDC D5 PUSH D
2398 EDDD C1 POP B ; V <BC> ADRESA BUFFERU
2399 EDDE D1 POP D ; V <DE> ADRESA EDITOVANEHO RADKU
2400 EDDF CD E90F CALL MVUP ; PRESUN EDIT. RADEK DO BUFFERU
2401 EDE2 3E 02 MVI A,2
2402 EDE4 32 0031 STA EDKUR ; POC. HODNOTA KURZORU
2403 EDE7 3E 5F MVI A,'_'
2404 EDE9 CD EE59 CALL VSUN
2405 ;
2406 ; ZOBRAZ RADEK
2407 ;
2408 EDEC 3E 1D EDIT0: MVI A,HOME
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-43
2409 EDEE CD 000C CALL CO ; NA ZACETAK OBRAZOVKY
2410 EDF1 3E 1F MVI A,DSCR
2411 EDF3 CD 000C CALL CO ; VYMAZ OBRAZOVKY
2412 EDF6 CD E9D8 CALL DBUFF
2413 EDF9 CD E8FA CALL PRTLN ; ZOBRAZ RADEK Z BUFFERU
2414 ;
2415 ; VSTUP PRIKAZU
2416 ;
2417 EDFC CD F803 EDIT2: CALL CI
2418 EDFF FE 08 CPI LEFT ; SIPKA VLEVO
2419 EE01 CA EE71 JZ VLEVO
2420 EE04 FE 13 CPI CTRLS ; STRL S
2421 EE06 CA EE71 JZ VLEVO
2422 EE09 FE 04 CPI RIGHT ; SIPKA VLEVO
2423 EE0B CA EE8A JZ VPRAVO
2424 EE0E FE 04 CPI CTRLD ; CTRL D
2425 EE10 CA EE8A JZ VPRAVO
2426 EE13 FE 18 CPI DOWN ; SIPKA DOLU
2427 EE15 CA EEAE JZ VYMAZ
2428 EE18 FE 18 CPI CTRLX ; CTRL X
2429 EE1A CA EEAE JZ VYMAZ
2430 EE1D FE 7F CPI RUB ; DEL
2431 EE1F CA EEAE JZ VYMAZ
2432 EE22 FE 1B CPI ESC ; ESC (CTRL [)
2433 EE24 CA E03E JZ RSTART
2434 EE27 FE 0D CPI CR ; CR
2435 EE29 C2 EE47 JNZ VLOZ
2436 ;
2437 ; UKONCENI EDITACE
2438 ;
2439 EE2C CD EED6 CALL VYHOD
2440 EE2F D5 PUSH D
2441 EE30 C1 POP B ; V <BC> ADRESA POSL. ZNAKU + 1
2442 EE31 CD E9D8 CALL DBUFF ; V <DE> ADRESA BUFFERU
2443 EE34 1A LDAX D
2444 EE35 6F MOV L,A
2445 EE36 13 INX D
2446 EE37 1A LDAX D
2447 EE38 67 MOV H,A
2448 EE39 1B DCX D ; V <HL> CISLO RADKU
2449 EE3A 3E 1D MVI A,HOME
2450 EE3C CD 000C CALL CO
2451 EE3F 3E 1F MVI A,DSCR
2452 EE41 CD 000C CALL CO
2453 EE44 C3 E08A JMP EDIST ; VLOZ EDITOVANY RADEK DO PROGRAMU
2454 ;
2455 ; VSUN ZNAK
2456 ;
2457 EE47 FE 20 VLOZ: CPI 20H
2458 EE49 DA EDEC JC EDIT0
2459 EE4C CD EE59 CALL VSUN
2460 EE4F 3A 0031 LDA EDKUR
2461 EE52 3C INR A
2462 EE53 32 0031 STA EDKUR
2463 EE56 C3 EDEC JMP EDIT0
2464 ;
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-44
2465 EE59 F5 VSUN: PUSH PSW
2466 EE5A 2A 0029 LHLD BUFFER
2467 EE5D 06 00 MVI B,0
2468 EE5F 3A 0031 LDA EDKUR
2469 EE62 4F MOV C,A
2470 EE63 09 DAD B ; V <HL> ADRESA KURZORU
2471 EE64 F1 POP PSW
2472 EE65 4E VSU0: MOV C,M
2473 EE66 77 MOV M,A
2474 EE67 79 MOV A,C
2475 EE68 FE 0D CPI CR
2476 EE6A 23 INX H
2477 EE6B C2 EE65 JNZ VSU0 ; VLOZ ZNAK
2478 EE6E 77 MOV M,A ; VLOZ CR
2479 EE6F 13 INX D
2480 EE70 C9 RET
2481 ;
2482 ; POSUN KURZORU VLEVO
2483 ;
2484 EE71 3A 0031 VLEVO: LDA EDKUR
2485 EE74 FE 03 CPI 3
2486 EE76 DA EDEC JC EDIT0
2487 EE79 F5 PUSH PSW
2488 EE7A CD EED6 CALL VYHOD
2489 EE7D F1 POP PSW
2490 EE7E 3D DCR A
2491 EE7F 32 0031 STA EDKUR
2492 EE82 3E 5F MVI A,'_'
2493 EE84 CD EE59 CALL VSUN
2494 EE87 C3 EDEC JMP EDIT0
2495 ;
2496 ; POSUN KURZOR VPRAVO
2497 ;
2498 EE8A 2A 0029 VPRAVO: LHLD BUFFER
2499 EE8D 3A 0031 LDA EDKUR
2500 EE90 4F MOV C,A
2501 EE91 06 00 MVI B,0
2502 EE93 09 DAD B ; V <HL> ADRESA KURZORU
2503 EE94 23 INX H
2504 EE95 23 INX H ; ZAHRN I ZNAK CR NA KONCI RADKU
2505 EE96 CD E2AA CALL COMP ; NA KONCI RADKU?
2506 EE99 D2 EDEC JNC EDIT0 ; ANO - DAL NEPOSOUVEJ
2507 EE9C CD EED6 VPRA0: CALL VYHOD
2508 EE9F 3A 0031 LDA EDKUR
2509 EEA2 3C INR A
2510 EEA3 32 0031 STA EDKUR
2511 EEA6 3E 5F MVI A,'_'
2512 EEA8 CD EE59 CALL VSUN
2513 EEAB C3 EDEC JMP EDIT0
2514 ;
2515 ; VYMAZ ZNAKU
2516 ;
2517 EEAE 2A 0029 VYMAZ: LHLD BUFFER
2518 EEB1 3A 0031 LDA EDKUR
2519 EEB4 4F MOV C,A
2520 EEB5 06 00 MVI B,0
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-45
2521 EEB7 09 DAD B ; V <HL> ADRESA KURZORU
2522 EEB8 CD E2AA CALL COMP
2523 EEBB 23 INX H
2524 EEBC 23 INX H
2525 EEBD 23 INX H
2526 EEBE 23 INX H ; ZAHRN I ZNAK CR MA KONCI RADKU
2527 EEBF D2 EDEC JNC EDIT0 ; KONEC RADKU - SKOK
2528 EEC2 3A 0031 LDA EDKUR
2529 EEC5 3C INR A
2530 EEC6 32 0031 STA EDKUR
2531 EEC9 CD EED6 CALL VYHOD
2532 EECC 3A 0031 LDA EDKUR
2533 EECF 3D DCR A
2534 EED0 32 0031 STA EDKUR
2535 EED3 C3 EDEC JMP EDIT0
2536 ;
2537 EED6 2A 0029 VYHOD: LHLD BUFFER
2538 EED9 3A 0031 LDA EDKUR
2539 EEDC 4F MOV C,A
2540 EEDD 06 00 MVI B,0
2541 EEDF 09 DAD B ; V <HL> ADRESA KURZORU
2542 EEE0 23 VYH0: INX H
2543 EEE1 7E MOV A,M
2544 EEE2 2B DCX H
2545 EEE3 77 MOV M,A
2546 EEE4 23 INX H
2547 EEE5 FE 0D CPI CR
2548 EEE7 C2 EEE0 JNZ VYH0
2549 EEEA 1B DCX D
2550 EEEB C9 RET
2551 ;
2552 ;
2553 ;
2554 ; LOAD
2555 ;
2556 ; SNIMAC A DEROVAC (=>MODEM+MAGNETOFON)
2557 ;
2558 EEEC 11 009B LOAD: LXI D,TXTBGN
2559 EEEF CD F806 LOA1: CALL RI
2560 EEF2 FE 00 CPI 00H
2561 EEF4 CA EEEF JZ LOA1
2562 EEF7 FE 24 CPI '$'
2563 EEF9 C2 EEEF JNZ LOA1
2564 EEFC CD F806 CALL RI
2565 EEFF 6F MOV L,A
2566 EF00 CD F806 CALL RI
2567 EF03 67 MOV H,A
2568 EF04 19 DAD D ; KONCOVA ADRESA
2569 EF05 22 003B SHLD TXTUNF
2570 EF08 EB XCHG
2571 EF09 CD F806 LOA0: CALL RI
2572 EF0C 77 MOV M,A
2573 EF0D 23 INX H
2574 EF0E CD E2AA CALL COMP
2575 EF11 C2 EF09 JNZ LOA0
2576 EF14 D5 PUSH D
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-46
2577 EF15 C5 PUSH B
2578 EF16 CD F004 CALL JOIN0
2579 EF19 C1 POP B
2580 EF1A D1 POP D
2581 EF1B C3 E03E JMP RSTART
2582 ;
2583 ;
2584 ;
2585 ; SAVE
2586 ;
2587 EF1E 0E 24 SAVE: MVI C,'$'
2588 EF20 CD F80C CALL PO
2589 EF23 2A 003B LHLD TXTUNF
2590 EF26 EB XCHG ; V <DE> KONEC PROGRAMU
2591 EF27 21 009B LXI H,TXTBGN ; V <HL> ZACATEK PROGRAMU
2592 EF2A 7B MOV A,E
2593 EF2B 95 SUB L
2594 EF2C 4F MOV C,A
2595 EF2D 7A MOV A,D
2596 EF2E 9C SBB H
2597 EF2F 47 MOV B,A
2598 EF30 CD F80C CALL PO ; POCET BYTU LOW
2599 EF33 48 MOV C,B
2600 EF34 CD F80C CALL PO ; POCET BYTU HIGH
2601 EF37 CD E2AA SAVE1: CALL COMP
2602 EF3A CA EF45 JZ SAVE2
2603 EF3D 4E MOV C,M
2604 EF3E CD F80C CALL PO
2605 EF41 23 INX H
2606 EF42 C3 EF37 JMP SAVE1
2607 EF45 0E 1A SAVE2: MVI C,SUBS
2608 EF47 CD F80C CALL PO
2609 EF4A D5 PUSH D
2610 EF4B C5 PUSH B
2611 EF4C CD F028 CALL TCLOSE
2612 EF4F C1 POP B
2613 EF50 D1 POP D
2614 EF51 C3 E03E JMP RSTART
2615 ;
2616 ;
2617 ;
2618 ; GET
2619 ;
2620 EF54 CD F806 GET: CALL RI
2621 EF57 6F MOV L,A
2622 EF58 CD F806 CALL RI
2623 EF5B 67 MOV H,A
2624 EF5C C9 RET
2625 ;
2626 ;
2627 ;
2628 ; PUT
2629 ;
2630 EF5D CD E70B PUT: CALL PARN
2631 EF60 C5 PUSH B
2632 EF61 4D MOV C,L
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-47
2633 EF62 CD F80C CALL PO
2634 EF65 4C MOV C,H
2635 EF66 CD F80C CALL PO
2636 EF69 C1 POP B
2637 EF6A CD E2B8 CALL FINI
2638 EF6D C3 E7D5 JMP QWHAT
2639 ;
2640 ;
2641 ;
2642 ; CLOSE
2643 ;
2644 EF70 CD EF90 CLOSE: CALL CHKTPR ; JE PRIPOJEN MAGNETOFON ?
2645 EF73 D5 PUSH D
2646 EF74 C5 PUSH B
2647 EF75 CD F028 CALL TCLOSE
2648 EF78 C1 POP B
2649 EF79 D1 POP D
2650 EF7A CD E2B8 CALL FINI
2651 EF7D C3 E7D5 JMP QWHAT
2652 ;
2653 ;
2654 ;
2655 ; INIT
2656 ;
2657 EF80 CD EF90 INIT: CALL CHKTPR ; JE PRIPOJEN MAGNETOFON ?
2658 EF83 D5 PUSH D
2659 EF84 C5 PUSH B
2660 EF85 CD F004 CALL JOIN0
2661 EF88 C1 POP B
2662 EF89 D1 POP D
2663 EF8A CD E2B8 CALL FINI
2664 EF8D C3 E7D5 JMP QWHAT
2665 ;
2666 ;
2667 ; CHKTPR - TEST PRITOMNOSTI MAGNETOFONU
2668 ;
2669 EF90 3A F000 CHKTPR: LDA ADRTPR
2670 EF93 FE 55 CPI KEYTPR
2671 EF95 C2 E7D5 JNZ QWHAT
2672 EF98 C9 RET
2673 ;
2674 .DEPHASE
2675 ;
2676 ;*********************************************
2677 ;
2678 ; DEFINICE RAM
2679 ;
2680 ;*********************************************
2681 ;
2682 .PHASE UZIRAM
2683 ;
2684 0006 LEGT: DS 2
2685 0008 IOBUFA: DS 1
2686 0009 IOBUFB: DS 1
2687 000A IOBUFC: DS 1
2688 000B LISTC: DS 1
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE 1-48
2689 000C CO: DS 3 ; SKUTECNA ADR. CO OR LO
2690 000F MASKIN: DS 1 ; MASKA PRO FUNKCI 'INM'
2691 0010 CURRNT: DS 2 ; PRAVE ZPRACOVAVANY RADEK PROGRAM
2692 0012 STKGOS: DS 2 ; POINTER PRO GOSUB
2693 0014 VARNXT: DS 2
2694 0016 STKINP: DS 2
2695 0018 LOPVAR: DS 2 ; POINTER PRO FOR
2696 001A LOPINC: DS 2
2697 001C LOPLMT: DS 2
2698 001E LOPLN: DS 2
2699 0020 LOPPT: DS 2
2700 0022 RANPNT: DS 2 ; PARAMETR PRO RANDOM
2701 0024 ARMM: DS 2
2702 0026 MODE: DS 1 ; REZIM ZOBRAZENI (0-PRIMO, 1-INVERZNE)
2703 0027 TXTEND: DS 2 ; MAXIMALNI ADR. PRO BASIC PROGRAMU
2704 0029 BUFFER: DS 2 ; POINTER NA RADKONY BUFFER
2705 002B BUFEND: DS 2 ; POINTER NA KONEC RADKOVEHO BUFFERU
2706 002D XKUR: DS 1 ; X SOURADNICE GRAF. KURZORU
2707 002E YKUR: DS 1 ; Y SOURADNICE GRAF. KURZORU
2708 002F DELTAX: DS 1 ; POMOCNA PROMENA INTRPOLATORU
2709 0030 DELTAY: DS 1 ; POMOCNA PROMENA INTRPOLATORU
2710 0031 EDKUR: DS 1 ; KURZOR EDITORU
2711 .DEPHASE
2712 ;
2713 ; OBSLUHA TVRDEHO BREAKU - RST 7
2714 ;
2715 .PHASE 38H
2716 ;
2717 0038 RST7RA: DS 3
2718 ;
2719 003B TXTUNF: DS 2 ; POINTER NA KONEC PROGRAMU BASIC
2720 003D DS 40
2721 0065 VARBGN: DS 54 ; PROSTOR PRO PROMENE V BASICU
2722 009B TXTBGN: DS 32 ; MINIMALNI PROSTOR PRO PROGRAM V BASICU
2723 00BB TXTE: DS 1 ; KONEC MINIMALNIHO PROGRAMU
2724 ;
2725 .DEPHASE
2726 ;
2727 END
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE S
Macros:
Symbols:
EA4E A1 E74F ABS F845 ADRKUR
F000 ADRTPR E332 AHOW E559 AREM
0024 ARMM F82D ASHEX E80B ASORRY
E7D6 AWHAT E000 BASIC E000 BASPET
EA18 BCALL EBC1 BEEP EBD0 BEEP0
0007 BELL E015 BEND EA5C BIN
EA25 BOUT EB68 BREAK EB6B BREAK1
0008 BS 002B BUFEND 0029 BUFFER
EADE BYTE E785 CHGSGN E782 CHKSGN
EF90 CHKTPR F803 CI E7A0 CK1
E79A CKHLDE E55D CLEAR EF70 CLOSE
E991 CLS 000C CO F809 COM
E2AA COMP EB57 CONT 000D CR
E974 CRLF E987 CROUT F812 CSTS
0003 CTRLC 0004 CTRLD 0013 CTRLS
0018 CTRLX 0019 CTRLY EDC0 CURF
0010 CURRNT ED95 CURS E842 CXBUFA
E838 CXBUFE F830 DADR E9D8 DBUFF
F833 DBYTE E5F8 DEFLT 002F DELTAX
0030 DELTAY E9A5 DIRECT EB81 DISP
E392 DISPL E765 DIVIDE EC89 DIVT0
EC87 DIVTRI 001E DL 0018 DOWN
ECB5 DRAF EC92 DRAW 001F DSCR
E9E0 DTXTE E770 DV1 E772 DV2
EB9A ECOM EBAC ECOM0 E08A EDIST
EDC3 EDIT EDEC EDIT0 EDFC EDIT2
0031 EDKUR E7CF ENDCHK E7D9 ERROR
001B ESC E9AC EX1 E9BF EX2
E9CA EX3 E9CC EX4 E9D1 EX5
E9A8 EXEC E60C EXPR E610 EXPR1
E654 EXPR2 E690 EXPR3 E6F4 EXPR4
000C FF E7BC FIN E2B8 FINI
E888 FL2 E869 FNDLN E871 FNDLP
E887 FNDNXT E889 FNDSKP E488 FOR
E498 FR1 E4A4 FR2 E4AA FR3
E4AD FR4 E4C5 FR7 E4E6 FR8
EF54 GET E811 GETLN E818 GL1
E841 GL3 E851 GL4 E859 GL5
E44B GOSUB E37B GOTO E97F H2
E38C HARD EA21 HERE EB29 HEX
EB32 HNXTH 001D HOME E338 HOW
EA91 I E571 IFF E574 IFFR
E2B0 IGNB EB1D INCHAR EA6B INEM
EF80 INIT EA61 INM E582 INPERR
ECCA INPO1 ED4B INPO10 ED51 INPO11
ED5A INPO12 ED63 INPO13 ED6A INPO14
ED2F INPO15 ECD8 INPO2 ECEA INPO3
ECEC INPO4 ED0D INPO5 ED14 INPO6
ED1B INPO7 ED34 INPO8 ED45 INPO9
ED39 INPOEX E58C INPUT ECB8 INTERP
E006 INTSTA 0008 IOBUFA 0009 IOBUFB
000A IOBUFC E58C IP1 E59C IP2
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE S-1
E5AE IP3 E5EC IP4 EAFA IST
F004 JOIN0 0055 KEYTPR 0200 KILO
0008 LEFT 0006 LEGT E010 LENGHT
E5FE LET 000A LF 0035 LINECO
E981 LINEF E39B LIST 000B LISTC
E398 LLIST F80F LO EB8C LO1
EF09 LOA0 EEEF LOA1 EEEC LOAD
001A LOPINC 001C LOPLMT 001E LOPLN
0020 LOPPT 0018 LOPVAR E3E6 LPRINT
E3AB LS0 E3AE LS1 E3C0 LS3
E3C9 LS4 E3BD LS5 E3E0 LS6
E609 LT1 E9E8 MASK 000F MASKIN
E922 MD1 F81B MEMCHK 0026 MODE
EBB1 MONIT ED6F MOVE ED92 MOVF
E0D8 MSG1 E91A MVDOWN E90F MVUP
EC79 NEPOK E34F NEW E4ED NEXT
F839 NEXTM E5DC NOBRK E564 NULD20
E4F6 NX0 E532 NX1 E548 NX2
E510 NX3 E522 NX4 E546 NX5
EA84 O E33D OK E976 OUTC
EB13 OUTCHR EB93 OUTDIS E70B PARN
EAC2 PEEK EC13 PIXL EC3E PIXL0
EC82 PIXL1 EBE6 PLOT EC10 PLTF
E8C1 PN1 E8C8 PN2 E8D8 PN3
E8D9 PN4 E8E7 PN5 E8ED PN6
F80C PO EC56 POK EC59 POK0
EC6E POK1 EAC9 POKE E929 POPA
EB55 POPRET E943 PP1 E407 PR0
E3F9 PR1 E42C PR3 E401 PR6
E440 PR8 E3E9 PRINT EB7A PRNTST
E8FA PRTLN E8B6 PRTNUM E893 PRTSTG
E894 PS1 E971 PU1 E945 PUSHA
EF5D PUT E331 QHOW E80A QSORRY
E8A8 QT1 E8B1 QT2 E8A1 QTSTG
EB05 QUOTE E7D5 QWHAT E740 RA1
E731 RA2 E9F2 RAM E9F5 RAM1
0004 RAMEND 0022 RANPNT E54E REM
E46D RETURN F806 RI 0004 RIGHT
E71C RND 0038 RST7RA E041 RSTAR1
E03E RSTART 007F RUB E358 RUN
E35E RUNNXL E36E RUNSML E367 RUNTSL
EF1E SAVE EF37 SAVE1 EF45 SAVE2
EB7D SETCO E7A3 SETVAL E758 SIZE
E349 SORRY F83C SPACE E066 ST2
E06F ST3 E0A6 ST4 E074 ST5
E01B START E03B START1 0012 STKGOS
0016 STKINP EB65 STOP E77B SUBDE
001A SUBS EA4B TAB E0E9 TAB1
E122 TAB2 E227 TAB4 E27B TAB5
E283 TAB6 E28D TAB8 E303 TC2
F028 TCLOSE F84B TIMER E30E TN1
E00B TOP E2F3 TSTC E307 TSTNUM
E2BF TSTV E2E3 TV1 E104 TXMON
009B TXTBGN 00BB TXTE 0027 TXTEND
003B TXTUNF E0CF USREND 0006 UZIRAM
0065 VARBGN 0014 VARNXT EE71 VLEVO
'PLAN80A TINY BASIC V3Q' MACRO-80 3.44 09-Dec-81 PAGE S-2
EE47 VLOZ EE9C VPRA0 EE8A VPRAVO
EE65 VSU0 EE59 VSUN EEE0 VYH0
EED6 VYHOD EEAE VYMAZ EBB4 WAIT
E343 WHAT EAE8 WORD EAF1 WRIT2
002D XKUR E616 XP11 E61C XP12
E622 XP13 E629 XP14 E631 XP15
E637 XP16 E63D XP17 E63F XP18
E667 XP23 E670 XP24 E686 XP26
E693 XP31 E6B2 XP32 E6BA XP33
E6E6 XP35 E6FA XP40 E705 XP41
002E YKUR EA8D ZZZ4
No Fatal error(s)
-------------------------------------------------------------
V.4. VYPIS OBSAHU EPROM GENERATORU ZNAKU PRO SEMIGRAFIKU
========================================================
VYPIS JE PORIZEN V HEXADECIMALNIM FORMA, KTERY MA
TVAR:
1) DVOJTECKA - JEDEN ZNAK
2) POCET BYTU DAT (HEXADECIMALNE) - DVA ZNAKY
3) ADRESA UMISTENI (ZDE OD 2000H) - CTYRI ZNAKY
4) PRIZNAK (ZDE 00) - DVA ZNAKY
5) DATA (HEXADECIMALNE PO BYTECH) - N x DVA ZNAKY
6) KONTROLNI SOUCET (POLOZKY 2-5) - DVA ZNAKY
POZN. PRED KAZDYM RADKEM SE NACHAZEJI "NEVIDITELNE" ZNAKY
"CR" A "LF" (NAVRAT VOZU A NOVY RADEK).
:1020000004080014140808100204000E12120E0036
:102010000A0400080E0808000A04000E10100E0042
:102020000A0402021E121E000A040C121E100C00EA
:102030000A040E100C021C000A04081C08080C00FC
:102040000204001212120E00040800101010080002
:102050000020203B020302000A04001E04081E00A8
:102060000C0C001212120E0000302037050705007C
:102070000A04001C121212000204000C12120C00BE
:10208000040822140808080004081C223E2222002A
:1020900014083C223C28240014081C2220221C0086
:1020A00014083C2222223C0014083E2038203E0026
:1020B00004083E2038203E0014083E0808080800A6
:1020C0000408222222221C0004081C0808081C0004
:1020D00002040C121E100E0014083E0408103E00EC
:1020E000140822322A26220004081C2222221C0064
:1020F0000C0C222222221C00000000000000000024
:1021000000000000000000000008080808000800A7
:10211000001414000000000000143E14143E1400CB
:10212000001E281C0A0A3C000032360C1836260015
:10213000001028102A241A000008080000000000DF
:102140000006081010080600001804020204180017
:1021500000082A1C1C2A0800000008083E08080085
:10216000000000000C0C1000000000003E00000009
:1021700000000000001818000000020408102000F1
:10218000001C262A2A321C0000040C1404041E0021
:10219000001C220408103E00001C220402221C0025
:1021A00000040810243E0400003E203C02221C00D3
:1021B000001C20203C221C00003E020408102000CD
:1021C000001C221C22221C00001C22221E021C00B9
:1021D000000018180018180000181800181820001F
:1021E00000000408100804000000003E003E00004B
:1021F0000000100804081000001C22040800080059
:10220000001C2A2420221C00001C22223E22220024
:10221000003C223C22223C00001C222020221C00E8
:10222000003C222222223C00003E203820203E009A
:10223000003E203820202000001C22202E221C00DE
:102240000022223E22222200001C080808081C004E
--------------------------- V.4 - 1 -------------------------
-------------------------------------------------------------
:10225000000E020202221C00002428302824220042
:102260000020202020203E000022362A22222200A8
:102270000022322A26222200001C222222221C00B6
:10228000003C22223C202000001C22222A261C0086
:10229000003C223C28242200001C201C02023C009E
:1022A000003E0808080808000022222222221C0002
:1022B00000222214140808000022222A2A141400E2
:1022C000002214080814220000221408080808003C
:1022D000003E040810203E00003C202020203C004E
:1022E0000000201008040200001E020202021E006C
:1022F0000008142200000000000000000000003E62
:1023000000000000000000000000000E12120E008D
:102310000010101C12121C000000000E10100E0005
:102320000002020E12120E0000000C121E100C0011
:10233000000C081C0808080000000E12120E020C07
:10234000001010101C1212000008000808080400F9
:10235000000200020202120C0010101014181400E7
:102360000018080808081C00000000342A2A2A0067
:102370000000001C121212000000000C12120C00CF
:102380000000001C121C10100000000E120E0202B1
:10239000000000080E08080000000E100C021C00CF
:1023A0000000081C08080C000000001212120E00A9
:1023B0000000002222140800000000222A2A140033
:1023C0000000221408142200000000141408081051
:1023D0000000001E04081E0000040808100808047D
:1023E000000808080808080000080404020404089B
:1023F0000000102A0400000055AA55AA55AA55AAA3
:00000001FF
--------------------------- V.4 - 2 -------------------------
-------------------------------------------------------------
V.5. VYPIS OBSAHU EPROM GENERATORU ZNAKU S MALYMI PISMENY
=========================================================
VYPIS JE PORIZEN V HEXADECIMALNIM FORMATU, KTERY MA
TVAR:
1) DVOJTECKA - JEDEN ZNAK
2) POCET BYTU DAT (HEXADECIMALNE) - DVA ZNAKY
3) ADRESA UMISTENI (ZDE OD 2400H) - CTYRI ZNAKY
4) PRIZNAK (ZDE 00) - DVA ZNAKY
5) DATA (HEXADECIMALNE PO BYTECH) - N X DVA ZNAKY
6) KONTROLNI SOUCET (POLOZKY 2-5) - DVA ZNAKY
POZN. PRED KAZDYM RADKEM SE NACHAZFJI "NEVIBITELNE" ZNAKY
"CR" A "LF" (NAVRAT VOZU A NOVY RADEK).
:1024000000081C2A080800000004023F0204000023
:102410000008082A1C080000003F212121213F005C
:1024200000001E12121E00000000000C0C00000034
:10243000AA55AA55AA55AA55001E213F12330000DD
:102440000008103F1008000028382800070202008A
:102450002020380007060400282810000702020088
:102460003830200007060400382038000E0E09001E
:1024700038200838070507000C0C3F0C0C1221000F
:10248000787887877878878700000000F808080840
:1024900008080808FF0808080C1E3F33333F1E0CCD
:1024A00008080808F8080808080808080F080808B5
:1024B00008080808FF00000000000000FF080808E6
:1024C00000000000FF0000000808080808080808CD
:1024D000080808080F000000000000000F080808A6
:1024E00008080808F8000000003C30282402010019
:1024F000003F213F213F0000003F312925233F00BD
:1025000000000000000000000008080808000800A3
:10251000001414000000000000143E14143E1400C7
:10252000001E281C0A0A3C000032360C1836260011
:10253000001028102A241A000008080000000000DB
:102540000006081010080600001804020204180013
:1025500000082A1C1C2A0800000008083E08080081
:10256000000000000C0C1000000000003E00000005
:1025700000000000001818000000020408102000ED
:10258000001C262A2A321C0000040C1404041E001D
:10259000001C220408103E00001C220402221C0021
:1025A00000040810243E0400003E203C02221C00CF
:1025B000001C20203C221C00003E020408102000C9
:1025C000001C221C22221C00001C22221E021C00B5
:1025D0000000181800181800000C0C000C0C10005B
:1025E00000000408100804000000003E003E000047
:1025F0000000100804081000001C220C080008004D
:10260000001C2A2420221C00001C22223E22220020
:10261000003C223C22223C00001C222020221C00E4
:10262000003C222222223C00003E203820203E0096
:10263000003E203C20202000001C22202E221C00D6
:102640000022223E22222200001C080808081C004A
:10265000000E020202221C0000242830282422003E
--------------------------- V.5 - 1 -------------------------
-------------------------------------------------------------
:102660000020202020203E000022362A2A2222009C
:102670000022322A26222200001C222222221C00B2
:10268000003C22223C202000001C22222A261C0082
:10269000003C223C28242200001C201C02023C009A
:1026A000003E0808080808000022222222221C00FE
:1026B00000222214140808000022222A2A141400DE
:1026C0000022140808142200002214080808080038
:1026D000003E040810203E00001E101010101E00C6
:1026E0000000201008040200001E020202021E0068
:1026F0000008142200000000000000000000003E5E
:102700000000000000000000000000003030303009
:10271000000000000C0C0C0C000000003C3C3C3C99
:1027200000000000030303030000000033333333D1
:10273000000000000F0F0F0F000000003F3F3F3F61
:102740003030303000000000303030303030303049
:10275000303030300C0C0C0C303030303C3C3C3CD9
:102760003030303003030303303030303333333311
:10277000303030300F0F0F0F303030303F3F3F3FA1
:102780000C0C0C0C000000000C0C0C0C3030303029
:102790000C0C0C0C0C0C0C0C0C0C0C0C3C3C3C3CB9
:1027A0000C0C0C0C030303030C0C0C0C33333333F1
:1027B0000C0C0C0C0F0F0F0F0C0C0C0C3F3F3F3F81
:1027C0003C3C3C3C000000003C3C3C3C3030303069
:1027D0003C3C3C3C0C0C0C0C3C3C3C3C3C3C3C3CF9
:1027E0003C3C3C3C030303033C3C3C3C3333333331
:1027F0003C3C3C3C0F0F0F0F3C3C3C3C3F3F3F3FC1
:00000001FF
--------------------------- V.5 - 2 -------------------------
P L A N 8 0 A
ROZPIS SOUCASTEK PRO VERZI V.3.3
DATUM VYPISU: 27/09/88
PRI PROVADENI SEZNAMU SOUCASTEK ZAHRNOUT:
ZAKLADNI VERZI PROCESOROVE DESKY, (A/N):N
PROCESOROVOU DESKU, (ANO/NE):A
DYNAMICKOU RAM, (ANO/NE):N
ZDROJ NAPETI, (ANO/NE):N
MODEM MAGNETOFONU, (ANO/NE):N
RADIC DISKET, (ANO/NE):N
ASCII KLAVESNICI, (ANO/NE):N
VF MODULATOR, (ANO/NE):N
KAPACITNI KLAVESNICI, (ANO/NE):N
VYTVORIT OBJEDNAVKOVE LISTY (ANO/NE):N
VYPSAT CENY JEDNOTLIVYCH VERZI, (ANO/NE) ."N
PAGE NO, 00001 'SEZNAM SOUCASTEK PROCESOROVE DESKY'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
IO 1 UCY7486 - - - 17.50 NE ANO (K155LP5)
IO 2 MH74S00 - - - 17.50 NE ANO LZE POUZIT TEZ TYP MH7400, MH74ALS00
(K531LA3P,K155LA3)
IO 3 MH74S00 - - - 17.50 NE ANO LZE POUZIT TEZ TYP MH7400, MH74ALS00
(K531LA3P, K155LA3)
IO 4 MH74S04 - - - 19.00 NE ANO LZE POUZIT TEZ TYP MH7404, MH74ALS04
(K531LN1P,K155LN1)
IO 5 MH74S0O - - - 17.50 NE ANO LZE POUZIT TEZ TYP MH7400, MH74ALS00
(K531LA3P,K155LA3)
IO 6 MH7405 - - - 13.50 NE ANO (K155LN2)
IO 7 MH7410 - - - 13.50 NE ANO (K155LA4)
IO 8 MH7410 - - - 13.50 NE ANO (K155LA4)
IO 9 MH74164 - - - 30.00 NE ANO
IO 10 MH7496 - - - 26.00 NE ANO
IO 11 MH7496 - - - 26.00 NE ANO
IO 12 MHB8608 - - - 165.00 ANO ANO LZE POUZIT TYPY 2708 NEBO 2716
IO 13 HHB8282 - - - 72.00 NE ANO
IO 14 MH74S10 - - - 17.50 NE ANO (K531LA4P), LZE POUZIT MH74ALS10,
MH7410 MUZE SNIZIT STEJNOMERNOST PIXLU
OBRAZU
IO 15 MH7474 - - - 17.00 NE ANO (K155TM2)
IO 16 MH7493A - - - 17.00 NE ANO
IO 17 MH7493A - - - 17.00 NE ANO
IO 18 MH7493A - - - 17.00 NE ANO
IO 19 MH7493A - - - 17.00 NE ANO
IO 20 MHB2716C - - - 165.00 ANO ANO TAKE: I2708, MHB8608, I2716, I2732,
VYBER: K573RF2, (OBSAHUJE MONITOR)
IO 21 MHB2716C - - - 165.00 ANO ANO VIZ IO 20 (OBSAHUJE OVLADACI PROGRAM
PRO MODEM MAGNETOFONU)
IO 22 MHB2716C - - - 165.00 ANO ANO VIZ IO 20 (OBSAHUJE TINY-BASIC I)
IO 23 MHB8608 - - - 165.00 ANO NE
IO 24 MHB8608 - - - 165.00 ANO NE
IO 25 MHB2716C - - - 165.00 ANO ANO VIZ 10 20 (OBSAHUJE TINY-BASIC II)
IO 26 MH3205 - - - 32.00 NE ANO
IO 27 UCY7407 - - - 16.50 NE NE (K155LN4) NUTNE PRO EPROM TYPU 2716 A
2732 NEBO RAM TYPU 6116
IO 28 MH3205 - - - 32.00 NE ANO
IO 29 UCY7407 - - - 16.50 NE NE (K155LN4) NUTNE PRO EPROM TYPU 2716,
2732 NEBO RAM TYPU 6116
IO 30 MH74S04 - - - 19.00 NE ANO LZE POUZIT MH74ALS04, MH7404
(K531LN1P, K155LN1)
IO 31 MH74S20 - - - 17.50 NE ANO LZE POUZIT MH74ALS20, MH7420
(K531LA1P,KA155LA1)
IO 32 MH74S00 - - - 17.50 NE ANO LZE POUZIT MH74ALS00, MH7400
(K531LA3P, K155LA3)
IO 33 MH74S30 - - - 13.50 NE NE LZE POUZIT MH74ALS30, MH7430
(K155LA2,K531LA2P)
IO 34 MHB2114 - - - 115.00 NE ANO
IO 35 MHB2114 - - - 115.00 NE ANO
IO 36 MHB2114 - - - 115.00 NE ANO
IO 37 MHB2114 - - - 115.00 NE ANO
IO 38 MHB2114 - - - 115.00 NE ANO
IO 39 MHB2114 - - - 115.00 NE ANO
PAGE NO. 00002 'SEZNAM SOUCASTEK PROCESOROVE DESKY'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
IO 40 MHB2114 - - - 115.00 NE ANO
IO 41 MHB2114 - - - 115.00 NE ANO
IO 42 MHB8286 - - - 72.00 NE NE
IO 43 UCY74157 - - - 22.00 NE ANO V PRIPADE POUZITI STAVU HOLD JE NUTNE
POUZIT SN74LS257 (K555KP11)
IO 44 UCY74157 - - - 22.00 NE ANO VIZ IO 43
IO 45 UCY74157 - - - 22.00 NE ANO VIZ IO 43
IO 46 UCY74157 - - - 22.00 NE ANO VIZ IO 43
IO 47 MH7496 - - - 26.00 NE ANO
IO 48 MH8228 - - - 80.00 NE ANO
IO 49 MHB8080A - - - 110.00 NE ANO (KR580IK80)
IO 50 MHB8224 - - - 53.00 NE ANO
IO 51 MH74S74 - - - 26.00 NE ANO (K155TM2), LZE POUZIT MH74ALS74,
MH7474
IO 52 UCY7486 - - - 17.50 NE ANO (K155LP5)
IO 53 UCY74S08 - - - 13.50 NE ANO LZE POUZIT MH74ALS08, UCY7408
(K155LI1,K531LI1P)
IO 54 MH3205 - - - 32.00 NE ANO
IO 55 HH7404 - - - 13.50 NE ANO (K155LN1)
IO 56 MH74S00 - - - 17.50 NE ANO LZE POUZIT MH74ALS00, MH7400,
(K155LA3)
IO 57 MH7474 - - - 17.00 NE NE (K155TM2)
IO 58 MH7430 - - - 13.50 NE NE LZE POUZIT MH74ALS30, (K155LA2)
IO 59 MH7474 - - - 17.00 NE ANO (K155TM2)
IO 60 MH3214 - - - 61.00 NE NE (K589IK14)
IO 61 MH3216 - - - 30.00 NE ANO (K589AP16)
IO 62 MHB8286 - - - 72.00 NE NE
IO 63 MHB8286 - - - 72.00 NE NE V ZAKLADNI VERZI NAHRAZENO ODPORY (VIZ
TEXT)
IO 64 NHB8255A - - - 110.00 NE ANO NELZE POUZIT POMALE STARE VERZE ..8255
(BEZ "A")
IO 65 MHB8286 - - - 72.00 NE NE V ZAKLADNI VERZI NAHRAZENO ODPORY (VIZ
TEXT)
IO 66 MHB8286 - - - 72.00 NE NE VIZ IO-65
IO 67 MH3212 - - - 32.00 NE ANO (K589IK12)
IO 68 MH7430 - - - 13.50 NE NE (K155LA2)
D 1 KA206 - - - 1.90 - ANO
D 2 KA206 - - - 1.90 - ANO
D 3 KA206 - - - 1.90 - ANO PRO ZAKLADNI VERZI, ZATEMNENI CASTI
OBRAZOVKY
D 4 KA206 - - - 1.90 - ANO PRO ZAKL. VERZI. ZATEMNENI CASTI
OBRAZOVKY
D 5 KA206 - - - 1.90 - NE
D 6 KA206 - - - 1.90 - NE
D 7 KA206 - - - 1.90 - NE
D 8 KA206 - - - 1.90 - NE
D 9 LQ1101 - - - 2.70 - ANO KONTROLA NAPAJECIHO NAPETI -5V
D 10 LQ1401 - - - 3.50 - ANO KONTROLA NAPAJECIHO NAPETI +5V
D 11 LQ1701 - - - 3.50 - ANO KONTROLA NAPAJECIHO NAPETI +12V
D 12 KA206 - - - 1.90 - ANO
D 13 KA206 - 0 0 1.90 - ANO POUZE V ZAKLADNI VERZI
R 1 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 2 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
PAGE NO. 00003 'SEZNAM SOUCASTEK PROCESOROVE DESKY'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
R 3 TR212 10K - 0.125 0.30 - ANO LZE POUZIT TR213
R 4 TP008 2K2 - 0.125 15.00 - ANO TRIMR PRO NASTAVENI HLOUBKY MODULACE
VF SIGNALU
R 5 TR212 560R - 0.125 0.30 - ANO LZE POUZIT TR213
R 6 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 7 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 8 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 9 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 10 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 11 TR212 270R - 0.125 0.30 - ANO LZE POUZIT TR213
R 12 TR212 270R - 0.125 0.30 - ANO LZE POUZIT TR213
R 13 TR212 680R - 0.500 0.30 - ANO LZE POUZIT TR213
R 14 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 15 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 16 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 17 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 18 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 19 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 20 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 21 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 22 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 23 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 24 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 25 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 26 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 27 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 28 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 29 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 30 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 31 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 32 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 33 TR212 4K7 - 0.125 0.30 - ANO LZE POUZIT TR213
R 34 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 35 TR212 2K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 36 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 37 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 38 TR212 10K - 0.125 0.30 - ANO LZE POUZIT TR213
R 39 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 40 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 41 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 42 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 43 TR212 47R - 0.125 0.30 - ANO LZE POUZIT TR213
R 44 TR212 56K - 0.125 0.30 - ANO LZE POUZIT TR213
R 45 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 46 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 47 TR212 47K - 0.125 0.30 - ANO LZE POUZIT TR213
R 48 TR212 47R - 0.125 0.30 - ANO LZE POUZIT TR213
R 49 TR212 1K5 - 0.125 0.30 - ANO LZE POUZIT TR213
R 50 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 51 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 52 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 53 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
R 54 TR212 560R - 0.125 0.30 - ANO LZE POUZIT TR213
PAGE NO. 00004 'SEZNAM SOUCASTEK PROCESOROVE DESKY'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
R 55 TR212 560R - 0.125 0.30 - ANO LZE POUZIT TR213
R 56 TR212 470R - 0.125 0.30 - ANO LZE POUZIT TR213
R 57 TR212 1K2 - 0.125 0.30 - ANO LZE POUZIT TR213
C 1 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 2 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 3 TE133 15H 16 - 21.00 - ANO TANTALOVY KAPKOVY
C 4 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 5 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 6 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 7 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 8 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 9 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 10 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 11 TE131 47M 6 - 25.00 - ANO TANTALOVY KAPKOVY
C 12 TK782 33K 16 - 1.00 - ANO LZE POUZIT TK783
C 13 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 14 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 15 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 16 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 17 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 18 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 19 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 20 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 21 TE133 15M 16 - 21.00 - ANO TANTALOVY KAPKOVY
C 22 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 23 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 24 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 25 TE131 47M 6 - 25.00 - ANO TANTALOVY KAPKOVY
C 26 TK782 33K 16 - 1.00 - ANO LZE POUZIT TK783
C 27 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 28 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 29 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 30 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 31 TK656 10P 12 - 1.00 - ANO LZE POUZIT TK676, TK696, TK754, TK755
C 32 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 33 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 34 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 35 TE131 47M 6 - 25.00 - ANO TANTALOVY KAPKOVY
C 36 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 37 TE133 15M 16 - 21.00 - ANO TANTALOVY KAPKOVY
C 38 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 39 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 40 TE132 22M 10 - 23.00 - ANO TANTALOVY KAPKOVY
C 41 TE133 15M 16 - 21.00 - ANO TANTALOVY KAPKOVY
C 42 TK782 33K 12 - 1.00 - ANO LZE POUZIT TK783
C 43 TK782 33K 12' - 1.00 - ANO LZE POUZIT TK783
C 44 TK764 33K 6 - 1.00 - ANO LZE POUZIT TK783
K 1 WK46205/N - - - 24.00 - ANO 12 POLU, ZLACENY, DO PLOSNYCH SPOJU,
VIDLICE (KONEKTOR NAPAJENI)
K 2 WK46205/N - - - 24.00 - NE 12 POLU, ZLACENY, DO PLOSNYCH SPOJU,
VIDLICE (KONEKTOR VIDEO MODULATORU)
K 3 UK46205/N - - - 24.00 - NE 12 POLU, ZLACENY, DO PLOSNYCH SPOJU,
VIDLICE (KONEKTOR PROGRAMATORU)
PAGE NO. 00005 'SEZNAM SOUCASTEK PROCESOROVE DESKY'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
K 4 WK46203/N - - - 48.00 - ANO 36 POLU, ZLACENY, DO PLOSNYCH SPOJU,
VIDLICE (KONEKTOR VSTUPNE/VYSTUPNI)
K 5 WK46203/N - - - 48.00 - NE 36 POLU, ZLACENY, DO PLOSNYCH SPOJU,
VIDLICE (KONEKOR ROZSIREND
K 6 WK46265/N - - - 34.00 - ANO 24 POLU, ZLACENY, DO PLOSNYCH SPOJU,
VIDLICE (KONEKTOR KLAVESNICE)
K 7 WK46513/W - - - 65.00 - NE 36 POLU, ZLACENY, PRO OVIJENI, ZASUVKA
(KONEKTOR DYNAMICKE PAMETI RAM)
K 8 UK46513/W - - - 65.00 - ANO 36 POLU, ZLACENA, PRO OVIJENI, ZASUVKA
(PROPOJOVACI KABELY KLAVESNICE A
MODEMU)
K 9 WK46545/W - - - 34.00 - ANO 24 POLU, ZLACENA, PRO OVIJENI, ZASUVKA
(PROPOJOVACI KABEL KLAVSNICE)
O 1 - - - - 250.00 - ANO PIEZOELEKTIRICKY KRYSTAL 18,432 MHZ
O 2 WK55900 - - - 37.00 - ANO MIKROSPINAC RESTART
O 3 WK55900 - - - 37.00 - NE MIKROSPINAC INTERRUPT
O 4 - - - - 295.00 - ANO PLOSNY SPOJ PROCESOROVE DESKY S
PROKOVENYMI OTVORY, PLAN 80A V.3.3.
O 5 TS5220004 - - - 350.00 ANO ANO ALFANUMERICKA TLACITKOVA SOUPRAVA S 37
HMATNIKY
O 6 - - - - 50.00 - NE SKRINKA NA MIKROPOCITAC PLAN 80A V.3.3
(UMELA HMOTA)
** TOTAL **
5420.00
PAGE NO. 00001 'SEZNAM SOUCASTEK MODEMU MAGNETOFONU'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
IO 1 MAA741 - - - 17.00 NE NE
IO 2 MH7400 - - - 13.50 NE NE
IO 3 MH7442 - - - 17.00 NE NE
IO 4 MH7490 - - - 17.00 NE NE
IO 5 MH7400 - - - 13.50 NE NE
IO 6 MH7474 - - - 17.00 NE NE
IO 7 MH7493 - - - 17.00 NE NE
IO 8 MH7493A - - - 17.00 NE NE
T 1 KC509 - - - 9.00 - NE
T 2 KC509 - - - 9.00 - NE
D 1 LQ1701 - - - 3.50 - NE ZELENA
D 2 LQ1401 - - - 2.50 - NE ZLUTA
D 3 LQ1101 - - - 3.50 - NE CERVENA
D 4 LQ1401 - - - 3.50 - NE ZLUTA
C 1 TE131 47M 6 - 25.00 - NE TANTALOVY KAPKOVY
C 2 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 3 TK782 M15 6 - 1.00 - NE LZE POUZIT TK783
C 4 TK782 470P 6 - 1.00 - NE LZE POUZIT TK783
C 5 TK782 2K2 6 - 1.00 - NE LZE POUZIT TK783
C 6 TK782 470P 6 - 1.00 - NE LZE POUZIT TK783
C 7 TK782 M1 6 - 1.00 - NE LZE POUZIT TK783
C 8 TK782 22K 6 - 1.00 - NE LZE POUZIT TK783
C 9 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 10 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 11 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 12 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 13 TE131 47M 6 - 25.00 - NE TANTALOVY KAPKOVY
C 14 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 15 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 16 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 17 TK782 33K 6 - 1.00 - NE LZE POUZIT TK783
C 18 TK782 M1 6 - 1.00 - NE LZE POUZIT TK783
C 19 TK782 M1 6 - 1.00 - NE LZE POUZIT TK783
C 20 TE131 47M 6 - 25.00 - NE TANTALOVY KAPKOVY
R 1 TR212 3R3 - 0.125 0.30 - NE LZE POUZIT TR213
R 2 TR212 6K8 - 0.125 0.30 - NE LZE POUZIT TR213
R 3 TR212 820R - 0.125 0.30 - NE LZE POUZIT TR213
R 4 TR212 470K - 0.125 0.30 - NE LZE POUZIT TR213
R 5 TR212 2K2 - 0.125 0.30 - NE LZE POUZIT TR213
R 6 TR212 10K - 0.125 0.30 - NE LZE POUZIT TR213
R 7 TR212 390R - 0.125 0.30 - NE LZE POUZIT TR213
R 8 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 9 TR212 4K7 - 0.125 0.30 - NE LZE POUZIT TR213
R 10 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 11 TR212 680R - 0.125 0.30 - NE LZE POUZIT TR213
R 12 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 13 TR212 390R - 0.125 0.30 - NE LZE POUZIT TR213
R 14 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 15 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 16 TR212 470R - 0.125 0.30 - NE LZE POUZIT TR213
R 17 TR212 10K - 0.125 0.30 - NE LZE POUZIT TR213
R 18 TR212 3K9 - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1%
R 19 TR212 10K - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1%
PAGE NO. 00002 'SEZNAM SOUCASTEK MODEMU MAGNETOFONU'
25/10/88
-----------------------------------------------------------------------------
DRUH C. TYP HOD. U[V] P[W] CENA SOKL Z.V. P O Z N A M K A
R 20 TR212 82K - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1%
R 21 TR212 82K - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1 %
R 22 TR212 10K - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1 %
R 23 TR212 3K9 - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1%
R 24 TR212 2K2 - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1 %
R 25 TR212 1K8 - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1 %
R 26 TR212 1K8 - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1 %
R 27 TR212 2K2 - 0.125 0.30 - NE LZE POUZIT TR213, +/- 1 %
R 28 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 29 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 30 TR212 1K - 0.125 0.30 - NE LZE POUZIT TR213
R 31 TR212 33R - 0.125 0.30 - NE LZE POUZIT TR213
R 32 TR212 33R - 0.125 0.30 - NE LZE POUZIT TR213
K 1 WK46265/N - - - 34.00 - NE 24 POLU, ZLACENA, DO PLOSNYCH SPOJU,
VIDLICE (NA PLOSNEM SPOJI MODEMU)
K 2 WK46545/W - - - 34.00 - NE 24 POLU, ZLACENA, PRO OVIJENI, ZASUVKA
(PROPOJOVACI KABEL MODEMU MAGNETOFONU)
O 1 6AF89777 - - - 5.60 - NE VIDLICE POHYBLIVA MAGNETOFONOVA 5
KOLIKOVA (DIN)
O 2 ISOSTAT - - - 42.00 - NE 4 SEGMENTOVY PREPINAC ZAVISLY, KULATE
HMATNIKY
O 3 K-5 - - - 26.00 - NE UNIVERZALNI KRABICKA PRO MODEM
MAGNETOFONU
O 4 - - - - 0.80 - NE GUMOVE ZARAZKY DO DVERI POUZITE JAKO
NOZKY KRABICKY MODEMU
O 5 - - - - 3.90 - NE 35 CM KABEL STINENY SE TREMI ZIVYMI A
JEDNIM STINICIM VODICEM
O 6 ISOSTAT - - - 22.00 - NE 2 SEGMENTOVY NEZAVISLY SAMOSTATNE ARETOVANY
PREPINAC, KULATE HMATNIKY
O 7 - - - - 48.00 - NE PLOSNY SPOJ MODEMU MAGNETOFONU V.3.3
** TOTAL **
477.90
PAGE NO. 00001 ***********************************************************
25/10/88
INTEGROVANE OBVODY PRO PLAN 80A, OBJEDNAVKOVY LIST
TYP POCET CENA
MAA741 1 17.00
MH3205 3 96.00
MH3212 1 32.00
MH3216 1 30.00
MH7400 2 27.00
MH7404 1 13.50
MH7405 1 13.50
MH7410 2 27.00
MH74164 1 30.00
HH7442 1 17.00
HH7474 3 51.00
MH7490 1 17.00
HH7493 1 17.00
MH7493A 5 85.00
MH7496 3 78.00
MH74S00 5 87.50
MH74S04 2 38.00
MH74S10 1 17.50
MH74S20 1 17.50
HH74S74 1 26.00
MH8228 1 80.00
MHB2114 8 920.00
MHB2716C 4 660.00
MHB8080A 1 110.00
MHB8224 1 53.00
MHB8255A 1 110.00
HHB8282 1 72.00
HHB8608 1 165.00
UCY74157 4 88.00
UCY7486 9 35.00
UCY74S08 1 13.50
** TOTAL **
62 3044.00
PAGE NO. 00001 ***********************************************************
25/10/88
TRANZISTORY, TYRISTORY A DIODY PRO PLAN 80A, OBJEDNAVKOVY LIST
TYP POCET CENA
KA206 6 11.40
KC509 2 18.00
LQ1101 2 6.20
LQ1401 3 9.50
LQ1701 2 7.00
** TOTAL **
15 52.10
PAGE NO. 00001 ***********************************************************
25/10/88
KONDENZATORY PRO PLAN 80A, OBJEDNAVKOVY LIST
TYP HODNO POCET CENA
TA
TK656 10P 1 1.00
TE133 15M 4 84.00
TK782 22K 1 1.00
TE132 22M 1 23.00
TK782 2K2 1 1.00
TK782 33K 43 43.00
TK782 33K 1 1.00
TK782 470P 9 2.00
TE131 47M 6 150.00
TK782 M1 3 3.00
TK782 M15 1 1.00
** TOTAL **
64 310.00
PAGE NO. 00001 ***********************************************************
25/10/86
REZISTORY PRO PLAN 80A, OBJEDNAVKOVY LIST
TYP HODN. POCET CENA
TR212 10K 6 1.80
TR212 1K 8 2.40
TR212 1K2 29 8.70
TR212 1K5 4 1.20
TR212 1K8 2 0.60
TR212 1K5 8 2.40
TR212 270R 2 0.60
TP008 2K2 5 16.20
TR212 33R 9 0.60
TR212 390R 2 0.60
TR212 3K9 2 0.60
TR212 3R3 1 0.30
TR212 470K 1 0.30
TR212 470R 9 0.60
TR212 47K 1 0.30
TR212 47R 2 0.60
TR212 4K7 9 0.60
TR212 560R 3 0.90
TR212 56K 1 0.30
TR212 680R 2 0.60
TR212 6K8 1 0.30
TR212 820R 1 0.30
TR212 82K 2 0.60
** TOTAL **
89 41.40
PAGE NO. 00001 ***********************************************************
25/10/88
KONEKTORY PRO PLAN 80A, OBJEDNAVKOVY LIST
TYP POCET CENA P O Z N A M K A
WK46203/N 1 48.00 36 POLU, ZLACENY, DO PLOSNYCH SPOJU, VIDLICE (KONEKTOR
VSTUPNE/VYSTUPNI)
WK46205/N 1 24.00 12 POLU, ZLACENY, DO PLOSNYCH SPOJU, VIDLICE (KONEKTOR NAPAJENI
WK46265/N 2 68.00 24 POLU, ZLACENY, DO PLOSNYCH SPOJU, VIDLICE (KONEKTOR
KLAVESNICE)
WK46513/U 1 65.00 36 POLU, ZLACENA, PRO OVIJENI, ZASUVKA (PROPOJOVACI KABELY
KLAVESNICE A MODEMU)
WK46545/W 2 68.00 24 POLU, ZLACENA, PRO OVIJENI, ZASUVKA (PROPOJOVACI KABEL
KLAVSNICE)
** TOTAL **
7 273.00
PAGE NO. 00001 ***********************************************************
25/10/88
OSTATNI SOUCASTKY PRO PLAN 80A, OBJEDNAVKOVY LIST
TYP POCET CENA P O Z N A M K A
- 1 250.00 PIEZOELEKTIRICKY KRYSTAL 18,432 MHZ
- 1 295.00 PLOSNY SPOJ PROCESOROVE DESKY S PROKOVENYMI OTVORY, PLAN 80A
V.3.3.
- 1 0.80 GUMOVE ZARAZKY DO DVERI POUZITE JAKO NOZKY KRABICKY MODEMU
- 1 3.90 35 CM KABEL STINENY SE TREMI ZIVYMI A JEDNIM STINICIM VODICEM
- 1 48.00 PLOSNY SPOJ MODEMU MAGNETOFONU V.3.3
6AF89777 1 5.60 VIDLICE POHYBLIVA MAGNETOFONOVA 5 KOLIKOVA (DIN)
ISOSTAT 1 42.00 4 SEGMENTOVY PREPINAC ZAVISLY, KULATE HMATNIKY
ISOSTAT 1 22.00 2 SEGMENTOVY NEZAVISLY SAMOSTATNE ARETOVANY PREPINAC, KULATE
HMATNIKY
K-5 1 26.00 UNIVERZALNI KRABICKA PRO MODEM MAGNETOFONU
TS5220004 1 350.00 ALFANUMERICKA TLACITKOVA SOUPRAVA S 37 HMATNIKY
WK55900 1 37.00 MIKROSPINAC RESTART
** TOTAL. **
11 1080.30
PAGE NO. 00001 ***********************************************************
25/10/88
SOKLY PRO PLAN 80A, OBJEDNAVKOVY LIST
POCET NA IO
TYPU:
4 MHB2716C
1 MHB8608
1 TS5220004
** TOTAL **
6
.
.
P L A N 80 A
Návod na stavbu a užití mikropočítače
-------------------------------------
Vydalo: Středisko technických informací potravinářského
průmyslu VÚPP V Praze 2, Londýnská 55 V listopadu
1988 mimo řadu nákladem v. d. DRUKOV, Jakubské n. l
656 56 B r n o.
Tisk: STI potravinářského průmyslu, Praha
Rozsah: 297 S. (přílohy)
Formát: A4
Vydání: první
.
