# gdksport $din_go_to_home_dance = { act 'Drive back': cls minut += 15 gs 'stat' 'You called a taxi and you brought back to town.' if cumface > 0:cumface = 0 & 'Along the way you wiped the sperm from the face wipes.' act 'Leave':gt 'gorodok' end } $din_beg_gor_sec = { cls gs 'stat' 'Subsriptions section running costs 100 rubles for 30 days.' if money >= 100 and gsAboBeg = 0: act 'Buy a subscription to the running section 100 rubles': cls money -= 100 gsAboBeg += 30 gs 'stat' 'You bought a ticket for 30 visits section running.' act 'Leave':gt 'gdksport' end end act 'Leave':gt 'gdksport' } $din_dance_gor_sec = { cls gs 'stat' 'Subscriptions section dancing costs 100 rubles for 10 days.' if money >= 100 and gsAboDance = 0: act 'Buy a ticket to the dance 100 rubles': cls money -= 100 gsAboDance += 10 gs 'stat' 'You bought a ticket for 10 visits dance section.' act 'Leave':gt 'gdksport' end end act 'Leave':gt 'gdksport' } $din_voll_gor_sec = { cls gs 'stat' 'Aboniment section volleyball costs 300 rubles for 30 days.' if money >= 300 and gsAboVolley = 0: act 'Buy a subscription for 300 rubles volleyball': cls money -= 300 gsAboVolley += 30 gs 'stat' 'You bought a ticket for 30 visits section volleyball.' act 'Leave':gt 'gdksport' end end act 'Leave':gt 'gdksport' } $metkaM = $ARGS[0] $locM = $CURLOC $metka = $ARGS[0] $loc = $CURLOC gs 'stat' fcolor = rgb(0, 0, 0) bcolor = rgb(255, 255, 255) lcolor = rgb(106, 90, 205) '
House of Culture
' '
' 'The house work culture section Racing, Dance and Volleyball.' if kotovLoveQW > 0 and hour = 16: 'Do you see how the club is included Vitek Kotov with a large sports bag.' elseif grupNPC[3] >= 80 and hour = 17 and ivansportday ! day: 'Do you see how the club included Ivan Prokhorov with a large sports bag.' end if grupNPC[5] >= 80 and fedorKozlovQW = 0 and GorSlut = 0 and UNSTARTER = 1: !!event does not have to start over because they do not cls fedorKozlovQW = 1 numnpc = 5 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'The club you unexpectedly met Fedor Kozlov in your class. He smiled affably you "Hello <<$name>>. Hmm ... Here is the deal ... I have an extra ticket to the movies. Let''s go together."' act 'Refuse': cls grupNPC[5] = 40 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'You refused to Fedor referring to employment. Fedor frowned. "Okay. Whereas some other time."' act 'Leave':gt 'gdksport' end act 'Agree': cls fedorKozlovQW = 10 grupNPC[5] = 100 minut += 15 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'You agreed and delighted Fedor took you to a movie theater located in the park.' act 'Watch a movie': cls minut += 100 manna += 100 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'Fedor gave tickets at the entrance and you went into the hall. Soon the lights went out and started the movie. Fedor sat motionless and only occasionally glancing at you. Movie was quite interesting and you watched it with pleasure. When the movie ended, the hall lights were turned on and Fedor became accompany you. "<<$name>>. I like you. Maybe we could meet?"' act 'Refuse': cls grupNPC[5] = 40 fedorKozlovQW = 2 minut += 15 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'You refused to meet with him to Fedor and was invited to stay friends. Fedor visibly upand silently carried you home.' act 'Leave':gt 'gorodok' end act 'Agree': cls minut += 15 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'You have agreed to meet with Fedor. Fedor was visibly delighted and escort you to the house on the way you viewed fun discussing movies.' act 'Leave':gt 'gorodok' end end end exit end act 'Leave':gt 'gdk' if albinaQWdance > 0 or gsAboDance > 0 or gsAboBeg > 0 or gsAboVolley > 0: act 'Change clothes in the locker room':gt 'clothing', 'view_clothing_list', 'wardrobe' if sweat >= 0: act 'Wash in the shower': cls dynamic $showerdin minut += 15 horny += 1 hapri = 1 mop = 1 sweat = -3 if frost > 0:frost = 0 gs 'stat' '
' if kotovVSprohorov = 1: kotovVSprohorov = 2 'You entered the women''s shower and turning the water began to lather your body washcloth. Suddenly, the door creaked and you remember that you forgot to close it. You looked back and saw that standing in the doorway Ivan Prokhorov and treat you. "Hi <<$name>>. Can I join? And then the men''s shower place." Ivan smiled after these words.' act 'expel Ivan': cls IvanShowerQW = 1 gs 'stat' '
' 'You covered the chest hand and the other hand launched a washcloth in Ivan. He easily dodged the flying sponges and laughter came out of the shower. You locked the door and quickly domylis shower.' act 'Get out of the shower':gt $locM, $metkaM end act 'Uh, what?': cls gs 'stat' '
' 'Were you surprised like, and your insecurities Ivan regarded as consent. He went into the shower and closed the door behind him.' act 'Escape from the shower':IvanShowerQW = 1 & gt $locM, $metkaM act 'bathe together': cls minut += 5 horny += 10 gs 'stat' '
' 'Ivan took off his boxer shorts and went under a jet shower. His muscular body was very close to yours. You tried not to look at him but his eyes involuntarily dropped to his groin where hung thick cock. Ivan winked "Want to soap?"' act 'lather Ivan': cls minut += 5 horny += 20 gs 'stat' '
' 'You took a washcloth and began to lather body of Ivan. His cock began to get up and touched your thigh. Ivan began to hug you and caress your body with your hands.' act 'Give blowjob': cls minut += 5 horny += 20 bj += 1 if npcSex[3] = 0:npcSex[3] = 1 & guy += 1 gs 'stat' '
' 'You slowly sank to his knees in front of Ivan and his cock was in front of your face. Ivan spent impatiently you head lips mouth open and you let his cock. Your lips tightly wraps solid rod Ivan and you sucked in the shower under the streams of water. Suddenly Ivan took a member of your mouth and taking you by the hand raised to his feet, he dug his lips to your breast and began to suck. You swept bliss. Ivan turned your back to him and pushed you back.' act 'stand cancer': cls IvanShowerQW = 10 minut += 5 horny += 20 $boy = 'Ivan' dick = 17 lubonus = 2 gs 'stat' '
' 'You bent over and felt the hand of Ivan stroking your ass and anus.' dynamic $analsex 'Ivan pulls a member of your buttocks and you feel like you are on the back and buttocks land warm trickle of sperm.' act 'Get out of the shower':gt $locM, $metkaM end end end end end exit end 'You entered the women''s shower and began soaping his body washcloth. After washed soap and washed hair with shampoo. Rinse off the shampoo you become completely clean. After showering you comb your hair and dressed.' act 'Get out of the shower':gt $locM, $metkaM end end end if hour < 16 or hour > 20: exit end if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and sport = 1: act 'Train with Zvezdushkami': cls minut += 120 fat -= 5 if agil < 50: agil += rand(1, 3) if agil >= 50 and agil < 80: agil += rand(0, 2) if agil >= 80:agil += rand(0,1) manna -= 5 sweat += 3 dancePRO += rand(1, 3) gs 'stat' '
' if dancePRO < 20: sub += 1 'You train together with sex of "Zvezdushek", you get bad and Albina constantly yelling at you and calling them bowlegged kolkhoz.' elseif dancePRO >= 20 and dancePRO < 40: sub += 1 'You train together with sex of "Zvezdushek" you sometimes get something, but most movements by Albina constantly yelling at you and calling them bowlegged kolkhoz.' elseif dancePRO >= 40 and dancePRO < 60: 'You train together with sex of "Zvezdushek" you dance with sex getting in the general rhythm, but not happy Albina "<<$name>>, very sluggish, more life."' elseif dancePRO >= 60 and dancePRO < 80: 'You train together with sex of "Zvezdushek" you normally get all but Albina regularly you niggles "<<$name>>, you are not at the funeral, raise your head and smile!"' elseif dancePRO >= 80: stardance += 1 'You dance beautifully and Albina you start to put an example to other girl.' if stardance < 10: if otkazDanceWhore = 1: if AlbinaLast = 1: AlbinaBlokDance = 1 'After training Albina withdraws you aside and starts berating. "You roundnose Kolhoz. Because of you I am losing customers. So fuck off, you are no longer uchavstvuesh in the team."' else AlbinaLast = 1 otkazDanceWhore = 0 if AlbFather = 0:AlbFather = 1 'After training Albina withdraws you aside and starts berating. "I know you''re young and stupid, but I explain to you in the first and last time. Again swept me with clients fly from Zvezdushek miserably. Entertain men is part of the business."' end end if DanceWhoreT > 0: DanceWhoreT = 0 if AlbFather = 0:AlbFather = 1 'Albina after training beckons you to her. "Good <<$name>>. Communicating with men of the business. Main keep his mouth shut. You''re doing fine, doing well. Stick with me and you will have all the money, cars and apartments."' end else stardance = 0 albpayrand = rand(1, 5) 'Albina gathered girls. Today small halturka planned. Each will receive <> per job. The matter for a couple of hours.' act 'Go part time': cls minut += 120 money += albpayrand * 1000 sweat = -3 profiDanceTime += 1 gs 'stat' 'You agreed and Albina phoned by phone. Soon the car came up to you. You sank with sex in the car and went somewhere. Soon you come to what that home in a large hall where people were sitting and pointed. You are dressed in costumes who sewed commissioned Albina, and went on stage to dance to the fiery music. You danced very well and everything went smoothly. You left the stage and Albina distributed money. You take turns on bystrenkomu took a shower.' if vnesh >= 13: if vnesh < 16:wealthmanrand = rand(0, 15) if vnesh >= 16 and vnesh < 18:wealthmanrand = rand(0, 12) if vnesh >= 18:wealthmanrand = rand(0, 10) if wealthmanrand = 0: kolvomanparty = 1 danceWhorePay = rand(3, 8) 'You see how a man came to Albina in a decent suit and began about something with her to talk quietly.' elseif wealthmanrand = 1: kolvomanparty = 2 danceWhorePay = rand(5, 10) 'You see how to Albina approached by two guys and started about something to talk to her.' elseif wealthmanrand = 2: kolvomanparty = 1 danceWhorePay = rand(4, 9) 'You see how to Albina came Caucasian and became what it is talking to her gesticulating.' elseif wealthmanrand = 3: kolvomanparty = 2 danceWhorePay = rand(6, 12) 'You see how to Albina came two Caucasians and become about something to talk to her.' elseif wealthmanrand = 4: kolvomanparty = 3 danceWhorePay = rand(8, 14) 'You see how to Albina came three Caucasians and became what it is talking to her.' elseif wealthmanrand = 5: kolvomanparty = 1 danceWhorePay = rand(5, 10) 'You see as a Negro came Albina and became about something to talk to her.' elseif wealthmanrand = 6: kolvomanparty = 2 danceWhorePay = rand(7, 15) 'You see how to Albina approached two blacks and became what it is talking to her.' elseif wealthmanrand = 7: kolvomanparty = 3 danceWhorePay = rand(10, 20) 'You see how to Albina approached three blacks and became what it is talking to her.' end if wealthmanrand <= 7: 'After talking Albina came to you. "<<$name>>, need to talk."' act 'About what?': cls minut += 15 gs 'stat' 'You asked Albina what she wanted to talk.' if kolvomanparty = 1: 'Albina came closer to you and quietly began to speak, "You see this guy? If you stay with him for an hour and be affectionate, you will be able to earn not bad. Obtain <> rubles."' else 'Albina came closer to you and quietly began to speak, "You see these guys? If you stay with them for a couple of hours and be affectionate, you will be able to earn not bad. Obtain <> rubles."' end act 'Cancel and go back': cls minut += 15 otkazDanceWhore = 1 DanceWhoreT = 0 gs 'stat' 'You got in the car and soon, along with sex you brought back to town.' act 'Leave':gt 'gorodok' end act 'Agree': cls money += danceWhorePay * 1000 DanceWhore += 1 DanceWhoreT += 1 otkazDanceWhore = 0 slutty += 1 gs 'stat' 'You agreed and Albina you counted the money.' if wealthmanrand = 0:act 'Go with a man':gt 'DanceWhore1' if wealthmanrand = 1:act 'Go with men':gt 'DanceWhore2' if wealthmanrand = 2:act 'Go in Caucasians':gt 'DanceWhore3' if wealthmanrand = 3:act 'Go with Caucasians':gt 'DanceWhore4' if wealthmanrand = 4:act 'Go with Caucasians':gt 'DanceWhore5' if wealthmanrand = 5:act 'Start with a black man':gt 'DanceWhore6' if wealthmanrand = 6:act 'Go with blacks':gt 'DanceWhore7' if wealthmanrand = 7:act 'Go with blacks':gt 'DanceWhore8' end end exit end elseif vnesh < 13: 'After dancing Albina talked with some sort of men and what is agreed.' end act 'Drive back': cls minut += 15 gs 'stat' 'You got in the car and soon, along with sex you brought back to town.' act 'Leave':gt 'gorodok' end end end end act 'Leave':gt 'gdksport' end end if gsAboDance > 0 and sport = 1: act 'Section dance ticket is valid for <> visits': cla *clr gsAboDance -= 1 minut += 120 fat -= 5 if agil< 50:agil += rand(1, 3) if agil >= 50 and agil < 80:agil += rand(0, 2) if agil >= 80:agil += rand(0, 1) manna -= 5 sweat += 3 if dance < agil:dance += rand(5, 15) gs 'stat' '
' if dance < 100: 'You studied modern dance club, which is very popular in discos.' if dance < agil: 'You have to string up, but your agility and helps you hone some of what dance moves.' else 'You do not have enough dexterity, that would successfully repeat all the movements.' end !place for use in events if rand(0, 1) = 0:'It seems you see, that is interesting.' elseif dance >= 100: 'You have tried something new in modern club dancing, but you all already know it.' if albinaQWdance > 0: !place for use in events if rand(0, 1) = 0:'It seems you see, that is interesting.' elseif albinaQWdance = 0 and StoryLine > 0: 'When the training is over you noticed how the room got a few girls and Albina Barlovskaya. Albina odnoklasnitsa you, but you almost nothing about her know.' act 'Say hello to Albina': cls numnpc = 23 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'You are greeted with Albina. She raised an eyebrow haughtily. "And it''s you.''s Your name there? Oh yeah <<$name>>. Did you? Zanimaeshsya Dancing?" You nodded confirming the obvious. Albina dismissive laugh. "Well, how''s it going?" You said coldly Albina "Not bad." Albina gave you look arrogant "Not bad? Well, maybe in comparison with other local bowlegged and not bad. But I doubt that you can dance on a more or less professional level."' act 'I do not care': cls numnpc = 23 dom += 1 grupNPC[numnpc] -= 5 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'You said scornfully as possible that you do not care and turned away from Albina. She said with a giggle. "Girls. Let''s train."' act 'Leave':gt 'gdksport' end act 'I know how to dance': cls numnpc = 23 !!dom += 1 !!grupNPC[numnpc] -= 5 gs 'stat' '
<<$npcName[numnpc]>> <<$npcSurName[numnpc]>>
' '
' 'Albina you already began to annoy his arrogance. And you told her firmly that you know how to dance. Albina turned to the girls who came to her and said. "Girls. Let''s train." Then she turned to you and said with a slight grin. "You can sit and watch as the dance pros. Itself will understand everything"' act 'Leave':gt 'gdksport' act 'Watch': cls minut += 15 gs 'stat' 'Girls included stereo and started dancing. You once it became clear that they dance very well and professionally. You can hardly so. Albina also dances much better than you. And indeed very concerted action girls and waste, apparently they do not work out this dance for the first time. When the music ended Albina said, "Girls. While a little break." She came to you and said a little breathlessly, "We are the pros. We spent a dance troupe Zvezdushki. Dancing on holidays. Even in a music video filming."' act 'Leave':gt 'gdksport' act 'Ask for them in the community': cls minut += 15 gs 'stat' 'You are asked to dance group. Albina grinned "Can you? We then have all worked. Though vprchem. Show how you know how to dance." Albina included music and girls gathered to look at your dance.' act 'Dance': cls minut += 5 gs 'stat' 'You began to dance to the music, trying as much as possible. When the music stopped you came Albina. "Collective Farm Style course. But nothing, you have some potential."' act 'Well take me to your team?': cls albinaQWdance = 1 minut += 5 gs 'stat' 'You asked Albina, if she would take you to their team. Albina thought and answered you. "Okay, take it. Maybe from you and get anything worthwhile."' act 'Leave':gt 'gdk' end end end end end end end end act 'Leave':gt 'gdksport' end end if gsAboBeg > 0 and sport = 1: act 'Section races, subscription is valid for <> visits': cla *clr gsAboBeg -= 1 minut += 120 speed += rand(1, 3) manna -= 5 if salo > 0:salo -= 1 fat -= 5 sweat += 3 beg += rand(3, 6) gs 'stat' '
' 'You do run for two hours.' act 'Leave':gt 'gdksport' end end if gsAboVolley > 0 and volleysostav = 0 and sport = 1: if week ! 5: act 'Section volleyball ticket is valid for <> visits': cla *clr gsAboVolley -= 1 minut += 120 if alko = 0: volleyboll += 1 speed += rand(1, 3) beg += rand(1, 2) if agil < 50:agil += rand(1, 3) if agil >= 50 and agil < 80:agil += rand(0, 2) if agil >= 80:agil += rand(0, 1) if stren < 10:stren += rand(1, 3) if stren >= 10 and stren < 20:stren += rand(1, 2) if stren >= 20 and stren < 30:stren += 1 if stren >= 30 and stren < 40:stren += rand(0, 1) if vital < 10:vital += rand(1, 3) if vital >= 10 and vital < 20:vital += rand(1, 2) if vital >= 20 and vital < 30:vital += 1 if vital >= 30 and vital < 40:vital += rand(0, 1) end manna -= 5 fat -= 5 sweat += 3 gs 'stat' '
' if alko = 0:'At the beginning of the workout you ran a few laps around the room. After you press the jog and do abdominal exercises. Then began to practice reception and feeding the ball.' if alko > 0:'You are trying to train, but your intoxication does not give you focus and you will suffer from garbage, than treneruetes.' act 'Leave':gt 'gdksport' act 'Go to coaching':gt 'Voltrener' end else act 'Section volleyball ticket is valid for <> visits': cla *clr gsAboVolley -= 1 minut += 120 if alko = 0: volleyboll += 1 speed += rand(1, 2) agil += rand(1, 2) if stren < 40:stren += rand(1, 2) if vital < 40:vital += rand(1, 2) beg += rand(1, 2) dom += 1 end manna -= 5 fat -= 5 sweat += 3 gs 'stat' '
' 'Fridays are usually held as the game in which to discover strengths and talented athletes.' if alko = 0: if volleyboll < 25: 'You are absolutely lousy play and constantly mistaken. Finally nerves coach not stand up and it removes you from the field.' elseif volleyboll >= 25 and volleyboll < 50: 'You do not play very much. Sometimes make blunders. Coach is angry, but tolerates your antics.' elseif volleyboll >= 50 and volleyboll < 75: 'You play well on the field and rarely wrong. Coach looks pleased you.' elseif volleyboll >= 75: 'You play great on the field, easily replaying their rivals. Coach looks pleased with your game.' if rand(0, 1) = 0: if andGevknow = 0:$nameAndGev = 'Some guy' if andGevknow > 0:$nameAndGev = 'Andrew' 'During the game you pushed <<$nameAndGev>>.' end end else 'You took to the field, but failed to recapture myach, intoxication does not focus. The coach sees your status and remove you from the game.' end act 'Leave':gt 'gdksport' act 'Go to coaching':gt 'Voltrener' end end end if volleysostav > 0 and sport = 1: if week ! 6 and volkomday ! day: act 'To engage with the team': cla *clr volkomday = day minut += 120 speed += rand(1, 3) agil += rand(1, 3) if stren < 50:stren += rand(1, 3) if vital < 50:vital += rand(1, 3) manna -= 5 fat -= 5 sweat += 3 beg += rand(1, 2) volleyboll += 1 trenerepa += 1 dom += 1 gs 'stat' '
' 'Number of games <>, Win - <>, lesions - <>, draws - <>.' 'At the beginning of the workout you ran a few laps around the room. After you press the jog and do abdominal exercises. Then began to practice reception and feeding the ball. At the end of the workout you had a game.' act 'Leave':gt 'gdksport' act 'Go to coaching':gt 'Voltrener' end elseif week = 6 and sorevday ! day: act 'Check out the competition with a team': cla *clr if poverkomand = 0:poverkomand = 600 volltime = 0 sorevday = day minut += 180 speed += rand(1, 3) agil += rand(1, 3) if stren < 60:stren += rand(1, 3) if vital < 60:vital += rand(1, 3) manna -= 5 fat -= 5 sweat += 3 beg += rand(1, 2) volleyboll += rand(1, 3) dom += 1 trenerepa += 2 gs 'stat' '
' 'You gathered their things together with other devchenki from the team and got on a bus that took you to a place where there will be a match.' act 'Play':gt 'volley' end end end --- gdksport ---------------------------------