At the Beach

(display: "header") You are at a beutifull [[ Thai Beach ]] staring at the [[ horizon ]] , To your left you see two [[ local people ]] , behind you there is a small [[ hut ]] , your [[ wallet ]] is near by (if: $hasbook is true) [ your book was finnaly found , maybe it would be a good idea to [[ read it ]] now ]\ (if: $hasbook is 0 )[ you need to find your lost book.]\ (if: $boughtApple is 0) [(set: $boughtApple to false)]\ (if: $boughtBanana is 0)[(set: $boughtBanana to false)]\ (if: $boughtOrange is 0)[(set: $boughtOrange to false)]\ (if: $opened is 0)[(set: $opened to false)]\ (if: $seenBag is 0)[(set: $seenBag to false)]\ (set: _geCode to "")\ (set: _geScode to "")\ (set: $hisCheck to "")\ <script> _geCode += GE.mycode; _geScode += GE.myscode; </script> (set: $combination to _geCode)\ (set: $scombination to _geScode)\ (set: $ccode to "")\ (display: "footer")

(display: "header") You have always adored the Horizon , something that would always be in the distance , no matter how close you get to it ... [[ Back->Beach]] (display: "footer")

(display: "header") There is a small [[kid]] holding the hand of his [[ Sister ]] and staring at you as You're probably looking as a stranger to him ... [[ Back->Beach]] (display: "footer")

(display: "header") The beach is beutifull , you are amazed by the colors of the sand and the sounds of the waves... (if: $hasbook is 0) [ If you only have your book with you now , it would be perfect ! ] [[ Back->Beach]]

(display: "header") There is a Banana , an Orange and an Apple inside her bag , each one costs 1 coin. (set: $seenBag to true) [[ Back -> local people ]] (display: "footer")

(display: "header") She has beutifull long brown hair and blue eyes , she holds her young brother's hand and a [[ bag of fruits ]] on her other hand [[ Talk to Her ]] (if: $money > 0 and $seenBag) [ [[ Buy an Apple from Her ]] [[ Buy a Banana from Her ]] [[ Buy an Orange from Her ]] ] [[ Back-> local people ]] (display: "footer")

(display: "header") You try to talk with the girl , unfortunetly she doesnt undertand any English\ (if: $boughtApple is true or $missedSeq is true ) [ but she smiles back at you and points at her brother ] (if: $boughtApple is true or $missedSeq is true) [(set: $pointsToBrother to true)] (else-if: $boughtBanana is true) [but she smiles back at you] (else-if: $boughtOrange is true) [but she stares back at you] (else: ) [ She is looking at you as if she needs something ...] [[ Talk Again -> talk again ]] [[ Back -> local people ]] (display: "footer")

(display: "header") (if: $opened is false) [there is a [[ combination lock ]] at the door that prevents entering ]\ (else-if: $safe_opened is 0) [You are inside the hut , a [[locked safe]] is located back of the room and some [[ strange markings ]] are drawn on the nearest wall ]\ (if: $safe_opened is true) [You are inside the hut , an opened safe is located back of the room and some [[ strange markings ]] are drawn on the nearest wall ]\ [[ Back To Beach ->Beach]]

(display: "header") Money is not everything , but it can get you some shortcuts in life :-) (if: $money is 1) [ You've found nothing inside your wallet. ]\ (if: $money is 0 ) [you've found one coin inside your wallet. (set: $money to 1)]\ (else-if: $boughtApple is true )[ You've found nothing inside your wallet ... ]\ (else-if: $boughtBanana is true )[ You've found nothing inside your wallet ... ]\ (else-if: $boughtOrange is true )[ You've found nothing inside your wallet ... ]\ [[ Back->Beach]] (display: "footer")

(display: "header") (set: $chk to (history:)'s length) You Did It ! You've Completed My First Story in $chk Moves , Great Job !! 54 and below : 5 Stars 54 - 60 : 4 Stars 60 - 70 : 3 Stars 70 and above : You can do better :-) email me if you liked the game [ drorgolan AT gmail ]

(display: "header") (if: $opened is false) [ You see a numeric combination lock attached to the hut's door what would be the code for it ? ] (if: $opened is false ) [(input: bind $ccode, "===X===") ] (else:) [ You already entered the right code , the hut's door is [[ Opened-> hut ]] ] (if: $opened is false ) [ [[ Check->check the code ]] ] [[ Back to Hut -> hut ]]

(display: "header") He is about 4 years old , his eyes are blue as his sister's eyes. (if: $boughtBanana is true) [ [[ give banana to kid ]] ] (if: $boughtOrange is true) [ [[ give orange to kid ]] ] (if: $boughtApple is true) [ [[ give apple to kid ]] ] [[ Back -> local people ]] (display: "footer")

(display: "header") (set: $his to (history: ))\ (for: each _temp, ...$his)[\ (if: _temp contains "Buy a Banana") [(set: $hisCheck to it + "B")]\ (if: _temp contains "Buy an Orange") [(set: $hisCheck to it + "O")]\ (if: _temp contains "Buy an Apple") [(set: $hisCheck to it + "A")]\ ]\ (if: $talkedAgain is true and $pointsToBrother is true and $hisCheck contains "OBBA") [ You handed the apple to the small kid , he smiled at you and drew some [[ symbols-> strange line ]] in the sand (set: $boughtApple to false) ] (else: ) [ Hmm , he grabbed the apple and stared back at you as you're missing somehting ... when he finished , he threw the peel into a nearest [[ trash can ]] (set: $boughtApple to false) (set: $missedSeq to true) ] [[ Back -> local people ]] (display: "footer")

(display: "header") You look carefully at the symbols the kid has drawn in the sand , this looks like a combination of digits , you recognize the pattern : $combination (set: $symbols to true) [[ Back -> local people ]] (display: "footer")

(display: "header") You handed the Banana to the small kid , he smiled at you and ate the whole banana as you watched him , when he finished , he threw the peel into a nearest [[ trash can ]]. (set: $boughtBanana to false) [[ Back -> local people ]] (display: "footer")

(display: "header") You've peeked into the trash can and noticed that beside some peels , there is a small coin , you grabbed the coin instantly :-) (set: $money to 1) [[ Back -> local people ]] (display: "footer")

(display: "header") (unless: $safe_opened is true) [ You see a numeric combination lock attached to the safe's door what would be the code ? (input: bind $scode, "===X===") ] (else:) [ You Already entered the right code , the safe's door is Opened ] (unless: $safe_opened is true) [ [[check_safe_code]]] [[ Back to Hut -> hut ]]

(display: "header") (set: $seenLetters to true) There are some strange letters on the wall , You wonder what could that mean : //SAFE = TUH// [[ Back to Hut -> hut ]]

(display: "header") (if: $seenLetters is true and $scode is $scombination)[ Correct ! The Safe is opened now , you see a [[ book -> book ]] inside it ] (if: $seenLetters is true and $scode is $scombination)[ (set: $safe_opened to true)] (if: $seenLetters is 0 and $scode is $scombination)[ How in earth would you know that ... ? ] (else-if: $scode is not $scombination ) [ Sorry , That's not correct , please [[ Try Again ->locked safe]]]

(display: "header") Hmm , this is the book you were looking for , you grabbed is quickly (set:$hasbook to true) [[ Back to Hut -> hut ]]

(display: "header") (if: $money is 0 )[ you have no money to pay for her.] (else:)[ The Woman Smiles at you and handed you an Apple ] (if: $money > 0 )[ (set: $boughtApple to true)] (if: $money > 0 )[(set: $money to $money - 1)] [[ Back -> local people ]] (display: "footer")

(display: "header") (if: $money is 0 )[ you have no money to pay for her.] (else:)[ The Woman Smiles at you and handed you an Orange ] (if: $money > 0 )[ (set: $boughtOrange to true)] (if: $money > 0 )[(set: $money to $money - 1)] [[ Back -> local people ]] (display: "footer")

(display: "header") You handed the Orange to the small kid , he smiled at you and ate the whole Orange as you watched him , when he finished , he threw the peel into a nearest [[ trash can ]]. (set: $boughtOrange to false) [[ Back -> local people ]] (display: "footer")

(display: "header") (unless: $talkedAgain is true) [ The girl hesitate for few seconds , then looked back at you and wrote some letters on the sand : //อย่างแรก ส้มหนึ่งลูก ตามด้วยกล้วยสองลูก และสุดท้ายคือแอปเปิ้ล//] (else: ) [ The Girl says nothing this time ....] (set: $talkedAgain to true) [[ Back -> local people ]] (display: "footer")

(display: "header") (if: $money is 0 )[ you have no money to pay for her.] (else:)[ The Woman Smiles at you and handed you a Banana ] (if: $money > 0 )[ (set: $boughtBanana to true)] (if: $money > 0 )[(set: $money to $money - 1)] [[ Back -> local people ]] (display: "footer")

(display: "header") (if: $ccode is $combination and $symbols is true)[ Correct ! [[ The Hut -> hut ]] is opened now] (if: $ccode is $combination and $symbols is true)[ (set: $opened to true)] (else-if: $ccode is not $combination ) [ Sorry , That's not correct , please [[ Try Again -> combination lock ]] ] (if: $ccode is $combination and $symbols is 0) [ Well , Well , That's not a fair playing ... how did you get that ? [[ Try Again -> combination lock ]]]

(append: ?sidebar)[(icon-restart:"Restart")]  (append: ?sidebar)[(icon-counter: bind (history:)'s length, "Moves")]

<font color="gray">You are currently carrying:</font>\ (set: $inv to "")\ (if: $money>0) [ (set: $inv to it + "1 Coin, ")]\ (if: $hasbook is true ) [ (set: $inv to it + "a book , ")]\ (if: $boughtApple is true ) [ (set: $inv to it + "an apple, ")]\ (if: $boughtBanana is true ) [ (set: $inv to it + "a banana, ")]\ (if: $boughtOrange is true ) [ (set: $inv to it + "an orange, ")]\ <font color="#a0a0a0"> (if: $inv is "")[ //Nothing// ] (else:)[//$inv//] </font>