3 ms·
10 X=1 20 FOR Y=1 TO X 30 PRINT " "; 40 NEXT Y 50 PRINT "HELLO" 60 IF X=34 THEN LEFT=1 70 IF X=0 THEN LEFT=0 80 IF LEFT=1 THEN X=X-1 90 IF LEFT=
by pud 14y ago
10 X=1
20 FOR Y=1 TO X
30 PRINT " ";
40 NEXT Y
50 PRINT "HELLO"
60 IF X=34 THEN LEFT=1
70 IF X=0 THEN LEFT=0
80 IF LEFT=1 THEN X=X-1
90 IF LEFT=0 THEN X=X+1
100 GOTO 20
RUN
Notes: Use ^C to stop it. Type LIST to see the program you wrote. If you screw up a line, just type the line number and hit <return> to delete that line.
- kator 14y ago10 X=1 20 D=1 30 FOR Y=1 TO X 40 PRINT " "; 50 NEXT Y 60 PRINT "HELLO" 70 IF X=0 OR X=34 THEN D=D*-1 80 X=X+D 90 GOTO 30
- pud 14y ago5 PRINT "WHAT'S YOUR FIRST NAME?" 7 INPUT NAME$ 10 X=1 20 D=1 30 FOR Y=1 TO X 40 PRINT " "; 50 NEXT Y 60 PRINT NAME$ 70 IF X=0 OR X=39-LEN(NAME$) THEN D=D*-1 80 X=X+D 90 GOTO 30 RUN
- jello 14y ago70 IF X=1 THEN LEFT=0 Makes for a more symmetric pattern.
- joezydeco 14y agoWhat? No FizzBuzz?
- sopooneo 14y agoHow do you type quotes? I stumbled on the fact that my keyboard's "minus" key outputs an equals sign, but quotes I can't get. I grew up on the C64, not this one.
- lisper 14y agoJust typing a quote (single or double) in the usual way works fine for me.