ComedyCode.com
Home Categories Languages Random New Popular Links
Search 

Share This Code!
Send this code to a friend!

ComedyCode of the Week
Check out this week's highlighted snippet!

New Here?
Create an account and become a ComedyCoder today!




May 12, 2008

Typical 1980's CRPG

5 REM SIMPLE BASIC RPG
10 I = INT(RND()*5)
20 ON I GOTO 30, 40, 50, 60, 70
30 PRINT "YOU DIE" : END
40 PRINT " YOU FIND A +1 CHAINMAIL" : GOTO 10
50 PRINT "YOU KILL A DRAGON" : GOTO 10
60 PRINT "YOU GO ON A REALLY LONG QUEST THAT INVOLVES SOMETHING WITH A RING AND MAYBE SOME SORT OF DEMON OR SOMETHING" : GOTO 10
70 PRINT "YOU DIE IN A COMPLETELY DIFFERENT WAY" : END


Coded by: Ed Kolis
View other ComedyCode by this comedycoder.
Send this comedycoder a message.
Submitted on: November 5, 2003
Category: Games
Show me more Games snippets.
Programming language: BASIC
Show me more BASIC snippets.
Viewed by: 3956 unique visitors


Ratings & Comments

This snippet has not yet been rated.


» Submit Code
» Login

Rate This Code!

Login or create an account.




Copyright © 2001-2004 - N-VisionIT Interactive
Website Design, Development & Hosting by N-VisionIT Interactive