123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774 |
- # shop
- !! This is the supermarket, located in several places
- !! Main entrance
- if $ARGS[0] = 'start':
- $shoplocation = 'main'
- end
- if $ARGS[0] = 'start' or $ARGS[0] = 'move':
- minut += 1
- end
- !! Main area
- if $shoplocation = 'main':
- cla
- *clr
- '<center><b><font color="maroon">Supermarket</font></b></center>'
- '<center><img src="images/etogame/shop.jpg"></center>'
-
- if hour < 8 or hour > 20:
- 'The supermarket is currently closed.'
-
- act 'Leave the store':gt $loc
- exit
- end
-
- 'In the hall stands an <a href="exec:$shoplocation = ''ATM'' & gt ''shop'', ''move''">ATM</a>, from which you can withdraw money from your bank account.'
- '<br>Most of the space in the supermarket is taken up by the <a href="exec:$shoplocation = ''grocery'' & gt ''shop'', ''move''">grocery department</a>, but the store has many smaller departments as well. <a href="exec:$shoplocation=''cosmetics'' & gt ''shop'', ''move''">Cosmetics</a>, <a href="exec:$shoplocation = ''hardware'' & gt ''shop'', ''move''">hardware</a>, <a href="exec:$shoplocation = ''clothing'' & gt ''shop'', ''move''">clothing</a> and the department of <a href="exec:$shoplocation = ''tech'' & gt ''shop'', ''move''">household appliances</a>. Not far from the entrance is a <a href="exec:$shoplocation = ''icecream'' & gt ''shop'', ''move''">counter selling ice cream</a>.'
- clr
- gs 'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- !! The store in the town and in the altstart only
- if $loc = 'gorodok' and StoryLine = 1:
- if week < 6 and hour >= 8 and hour < 16:
- 'Your sister <a href="exec:gt ''sister'', ''work''">Anja</a> sits at the checkout.'
- end
- end
- !! Store in the residential district
- if $loc = 'street':
- if rand(1, 20) = 20:
- if dimaQW = 0:
- 'In the lobby of the store looks at you appreciatively what that man.'
- act 'See it':gt 'event', 'dima'
- elseif dimaQW = 1:
- 'In the lobby of the store you notice Dima and binds you fear, you can not move.'
- act 'See it':gt 'event', 'scoreslut1'
- else
- 'You met the same Dima who boyfriend fucking amuse you. Dima cocky grin came to you and said hello.'
- act 'Hello':
- cla
- 'Come to me, I have no wife at home said Dima.'
- act 'No':gt 'shop', 'start'
- act 'Come':
- cla
- *clr
-
- if rand(1, 2) = 1:
- cla
- sex += 1
- oral += 1
- throat += 1
- cumlip += 1
- swallow += 1
- horny = 0
- 'Dima took you to his house and there has ordered you to kneel. You got on his knees and he calling you a bitch and fuck you cocksucker began in the mouth.'
- '<center><img src="images/pics/gostDT2.jpg"></center>'
- 'Dima finally finished your mouth, you obediently swallowed and licked the remnants of sperm with his big cock.'
- act 'Leave':gt 'street'
- else
- cla
- sex += 1
- anal += 1
- cumass += 1
- spank += 1
- boom = 5
- horny = 0
- 'Dima has brought you to my house and right in the corridor began to kiss you and undress. After he stripped you he took you to the bathroom. There he sat in the bathroom and you unscrewing the showerhead put a water hose you in the ass. Quickly the feeling of fullness and Dima put you on the toilet. After an enema, he made you cancer and put you in the ass his big dick.'
- '<center><img src="images/pics/gostAnal2.jpg"></center>'
- 'Dima long you fucked in the ass and beat his hands, you first it was painful, but gradually you got the taste and began to catch the buzz finally your ass filled with hot liquid and Dima moan grabbed your buttocks.'
- act 'Leave':gt 'street'
- end
- end
- end
- end
- end
- end
- '<br>The store is crowded with shoppers.'
- !! This is connected to the trade mission
- if TorgPredZ > 0:
- !! the location of the shop hasn''t been done today
- if ($loc = 'street' and StreetShopTPday ! day) or ($loc = 'Nord' and nordShopTPday ! day) or ($loc = 'down' and downShopTPday ! day):
- act 'Arrange products':
- if $loc = 'street':StreetShopTPday = day
- if $loc = 'Nord':nordShopTPday = day
- if $loc = 'down':downShopTPday = day
-
- cls
- mtprand = rand(40, 130)
- minut += mtprand
- TorgPredZ -= 1
- TorgPredZV += 1
- gs 'stat'
- '<center><img src="images/etogame/shop.jpg"></center>'
- 'You arranged the products for quite a while and when I finally managed, then went to the cashier and you check it struck.'
- act 'Exit':gt 'shop', 'start'
- end
- end
- end
-
- act 'Leave the store':gt $loc
- exit
- end
- !! ATM
- if $shoplocation = 'ATM':
- if karta > 0:
- act 'Withdraw money from the ATM':
- cla
- minut += 5
- kartaOUT = input ("How much money you want to withdraw?")
- if kartaOUT <= 0 or kartaOUT > karta:
- '<br>Invalid operation.'
- else
- karta -= kartaOUT
- money += kartaOUT
- '<br>You withdraw <<kartaOUT>> rubles. You have <<karta>> rubles left in your bank account.'
- end
- act 'Move away':gt 'shop', 'start'
- end
- else
- 'You do not have any money in the bank.'
- act 'Move away':gt 'shop', 'start'
- end
- end
- !! Grocery
- if $shoplocation = 'grocery':
- cla
- *clr
- '<center><b><font color="maroon">Grocery</font></b></center>'
- '<center><img src="images/etogame/shop1.jpg"></center>'
-
- if hour < 8 or hour > 20:
- 'The grocery is currently closed.'
-
- act 'Leave the grocery':gt 'shop', 'start'
- exit
- end
-
- !! output from purchase
- *p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')
-
- *pl '<center><table align="center">' + _
- FUNC ('$stock_item', 1, 'Regular food', 50, 'eda', $CURLOC) + _
- FUNC ('$stock_item', 1, 'Diet food', 250, 'edaD', $CURLOC) + _
- FUNC ('$stock_item', 10, 'Tea biscuits', 300, 'pranik', $CURLOC) + _
- iif(bag > 0, FUNC ('$single_stock_item', 1, 'Bottle of water', 50, 'bottle', $CURLOC), '') + _
- iif(bag > 0, FUNC ('$single_stock_item', 1, 'Sandwich', 100, 'buterbrod', $CURLOC), '') + _
- iif(bag > 0, FUNC ('$single_stock_item', 1, 'Bottle of wine', 500, 'wine', $CURLOC), '') + _
- '</table></center>'
- clr
- gs 'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- act 'Leave the grocery':gt 'shop', 'start'
- end
- !! Cosmetics
- !! The scrunchies and hairpins sold here are from the Maruda Hair Mod
- if $shoplocation= 'cosmetics':
- cla
- *clr
- '<center><b><font color="maroon">Cosmetics Department</font></b></center>'
- '<center><img src="images/etogame/shop2.jpg"></center>'
-
- if hour < 8 or hour > 20:
- 'The cosmetics department is currently closed.'
-
- act 'Leave the cosmetics department':gt 'shop', 'start'
- exit
- end
-
- !! output from purchase
- *p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')
-
- *pl '<center><table align="center">' + _
- FUNC ('$stock_item', 50, 'Cosmetics', 1000, 'kosmetica', $CURLOC) + _
- FUNC ('$stock_item', 10, 'Razors', 500, 'stanok', $CURLOC) + _
- FUNC ('$stock_item', 20, 'Sunblock', 500, 'krem', $CURLOC) + _
- FUNC ('$stock_item', 20, 'Tampons', 200, 'tampon', $CURLOC) + _
- FUNC ('$stock_item', 30, 'Shampoo', 500, 'shampoo', $CURLOC) + _
- FUNC ('$stock_item', 10, 'Hair scrunchies', 80, 'hscrunch', $CURLOC)
-
- *pl FUNC ('$stock_item', 12, 'Hair pins', 100, 'hpingrip', $CURLOC) + _
- iif(bag > 0, FUNC ('$stock_item', 10, 'Wipes', 100, 'salfetka', $CURLOC), '') + _
- iif(bag > 0, FUNC ('$stock_item', 10, 'Portable makeup', 1000, 'kosmetitka', $CURLOC), '') + _
- iif(bag > 0, FUNC ('$single_stock_item', 1, 'Comb', 150, 'greben', $CURLOC), '') + _
- FUNC ('$single_stock_item', 1, 'Handbag', 5000, 'bag', $CURLOC) + _
- '</table></center>'
-
- clr
- gs 'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- act 'Leave the cosmetics department':gt 'shop', 'start'
- end
- !! Hardware
- if $shoplocation = 'hardware':
- cla
- *clr
- '<center><b><font color="maroon">Division of household goods</font></b></center>'
- '<center><img src="images/etogame/shop3.jpg"></center>'
-
- if hour < 8 or hour > 20:
- 'The hardware department is currently closed.'
-
- act 'Leave the hardware department':gt 'shop', 'start'
- exit
- end
-
- !! output from purchase
- *p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')
-
- *pl '<center><table align="center">' + _
- FUNC ('$stock_item', 20, 'Dishwashing detergent', 100, 'fairy', $CURLOC) + _
- FUNC ('$stock_item', 30, 'Clothing detergent', 250, 'poroshok', $CURLOC) + _
- FUNC ('$stock_item', 5, 'Plates', 300, 'cltarelka', $CURLOC) + _
- '</table></center>'
- clr
- gs 'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- act 'Leave the hardware department':gt 'shop', 'start'
- end
- !! Women''s clothing
- if $shoplocation = 'clothing':
- cla
- *clr
- '<center><b><font color="maroon">Department of Women''s Clothing</font></b></center>'
- '<center><img src="images/etogame/shop4.jpg"></center>'
-
- if hour < 8 or hour > 20:
- 'The women''s clothing department is currently closed.'
-
- act 'Leave the women''s clothing department':gt 'shop', 'start'
- exit
- end
-
- *p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')
-
- *pl '<center><table align="center">' + _
- FUNC ('$stock_item', 1, 'Underwear', 300, 'clrbelo', $CURLOC) + _
- FUNC ('$stock_item', 7, 'Sale pack of underwear', 2000, 'clrbelo', $CURLOC) + _
- FUNC ('$single_stock_item', 1, 'Swimsuit', 1000, 'bikini', $CURLOC) + _
- '</table></center>'
- '<br/>Women''s clothing cost 2,500 rubles each.'
-
- clr
- gs 'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- act 'Leave the women''s clothing department':gt 'shop', 'start'
- !! This is not being done as a stock item because it needs to set the palto string value
- if palto < 2:
- 'A winter coat is available for 10,000 rubles'
- if money >= 10000:
- act 'Purchase a winter coat for 10,000 rubles':
- cla
- money -= 10000
- palto = 2
- $palto = 'winter coat'
- 'You bought a coat.'
- act 'Move away from the counter':gt 'shop'
- end
- end
- end
- if money >= 2500:
- if profi[1] = 0:
- act 'Inspect Office clothes number 1':
- cla
- *clr
- '<center><img src="images/clothes/profi1.jpg"></center>'
- 'Office clothes.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- profi[1] = 1
- profiH[1] = 60
- profiB[1] = bedra
- gt 'shop', '<font color="green">You bought <b>Office clothes number 1</b>.</font>'
- end
- end
- end
- if profi[2] = 0:
- act 'Inspect Office clothes number 2':
- cla
- *clr
- '<center><img src="images/clothes/profi2.jpg"></center>'
- 'Office clothes.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- profi[2] = 1
- profiH[2] = 60
- profiB[2] = bedra
- gt 'shop', '<font color="green">You bought <b>Office clothes number 2</b>.</font>'
- end
- end
- end
- if sarafan[1] = 0:
- act 'Inspect Colorful sundress':
- cla
- *clr
- '<center><img src="images/clothes/sarafan1.jpg"></center>'
- 'Simple sundress, its main advantage is its dimensionless.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- sarafan[1] = 1
- sarafanH[1] = 60
- gt 'shop', '<font color="green">You bought <b>colorful sundress</b>.</font>'
- end
- end
- end
- if sarafan[2] = 0:
- act 'Inspect Light sundress':
- cla
- *clr
- '<center><img src="images/clothes/sarafan2.jpg"></center>'
- 'Simple sundress, its main advantage is its dimensionless.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- sarafan[2] = 1
- sarafanH[2] = 60
- gt 'shop', '<font color="green">You bought <b>Light sundress</b>.</font>'
- end
- end
- end
- if short[1] = 0:
- act 'Inspect Black shorts with a purple t-shirt':
- cla
- *clr
- '<center><img src="images/clothes/short1.jpg"></center>'
- 'Black shorts with a purple jersey.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- short[1] = 1
- shortH[1] = 60
- shortB[1] = bedra
- gt 'shop', '<font color="green">You bought <b>Black shorts with a purple t-shirt</b>.</font>'
- end
- end
- end
- if short[2] = 0:
- act 'Inspect Black shorts with a striped t-shirt':
- cla
- *clr
- '<center><img src="images/clothes/short2.jpg"></center>'
- 'Black shorts with striped jersey.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- short[2] = 1
- shortH[2] = 60
- shortB[2] = bedra
- gt 'shop', '<font color="green">You bought <b>Black shorts with a striped t-shirt</b>.</font>'
- end
- end
- end
- if short[3] = 0:
- act 'Inspect Black shorts with a black jersey':
- cla
- *clr
- '<center><img src="images/clothes/short3.jpg"></center>'
- 'Black shorts with a black T-shirt.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- short[3] = 1
- shortH[3] = 60
- shortB[3] = bedra
- gt 'shop', '<font color="green">You bought <b>Black shorts with a black jersey</b>.</font>'
- end
- end
- end
- if short[4] = 0:
- act 'Inspect Pink shorts with a pink jersey':
- cla
- *clr
- '<center><img src="images/clothes/short4.jpg"></center>'
- 'pink shorts with the pink jersey.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- short[4] = 1
- shortH[4] = 60
- shortB[4] = bedra
- gt 'shop', '<font color="green">You bought <b>Pink shorts with a pink jersey</b>.</font>'
- end
- end
- end
- if short[5] = 0:
- act 'Inspect White shorts with a white bodice':
- cla
- *clr
- '<center><img src="images/clothes/short5.jpg"></center>'
- 'white shorts with a white bodice.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- short[5] = 1
- shortH[5] = 60
- shortB[5] = bedra
- gt 'shop', '<font color="green">You bought <b>White shorts with a white bodice</b>.</font>'
- end
- end
- end
- if skirt[1] = 0:
- act 'Inspect White skirt with a colorful blouse':
- cla
- *clr
- '<center><img src="images/clothes/skirt1.jpg"></center>'
- 'White skirt with a colorful blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- skirt[1] = 1
- skirtH[1] = 60
- skirtB[1] = bedra
- gt 'shop', '<font color="green">You bought <b>White shirt with a colorful blouse</b>.</font>'
- end
- end
- end
- if skirt[2] = 0:
- act 'Inspect Black skirt with a red sweater':
- cla
- *clr
- '<center><img src="images/clothes/skirt2.jpg"></center>'
- 'Black skirt with a red sweater.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- skirt[2] = 1
- skirtH[2] = 60
- skirtB[2] = bedra
- gt 'shop', '<font color="green">You bought <b>Black skirt with a red sweater</b>.</font>'
- end
- end
- end
- if skirt[3] = 0:
- act 'Inspect White skirt with a striped shirt':
- cla
- *clr
- '<center><img src="images/clothes/skirt3.jpg"></center>'
- 'White skirt with a striped shirt.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- skirt[3] = 1
- skirtH[3] = 60
- skirtB[3] = bedra
- gt 'shop', '<font color="green">You bought <b>White skirt with a striped shirt</b>.</font>'
- end
- end
- end
- if skirt[4] = 0:
- act 'Inspect Skin black skirt with a red blouse':
- cla
- *clr
- '<center><img src="images/clothes/skirt4.jpg"></center>'
- 'Black skirt under the skin with a red blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- skirt[4] = 1
- skirtH[4] = 60
- skirtB[4] = bedra
- gt 'shop', '<font color="green">You bought <b>Skin black skirt with a red blouse</b>.</font>'
- end
- end
- end
- if skirt[5] = 0:
- act 'Inspect Black skirt with a white blouse':
- cla
- *clr
- '<center><img src="images/clothes/skirt5.jpg"></center>'
- 'Black skirt with a white blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- skirt[5] = 1
- skirtH[5] = 60
- skirtB[5] = bedra
- gt 'shop', '<font color="green">You bought <b>Black skirt with a white blouse</b>.</font>'
- end
- end
- end
- if pants[1] = 0:
- act 'Inspect Pants with a blouse number 1':
- cla
- *clr
- '<center><img src="images/clothes/pants1.jpg"></center>'
- 'Pants with a blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- pants[1] = 1
- pantsH[1] = 60
- pantsB[1] = bedra
- gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 1</b>.</font>'
- end
- end
- end
- if pants[2] = 0:
- act 'Inspect Pants with a blouse number 2':
- cla
- *clr
- '<center><img src="images/clothes/pants2.jpg"></center>'
- 'Pants with a blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- pants[2] = 1
- pantsH[2] = 60
- pantsB[2] = bedra
- gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 2</b>.</font>'
- end
- end
- end
- if pants[3] = 0:
- act 'Inspect Pants with a blouse number 3':
- cla
- *clr
- '<center><img src="images/clothes/pants3.jpg"></center>'
- 'Pants with a blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- pants[3] = 1
- pantsH[3] = 60
- pantsB[3] = bedra
- gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 3</b>.</font>'
- end
- end
- end
- if pants[4] = 0:
- act 'Inspect Pants with a blouse number 4':
- cla
- *clr
- '<center><img src="images/clothes/pants4.jpg"></center>'
- 'Pants with a blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- pants[4] = 1
- pantsH[4] = 60
- pantsB[4] = bedra
- gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 4</b>.</font>'
- end
- end
- end
- if pants[5] = 0:
- act 'Inspect Pants with a blouse number 5':
- cla
- *clr
- '<center><img src="images/clothes/pants5.jpg"></center>'
- 'Pants with a blouse.'
- 'Costs 2,500 rubles.'
- act 'Leave':gt 'shop'
- act 'Buy':
- cla
- money -= 2500
- pants[5] = 1
- pantsH[5] = 60
- pantsB[5] = bedra
- gt 'shop', '<font color="green">You bought <b>Pants with a blouse number 5</b>.</font>'
- end
- end
- end
- end
- end
- !! Household appliances
- if $shoplocation = 'tech':
- cla
- *clr
- '<center><b><font color="maroon">Department of household appliances</font></b></center>'
- '<center><img src="images/etogame/shop5.jpg"></center>'
-
- if hour < 8 or hour > 20:
- 'The household appliance department is currently closed.'
-
- act 'Leave the appliance department':gt 'shop', 'start'
- exit
- end
-
- *p iif($ARGS[0] = 'start' or $ARGS[0] = '' or $ARGS[0] = 'move', '<br/>', '<center><<$ARGS[0]>></center>')
-
- *pl '<center><table align="center">' + _
- FUNC ('$single_stock_item', 1, 'Small TV with a picture tube', 35000, 'TV', $CURLOC) + _
- FUNC ('$single_stock_item', 2, 'Large Plasma TV', 35000, 'TV', $CURLOC) + _
- FUNC ('$single_stock_item', 1, 'Computer', 25000, 'komp', $CURLOC) + _
- iif(komp > 0, FUNC ('$single_stock_item', 1, 'Computer game Dead Sunset', 500, 'GameCD2', $CURLOC), '') + _
- FUNC ('$single_stock_item', 1, 'Dishwasher', 50000, 'posudomashina', $CURLOC) + _
- FUNC ('$single_stock_item', 1, 'Washing machine', 50000, 'stiralka', $CURLOC) + _
- FUNC ('$single_stock_item', 1, 'Camera', 10000, 'zenit', $CURLOC) + _
- FUNC ('$single_stock_item', 1, 'Mini camera disguised as a cigarette pack', 40000, 'minifoto', $CURLOC) + _
- '</table></center>'
-
- clr
- gs 'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- act 'Leave the appliance department':gt 'shop', 'start'
- end
- !! Ice cream counter
- if $shoplocation = 'icecream':
- 'Ice cream is available for sale for 50 rubles.'
- act 'Move away from the counter':gt 'shop', 'start'
- if money >= 50:
- act 'Buy ice cream':
- cls
- money -= 50
- fat += 50
- manna += 500
- water = 20
- energy = 20
- !! perkice is currently only ever referenced in stat and only then to decrement itself if > 0, so it does not currently do anything
- perkice += 1
- gs 'stat'
- '<center><img src="images/etogame/icecreem.jpg"></center>'
- 'You bought ice cream and ate it not going far.'
- act 'Move away from the counter':gt 'shop', 'start'
- end
- end
- end
- --- shop ---------------------------------
|