gitea-mirror/basic-computer-games
1
0
Fork 0
mirror of https://github.com/coding-horror/basic-computer-games.git synced 2026-01-01 07:27:55 -08:00
Code Issues Packages Projects Releases Wiki Activity

Added MiniScript version of 78_Sine_Wave

Browse Source
This commit is contained in:
JoeStrout
2023-01-28 17:33:37 -07:00
parent 8cea6c1466
commit 78af0d3069
2 changed files with 18 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
00_Alternate_Languages/78_Sine_Wave/MiniScript/README.md Normal file
View File

@@ -0,0 +1,3 @@
Original source downloaded from [Vintage Basic](http://www.vintage-basic.net/games.html).
Conversion to [MiniScript](https://miniscript.org).

15
00_Alternate_Languages/78_Sine_Wave/MiniScript/sinewave.ms Normal file
View File

@@ -0,0 +1,15 @@
print " "*30 + "SINE WAVE"
print " "*15 + "CREATIVE COMPUTING MORRISTOWN, NEW JERSEY"
print; print; print; print; print
// Remarkable program by David Ahl, ported
// from BASIC to MiniScript by Joe Strout
B = 0
// start long loop
for t in range(0, 40, 0.25)
A = floor(26 + 25*sin(t))
print " "*A, ""
if not B then print "CREATIVE" else print "COMPUTING"
B = not B
wait 0.01
end for