OldComp.cz

Ahoj, tak jsem si zase po nějaké době hrál a narazil na tohle:

Při prvním běhu mi kód udělá správný obdélník, po použití PRINTSPC(x) mi to na screenu vymezí několik řádků, které se pak přeskakují a do nich to netiskne. Tušíte někdo, proč to tak je ? Čekal jsem, že použiju SPC(x) pro smazání části screenu, ale zjevně to nebude použitelné...

Myslis tohle:
Kdyz tam das tak to bude fungovat. Vetsi oblast muzes nulovat cyklem.
Souvisi to s prepsanim posledniho znaku na radku na dalsi radek za tim. Tim se rozsiri aktualni radek na dvojnasobnou delku, ale porad zustava jen jeden. Nekde to ma asi sve limity. Ve zdrojaku se to resi bufferem o 25 bytech, ktery to navzajem propojuje. Presne podrobnosti by asi chtely vydedukovat ze zdrojoveho souboru. v BASICu MZ-1Z016 by to mohlo byt tady: a kod okolo.
Hodne zdaru

_________________
Sharp MZ-800++, MZ-1500++, MZ-2500++, SM-B-80T, MK-14_replica, HP-85, ZX-80+replica, ZX81, ZX-Spectrum+replica++, PMI-80+replica, SAM coupe++, PMD-85-2A+3, Didaktik-M, SORD-M5, TI-57, TI-59+PC-100, TI99/4A, ZetaV2+ppp, ZX-uno, Petr

Jj, to je ono, mazání části screenu přes SPC() mi přišlo elegantnější a rychlejší, ale zjevně to nebude to pravé ořechové... Přemýšlel jsem, jestli je to bug nebo vlastnost, ale vypadá to jako vlastnost, i když mně nepochopitelná...

Basic spojuje řádky kvůli možnosti editace dlouhých řádků, např. řádky programu. Když na konci nemá CR (v grafickém režimu má na to paralelní textový buffer), ví že řádek pokračuje a může tak dělat operace s dlouhým řádkem - odsouvání a přisouvání textu a hlavně zpracování řádku textu. Díky tomu je možné editovat dlouhé řádky programu přímo na obrazovce, nepotřebuje speciální editační řádek jako Spectrum.

_________________
i++ (INC) increment
i-- (DEC) decrement
i@@ (EXC) excrement

Aha, spojitost s dlouhými řádky mne skutečně nenapadla. S tímhle už to trochu smysl dává. Díky.

A nie je v tomto BASICu aj SPACE$()? Toto by to mohlo vyriešiť?

_________________
Sharp MZ-821
Milsa MZ-841

To je ale to same, ne?

_________________
Sharp MZ-800++, MZ-1500++, MZ-2500++, SM-B-80T, MK-14_replica, HP-85, ZX-80+replica, ZX81, ZX-Spectrum+replica++, PMI-80+replica, SAM coupe++, PMD-85-2A+3, Didaktik-M, SORD-M5, TI-57, TI-59+PC-100, TI99/4A, ZetaV2+ppp, ZX-uno, Petr

SPACE$ v S-BASICu neexistuje, viz screenshot. Jsou to pak zbytečné diskuse, když si to nezkusíte, nevyriešitě...

Klidek, nemusis se hned zlobit. Vim, ze jsi myslel BASIC pro MZ-700. Funkce SPC() a SPACE$() jsou obe definovane v BASICu pro MZ-800. Tak drobna chybicka Ona je mi ta MZ-800 tak nejak prece jen blizsi.

_________________
Sharp MZ-800++, MZ-1500++, MZ-2500++, SM-B-80T, MK-14_replica, HP-85, ZX-80+replica, ZX81, ZX-Spectrum+replica++, PMI-80+replica, SAM coupe++, PMD-85-2A+3, Didaktik-M, SORD-M5, TI-57, TI-59+PC-100, TI99/4A, ZetaV2+ppp, ZX-uno, Petr

V pohodě, jen jste to oba mohli prubnout a vyřešeno. Já zkouším převod jedné simulace, ale ona se asi nevleze ani do toho S-Basicu...

Ja som to neskúsil, lebo som nesedel pri počítači. Nie vždy je taká možnosť a myslel som, že v 700 to je. Chcel som len pomôcť. Pre doplnenie, SPC je tuším posunutie a SPACE$ vytvorí reťazec s medzerami.

_________________
Sharp MZ-821
Milsa MZ-841