Welcome, Guest. Please login or register.


Recent Posts

Pages: [1] 2 3 4 5 6 7 8 ... 10
1
BASIC / Re: Hasznos kis Basic programok
« Last post by gflorez on 2023.September.21. 13:05:41 »
Did it work?

I mean:      ESC$=CHR$(27)&"I"&CHR$(1) -----------> PRINT £102:ESC$

or directly  PRINT £102:CHR$(27);"I";CHR$(1)
2
BASIC / Re: Hasznos kis Basic programok
« Last post by gflorez on 2023.September.19. 14:07:55 »
Néha használtam ESC szekvenciákat. Ezek olyanok, mint a karakterláncok, és ezek a <n> számok egyszerű bájtok, amelyeket CHR$(n)-ként kell hozzáadni(&) a karakterlánchoz.

-----

I have used ESC sequences sometimes. They are like strings, and these <n> numbers are simple bytes that must be added(&) as CHR$(n) to the string.
3
BASIC / Re: Hasznos kis Basic programok
« Last post by ergoGnomik on 2023.September.18. 19:44:38 »
(Nem tudom, a hegyes zárójel csak szemléltetés miatt van-e.)
Írja az alfejezet fő bekezdésében (III. 4.2), hogy a következőben (III. 5) elmagyarázzák a bonyolultabb szekvenciákat. Ott megtalálod a jelölés magyarázatát.
4
BASIC / Re: Hasznos kis Basic programok
« Last post by szipucsu on 2023.September.18. 19:23:55 »
Ezt a színezett karakterlánc kiírást nem lehetne escape szekvenciák használatával megoldani?
Ha jól sejtem, a link alapján a PRINT chr$(27) "I" <tintaszín> lenne a SET INK <tintaszín> helyett... Talán rövidebb és gyorsabb lenne, ha nem kéne váltogatni a PRINT és SET INK utasításokat. De még nem próbáltam. (Nem tudom, a hegyes zárójel csak szemléltetés miatt van-e.)
5
BASIC / Re: Hasznos kis Basic programok
« Last post by ergoGnomik on 2023.September.18. 09:47:45 »
Ezt a színezett karakterlánc kiírást nem lehetne escape szekvenciák használatával megoldani? Csak egy ötlet.
6
BASIC programok átírása / Re: Manhole (TVC)
« Last post by szipucsu on 2023.September.17. 22:00:47 »
Konkrétan az alap szabályt nem látom.
Készítettem egy demót. Szerintem ez alapján minden problémára, tumultusra van megoldás. Egy idő után meguntam, aki akarja, játszhatja tovább.
[ Guests cannot view attachments ]
7
BASIC / Re: Hasznos kis Basic programok
« Last post by szipucsu on 2023.September.17. 21:40:17 »
Ezzel a programmal színátmeneteket vadászhatunk össze. Amelyik színen a kurzor áll, annak a színkódját kijelzi:
[ Guests cannot view attachments ]

Ez a programrész pedig arra jó, hogy 16 színű grafikus képernyőre és attribútum képernyőre karakterenként változó színű szöveget írjunk. Ahova írni akarjuk a szöveget, oda kell állítanunk egy PRINT#csat,AT x,y:; utasítással. Utána egy azonosítót adni az oda írandó szövegnek (pl. LET ID=1), és megadni a csatornaszámot, amelyik csatornára írni akarunk (pl. LET CHN=101), utána meghívni az irkáló eljárást (CALL COLORTEXT).
Például:

Code: [Select]
1240   PRINT #49,AT 1,9:;:LET ID=7:LET CHN=49:CALL COLORTEXT
A COLORTEXT eljárásban az ID-nél megadott azonosítóhoz tartozó adatok alapján írja ki a szöveget. Mindegyik szöveghez 3 DATA sor tartozik. Az elsőben magát a szöveget kell megadni, pl.

Code: [Select]
9310   DATA "  SCORE:0         LIVES:5"
A másodikban a szöveg által használt palettát kell megadni, pl.

Code: [Select]
9320   DATA 0,146,166,243,94,7,221,24
A harmadikban a megadott szöveghez karakterenként meg kell adni, hogy a palettáról hányadik színnel írja ki az adott karaktert, pl.

Code: [Select]
9330   DATA 1,1,1,2,1,2,7,5,6,0,0,0,0,0,0,0,0,0,3,4,3,4,3,5,6
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]

Persze lehetne máshogy is, pl. hogy ne kelljen megadni, hányadik karakter milyen színű legyen, ki lehetne találni bizonyos sémákat, amik alapján a gép magától határozná meg a karakterek színét. Erre kellett a másik topikban program, hogy 1 és 6 között oda-vissza léptesse a számokat. De biztos azt is meg lehetne csinálni, hogy automatikusan megtalálja a szöveg közepét a gép, és a szöveg elején 1-es színnel írjon, és csak a szöveg közepére érje fokozatosan el a 7-es színt, majd a szöveg végére megint az 1-es színnel írjon.
8
BASIC programok átírása / Re: Manhole (TVC)
« Last post by Ferro73 on 2023.September.17. 21:24:07 »
Konkrétan az alap szabályt nem látom.
Egy szinten kettő pasi egymást követően minimum egy, három hely vagy több kellene.
És mivel egyszerre ellenőrzi a hidakat ezt valahogy kettő szintre kellene vetíteni.

Szerintem, de lehet nem jól értelmezem a programot.
9
BASIC programok átírása / Re: Manhole (TVC)
« Last post by Ferro73 on 2023.September.17. 20:55:46 »
A problémát ott látom, hogy mivel egyszerre lépnek alul felül és egyszerre ellenőrzi a 4 hidat és véletlenül min 2 pasi lép a hidra az egyik biztosan nem megy át.
 
10
BASIC programok átírása / Re: Manhole (TVC)
« Last post by szipucsu on 2023.September.17. 20:39:32 »
A játék garantáltan nem lehet 100-150 pontnál többet csinálni.
De lehet. :D Nekem már volt 200 körüli pontszámom is. Megvan a trükkje. Egy adott pillanatban kell ott lennie a hídnak a krapek alatt, előtte és utána hiába nincs alatta semmi, nem pottyan le. Ha pittyen egyet, akkor már húzhatod is ki a lába alól a talajt.
Mondjuk, ha ilyen hülyék, hogy nem néznek a lábuk alá, és úgy lépnek és beleesnek a lukba, meg is érdemlik!
Pages: [1] 2 3 4 5 6 7 8 ... 10