123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391 |
- # rinok
- if $ARGS[0] = 'start':
- CLOSE ALL
- if sound = 0:
- if month >=11 and month <= 12 or month >=1 and month <=3:
- if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/zima.mp3',30
- if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
- else
- if hour >= 8 and hour <= 23: PLAY 'sound/rynok.mp3',30 & PLAY 'sound/street_leto.mp3',30
- if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
- end
- end
- !if sound = 0:PLAY 'sound/street.mp3',30
- $rinbuy1 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 50 > money:'You do not have enough money.'
- if portion * 50 <= money:
- fairy += portion
- money -= portion * 50
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You bought dishwashing detergent and paid the money to the cashier.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy2 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 150 > money:'You do not have enough money.'
- if portion * 150 <= money:
- poroshok += portion
- money -= portion * 150
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You bought detergent and paid the money to the cashier.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy3 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 150 > money:'You do not have enough money.'
- if portion * 150 <= money:
- cltarelka += portion * 3
- money -= portion * 150
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You bought plates and paid the money to the cashier.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy4 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 500 > money:'You do not have enough money.'
- if portion * 500 <= money:
- kosmetica += portion * 25
- money -= portion * 500
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You bought cosmetics and paid the money to the cashier.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy5 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 200 > money:'You do not have enough money.'
- if portion * 200 <= money:
- stanok += portion * 10
- money -= portion * 200
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You bought razor and paid the money to the cashier.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy6 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 150 > money:'You do not have enough money.'
- if portion * 150 <= money:
- tampon += portion * 20
- money -= portion * 150
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You bought tampons and paid the money to the cashier.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy7 = {
- cla
- *clr
- portion = input ("How much you want to buy?")
- if portion <= 0:portion = 1
- if portion * 200 > money:'You do not have enough money.'
- if portion * 200 <= money:
- clrbelo += portion
- money -= portion * 200
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You pay the cashier and bought clothes.'
- end
- act 'Move away from the counter':gt 'rinok', 'start'
- }
- $rinbuy9 = {
- if money >= 1000 and umbrella < 1:
- cla
- *clr
- money -= 1000
- umbrella = 1
- '<center><img src="images/etogame/kassa2.jpg"></center>'
- 'You pay the cashier and bought an umbrella.'
- act 'Move away from the counter':gt 'rinok', 'start'
- else
- 'You do not have enough money.'
- end
- }
- cla
- *clr
- minut = minut + 5
- mag = 1
- $metka = $ARGS[0]
- $loc = $CURLOC
- $metkaM = $ARGS[0]
- $locM = $CURLOC
- '<center><b><font color="maroon">Marketplace</font></b></center>'
- '<center><img src="images/etogame/rinok.jpg"></center>'
- '<a href="exec:dynamic $rinbuy1">Dishwashing detergent - 50 rubles</a> <a href="exec:dynamic $rinbuy2">laundry detergent - 150 rubles</a> <a href="exec:dynamic $rinbuy3">a of 3 plates - 150 rubles</a> <a href="exec:dynamic $rinbuy4">Cosmetics - 500 rubles</a> <a href="exec:dynamic $rinbuy5">razor - 200 rubles</a> <a href="exec:dynamic $rinbuy6">tampons - 100 rubles</a> <a href="exec:dynamic $rinbuy7">Underwear - 200 rubles</a>'
- if umbrella < 1:'<a href="exec:dynamic $rinbuy9">Umbrella - 1,000 rubles</a>'
- 'On one of the tents hangs a sign <a href="exec:gt ''clothing'', ''view_clothing_list'', ''sell''">"Cash paid for secondhand clothes"</a>'
- if analplugIN = 1 and tanga = 0 and PCloSkirt > 2:
- nurand = rand(0, 100)
- if nurand >= 80:
- manna -= 5
- SUB += 1
- horny += SUB
- nudity += 1
- 'You feel someones hand gently touch <a href="exec:gt ''etoexhib'', ''pos15''">your butt</a>.'
- end
- end
- clr
- gs 'stat'
- gs 'time'
- act 'Leave':
- cla
- minut += 5
- gt 'street'
- end
- if workrin = 1:
- if week = 2 or week = 4 or week = 6:
- if hour < 9:
- 'Arthur is waiting to set up a stall for you.'
- act '<b>Set up stall</b>':
- cla
- *clr
- hour = 9
- minut = 0
- prodpayum = 1200
- 'Arthur unloads stuff from his truck and gives them to you. You start hanging the clothes on the stall.'
- 'Before leaving Arthur gives you instructions. "Sell at whatever price you want, but at the end of your shift I will charge you 1000 rubles for each item sold. You should be making me no less than <<arturplan>> rubles."'
- act 'To work':gt 'rinwork', 'start'
- end
- end
- end
- act 'Retire from work':
- cla
- work = 0
- workrin = 0
- 'You retired from work and collect papers.'
- act 'Leave':gt 'rinok', 'start'
- end
- end
- if (work = 0 and workrin = 0 and cheatWork = 0) or (workrin = 0 and cheatWork = 1):
- nl
- 'On one of the tents hangs an ad, "Need female market stall staff. Paychecks big."'
- act 'Approach the owner of the ad':
- cla
- *clr
- 'Hi, my name is Arthur. I own many stalls here, I need a saleswoman. The last one moved to St. Petersburg. Want the job?'
- 'Pay is a percentage of sales, paid at end of shift. Your shifts would be Tuesdays, Thursdays and Saturdays. From 8 till 14.'
- 'Government insist I have your papers, so it would be your main job.'
- act 'Leave':gt 'rinok', 'start'
- act 'Take the job':
- cla
- work = 1
- workrin = 1
- arturplan = 5000
- 'You give your papers to Arthur and shaking your hand he welcomes you on board.'
- act 'Leave':gt 'rinok', 'start'
- end
- end
- end
- act 'Go to the book tray':
- cls
- minut += 15
- gs'stat'
- 'On the counter is a very entertaining fantasy book, that is all 150 rubles and women`s novels are in paperback standing 300 rubles.'
- if money >= 150:
- act 'Buy a book of fantasy 150r':
- cls
- minut += 15
- money -= 150
- f_book += 1
- gs'stat'
- 'You bought the book for fantasy 150 rubles.'
- act 'Escape':gt'rinok','start'
- end
- end
- if money >= 300:
- act 'Buy ladies for romance 300r':
- cls
- minut += 15
- money -= 300
- w_book += 1
- gs'stat'
- 'You bought the novel for the ladies 300 rubles.'
- act 'Escape':gt'rinok','start'
- end
- end
- act 'Escape':gt'rinok','start'
- end
- if coat[5] < 1:
- 'On the market you see winter jackets for sale - 5,000 rubles'
- if coat[5] = 0:dynamic 'act ''Look at cheap coat 5'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''coat'', 5, 1500'
- end
- act 'View clothing':
- cla
- minut += 5
- gt 'rinok', 'clo'
- end
- end
- if $ARGS[0] = 'clo':
- $metka = $ARGS[0]
- $loc = $CURLOC
- cls
- gs'stat'
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- '<center><b><font color="maroon">Clothes.</font></b></center>'
- 'Cheap clothing on the market stall.'
- act 'Return':
- cla
- minut += 5
- gt 'rinok', 'start'
- end
- i = 15
- :loopcheap
- if cheap[i] = 0:*p '<a href="exec: i = <<i>> & gt ''rinok'', ''marketclo''"><div style="width:100%; max-width:400px; max-height:400px;"><img src="images/Clothing/1cheap/Cheap<<i>>.jpg" height="400" /></div></a>'
- i += 1
- if i <= 20:jump 'loopcheap'
- end
- if $ARGS[0] = 'marketclo':
- cla
-
- if cheap[i] ! 0:
- msg 'You already own these clothes.'
- gt 'rinok', 'clo'
- end
- gt 'clothing', 'view_clothing_item', 'shop', 'cheap',i, 1500
- end
- if $ARGS[0] = 'tailor':
- CLOSE ALL
- cls
- gs 'stat'
- 'Above the window the sign says, Jacob Solomonovich Schneersohn, tailor, 8:00-16:00 Monday - Friday'
- act 'Speak to the tailor':
- cla
- *clr
- 'Elderly Jewish man makes a pattern at the table, he pulls his glasses down a little and looking over the top of them he points at you.'
- if portnoyQW > 0:
- 'Aah <<$name>>, come, come to adjust clothes again?'
- if money >= 500:
- act 'Take in the clothes you are wearing (500 rubles)':
- cla
- *clr
- minut += 15
- if CloStyle = 5 or $clothingworntype = 'exercise':
- 'What are you wasting my time for? This type of clothing does not need to be resized.'
- else
- money -= 500
- dynamic '<<$clothingworntype>>B[<<clothingwornnumber>>] = bedra'
- 'You undress and give the clothes you need adjusting to Jacob Solomonovich, it is fifteen minutes until your clothes and returned to you.'
- end
- act 'Leave':gt 'street'
- end
- act 'Take in different clothes':gt 'clothing', 'view_clothing_list', 'resize'
- act 'Take in all the clothes':gt 'portnoi2'
- end
- else
- 'Hello young lady. I am Solomonovich Jacob, for you simply Yasha. And what is your name?'
- act 'Tell him your name':
- cla
- portnoyQW = 1
- '"<<$name>>"'
- '"What a pretty name. <<$name>>, come, sit here on this chair. Anyway how can I help you?'
- act 'Ask him about your clothes':
- cla
- *clr
- minut += 15
- gs 'stat'
- '"Can you tailor my clothes to fit me better?"'
- '"Of course I can! Otherwise, what kind of tailor would I be? Here, let me see what you''re wearing."'
- 'Jacob Solomonovich jumps up smartly and nimbly removes the tape from his neck and begins to measure your chest, waist and hips.'
- '"Well, I can take in whatever clothing you bring to me for 500 rubles."'
- act 'Leave':gt 'street'
- end
- end
- end
- act 'Leave':gt 'street'
- end
- end
- --- rinok ---------------------------------
|