Sha256: 325b72a506d6802771273942f4ec17077e04617031946699f23603ac165edf9a
Contents?: true
Size: 384 Bytes
Versions: 6
Compression:
Stored size: 384 Bytes
Contents
1 PRINT TAB(30);"SLOTS" 2 PRINT TAB(15);"CREATIVE COMPUTING MORRISTOWN, NEW JERSEY" 3 PRINT: PRINT: PRINT 5 DEF FNA(Z)=30*EXP(-Z*Z/100) 100 PRINT 110 FOR X=-30 TO 30 STEP 1.5 120 L=0 130 Y1=5*INT(SQR(900-X*X)/5) 140 FOR Y=Y1 TO -Y1 STEP -5 150 Z=INT(25+FNA(SQR(X*X+Y*Y))-.7*Y) 160 IF Z<=L THEN 190 170 L=Z 180 PRINT TAB(Z);"*"; 190 NEXT Y 200 PRINT 210 NEXT X 300 END
Version data entries
6 entries across 6 versions & 1 rubygems