From Hak5
Joeeigel's Text Adventure of Death - Community style
The title was thought up by elmer, one of the fronters of this project, but it was started by Joeeigel when he was just learning DBP (A veriation of Basic)
IRC
Feel free to join us in irc.hak5.org, channel #text
Rules
Any languages can be used, for any new versions, upload them and edit the section below. Content can be added, such as more story, more choices, or the chance that you will not automatically succeed. It is preferred that you upload an archive with the compiled executable and the source, but it is not necessary to do so.
Submissions
| Modder
| Language
| Link
| Extras
|
| Joeeigel
| DBP
| http://www.geekday.org/Text-adventure-1.exe
| None
|
| Cowbox
| DBP
| http://www.soharix.homestead.com/text_adventure.rar
| Cleaner
|
| Elmer
| Ruby
| http://hak5comic.x10hosting.com/txtadv.7z
| Bonus features, Chances and extra content, Comedy factor.
|
| Logos
| Ruby
| http://slexy.org/paste/4251
| None
|
| Famicoman
| C++
| Reserved, Help needed - http://slexy.org/paste/4213
| Note from TomB: use cin.getline() for reading input.
|
| TomB
| C
| http://tombell.org.uk/~tomb/source/tag/tag.c
| Total Conversion **
|
| CrashandDie
| PHP
| http://slexy.org/paste/4240
http://crashanddie.info/game.php
| Very simple conversion of C version, nothing fancy, just works !
|
| Nemitor
| PHP
| Reserved spot
| Full dynamics/database support so anyone in the community can add their own options/scenarios/etc without any programming experience.
|
| Nemitor
| TI-83(Basic)
| http://nemitor.googlepages.com/TEXTGAME.8XP
| A version for the TI-84, TI-83+, and TI-84 calculators. There were some character restrictions, so I had to change some text and there are still some overlaps and such. I'll fix it later.
|
| Ains
| Javascript
| Reserved
| Who knows?
|
| Tetrasoft
| RealBasic
| Reserved
| This version will be Available to Users of Linux 0.0.2+, Windows 98+, MacOS 9+. I still have have a bit to do at the End.
|
| RogueHart
| BlitzBasic
| http://slexy.org/paste/4719 http://www.megaupload.com/?d=F7OVKG2N
| I put in a small 3rd path with a Hak5 theme. its not much but its something. barely.
|
| Oky
| C++
| http://www.mediafire.com/?0uyd1yu1zmz
| Famicoman's code working under VS2005
|
| RogueHart
| multipage html
| http://www.megaupload.com/?d=V90WRIPO
| Click the links in the first page to make your choices.
|
| twocs
| BASIC
| http://wiki.hak5.org/wiki/BASIC
| Just type the first letter of the choice, instead of the whole word. Dartmouth BASIC 1963 style. (except anyone know if the GET function was supported?)
|
| ls
| PYTHON
| http://rapidshare.com/files/68330660/textgame.py.html
| none
|
At The Bottom Of The Page
Original Source
START:
cls
print "During this game please use lower case all the way through"
print "You awoke from your mystifying dream"
input "What was it like? (Heroic/Demonic): ",DREAM$
do
if DREAM$="heroic" then gosub HEROIC
if DREAM$="demonic" then gosub DEMONIC
loop
HEROIC:
cls
print "What happen in this heroic dream of yours?"
print "You conquering evil forces"
print "Won in the local arena"
print "Stayed at home and played Halo 2 on your xbox"
input "Evil, Arena, Halo: ",HERODR$
do
if HERODR$="halo" then gosub NOOB
if HERODR$="arena" then gosub ARENA
if HERODR$="evil" then gosub CEVIL
loop
NOOB:
cls
print "Pick something a little better next time?"
sleep 4000
cls; gosub HEROIC
ARENA:
cls
print "What arena were you fighting in?"
print "The human arena or the monster arena?"
input "Human or monster: ",ARNA$
do
if ARNA$="human" then gosub HUMANA
if ARNA$="monster" then gosub MONSTERA
loop
CEVIL:
cls
print "Conquering evil? You have the mind of a true hero! I think it's about time you went to see the local clan master about starting some work over there"
print "Press anykey to continue"
wait key
gosub CLAN1
HUMANA:
cls
print "Fighting against humans? That dosn't seem very heroic! Im sorry, but if that is your view of heroic, you chose the wrong path."
print "Press anykey to continue"
wait key
gosub START
MONSTERA:
cls
print "Killing dreaded monsters eh? You have the strength of a true hero! I think it's about time you went to see the local clan master about starting some work over there"
print "Press anykey to continue"
wait key
gosub CLAN1
CLAN1:
cls
Print "The Clan master looks at strangely and says"
print "'Well, who do we have here?'"
input "Name: ",NAME$
print "Hello there";NAME$;" I am the clan master here in Oldale"
Print "You can only get into our clan if you can crack this code"
print "Dont expect to crack it very easily though"
print "J8mE15aD13nI15 is the code. Crack away!"
input "Code:",CODE$
do
if CODE$="jedi homo man" // Re-added due to popular demand
gosub CLAN2
else
gosub CLAN1
endif
loop
CLAN2:
cls
print "Wow... you cracked our code! You are welcome to join our clan!"
sleep 10000
cls
print "Our hero";NAME$;" was allowed to join the clan and thought valantly from there onwards."
print "Conquering evil and solving mysterious puzzles untill his dieing day."
print "press anykey to continue"
wait key
gosub QUIT
DEMONIC:
cls
print "Ahh a evil demon filled dream, what happened?"
print "Murdered a mother and her child"
Print "Stole Goods from the local bakery"
print "Stayed at home and played Halo 2 on your xbox"
input "Murder, Steal, Halo: ",EVILDR$
do
if EVILDR$="halo" then gosub NOOB
if EVILDR$="steal" then gosub STEAL
if EVILDR$="murder" then gosub MURDER
loop
end
STEAL:
cls
print "Is that the best you can do? Not exactly the biggest crime in the world is it?"
print "Why not try again?"
sleep 10000
gosub DEMONIC
MURDER:
cls
print "Murder eh? That seems a little radical for you, but never the less the local barbarian clan is always looking for murders and such, why not go visit them?"
print "Press any key to continue"
wait key
gosub CLAN3
CLAN3:
cls
print "Hello there, who are you?"
input "Name: ",NAME2$
print "Ahh,";NAME2$;" what are you doing here?"
print "You had a dream you murdered somebody? Big deal, we murder people for real all the time here"
Print "If you wish to join us you must go and murder somebody yourself."
input "Fine, No: ",CLAN3A$
do
if CLAN3A$="fine" then gosub MURDER2
if CLAN3A$="no" then gosub MURDER3
loop
MURDER2:
cls
Print "You Aqquired a dagger!"
print "Well, a dagger that could be handy"
print "Clan leader, off you go now little boy"
wait 10000
cls
print "You are now in the middle of the town, you see 3 people near you"
print "A trader"
print "A Guard"
print "A helpless woman"
print "Who are you going to murder"
input "Trader, Guard, Woman: ",MURDER1$
do
if MURDER1$="trader" then gosub TRADER
if MURDER1$="guard" then gosub GUARD
if MURDER1$="woman" then gosub WOMAN
loop
TRADER:
cls
Print "You pull your dagger out its hold and stab the trader in the back."
print "You are then caught by the guard and forced to under go torture for the remainder of your life"
input "Restart or quit: ",CAUGHT$
do
if CAUGHT$="restart" then gosub START
if CAUGHT$="quit" then gosub QUIT
loop
GUARD:
cls
Print "You murder the guard and without anybody arround to catch you you hurry back to the barbarians and tell them"
Print "Clan leader, 'Ahh, hello again";NAME2$;" What, you killed a guard"
Print "You have guts kid... You're in!"
Print "Our 'hero' then became a barbarian, burning villages, stealing and murdering anybody who stood in his way."
print "Press anykey to continue"
wait key
gosub QUIT
WOMAN:
cls
Print "You pull your dagger out its hold and stab the woman in the back."
print "You are then caught by the guard and forced to under go torture for the remainder of your life"
input "Restart or quit: ",CAUGHT2$
do
if CAUGHT2$="restart" then gosub START
if CAUGHT2$="quit" then gosub QUIT
loop
MURDER3:
cls
Print "Then you shall be murdered."
print "This is the end of out heros journey, stopped by rabid barbarians."
input "Restart or quit: ",CAUGHT3$
do
if CAUGHT$="restart" then gosub START
if CAUGHT$="quit" then gosub QUIT
loop
QUIT:
cls
print "Thanks for playing. Made by Joeeigel."
sleep 10000
end
