Welcome, Guest. Please login or register.


Recent Posts

Pages: 1 2 [3] 4 5 6 7 8 9 10
21
BASIC / Re: QUIZ motor
« Last post by Kapitany on 2024.April.26. 20:05:16 »
Kicsit mán be is szoptam az ATTRIB. üzemmódot... arra úgy néz ki nem lehet EDITOR-t nyitni. :D
22
BASIC / Re: BASIC program beíró feladatok?
« Last post by ergoGnomik on 2024.April.26. 19:12:39 »
Esetleg gflorez programjai a The Christmas Star Challenge-A karácsonyi csillag kihivás témából?
23
BASIC / Re: BASIC program beíró feladatok?
« Last post by szipucsu on 2024.April.26. 16:50:03 »
Ha nem csak látvány lehet, hanem hang is, akkor valami ilyesmi is elmenne, de talán a 170-es sorban az ORD(A$) helyett valami jobb megoldás is létezhet:

Code: [Select]
  100 SET KEY CLICK OFF
  110 SET 6,2
  120 ENVELOPE NUMBER 1;0,63,63,1;RELEASE;0,-33,-33,6;0,-30,-30,60
  130 LET A=0
  140 DO
  150   LET A$=INKEY$
  160   IF A$="" THEN GOTO 150
  170   SOUND PITCH ORD(A$),ENVELOPE 1,SOURCE A,DURATION 2
  180   LET A=A+1
  190   IF A=3 THEN LET A=0
  200 LOOP
24
BASIC / Re: BASIC program beíró feladatok?
« Last post by szipucsu on 2024.April.26. 16:34:23 »
Ennyi jutott nekem eszembe, de biztos sokkal jobbat is ki lehetne ebből hozni:

Code: [Select]
  100 TEXT 40
  110 DO
  120   LET A=1
  130   FOR B=1 TO 7
  140     SET CHARACTER 32,A,A,A,A,A,A,A,A,A
  150     LET A=A*2
  160   NEXT
  170   FOR B=1 TO 7
  180     LET A=A/2
  190     SET CHARACTER 32,A,A,A,A,A,A,A,A,A
  200   NEXT
  210 LOOP
25
BASIC / Re: BASIC program beíró feladatok?
« Last post by szipucsu on 2024.April.26. 16:13:49 »
Lehetne valami karakteranimáció. Képernyőtörlés után a szóköz karakterét definiálná át és animálná, valami trükkös módszerrel, amihez nem kell 20 soron keresztül SET CHARACTER utasításokat adni meg, hanem FOR cikluson belül valami más, pl. gyökfüggvény, moduloosztás, akármi alapján rajzolna animációt.
26
BASIC / Re: BASIC program beíró feladatok?
« Last post by szipucsu on 2024.April.26. 16:06:51 »
Egyszer itt a fórumon is volt egy egysoros program felhívás, amiből talán lett 2-3-4 soros is, de nem találom.
27
BASIC / Re: BASIC program beíró feladatok?
« Last post by Povi on 2024.April.26. 15:46:23 »
You need ask Endi in Facebook.
He there posts many fun graphical experiments.
Igen, Enditől rengeteg jó példa van itt:
https://www.facebook.com/groups/112679608813524
28
BASIC / Re: BASIC program beíró feladatok?
« Last post by Povi on 2024.April.26. 15:45:01 »
Sierpinski háromszög? Mondjuk kb. 12 perc, míg kirajzolja.
29
BASIC / Re: BASIC program beíró feladatok?
« Last post by SlashNet on 2024.April.26. 14:28:58 »
You need ask Endi in Facebook.
He there posts many fun graphical experiments.

Kérd meg Endit a Facebookon. Sok szórakoztató grafikai kísérletet tesz közzé.
30
BASIC / Re: QUIZ motor
« Last post by Zozosoft on 2024.April.26. 14:11:52 »
Na, egyelőre húzzuk meg a határt! :D
"Az űr... a legvégső határ. Ennek végtelenjét járja az Enterprise csillaghajó... melynek feladata különös új világok fölfedezése..." :ds_icon_cheesygrin:
Pages: 1 2 [3] 4 5 6 7 8 9 10