define room <goblinthing>
alias <Room>
script {
msg <A |bGoblin|xb leaps out before you, and stops you in your tracks!|n>
if ask <Fight Goblin?> then msg <|nEnter combat script here!|n> else {
msg <You flee!>
goto <woteverroom>
}
}
end define
then msg <|nEnter combat script here!|n>
define game <gold>
asl-version <311>
start <shop>
game info <wotever>
' this is where the status variable is implimented
define variable <gold>
type numeric
value <200>
display <Gold: !>
end define
end define
define synonyms
end define
define room <shop>
command <buy sword> {
if ( %gold% <= 149 ) then msg <|bYou do not have enough gold|xb>
if ( %gold% >= 150 ) then {
msg <|bYou perchased a Sword|xb|n>
give <sword>
set <gold; %gold% - 150>
}
}
end define
define room <shop items>
define object <sword>
end define
end define
' Created with QDK 3.12
define game <>
asl-version <311>
start <>
game info <Created with QDK 3.12>
startscript set numeric <random; >
command <random> {
set <%random%; $rand(1;5)$>
if ( %random% = 1 ) then msg <Message 1>
if ( %random% = 2 ) then msg <Message 2>
if ( %random% = 3 ) then msg <Message 3>
if ( %random% = 4 ) then msg <Message 4>
if ( %random% = 5 ) then msg <Message 5>
}
end define
' Created By Hand
define game <MURDER>
asl-version <311>
start <start>
game info <Cyber Pwned!!11>
startscript set numeric <random; 0>
command <random> {
set <random; $rand(1;5)$>
if ( %random% = 1 ) then msg <Message 1>
if ( %random% = 2 ) then msg <Message 2>
if ( %random% = 3 ) then msg <Message 3>
if ( %random% = 4 ) then msg <Message 4>
if ( %random% = 5 ) then msg <Message 5>
}
end define
define room <start>
look <This is a room.|n>
end define
' Created By Hand
define game <MURDER>
asl-version <311>
start <start>
game info <Cyber Pwned!!11>
command <random> {
set numeric <random; $rand(1;5)$>
if ( %random% = 1 ) then msg <Message 1>
if ( %random% = 2 ) then msg <Message 2>
if ( %random% = 3 ) then msg <Message 3>
if ( %random% = 4 ) then msg <Message 4>
if ( %random% = 5 ) then msg <Message 5>
}
end define
define room <start>
look <This is a room.|n>
end define
ITID wrote:game info <Cyber Pwned!!11>