Skip to content

Instantly share code, notes, and snippets.

@Ishibasystems
Created March 23, 2014 10:03
Show Gist options
  • Save Ishibasystems/9721009 to your computer and use it in GitHub Desktop.
Save Ishibasystems/9721009 to your computer and use it in GitHub Desktop.
100 CLS
110 FOR X=0 TO 240
120 LINE(X,SIN(((X+N)/20)*3.1415)*32+32)-(X,SIN(((X+N+1)/20)*3.1415)*32+32)
130 NEXT X
140 N=N+2
150 IF N=40 THEN N=0:CLS
160 GOTO 110
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment