02-06-2003, 02:31 PM
good lord rel, you're making us all feel bad about our programming abilities
anyhow here's a cheesy little blur demo i made last night:
anyhow here's a cheesy little blur demo i made last night:
Code:
1 SCREEN 13
2 IF i& = 0 THEN SCREEN 13 ELSE OUT &H3C8, 0
3 IF i& = 0 THEN DEF SEG = &HA000 ELSE LINE (RND * 280 + 20, RND * 159 + 20)-(RND * 280 + 20, RND * 159 + 20), 255', B
4 FOR i& = 6400 TO 57600
5 IF i& < 7168 THEN OUT &H3C9, (i& - 6400) \ 12
6 POKE i&, (PEEK(i& - 1) + PEEK(i& + 1)) / 2
7 NEXT i&
8 LINE (RND * 280 + 20, RND * 159 + 20)-(RND * 280 + 20, RND * 159 + 20), 0', B
9 IF INKEY$ = "" THEN GOTO 3
i]"I know what you're thinking. Did he fire six shots or only five? Well, to tell you the truth, in all this excitement, I've kinda lost track myself. But being as this is a .44 Magnum ... you've got to ask yourself one question: 'Do I feel lucky?' Well, do ya punk?"[/i] - Dirty Harry