Ben Heck's TRS80 Model 100 Program

[DanWake]

Here's the program that Ben Heck wrote on my TRS 80 Model 100 today at MRRF:

10 CLS:PRINT "ANNOYING PIANO BY BEN HECK"
11 PRINT @ 40, "PRESS NUMBER KEYS TO PLAY!"
20 I$=INKEY$
21 IF I$<>"" THEN GOSUB 90
29 GOTO 20
90 N=ASC(I$)-48
91 IF N<0 OR N>10 THEN RETURN
92 SOUND N*500, 10
93 H=INT(RND(1)*240)
94 PRINT @ H+80, CHR$(H);
99 RETURN

[BeeAmaker]

Should of had him sign it.

[bvandiepenbos]

That's cool Dan.

Ben is a cool down to earth guy. I met him at Detroit Maker Faire, he stopped by and chatted for a while asking about my stuff. I did not realize who he was at first... I said 'why do you seem familiar ?' he says oh, I'm Ben Heck I do some web videos. Duh, I should have known, I enjoy watching his show.