123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353 |
- # stwork2
- !set minut += 15
- '<center><B><font color = maroon>Stage</font></B></center>'
- '<center><img src="images\etogame\stripclub1.jpg"></center>'
- if publichot < 10:$pubhot = 'and boo you, screams are heard "remove this stupid cow"'
- if publichot >= 10 and publichot < 20:$pubhot = 'and you boo'
- if publichot >= 20 and publichot < 30:$pubhot = 'Catching and frankly bored drinking and talking among themselves'
- if publichot >= 30 and publichot < 60:$pubhot = 'sometimes throws at you accompanied by smiles views'
- if publichot >= 60 and publichot < 70:$pubhot = 'and legim interest examined you and conduct conversations with each other over a beer'
- if publichot >= 70 and publichot < 80:$pubhot = 'interest examined with you'
- if publichot >= 80 and publichot < 90:$pubhot = 'with strained faces, some even visible sweat on their foreheads'
- if publichot >= 90:$pubhot = 'forgotten about his drinking, whooped and rumble money'
- 'Men sitting in front of the stage <<$pubhot>>.'
- clr
- gs 'stat'
- $pubhotdi = {
- if publichot < 30: payrand = 0 & 'Nobody even paid any attention to your movements on the stage.'
- if publichot >= 30 and publichot < 60: payrand = 0 & 'A couple of people looked at you but no more than that, you tip no one has.'
- if publichot >= 60 and publichot < 70:
- payrand = RAND(0,1)
- if payrand = 0: 'A couple of people looked at you but no more than that, you tip no one has.'
- if payrand = 1:
- paymoneyrand = RAND(1,3)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- end
- if publichot >= 70 and publichot < 80:
- payrand = RAND(0,5)
- if payrand = 0: 'Tip you no one has.'
- if payrand = 1:
- paymoneyrand = RAND(1,3)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 2:
- paymoneyrand = RAND(2,4)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 3:
- paymoneyrand = RAND(3,5)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 4:
- paymoneyrand = RAND(4,6)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 5:
- paymoneyrand = RAND(5,10)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- end
- if publichot >= 80 and publichot < 90:
- payrand = RAND(0,10)
- if payrand = 0: 'Tip you no one has.'
- if payrand = 1:
- paymoneyrand = RAND(1,3)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 2:
- paymoneyrand = RAND(2,4)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 3:
- paymoneyrand = RAND(3,5)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 4:
- paymoneyrand = RAND(4,6)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 5:
- paymoneyrand = RAND(5,10)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 6:
- paymoneyrand = RAND(7,12)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 7:
- paymoneyrand = RAND(10,15)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 8:
- paymoneyrand = RAND(15,20)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 9:
- paymoneyrand = RAND(20,30)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 10:
- paymoneyrand = RAND(30,50)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- end
- if publichot >= 90:
- payrand = RAND(0,15)
- if payrand = 0: 'Tip you no one has.'
- if payrand = 1:
- paymoneyrand = RAND(1,3)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 2:
- paymoneyrand = RAND(2,4)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 3:
- paymoneyrand = RAND(3,5)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 4:
- paymoneyrand = RAND(4,6)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 5:
- paymoneyrand = RAND(5,10)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 6:
- paymoneyrand = RAND(7,12)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 7:
- paymoneyrand = RAND(10,15)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 8:
- paymoneyrand = RAND(15,20)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 9:
- paymoneyrand = RAND(20,30)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 10:
- paymoneyrand = RAND(30,40)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 11:
- paymoneyrand = RAND(40,50)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 12:
- paymoneyrand = RAND(50,60)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 13:
- paymoneyrand = RAND(60,70)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 14:
- paymoneyrand = RAND(70,80)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- if payrand = 15:
- paymoneyrand = RAND(80,100)
- money += paymoneyrand * 10
- 'Some guy shoved you in panties <<paymoneyrand>>0 rubles'
- end
- end
- }
- if hour >= 15 or hour <= 2:
- if stpredmet > 0:
- act 'Striptease 5 minutes (<<stpredmet>> items of clothing)':
- cls
- minut += 5
- stpredmet -= 1
- sweat += 1
- fat -= 3
- manna -= RAND(5,10)
- if stpredmet = 1: sweat += 1
- if stpredmet = 0: hapri = 0 & stripdancesum += 1
- publichot += RAND(stripdance/30, stripdance/10)
- if publichotstart = publichot: publichot -= RAND(5,10)&publichotstart = publichot
- gs 'stat'
- '<center><img src="images\etogame\stripclub2.jpg"></center>'
- 'You danced on stage undressing in public.'
- if ves > rost-90:
- vesrand = RAND(0,100)
- if vesrand >= 75:
- publichot -= RAND(5,10)
- 'In the hall they laugh at you, "Look how fat she hang out. Aga and ass shaking like jelly."'
- end
- end
- dynamic $pubhotdi
- act 'further': gt $curloc
- end
- act 'Dance around a pole 5 minutes (<<stpredmet>> garments)':
- cls
- minut += 5
- stpredmet -= 1
- sweat += 2
- fat -= 5
- manna -= RAND(10,50)
- if stpredmet = 1: hapri = 0
- if stpredmet = 0: mop = 0 & stripdancesum += 1
- hapri = 0
- publichot += RAND(stripdance/20, stripdance/5)+ RAND(poledance/20, poledance/5)
- if publichotstart = publichot: publichot -= RAND(5,10)&publichotstart = publichot
- gs 'stat'
- '<center><img src="images\etogame\strippole.jpg"></center>'
- 'You danced around the pole showing acrobatics and sexy undressing in public.'
- if ves > rost-90:
- vesrand = RAND(0,100)
- if vesrand >= 75:
- 'Performing another trick on the pole you have not kept your weight and crashed to the floor. The crowd laughed, "Hey, hippopotamus, stomp at the swamp where it came from."'
- publichot = 15
- fingalrand = RAND(0,100)
- if fingalrand >= 75:
- fingal += RAND(2,5)
- 'When you fall, you greatly venerated person on the floor and it seems you have a bruise on his face blurred.'
- end
- end
- if vesrand >= 50:
- publichot -= RAND(5,10)
- 'In the hall they laugh at you, "Look how fat she hang out. Aga and ass shaking like jelly."'
- end
- end
- dynamic $pubhotdi
- act 'further': gt $curloc
- end
- end
- if stpredmet = 0:
- if publichot >= 80 and publichot < 90:
- privatrand = RAND(0,100)
- if privatrand >= 90:
- 'After the dance, the guard showed you that you have a customer for a private dance.'
- dynamic $privatdancedi
- exit
- end
- end
- if publichot >= 90:
- privatrand = RAND(0,100)
- if privatrand >= 70:
- 'After the dance, the guard showed you that you have a customer for a private dance.'
- dynamic $privatdancedi
- exit
- end
- end
- end
- else
- 'Working time is over. Time to go home.'
- end
- act 'Quit the stage': gt 'stwork','start'
- $privatdancedi = {
- act 'Go for a lap dance':
- cls
- minut += 30
- money += 800
- sweat = 1
- hapri = 0
- mop = 0
- fat -= 5
- stripdancesum += 1
- if stprrand = 0: gt 'stwork2','pr1'
- if stprrand = 1: gt 'stwork2','pr2'
- if stprrand = 2: gt 'stwork2','pr3'
- gs 'stat'
- '<center><img src="images\etogame\privatstrip.jpg"></center>'
- 'In a separate room to the music you within half an hour showed different erotic dancing client.'
- act 'Go to the locker room': gt 'stwork','start'
- end
- }
- if $ARGS[0] = 'pr1':
- cla
- *clr
- !set money += 2000
- '<center><img src="images\img\centr\pr1.jpg"></center>'
- 'Four-bedded before you dance guys, after a while they offer you service them in full for 5000 rubles.'
- act 'Leave': gt 'stwork','start'
- act 'Agree':
- set gang += 1
- set guy += 4
- set picrand = 12
- set money += 5000
- gt 'paysex','var'
- end
- end
- if $ARGS[0] = 'pr2':
- cla
- *clr
- !set money += 2000
- '<center><img src="images\img\centr\pr2.jpg"></center>'
- 'You dance in front of a guy while he fingering, he soon offers, serve it in full for 3000 rubles.'
- act 'Leave': gt 'stwork','start'
- act 'Agree':
- set guy += 1
- set picrand = 39
- set money += 3000
- xgt 'sex','var'
- end
- end
- if $ARGS[0] = 'pr3':
- cla
- *clr
- !set money += 2000
- '<center><img src="images\img\centr\pr3.jpg"></center>'
- 'You with another dancer portray leysbiyskie game after a few minutes you offer to make your games more realistic for each 2000rub.'
- act 'Leave': gt 'stwork','start'
- act 'Agree':
- set girl += 1
- set lesbian += 1
- set picrand = 18
- set money += 2000
- xgt 'lezbsex','var'
- end
- end
- --- stwork2 ---------------------------------
|