Language tiny
(A collition between Forth and Basic)
Date: | 05/01/07 |
Author: | Ron Hudson |
URL: | http://www.geocities.com/ron.hudson@sbcglobal.net/ |
Comments: | 1 |
Info: | http://esoteric.voxelperfect.net/wiki/Tiny |
Score: | (2.97 in 100 votes) |
00110 "The Beer Song!\n\n" 00120 [ 99 ] b ? 00130 [b]? [@]$ [9000] @ 00140 "of beer on the wall \n" [b]? [@]$ [9000] @ 00150 "of beer\n" [?] 00160 [b 1 -] b [b 0 >! 210 *]@ 00170 "You take one down, pass it around..\n" 00180 [b]? [@]$ [9000] @ 00190 "of beer on the wall \n\n" 00200 [130] @ 00210 "You take one down, pass it around.. \n" 00220 "No more bottles of beer on the wall. \n\n\n\n" 00230 "No more bottles of beer on the wall, \n" 00240 "No more bottles of beer. You go to the store \n" 00250 "and then buy some more, 99 bottles of beer on the wall \n\n\n" 00260 [9999] @ 09000 [b 1 = 9100 *] @ 09010 " bottles " [$]@ 09100 " bottle " [$]@ 09999 .
Download Source | Write Comment
Download Source | Write Comment
Add Comment
Please provide a value for the fields Name,
Comment and Security Code.
This is a gravatar-friendly website.
E-mail addresses will never be shown.
Enter your e-mail address to use your gravatar.
Please don't post large portions of code here! Use the form to submit new examples or updates instead!
Comments
Ron Hudson said on 05/06/07 02:02:02
Just a note, the "[?]" in line 00150 waits for user input and ignores it,
just hit a return (or remove it) to consume the next bottle of beer.
!thank
ron :^)