Fejtörő (2017-2018)

[csaba]

A nem irodalmi elemzéses vonalon haladva kiadom az első javítást a programhoz.
A LOAD "patch1" után MERGE "fejtoro" majd RUN 100
Biztos nem erre a megoldásra gondolt Pgyuri, de ez legalább "működik"

patch1.tap

(1.05 KiB) Letöltve 56 alkalommal.

[Pgyuri]

Üdv,

Nana, túlzás, hogy működik Letöltöttem, de 3 emulátor is elszállt a TAP file megnyitására. Mérete Specrtumhoz képest elég nagy, így belenéztem, látom, hogy ez egy direct-rec móddal felvett file, vagyis TZX-ként kell kezelni. Átneveztem, így már mindhárom emulátor elfogadta.

MERGE "" a fejtörő, MERGE "" Csaba programja, de a TZX 45 másodpercig csendben vár, látszólag nem működik, de valójában tölt, csak ott nincs mit, csak csendet. 45 mp után betöltődött.

Innentől már csinálta az effektet. Szépen néz ki a képernyő, ahogy a szövegek szaladgálnak, nagy munka lehetett megírni, de azért érezni, hogy a fejtörőnek nem ez a megoldása

Pgyuri

[csege]

A windowsos FUSE megette, és a merge is sikerült

Számomra az az érdekes, hogy az eredeti Pgyuri féle program hogyan tud 7es (fehér) színű bordert és papert csinálni?
mivel az RND*7 nem ad olyan sűrűn 7-es értéket. (szerintem soha nem adhatna)

RND gives a random number between 0 and 1, but you can easily get
random numbers in other ranges. For instance, '5*RND' is between 0 and
5, and '1.3+0.7*RND' is between 1.3 and 2. To get whole numbers, uses
INT (remembering that INT always rounds down) as in '1+INT(RND*6)',
which we shall use in a program to simulate dice. 'RND*6' is in the
range 0 to 6, but since it never actually reaches 6, 'INT(RND*6)' is
0, 1, 2, 3, 4 or 5.

és mégis látunk fehér papert vagy bordert.
ez így hogy?

[csaba]

Nem igazán voltam képben, hogyan is kell tap-ot felvenni.
Javítottam a mellékletet.

A kerekítés miatt van fehér, a BORDER 6.49 sárga, BORDER 6.5 és felette már fehéret ad.

patch1.tap

(1.05 KiB) Letöltve 60 alkalommal.

[Pgyuri]

Üdv,

Ha másért nem, már azért is megérte a fejtörő, hogy Csege barátunk elgondolkozott sok mindenen a Spectrum BASIC-el kapcsolatban. Volt CLEAR, RUN, RND

Csaba pedig jó sokat gépelt az izgő-mozgó szövegekért, gratuláció, bár egyszerűbb lett volna kipókolni a RUN-t a végéről és akkor bármit megtehetsz utána. Különben is illetlenség PATCH-nak nevezni, mert a fejtörő program nem hibás, hacsak annyiban nem, hogy Hpeternek igaza van az egyik jókívánság elütésében.

Még várok, hátha ...

Pgyuri

[csaba]

Nem mondtam, hogy hibás, csak van rajta "foltozni" való.
Végül is pont azt csináltam amit írtál, kipókoltam a runt és utána a feltöltött változóidat használtam.
Minden színváltásban az eredeti program is lefut, és a kiegészítő program utolsó utasítása is ismét RUN, hogy hasonlítson ez eredetihez.

[Pgyuri]

Üdv,

Közeledik a lezárás ideje, még utolsó erőbedobással hátha valaki ...

Pgyuri

[csaba]

Én ezen már annyit gondolkoztam...
elalvás előtt, vezetés közben, munkaidőben, szaunázás közben ...
biztosan rossz oldalról próbálom kitalálni a megoldást
minden nyakatekert
-a sorvégi run törli a változókat
-a különböző változókba való szövegbevitel
-a pause előtti cls, aminek hatására csak üres színes téglalapot nézünk 2 másodpercig
-a programot szinte lehetetlen megállítani break-el pont a sorvégi run előtt, hogy használhassuk az összes feltöltött változót.
-meg tudom állítani előre meghatározott bármelyik változó értékadásánál, de akkor még annak és az utána levőknek hiányzik az értéke.
-viszonylag egyszerűen ki tudom cserélni a let-eket print-re de van egy 34 karaktar hosszú aminek a kiírása átlóg a következő sorba, emiatt csináltam a scroll-os megoldást.
-nem is tudjuk mit lehet csinálni, csak parancsokat? átírni az egészet? kiegészítést? debugger?
persze ez mind programozástechnika, biztos valami nyakatekert irodalmi megoldás lesz.

[Pgyuri]

Üdv,

Csaba nagyon jól összefoglalta ennek a fejtörőnek a rejtélyeit ...

A LET-ek lecserélése PRINT-re nem járható út, mert ha EDIT-el lehívod a sort, akkor bizony zúgás kapsz minden esetben, ami nem egy szép dolog. Fejtörőim soha nem kívántak POKE bajnokságot, így azzal cserélgetni sem a jó út. Nem merek bármi mást írni, mert azzal csak megtéveszthetnék, félrevezethetnék bárkit.

Pgyuri

[csaba]

Íme még egy variáció, kis kiegészítéssel, hogy látványosabb legyen
Működése:
LOAD "patch2"
MERGE "fejtoro"
DIM V$(1,1)
GOTO 1
hibaüzenet után:
GOTO 10

patch2.tap

(496 bájt) Letöltve 59 alkalommal.