| |
Carrion
Registered: Feb 2009
Posts: 317 |
Beauty of Basic
10 PRINT CHR$ (205.5 + RND (1)); : GOTO 10 |
|
| |
Cruzer
Registered: Dec 2001
Posts: 1048 |
 |
| |
Rudi
Account closed
Registered: May 2010
Posts: 125 |
0 A=2098:POKEA+1,18:POKEA+4,1:POKEA+5,105:POKEA+11,244:SYSA:" "
RUN
After SYSA to make petscii-chars:
"M [SHIFT+P]) I[SHIFT+M] [SHIFT+R][SHIFT+DEL][SHIFT+P] "
|
| |
Hermit
Registered: May 2008
Posts: 208 |
fukkin awesome :):) Power of PETSCII and C64 BASIC. I wonder how much code it would take on a PC in C for example to do the same with graphic-chars. :):)
the 2nd is much faster, but it's not pure BASIC :)
I used to entertain ourselves when I was under 20, with a simple stroboscope substitute I coded when I could only code in BASIC:
10 POKE53265,0
20 POKE53280,1:FORH=0TO10:NEXT : POKE53280,0:FORH=0TO100:NEXT : GOTO 20
|
| |
Cresh
Registered: Jan 2004
Posts: 354 |
@Hermit - everything explained here.
Also on diffent platforms.
http://trope-tank.mit.edu/10_PRINT_121114.pdf
|
| |
Rudi
Account closed
Registered: May 2010
Posts: 125 |
0 POKE2085,105:POKE2091,244:SYS2080:" "
reduced size a little further.
after the quotes:"M[TAB+9][SHIFT+P][SHIFT+5]+[SPACEBAR][SHIFT+M][SPACEBAR][SHIFT+R][SHIFT+ DELETE][SHIFT+P]" |
| |
Hermit
Registered: May 2008
Posts: 208 |
An interesting page about the source-code for the BASIC interpreter for various platforms:
http://www.pagetable.com/?p=46 |
| |
Oswald
Registered: Apr 2002
Posts: 5094 |
wow, that is one of the coolest sites ever, software archeology! ftw!! |
| |
theWizard
Account closed
Registered: Jul 2007
Posts: 109 |
Quote: fukkin awesome :):) Power of PETSCII and C64 BASIC. I wonder how much code it would take on a PC in C for example to do the same with graphic-chars. :):)
the 2nd is much faster, but it's not pure BASIC :)
I used to entertain ourselves when I was under 20, with a simple stroboscope substitute I coded when I could only code in BASIC:
10 POKE53265,0
20 POKE53280,1:FORH=0TO10:NEXT : POKE53280,0:FORH=0TO100:NEXT : GOTO 20
i done the same thing. acid man ! |
