# gdkin
$din_kotov_love = {
if kotovLoveQW > 0:
cls
gs 'stat'
'
<<$npcName[9]>> <<$npcSurName[9]>>'
''
'To you and the guy fits Witek. "Che garbage? Who´s that bloke?" Witek takes for male breast and angrily said, "Well, ka sebal horrified by my heifer, and now the mug smashed into smithereens. Understood?"'
if DPgrup = 1:
fightboyrand = RAND(0,10)
if fightboyran <= 5:
'Frightened man began to speak. "Come on you, I did not know. Already leaving." Witek pushed Man "Get out of here until I´m good."'
end
if fightboyran > 5 and fightboyran < 10:
'The guy pushes Victor "Get your hands off, deer!" Witek suddenly gets very fast and powerful kick.'
'Man falls from hitting the dance floor. Witek approaches him and grabbing breast lifts his feet, and then shoves the boy to the wall. "Well, Cho motherfucker? Still need? Or is it okay?" Man holding a broken person mutters "Everything, everything, I got it!"'
end
if fightboyran >= 10:
'The guy has Vit''ka silence in the face with his fist. Witek recoils from the guy and then gets fast and powerful kick. Fight begins, hitting fly from both sides, suddenly a guy misses a very powerful supply by Vic and flying away to the wall falls to the floor. Witek runs up to him and thrusts into enemy lying a couple of powerful blows. The guy is no longer resisting, apparently he lost consciousness.'
end
end
if DPgrup = 2:
'Rams kid starts with Vic "Hey, who are you in life?" Witek markedly sviripeet and to help him fit drugany. For the kid in turn, also pulled the boys. Nachinaetsya disassembly. After some time, both groups disagree peacefully.'
end
if DPgrup = 3:
'Man throws up his hands "Sorry young man. Did not know." Witek repels man "Topal city bloke here until I´m good."'
end
act 'Go to Vic': numnpc = 9 & gt 'Snpc'
exit
end
}
$din_reakt_dance = {
if alko > 0:
horny += 10
manna += 5
'Do you feel that the actions of Man excite you.'
else
if horny > 0: horny -= 5
manna -= 5
'You feel disgusted by these actions Man.'
end
gs 'stat'
}
$din_reverse_reakt_dance = {
if alko <= 0:
manna += 20
horny += 1
'You are fun and exciting.'
elseif alko > 0:
if horny > 0: horny -= 5
manna -= 5
'You boring and uninteresting.'
end
gs 'stat'
}
$din_dance_vrp = {
minut += 5
dance += 1
gs 'stat'
'You accepted the offer and the guy took you by the hand brought you to the dance floor where you started dancing together.'
if DPgrup = 1:
if DPtipe = 1:
'Guy dancing with you holding your waist with his hands.'
dynamic $din_reverse_reakt_dance
end
if DPtipe = 2:
'Drunk guy pushes you to indulge. You feel like your soft breasts literally flattened breasts of Man.'
dynamic $din_reakt_dance
end
end
if DPgrup = 2:
if DPtipe = 1:
'The guy is pretty enough to unleash your waist and his hands slide your hips.'
dynamic $din_reakt_dance
end
if DPtipe = 2:
'Pyany guy grabs your ass and squeezes her much, his head tilted to your face and it bites into your <<$liptalk3>> kiss.'
dynamic $din_reakt_dance
end
end
if DPgrup = 3:
if DPtipe = 1:
'Man very confident and elegantly leads you to dance, hold your waist with his strong hands.'
dynamic $din_reverse_reakt_dance
end
if DPtipe = 2:
'Tipsy man despite his advanced views hugs your waist and his hands down to you on the ass.'
dynamic $din_reakt_dance
end
end
dynamic $din_vibor_tipe_dance
act 'Stop dancing':
cls
gt $curloc
end
}
$din_dance_otkaz = {
if alko <= 2 and horny <= 75:
act 'Refuse':
cls
willpower += RAND(0,1)
gt 'gdkin'
end
end
}
$din_vibor_tipe_dance = {
!{
if dance >= 50 and alko > 0 and horny >= 50:
act 'Sexy dance':
cls
dance += 1
gs 'stat'
gt $curloc
end
end
}
act 'Further':
cls
gs 'stat'
''
if DPgrup = 1:
if DPtipe = 1:
'The guy told you in the dance "My name is <<$bname>>. What´s your name?" You answered "<<$name>>." The song ends and the guy offers to sit with him and chat.'
end
if DPtipe = 2:
'The guy told you in the dance "My name is <<$bname>>. What´s your name?" You answered "<<$name>>." All dancing drunk guy crushed your body and now his face flushed with excitement. He offers to leave the club on the street, get some fresh air, socialize.'
end
act 'Go with a guy': gt 'EvBoyBuh'
end
if DPgrup = 2:
if DPtipe = 1:
'The entire dance guy grabs your ass and he is clearly excited when he pressed against you, you feel something hard in his pants. Finally zakanchivaetsya song and the guy offers to go out, plunk.'
act 'Go thump': gt 'EvgopBuh'
end
if DPtipe = 2:
'The entire dance guy grabs your ass, breasts and kissed you, he clearly excited when he pressed against you, you feel something hard in his pants. Finally zakanchivaetsya song and the guy offers to go out, plunk.'
act 'Go thump': gt 'EvgopBuh'
end
end
if DPgrup = 3:
if DPtipe = 1:
'All male dance was confident and elegant, finally the song was over and the man offers to go out for some fresh air and talk.'
act 'Go with a man':
cls
gs 'stat'
''
'You went out with a man. He walked up to you and bit his arm around her waist. "My name is <<$bname>>. What´s your name?" You answered "<<$name>>." The man continued, "<<$name>>, I´m in your town on a business trip. Lives in the hotel from the city itself. Virtually nothing in your town do not know. Come to my hotel. Take whiskey, eggs, sit down and have a chat."'
act 'Go to the hotel': gt 'EvOtelMan'
dynamic $din_dance_otkaz
end
end
if DPtipe = 2:
'The entire dance tipsy man molested you when the dance ended and he whispered in your ear. "My name is <<$bname>>. What´s your name?" You answered "<<$name>>." The man continued, "<<$name>>, I´m not a local, I live in a hotel, let´s now take a taxi and go to me."'
act 'Go to the hotel': gt 'EvOtelMan'
end
end
gs 'stat'
dynamic $din_dance_otkaz
dynamic $din_kotov_love
end
}
$din_otbor_dance_pertner = {
!создание партнера для танца
gs 'BnameGen'
DaPaTipeRand = RAND(0,100)
if DaPaTipeRand < 70:
!обыкновенный местный парень
DrunkDPTrand = RAND(0,100)
if DrunkDPTrand < 70:
DPtipe = 1
DPgrup = 1
$din_disc_dance = 'It suits you the guy in jeans and a t-shirt, and offers dance.'
$din_disc_dance2 = 'Next to you dancing guy in jeans and a T-shirt.'
end
if DrunkDPTrand >= 70:
DPtipe = 2
DPgrup = 1
$din_disc_dance = 'It suits you drunk guy in jeans and a t-shirt, and offers dance.'
$din_disc_dance2 = 'Next to you dancing drunk guy in jeans and a T-shirt.'
end
end
if DaPaTipeRand >= 70 and DaPaTipeRand < 90:
!местный гопарь
DrunkDPTrand = RAND(0,100)
if DrunkDPTrand < 50:
DPtipe = 1
DPgrup = 2
$din_disc_dance = 'It suits you guy dressed in sweatpants and a sweatshirt and the same offers to dance.'
$din_disc_dance2 = 'Next to you dancing guy in sweatpants and sweatshirts.'
end
if DrunkDPTrand >= 50:
DPtipe = 2
DPgrup = 2
$din_disc_dance = 'It suits you drunk guy dressed in sweatpants and sweatshirts same and takes you arms around his waist offering dance.'
$din_disc_dance2 = 'Next to you dancing drunk guy in sweatpants and sweatshirts.'
end
end
if DaPaTipeRand >= 90:
!командировочный
DrunkDPTrand = RAND(0,100)
if DrunkDPTrand < 90:
DPtipe = 1
DPgrup = 3
$din_disc_dance = 'To you fit man in a decent jacket, trousers with arrows, expensive shoes, and offers dance.'
$din_disc_dance2 = 'Next to you dancing man in a decent jacket, trousers with arrows, expensive shoes.'
end
if DrunkDPTrand >= 90:
DPtipe = 2
DPgrup = 3
$din_disc_dance = 'It suits you drunk man in a decent jacket, trousers with arrows, expensive shoes, and offers dance.'
$din_disc_dance2 = 'Near you drunk man dancing in a decent jacket, trousers with arrows, expensive shoes.'
end
end
}
$din_too_drunk_dance = {
tddrand = RAND(1,100)
if StoryLine = 1 and tddrand <= 80:
cls
gs 'stat'
'It suits you Katya Meynold "<<$name>>, so that you get drunk? Let´s go home, I´ll take you."'
act 'Go with Kate':
cls
minut += 15
grupNPC[14] = 100
if meynoldQW = 0: meynoldQW = 1
gs 'stat'
''
'Katya took you to your home keeping the arms.'
act 'Go home': gt 'korrPar'
end
if KatjaDom < dom:
act 'Refuse': gt 'gdkin'
end
end
if StoryLine = 1 and tddrand > 80:
cls
'To suit you and offer a couple of guys to dance with them. You notice Katya who fearfully shouts something and trying to squeeze you. It turns out she´s bad, and alcohol interferes you to hear and understand it. You dismiss from a friend with a drunken smile on his face agree to the offer guys.'
act 'Dance with them': gt 'gevent','6'
end
if StoryLine = 0:
cls
'To suit you and offer a couple of guys to dance with them. C drunken smile on his face, you agree to the offer guys.'
act 'Dance with them': gt 'gevent','6'
end
}
$metka = $ARGS[0]
$loc = $CURLOC
gs 'stat'
fcolor = rgb(0,0,0)
bcolor = rgb(255,255,255)
LCOLOR = rgb(106,90,205)
'Disco'
''
if hour >= 20 and hour <= 23:
if StoryLine = 1 and BeInSchool > 0: 'The club and you see a few of people you know.'
if soniaslut < 5: soniaslut += 1
if grupTipe[25] = 0 and StoryLine = 1 and BeInSchool > 0 and soniaslut >= 5:
'You notice the disco Sonia Ivanko of your class. She is talking about something with Victor Kotov.'
act 'View Sonya': gt 'soniaDisco'
exit
end
act 'Dance one':
cls
''
minut += 5
!fat -= 1
dance += 1
manna += 10
willpower += 10
frost = 0
gs 'stat'
if cumface > 0 or cumfrot > 0:
if GorSlut < 2: GorSlut = 2
manna -= 100
'It suits you and the guy starts to stick, suddenly he sees you cum. The guy jumps on you "thanked, vaflersha. Lads estimate, this chick all in Concha peremazanna." To you guys still see fit. "Yeah sure. Hey nipple unsuccessfully vysmarkalas what?" You cheeks blush with shame and you´re heading for the exit.'
act 'Leave': gt 'gdk'
exit
end
if alko >= 4:
'You´re drunk in the trash and try to dance, but the floor out from under my feet and you dance instead of just drunkenly Mota regularly bumping into other people.'
dynamic $din_too_drunk_dance
exit
elseif alko < 4 and alko > 0:
'You´re drunk and fun skip on the dance floor without paying attention to others, and even the music.'
else
'The music is quite old, but catchy. And you´ll have fun circling dance, paying no attention to anyone.'
end
if alko < 4:
verprigrand = RAND(0,100)
if verprigrand <= dance:
dynamic $din_otbor_dance_pertner
'<<$din_disc_dance2>>'
gs 'stat'
act 'Dance with a guy':
cls
''
dynamic $din_dance_vrp
end
act 'Move away':
cls
gt $curloc
end
exit
end
end
gs 'stat'
act 'Further': gt 'gdkin'
end
act 'Standing at the wall':
cls
''
minut += 5
!fat -= 1
manna -= 5
frost = 0
gs 'stat'
if cumface > 0 or cumfrot > 0:
if GorSlut < 2: GorSlut = 2
manna -= 100
'It suits you and the guy starts to stick, suddenly he sees you cum. The guy jumps on you "thanked, vaflersha. Lads estimate, this chick all in Concha peremazanna." To you guys still see fit. "Yeah sure. Hey nipple unsuccessfully vysmarkalas what?" You cheeks blush with shame and you´re heading for the exit.'
act 'Leave': gt 'gdk'
exit
end
if alko >= 4:
'You´re drunk in the trash, and standing at the wall hard for her to restrain from the fact that the floor floats you from under their feet.'
dynamic $din_too_drunk_dance
exit
elseif alko < 4 and alko > 0:
'You´re drunk, and standing at the wall watching the dancing.'
else
'You are standing at a modest stenochki watching dancing.'
end
if alko < 4:
verodance = 0
if hapri = 1: verodance += 1
if glamur = 1: verodance += 2
if ski = 1: verodance += 1
if mop = 2: verodance += 1
if mop = 3: verodance += 2
if mop = 4: verodance += 3
verodance += alko
verodance += 5
verprigrand = RAND(0,20)
if verprigrand <= verodance:
dynamic $din_otbor_dance_pertner
'<<$din_disc_dance>>'
gs 'stat'
act 'Dance':
cls
gs 'stat'
''
dynamic $din_dance_vrp
end
act 'Refuse':
cls
gt $curloc
end
exit
end
end
gs 'stat'
act 'Further': gt 'gdkin'
end
end
if hour < 20:
'Club closes. The lights go on, the music fades and all begin to diverge.'
end
act 'Go outside': gt 'gdk'
--- gdkin ---------------------------------