' "ChristmaKwanzakkah" ' Created with QDK 3.53 - UNREGISTERED VERSION define game asl-version <350> gametype singleplayer start game author game info startscript { do msg flag off flag off flag off } command { for each object in <#quest.currentroom#> { if property <#quest.thing#; stay> then msg if property <#quest.thing#; take> then give <#quest.thing#> } if got <#quest.thing#> then msg } command for each object in <#quest.currentroom#> if property <#quest.thing#; stay> then msg else {if exists <#quest.thing#> then give <#quest.thing#>} command msg command msg command msg command msg command msg define variable type numeric value <6> onchange { msg if ( %Kevin% = 5 ) or ( %Kevin% = 4 ) then msg } end define define variable type numeric value <10> onchange { msg if ( %Kenan% = 8 ) or ( %Kenan% = 7 ) or ( %Kenan% = 6 ) then msg } end define define variable type numeric value <20> onchange { msg if ( %Hank% = 15 ) or ( %Hank% = 14 ) or ( %Hank% = 13 ) and ( %Hank% = 12 ) then msg } end define end define define synonyms end define define room prefix east { msg wait goto } description { msg <#quest.lookdesc#> msg } define object alt look take msg speak prefix article gender invisible end define end define define room look south { msg wait goto } east { msg wait goto } west { if flag then msg else { msg wait goto } } description { msg <#quest.lookdesc#> if flag then msg else msg if flag then msg else msg if flag then msg else msg msg } define object alt look { if flag then msg else { msg flag on show show show show reveal reveal reveal reveal } } take msg speak examine { if flag then msg else { msg flag on show show show show reveal reveal reveal reveal } } prefix displaytype article gender properties end define define object alt look if flag then msg else { flag on msg show show reveal reveal } take msg speak examine if flag then msg else { flag on msg show show reveal reveal } prefix displaytype article gender properties end define define object alt look if flag then msg else { flag on msg show reveal } take msg speak examine if flag then msg else { flag on msg show reveal } prefix displaytype article gender properties end define define object alt look take speak prefix displaytype article gender hidden invisible use on msg use on msg use on msg use on msg use on msg use on msg use on msg use on msg use on msg use on msg use on msg properties end define define object look take speak prefix displaytype article gender hidden invisible properties end define define object look take speak prefix displaytype article gender hidden invisible use anything msg properties end define define object alt look take speak prefix displaytype article gender hidden invisible use on { msg wait msg wait dec } use on { msg wait msg wait dec } use on { msg wait msg wait dec } properties end define define object alt look take speak prefix displaytype article gender hidden invisible use on { msg dec } use on { msg dec } use on { msg dec } properties end define define object alt look take speak prefix displaytype article gender hidden invisible use on { msg dec } use on { msg dec } use on { msg dec } properties end define define object alt look take speak prefix displaytype article gender hidden invisible use on { msg wait msg dec move } use on { msg wait msg dec move } use on { msg wait msg dec move } properties end define define object alt look take msg speak <[sung to 'Oh Holy Night'] "Oh holy sign, your words are sparkling lightly..."> prefix article gender invisible properties end define define object alias alt look take { msg wait msg wait msg wait reveal give msg flag on } speak prefix article gender invisible drop nowhere end define end define define room look west { msg wait goto } description { msg <#quest.lookdesc#> if here then msg if not here and not here then msg <|bThere is nothing more to see or do in here. Stop loitering and move on!|xb> } afterturn { if here or here or here or here then msg else { reveal show } if exists and here then msg <|nNow that the crowd is gone...a small block in the shape of an arch is sitting on the ground here. GET IT!> } define object look speak prefix displaytype article gender use anything if ( #(quest.use.object.name):weapon# > 0 ) then { msg move } else msg properties end define define object look speak prefix displaytype article gender use anything if ( #(quest.use.object.name):weapon# > 1 ) then { msg move } else msg properties end define define object look speak prefix displaytype article gender use anything if ( #(quest.use.object.name):weapon# > 2 ) then { msg move } else msg properties end define define object look speak prefix displaytype article gender use anything if ( #(quest.use.object.name):weapon# > 3 ) then { msg move } else msg properties end define define object alt look take { msg give } speak prefix suffix displaytype article gender hidden invisible end define define object alt look take msg speak prefix article gender invisible properties end define end define define room alias look south msg east if here then msg else { msg goto } script if exists then { msg wait msg wait msg wait msg move wait msg wait msg } description { msg <#quest.lookdesc#> if here then msg } afterturn if ( %Kevin% < 1 ) and here then { msg move hide wait msg show reveal create exit east } define object alt look take speak prefix displaytype article gender hidden invisible end define define object alt look speak prefix article gender invisible end define define object properties end define define object alias alt look if not flag then { msg flag on } else msg speak examine if not flag then { msg flag on } else msg prefix displaytype article gender use { msg wait msg wait msg wait msg move create exit south } properties end define end define define room prefix look north { msg goto } east msg west msg description { msg <#quest.lookdesc#> msg } define object alt look speak prefix article gender invisible use anything msg properties end define define object alt look speak prefix article gender invisible use anything msg properties end define define object alias alt look if not flag then { msg flag on } else msg speak examine if not flag then { msg flag on } else msg prefix displaytype article gender use { msg wait msg wait msg wait msg move create exit west } properties end define define object look speak prefix article gender invisible properties end define define object alias alt look if not flag then { msg flag on } else msg speak examine if not flag then { msg flag on } else msg prefix displaytype article gender use { msg wait msg wait msg wait msg move create exit east } properties end define define object alt look speak msg prefix article gender invisible properties end define define object look take msg speak prefix article gender invisible properties end define end define define room look west if here then msg else { msg goto } script if exists then { msg wait msg wait msg wait msg move wait msg wait msg } description msg <#quest.lookdesc#> afterturn if ( %Kenan% < 1 ) and here then { msg move hide wait msg show reveal create exit west } define object alias alt look take speak prefix suffix displaytype article gender hidden invisible end define end define define room look east { msg goto } description { msg msg <#quest.lookdesc#> } end define define room look script if exists then { msg wait msg wait msg wait msg move wait msg wait msg } description { msg <#quest.lookdesc#> if here then msg } afterturn if ( %Hank% < 1 ) and here then { msg move hide wait create exit east } end define define room west msg script { msg wait msg wait msg <...this is not that story...> wait msg wait msg wait msg } description msg <#quest.lookdesc#> define object alt look take playerwin speak <"Oh Christmas Tree, oh Christmas Tree... why do I even talk to thee?"> prefix displaytype article gender end define end define define room define object alt look take msg speak suffix displaytype gender use anything if ( #(quest.use.object.name):weapon# < 2 ) then msg end define define object alt look take msg speak displaytype article gender use anything if ( #(quest.use.object.name):weapon# < 2 ) then msg end define define object alt look take msg speak displaytype article gender end define end define define procedure msg wait msg <|b|s30|crC|cgh|crr|cgi|crs|cgt|crm|cga|crk|cgw|cra|cgn|crz|cga|crk|cgk|cru|cgh|cr! |s0 |cb |xb> wait end define define text There are some rusty parts of this game due to the time I had left to make it. But in the "toy room", just look at everything and type "get all" or "take all" to get all the weapons at once. Ignore the bold statement in the corner room with the crowds. It tells you that there's nothing else to do even if the crowds are still there. I didn't have time to fix it. Other than that, have fun! end define define text You got the tree and won! Game over... play again. Try crazy things. Use the weapons on everything this time and each other. (specifically near the beginning of the game which was where I had more time to make the added features. Look at every detail you can) Thanks for playing! end define define text end define