The Trespasser Text Adventure

Creating new content for Trespasser!

Moderators: TresCom Support Team, TresCom Board Managers, TresCom Developers

Post Reply
User avatar
awesome24712
Pteranodon
Pteranodon
Posts: 889
Joined: Sun Oct 02, 2011 1:56 am
Antispam: No
Location: USA
Contact:

The Trespasser Text Adventure

Post by awesome24712 »

In my free time, today, I quite simply learned the basics of the Batch language and compiled my own little game. :)

Here's the download:
http://www.mediafire.com/?n5jk6x5es2dlcsz

Once you finish it, you'll notice that so far it is VERY short, it's more that I've learned how to do it, and I want to hear some suggestions!

And here's the batch script for anyone interested:

Code: Select all

@echo off
title Trespasser
color 4e
set havecrowbar= 0
set wastedtime= 0
set burnt= 0
set havefireext= 0

:intro
cls
echo ======================================
echo WELCOME TO T          By Awesome24712
echo             R
echo              E
echo               S
echo                P
echo                 A
echo                  S
echo                   S
echo                    E
echo                     R
echo ======================================
echo.
echo You're flying a plane and it's about to crash. There is an island nearby.
echo Do you try to land it:
echo.
echo Option 1: In the water
echo Option 2: On the beach
echo.
echo Please choose where you want to land (1, 2)
set /p destination=
if %destination% == 1 goto water 
if %destination% == 2 goto beach
if %destination% == 3 goto middle

//IN THE WATER

:water
cls
echo Your plane has crash-landed in the water. Water is flooding in. 
echo You need to get out.
echo.
echo What do you do?
echo.
echo Option 1: Try to open the door
echo Option 2: Break the Glass Windows
echo Option 3: Accept your inevitable fate and drown
echo.
echo Choose what you want to do (1, 2, 3)
set /p flood=
if %flood% == 1 goto drowndoor
if %flood% == 2 goto breaktool
if %flood% == 3 goto drown

:drowndoor
cls
echo You wasted all of your energy trying to open the door and drown. 
echo.
echo Try again? (type yes or no)
set /p floodtryagain=
if %floodtryagain% == yes goto intro
if %floodtryagain% == no goto quit

:breaktool
cls
echo You need to find something to break the glass.
echo.
echo Option 1: The keys
echo Option 2: Crowbar
echo Option 3: Fire Extinguisher
echo.
echo What tool do you use? (1,2,3)
set /p flooditem=
if %flooditem% == 1 goto deathkeys
if %flooditem% == 2 goto crowbar
if %flooditem% == 3 goto fireext

:deathkeys
cls
echo The keys aren't strong enough to break the glass.
goto tryagain

:crowbar
cls
echo You manage to pry the windows out, escape, and keep the crowbar.
echo You swim to the island for saftey.
set havecrowbar= 1
pause
goto secondstep

:fireext
cls
echo The fire extinguisher broke the glass, you escaped and swam to shore.
echo.
echo However the fire extinguisher was too heavy to keep, you lost it.
pause
goto secondstep

:drown
cls
echo Did you really have so little self-esteem?
echo.
echo You deserved to die.
goto tryagain

//ON THE BEACH


:beach
cls
echo You brace yourself for impact,
echo the plane skids across the beach.
echo.
echo The fuel erupts from the tanks and catches aflame.
echo To escape, you:
echo.
echo Option 1: Jump through the flames toward the front exit.
echo Option 2: Use the emergency escape hatch on roof.
echo.
echo Make your life-threatening decision (1, 2)
set /p beachescape=
if %beachescape% == 1 set havefireext= 1
if %beachescape% == 2 goto hatchescape
cls
echo.
echo You jumped through the flames, but tripped over a seat and got a slight burn.
set burnt= 1
echo.
echo A fire extinguisher is nearby, you quickly grab it and extinguish the flames.
echo.
echo Do you want to search the plane wreckage for anything useful? (yes/no)
set /p searched=
if %searched% == yes set havecrowbar= 1
if %searched% == yes set wastedtime= 1
if %searched% == yes goto planesearch
cls
echo You open the door and get a nice breath of fresh air.
goto secondstep


:hatchescape
cls
echo The hatch is jammed. Luckily, you find a crowbar to pry it open.
set havecrowbar= 1
echo.
echo Crowbar in hand, you get a breath of fresh air.
pause
goto secondstep

:planesearch
cls
echo.
echo Amongst the wreckage, you find a crowbar, which reminds
echo you of some game you played a long time ago.
echo.
echo You open the front door, feel the light pour in.
pause
goto secondstep


//THE ISLAND

:middle
cls

//SECOND ITTERATION

:secondstep
cls
echo You have now set your first steps on the island.
echo.
if %burnt% == 1 echo You are burned.
echo.
if %havecrowbar% == 1 echo A crowbar is in your possesion.
echo.
if %havefireext% == 1 echo You have a Fire Extinguisher.
echo.
echo Thanks for playing this time! To be continued!
pause
goto quit

//END SCRIPT

:tryagain
echo Try again? (yes/no)
set /p tryagain=
if %tryagain% == yes goto intro
if %tryagain% == no goto quit


:quit
Check out the HL2 mod I'm helping with: Image
Visit my Steam! http://steamcommunity.com/id/awesome24712/
Visit my YouTube! http://www.youtube.com/user/awesome24712

Post benchamrks:
1 [x] 2 [x] 4 [x] 8 [x] 16 [x] 32 [x] 64 [x] 128 [x] 256 [x] 512 [x] 1024 [ ] 2048 [ ] 4096 [ ] 9192 [ ]
User avatar
RexHunter99
Albertosaurus
Albertosaurus
Posts: 2197
Joined: Mon Apr 24, 2006 12:12 pm
Location: Australia
Contact:

Re: The Trespasser Text Adventure

Post by RexHunter99 »

Awesome :) I love it when people get creative with old stuff :D
~ They told me humans weren't real... I proved them wrong.
ImageAnthropology ~ A beautiful tale.
EpicZen
Carnivores Hub ~ Need the full games without all the hassle of torrents or viruses? Run on over to EpicZen's Carnivores Hub!
User avatar
Velociraptor Alfa
Brachiosaurus
Brachiosaurus
Posts: 124
Joined: Sat Mar 07, 2009 2:56 pm
Antispam: No
Location: Czech republic

Re: The Trespasser Text Adventure

Post by Velociraptor Alfa »

Almost year ago i started very similar project to yours.

http://trespasser.blog.cz/1109/soutez-t ... -o-preziti
"To defeat an enemy, you must know them. Not simply their battle tactics, but their history, philosophy, art." - Grand Admiral Thrawn
User avatar
awesome24712
Pteranodon
Pteranodon
Posts: 889
Joined: Sun Oct 02, 2011 1:56 am
Antispam: No
Location: USA
Contact:

Re: The Trespasser Text Adventure

Post by awesome24712 »

RexHunter99 wrote:Awesome :) I love it when people get creative with old stuff :D
Indeed, but this is still rather new to me. :) Too bad it's only going to get more complicated. :P
Velociraptor Alfa wrote:Almost year ago i started very similar project to yours.

http://trespasser.blog.cz/1109/soutez-t ... -o-preziti
Quite interesting, too bad you didn't continue it.

So, today I created a much better main menu, a real intro, options (difficulty), and a health system.

I also added a third option when you try to land the plane, in the middle of the island. I had the basis for it before but it wasn't finished, so I removed the option. But now it's back. And quite action-packed (lol that rhymes).

If anyone wants to try it out, here's the batch script:

Code: Select all

@echo off
title Trespasser
color 4e

//UI Values

set ver= 0.2
set dif= 1
set name= insert name here
set health= 80

//GAME VARIABLES

set havecrowbar= 0
set wastedtime= 0
set burnt= 0
set havefireext= 0

//MAIN MENU+USER INTERFACE

cls
echo.
echo.
echo          AWESOME24712 / STEPS TO TRESPASSING PRESENTS. . .
ping localhost -n 4 >nul

:intro
cls
echo ==================================================================
echo OOOOO  OOOO   OOOOO   OOOO  OOOO   OOO   OOOO   OOOO  OOOOO  OOOO
echo   O    O   O  O      O      O   O O   O O      O      O      O   O
echo   O    OOOO   OOO     OOO   OOOO  OOOOO  OOO    OOO   OOO    OOOO
echo   O    O O    O          O  O     O   O     O      O  O      O O
echo   O    O   O  OOOOO   OOO   O     O   O  OOO    OOO   OOOOO  O  O
echo.
echo.
echo             A Text Adventure
echo.
echo ==================================================================
echo.
pause
goto menu

:menu
cls
echo.
echo TRESPASSER: A TEXT ADVENTURE v0.2
echo.
echo     MAIN MENU
echo =================================
echo.
echo    1. Start a new game
echo.
echo    2. Info
echo.
echo    3. Options
echo.
echo    4. Quit
echo.
echo =================================
echo.
echo Please choose an option (1,2,3,4)
CHOICE /n /c 1234
if %errorlevel% == 1 goto name
if %errorlevel% == 2 goto info
if %errorlevel% == 3 goto options
if %errorlevel% == 4 goto quit
goto menu

:info
cls
echo.
echo The Trespasser Text Adventure is a game made by Awesome24712,
echo a simple text version of Trespasser for people to have fun and
echo enjoy.
echo.
echo So, please have fun and enjoy the thrill of adventure!
echo.
echo %ver%
echo.
pause
goto menu

:options
cls
echo.
echo Please choose your difficulty. Your difficulty will effect your health.
echo.
echo EASY   = 100 HEALTH 1
echo NORMAL = 80  HEALTH 2
echo HARD   = 60  HEALTH 3
echo ANNE   = ?   HEALTH 4
echo.
echo Please choose your difficulty (1,2,3,4):
CHOICE /n /c 1234 >nul
if %errorlevel% == 1 set dif= 0
if %errorlevel% == 2 set dif= 1
if %errorlevel% == 3 set dif= 2
if %errorlevel% == 4 set dif= 3
if %dif% == 1 set health= 100 
if %dif% == 2 set health= 80
if %dif% == 3 set health= 60
if %dif% == 4 set health= 50
echo.
pause
goto menu

:name
cls
echo.
echo  What would you like to be called in your adventure?
echo.
set /p name=Please enter your name: 
echo.
echo Thank you %name%, nice to meet you.
echo.
echo Have fun on your adventure!
@pause
goto firststep

///////////////START GAME////////////////

//FIRST ITERATION

:firststep
cls
echo You're flying a plane and it's about to crash. There is an island nearby.
echo Do you try to land it:
echo.
echo Option 1: In the water
echo Option 2: On the beach
echo Option 3: In the middle of the island
echo.
echo Your health is %health%
echo.
echo Please choose where you want to land (1, 2, 3)
set /p destination=
if %destination% == 1 goto water 
if %destination% == 2 goto beach
if %destination% == 3 goto middle

//IN THE WATER

:water
cls
echo Your plane has crash-landed in the water. Water is flooding in. 
echo You need to get out.
echo.
echo What do you do?
echo.
echo Option 1: Try to open the door
echo Option 2: Break the Glass Windows
echo Option 3: Accept your inevitable fate and drown
echo.
echo Choose what you want to do (1, 2, 3)
set /p flood=
if %flood% == 1 goto drowndoor
if %flood% == 2 goto breaktool
if %flood% == 3 goto drown

:drowndoor
cls
echo You wasted all of your energy trying to open the door and drown. 
echo.
echo Try again? (type yes or no)
set /p floodtryagain=
if %floodtryagain% == yes goto intro
if %floodtryagain% == no goto quit

:breaktool
cls
echo You need to find something to break the glass.
echo.
echo Option 1: The keys
echo Option 2: Crowbar
echo Option 3: Fire Extinguisher
echo.
echo What tool do you use? (1,2,3)
set /p flooditem=
if %flooditem% == 1 goto deathkeys
if %flooditem% == 2 goto crowbar
if %flooditem% == 3 goto fireext

:deathkeys
cls
echo The keys aren't strong enough to break the glass.
goto tryagain

:crowbar
cls
echo You manage to pry the windows out, escape, and keep the crowbar.
echo You swim to the island for saftey.
set havecrowbar= 1
pause
goto secondstep

:fireext
cls
echo The fire extinguisher broke the glass, you escaped and swam to shore.
echo.
echo However the fire extinguisher was too heavy to keep, you lost it.
echo.
echo The sand hot, you head inland, hopefully to find civilization.
pause
goto secondstep

:drown
cls
echo Did you really have so little self-esteem?
echo.
echo You deserved to die.
goto tryagain

//ON THE BEACH


:beach
cls
echo You brace yourself for impact,
echo the plane skids across the beach.
echo.
echo The fuel erupts from the tanks and catches aflame.
echo To escape, you:
echo.
echo Option 1: Jump through the flames toward the front exit.
echo Option 2: Use the emergency escape hatch on roof.
echo.
echo Make your life-threatening decision (1, 2)
set /p beachescape=
if %beachescape% == 1 set havefireext= 1
if %beachescape% == 2 goto hatchescape
cls
echo.
echo You jumped through the flames, but tripped over a seat and got a slight burn.
set burnt= 1
set /a health -= 20
echo.
echo A fire extinguisher is nearby, you quickly grab it and extinguish the flames.
echo.
echo Do you want to search the plane wreckage for anything useful? (yes/no)
set /p searched=
if %searched% == yes set havecrowbar= 1
if %searched% == yes set wastedtime= 1
if %searched% == yes goto planesearch
cls
echo You open the door and get a nice breath of fresh air.
goto secondstep


:hatchescape
cls
echo The hatch is jammed. Luckily, you find a crowbar to pry it open.
set havecrowbar= 1
echo.
echo Crowbar in hand, you get a breath of fresh air.
pause
goto secondstep

:planesearch
cls
echo.
echo Amongst the wreckage, you find a crowbar, which reminds
echo you of some game you played a long time ago.
echo.
echo You open the front door, feel the light pour in.
echo.
echo The sand hot, you head inland, hopefully to find civilization.
pause
goto secondstep


//THE ISLAND

:middle
cls
echo You, %name% have decided to land in the center of the island.
echo.
echo Hope the trees provided a relatively soft landing. . .
ping localhost -n 3 >nul
echo.
echo BANG!
ping localhost -n 1 >nul
echo.
echo BOOM!. . .
ping localhost -n 2 >nul
cls
echo.
echo    After the large jolt of the crash, you find your plane
echo suspended in the trees. In the distance, you hear a
echo mighty roar.
echo    All of a sudden, you hear very large footsteps approaching.
echo.
echo  In fear, what do you want to do?
echo.
echo  1. Run away and attempt to find shelter
echo.
echo  2. Hide in the plane and hope not to be seen
echo.
echo (1,2)
echo.
CHOICE /n /c 12
if %errorlevel% == 1 goto spinorun
if %errorlevel% == 2 goto spinohide ELSE goto middle

:spinorun
cls
echo. 
echo You, %name% have decided to run away.
echo You quickly jump out of the plane, and start running into the jungle.
ping localhost -n 1 >nul
echo.
echo The footsteps are getting louder!
ping localhost -n 1 >nul
echo.
echo Run as fast as you can! (Spam the spacebar)
pause >nul
pause >nul
pause >nul
pause >nul

pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
echo.
echo Running faster!
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
echo.
echo Running even faster!
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
echo.
echo RUN FOR YOUR LIFE!
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
pause >nul
echo.
echo.  Ugh. . .
ping localhost -n 4 >nul
cls
echo.
echo  Is it still following?
echo.
echo Doesn't seem like it. You ran like your life depended on it!
echo.
pause
goto secondstep

:spinohide
cls
echo.
echo  You, %name% have decided to try to hide in the plane.
ping localhost -n 5 >nul
echo.
echo The footsteps are still getting louder. . .
ping localhost -n 3 >nul
echo.
echo Now they have stopped.
echo.
echo You get the sensation that something is looming over the wrecked shell of the plane.
echo.
pause
cls
ping localhost -n 1 >nul
echo.
echo . . .
ping localhost -n 1 >nul
echo.
echo . . .
ping localhost -n 1 >nul
echo.
echo . . .
ping localhost -n 2 >nul
cls
echo.
echo A sudden impact, seemingly from above, comes down and crushes the plane.
echo.
echo YOU DIED
echo.
goto tryagain



//SECOND ITTERATION

:secondstep
cls
echo You can now  get a good look of your surroundings.
echo.
if %burnt% == 1 echo You are burned.
echo.
if %havecrowbar% == 1 echo A crowbar is in your possesion.
echo.
if %havefireext% == 1 echo You have a Fire Extinguisher.
echo.
echo Your health is %health%.
echo.
echo Thanks for playing this time! To be continued!
echo.
pause
goto intro

//END SCRIPT

:tryagain
echo Try again? (yes/no)
set /p tryagain=
if %tryagain% == yes goto intro
if %tryagain% == no goto quit

:quitask
cls
echo.
echo  Are you sure you want to quit? (y/n)
CHOICE /n /c yn
if %errorlevel% == 1 goto quit
if %errorlevel% == 2 goto menu
goto menu


:quit
quit
Check out the HL2 mod I'm helping with: Image
Visit my Steam! http://steamcommunity.com/id/awesome24712/
Visit my YouTube! http://www.youtube.com/user/awesome24712

Post benchamrks:
1 [x] 2 [x] 4 [x] 8 [x] 16 [x] 32 [x] 64 [x] 128 [x] 256 [x] 512 [x] 1024 [ ] 2048 [ ] 4096 [ ] 9192 [ ]
User avatar
Velociraptor Alfa
Brachiosaurus
Brachiosaurus
Posts: 124
Joined: Sat Mar 07, 2009 2:56 pm
Antispam: No
Location: Czech republic

Re: The Trespasser Text Adventure

Post by Velociraptor Alfa »

awesome24712 wrote:
Quite interesting, too bad you didn't continue it.
No, no! This project is still alive. :D Nowadays I published part 40.
"To defeat an enemy, you must know them. Not simply their battle tactics, but their history, philosophy, art." - Grand Admiral Thrawn
User avatar
awesome24712
Pteranodon
Pteranodon
Posts: 889
Joined: Sun Oct 02, 2011 1:56 am
Antispam: No
Location: USA
Contact:

Re: The Trespasser Text Adventure

Post by awesome24712 »

Velociraptor Alfa wrote:
awesome24712 wrote:
Quite interesting, too bad you didn't continue it.
No, no! This project is still alive. :D Nowadays I published part 40.
Aah, I see now. The link was rather hidden. not to mention it was all in Czech. :P
Check out the HL2 mod I'm helping with: Image
Visit my Steam! http://steamcommunity.com/id/awesome24712/
Visit my YouTube! http://www.youtube.com/user/awesome24712

Post benchamrks:
1 [x] 2 [x] 4 [x] 8 [x] 16 [x] 32 [x] 64 [x] 128 [x] 256 [x] 512 [x] 1024 [ ] 2048 [ ] 4096 [ ] 9192 [ ]
Post Reply