Recent Posts
Hogy a hosszú sorokat ne a szó közepén törje szét, hanem a szóköznél.Hat, ha csak emiatt, akkor ezt is egyszeruen ki lehet kuszobolni, legyen minden data sor hossza max 40 karakjer, es lehet kotojelezni is, szebben is fog kinezni, es nem lesz a szoveg 39, vagy 38 karakter szelessegre limitalva egy sorban, es egy-egy hosszu tulcsordulo szonal se marad ur a sor vegen.
De ez a SYNC-es megoldás ez kicsit fejvakarós azért...Pár éve (2017? 2018?) volt szó egy Enterpressben a SYNC használatáról részletesen. A lényeg, ahány csatornát akarunk egyszerre megszólaltatni, annyi mínusz egyet kell beírni a SYNC után. (Lásd még itt az aláírásomban is.)
100 PROGRAM QUIZEz így szerintem értelmetlen, nem csinál semmit. Helyette ez jó:
100 PROGRAM "QUIZ"vagy még jobb a hagyományaink miatt:100 PROGRAM "QUIZ.BAS"Lehet naiv kérdés, de miért kell annyira az editor?Hogy a hosszú sorokat ne a szó közepén törje szét, hanem a szóköznél.
Kicsit mán be is szoptam az ATTRIB. üzemmódot... arra úgy néz ki nem lehet EDITOR-t nyitni.Arra nem, az inkább grafikus, és csak kicsit szöveges jellegű videomód. Lehet, nem kellett volna említenem.
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
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