|
@@ -4,7 +4,7 @@
|
|
|
!! Simplify Sveta cleaning herself up when she is finished with a client to a "clean all" command (except for event 6)
|
|
|
!! Pain coded for anal and orgasm denial coded into whore event 6.
|
|
|
|
|
|
-! If Sveta isn't a cool kid or jock
|
|
|
+! If Sveta is not a cool kid or jock
|
|
|
if $ARGS[0] = 'albina1':
|
|
|
menu_off = 1
|
|
|
*clr & cla
|
|
@@ -147,10 +147,9 @@ if $ARGS[0] = 'albina4':
|
|
|
'When the music ends, Albina says "Okay girls....take a breather."'
|
|
|
'She comes up to you, breathless. "You see...we are pros...real dancers. We are "The Starlets". We do shows and have even been in a music video."'
|
|
|
|
|
|
- act 'Leave': gt 'gdksport', 'start'
|
|
|
-
|
|
|
if pregtime >= 90:
|
|
|
'You might try out for them after you''ve had your child.'
|
|
|
+ act 'Leave': gt 'gdksport', 'start'
|
|
|
else
|
|
|
act 'Ask if you can join':
|
|
|
*clr & cla
|
|
@@ -165,18 +164,18 @@ if $ARGS[0] = 'albina4':
|
|
|
gs 'stat'
|
|
|
'You begin to dance to the music, trying as hard as you can to impress them. When the music stops, Albina walks up to you.'
|
|
|
'"You dance like a country bumpkin, of course, but you do have some potential." Albina muses as you stand panting before her.'
|
|
|
- !! Outcasts are rejected, nerds and gopniks need a high enough dance skill and hotcat rating (at least 7) to convince Albina.
|
|
|
+ !! Outcasts are rejected, nerds and gopniks need a high enough dance skill and hotcat rating (at least 7) to convince Albina.
|
|
|
act 'Will you take me for your team?':
|
|
|
*clr & cla
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- if grupTipe=5 or ((grupTipe=4 or grupTipe=3) and (pcs_danc < 50 and hotcat < 7)):
|
|
|
- !! If Sveta is an outcast or doesn't meet the nerd/gopnik requirements
|
|
|
+ if (grupTipe=5 or ((grupTipe=4 or grupTipe=3) and (pcs_danc < 50 and hotcat < 7))):
|
|
|
+ !! If Sveta is an outcast or does not meet the nerd/gopnik requirements
|
|
|
'"Well, am I good enough to join?" you ask.'
|
|
|
'Albina thinks about it and looks at the other girls; some shake their heads, others shrug in indifference.'
|
|
|
'Finally, she answers. "I don''t doubt that you could <i>eventually</i> reach our level, but you''re not exactly, how do I put it, ''socially desirable.''"'
|
|
|
'"Try improving your skills and appearance first and then get back to us." She turns and leaves with the rest of the troupe.'
|
|
|
- elseif (grupTipe=1 or ((grupTipe=4 or grupTipe=3) and (pcs_danc >= 50 and hotcat >= 7))) and pcs_vag = 0 and stat['vaginal'] = 0:
|
|
|
+ elseif ((grupTipe=1 or ((grupTipe=4 or grupTipe=3) and (pcs_danc >= 50 and hotcat >= 7))) and pcs_vag = 0 and stat['vaginal'] = 0):
|
|
|
!! If Sveta is popular/non dancer or meets the nerd/gopnik requirements and is virgin
|
|
|
'"Well, am I good enough to join?" you ask.'
|
|
|
'Albina thinks about it and looks at the other girls; some nod, others shrug.'
|
|
@@ -199,8 +198,8 @@ if $ARGS[0] = 'albina4':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
-!! Check that I haven't broken anything creating this new act.
|
|
|
-if $ARGS[0] = 'albina5'
|
|
|
+!! Check that I have not broken anything creating this new act.
|
|
|
+if $ARGS[0] = 'albina5':
|
|
|
menu_off = 1
|
|
|
*clr & cla
|
|
|
numnpc = 23
|
|
@@ -210,18 +209,17 @@ if $ARGS[0] = 'albina5'
|
|
|
'The girls turn on their stereo and start dancing. It immediately becomes clear to you that they dance professionally, but only slightly better than you. Only Albina outmatches your ability. It is obvious that they have practiced this routine many times as their movements are closely synchronized with no wasted effort.'
|
|
|
'When the music ends, Albina says "Okay girls....take a breather."'
|
|
|
'She comes up to you, breathless. "You see...We are pros...Real dancers. We are "The Starlets". We do shows and have even been in a music video."'
|
|
|
-
|
|
|
- act 'Leave': gt 'gdksport', 'start'
|
|
|
|
|
|
if pregtime >= 90:
|
|
|
'You might try out for them after you''ve had your child.'
|
|
|
+ act 'Leave': gt 'gdksport', 'start'
|
|
|
else
|
|
|
act 'Prove yourself':
|
|
|
*clr & cla
|
|
|
minut += 15
|
|
|
gs 'stat'
|
|
|
'"Your turn now <<$pcs_nickname>>. Show me that you''re as passionate as I am and we might come to an agreement." she says as she sits down to catch her breath.'
|
|
|
-
|
|
|
+
|
|
|
act 'Dance':
|
|
|
*clr & cla
|
|
|
minut += 5
|
|
@@ -231,20 +229,20 @@ if $ARGS[0] = 'albina5'
|
|
|
'You stand panting before her as she gleefully claps. "I knew you could it!" she says.'
|
|
|
'"Do...what?" you reply.'
|
|
|
'"I had no doubts about you. You just had to prove yourself to the other girls before I could bring you onboard, and you have more than done that."'
|
|
|
- act 'You are a Starlet?!'
|
|
|
- *clr & cla
|
|
|
- minut += 5
|
|
|
- gs 'stat'
|
|
|
- '"You...mean...I''m a...Starlet?" you ask as you continue panting.'
|
|
|
- '"Well of course you are! I can''t let someone as good as you go to waste on these amateurs. We practice every day, so don''t be late!" Albina replies.'
|
|
|
- !! If Sveta is virgin
|
|
|
- if pcs_vag = 0 and stat['vaginal'] = 0:
|
|
|
- 'When the other girls leave, Albina pulls you aside. "Hey, are you ''pure''?" she whispers.'
|
|
|
- '"Why would you want to know such a personal thing?" you reply as you blush.'
|
|
|
- '"Oh, it''s...nothing. I just...look out for my girls is all." she says with hesitation.'
|
|
|
+ act 'You are a Starlet?!':
|
|
|
+ *clr & cla
|
|
|
+ minut += 5
|
|
|
+ gs 'stat'
|
|
|
+ '"You...mean...I''m a...Starlet?" you ask as you continue panting.'
|
|
|
+ '"Well of course you are! I can''t let someone as good as you go to waste on these amateurs. We practice every day, so don''t be late!" Albina replies.'
|
|
|
+ !! If Sveta is virgin
|
|
|
+ if pcs_vag = 0 and stat['vaginal'] = 0:
|
|
|
+ 'When the other girls leave, Albina pulls you aside. "Hey, are you ''pure''?" she whispers.'
|
|
|
+ '"Why would you want to know such a personal thing?" you reply as you blush.'
|
|
|
+ '"Oh, it''s...nothing. I just...look out for my girls is all." she says with hesitation.'
|
|
|
+ end
|
|
|
+ act 'Leave': gt 'gdksport', 'start'
|
|
|
end
|
|
|
-
|
|
|
- act 'Leave': gt 'gdksport', 'start'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
@@ -254,7 +252,7 @@ if $ARGS[0] = 'starlets':
|
|
|
menu_off = 1
|
|
|
*clr & cla
|
|
|
|
|
|
- startletsday = daystart
|
|
|
+ AlbinaQW['startletsday'] = daystart
|
|
|
|
|
|
timemult = 8
|
|
|
loopcount = 1
|
|
@@ -432,8 +430,7 @@ if $ARGS[0] = 'cab_home':
|
|
|
gs 'stat'
|
|
|
'You get dressed and call a taxi to take you back to town.'
|
|
|
|
|
|
- if $ARGS[1] = 'no_clean'
|
|
|
- else
|
|
|
+ if $ARGS[1] <> 'no_clean':
|
|
|
cumspclnt = 20
|
|
|
gs 'cum_cleanup'
|
|
|
'Before the taxi arrives, you enter the bathroom and wash.'
|
|
@@ -470,12 +467,11 @@ if $ARGS[0] = 'whore1':
|
|
|
act 'Rough deepthroat':
|
|
|
cls
|
|
|
'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/event/rought/oral1.mp4"></video></center>'
|
|
|
- 'The man begins to very roughly fuck your mouth, his tip continually slamming into your throat.'
|
|
|
- 'The man holds a tight grip on your head and you are forced to endure it. Drool is running from your mouth and tears run from your eyes as you gag on his cock.'
|
|
|
- 'Your distress doesn''t concern the man but appears to arouse him even further, which just makes him go even faster.'
|
|
|
- gs 'arousal', 'bj', 10, 'sub', 'deepthroat', 'rough'
|
|
|
- gs 'stat'
|
|
|
- end
|
|
|
+ 'The man begins to very roughly fuck your mouth, his tip continually slamming into your throat.'
|
|
|
+ 'The man holds a tight grip on your head and you are forced to endure it. Drool is running from your mouth and tears run from your eyes as you gag on his cock.'
|
|
|
+ 'Your distress doesn''t concern the man but appears to arouse him even further, which just makes him go even faster.'
|
|
|
+ gs 'arousal', 'bj', 10, 'sub', 'deepthroat', 'rough'
|
|
|
+ gs 'stat'
|
|
|
|
|
|
tipdarand = rand(0, 1)
|
|
|
|
|
@@ -825,6 +821,7 @@ if $ARGS[0] = 'whore3':
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
act 'Call a taxi': gt 'AlbStars', 'cab_home'
|
|
|
+ end
|
|
|
end
|
|
|
end
|
|
|
end
|
|
@@ -861,12 +858,11 @@ if $ARGS[0] = 'whore4':
|
|
|
act 'Monster deepthroat':
|
|
|
cls
|
|
|
'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/blackdeep.mp4"></video></center>'
|
|
|
- 'You try to relax your throat as he forces your head down on his shaft.'
|
|
|
- 'You do your best to handle it, trying not to choke as he slides in and out of your throat. Before long, tears are flooding down your cheeks and drool drips from your mouth, but the deepthroating continues.'
|
|
|
- gs 'arousal', 'bj', 10, 'sub', 'deepthroat'
|
|
|
- gs 'pain', 1, 'throat', 'choke'
|
|
|
- gs 'stat'
|
|
|
- end
|
|
|
+ 'You try to relax your throat as he forces your head down on his shaft.'
|
|
|
+ 'You do your best to handle it, trying not to choke as he slides in and out of your throat. Before long, tears are flooding down your cheeks and drool drips from your mouth, but the deepthroating continues.'
|
|
|
+ gs 'arousal', 'bj', 10, 'sub', 'deepthroat'
|
|
|
+ gs 'pain', 1, 'throat', 'choke'
|
|
|
+ gs 'stat'
|
|
|
|
|
|
tipdarand = rand(0, 1)
|
|
|
|
|
@@ -883,7 +879,7 @@ if $ARGS[0] = 'whore4':
|
|
|
'You almost pass out as the seemingly never ending stream of cum continues to enter your throat. You are feeling quite bloated when he finally pulls out of your mouth.'
|
|
|
'You fall to the floor and start frantically coughing, the last of the cum dribbling from your chin and dripping on your breasts as you try to catch your breath. You look up at the guy, who only has a wide satisified grin on his face.'
|
|
|
'"Damn girl, I''m sure that quenched your thrist!" he jokes while patting you on the head.'
|
|
|
- gs 'cum_call', 'mouth', $AlbinaQW['Cust'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'mouth', $AlbinaQW['Cust'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'face', $AlbinaQW['Cust']
|
|
|
gs 'cum_call', 'breasts', $AlbinaQW['Cust']
|
|
|
gs 'arousal', 'end'
|
|
@@ -903,7 +899,7 @@ if $ARGS[0] = 'whore4':
|
|
|
'You are surprised by just how much cum is plastered on you as you wipe it from your eyes and look up at the guy.'
|
|
|
'"Girl, you look like a fucking masterpiece! I''m almost ready for another go just from looking at you." he says panting.'
|
|
|
'He makes you suck him a final time, which results in one last spurt of cum in your mouth.'
|
|
|
- gs 'cum_call', 'face', $AlbinaQW['Cust'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'face', $AlbinaQW['Cust'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'hair', $AlbinaQW['Cust']
|
|
|
gs 'arousal', 'bj', 1, 'sub'
|
|
|
gs 'cum_call', 'mouth', $AlbinaQW['Cust']
|
|
@@ -926,7 +922,7 @@ if $ARGS[0] = 'whore4':
|
|
|
'You slide yourself off of him and kneel on the edge of the sofa. The deposited cum floods from you, running down your leg and pooling on the sofa beneath you. "Damn girl, that is one nice gape!" he exclaims as 3 of his fingers easily slide inside you.'
|
|
|
'You are too overwhelmed to move and so stay where you are, hoping that your anus closes up as cum continues to leak from it.'
|
|
|
gs 'arousal', 'anal', 30, 'sub'
|
|
|
- gs 'cum_call', 'anus', $AlbinaQW['Cust'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'anus', $AlbinaQW['Cust'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'legs', $AlbinaQW['Cust']
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
@@ -949,7 +945,7 @@ if $ARGS[0] = 'whore4':
|
|
|
gs 'arousal', 'vaginal', 10, 'sub'
|
|
|
$orgasm_or = 'yes'
|
|
|
gs 'arousal', 'vaginal', 10, 'sub'
|
|
|
- gs 'cum_call', 'face', $AlbinaQW['Cust'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'face', $AlbinaQW['Cust'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'hair', $AlbinaQW['Cust']
|
|
|
gs 'arousal', 'bj', 1, 'sub'
|
|
|
gs 'arousal', 'end'
|
|
@@ -1013,7 +1009,7 @@ if $ARGS[0] = 'whore5':
|
|
|
gs 'arousal', 'anal', -1, 'dick1', 'sub', 'group'
|
|
|
gs 'pain', 4, 'asshole', 'stretch'
|
|
|
gs 'arousal', 'vaginal_finger', -1, 'sub'
|
|
|
- gs 'cum_call', 'anus', $AlbinaQW['Cust1'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'anus', $AlbinaQW['Cust1'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'legs', $AlbinaQW['Cust1']
|
|
|
gs 'stat'
|
|
|
tipdarand = rand(0, 1)
|
|
@@ -1028,7 +1024,7 @@ if $ARGS[0] = 'whore5':
|
|
|
'You look up at him, seeking approval. He pats you on the head. "I guess you little white girls really do crave it.'
|
|
|
gs 'arousal', 'bj', 10, 'dick1', 'sub', 'deepthroat', 'rough', 'humiliation'
|
|
|
gs 'pain', 1, 'throat', 'choke'
|
|
|
- gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, 0, 20000, 120
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
act 'Call a taxi': gt 'AlbStars', 'cab_home'
|
|
@@ -1043,7 +1039,7 @@ if $ARGS[0] = 'whore5':
|
|
|
'"Damn girl, I guess you are a hot mess!" one of the men laughs.'
|
|
|
gs 'arousal', 'bj', 10, 'dick2', 'sub', 'deepthroat', 'rough'
|
|
|
gs 'cum_call', 'mouth', $AlbinaQW['Cust1']
|
|
|
- gs 'cum_call', 'face', $AlbinaQW['Cust1'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'face', $AlbinaQW['Cust1'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'hair', $AlbinaQW['Cust1']
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
@@ -1073,7 +1069,7 @@ if $ARGS[0] = 'whore5':
|
|
|
'Your eyes are watering and drool is dripping from your mouth when the cock in your pussy pulls out and the guy moves round to the edge of the bed, jerking himself. "No cumming inside" he tells the other.'
|
|
|
'You choke when the guy fucking your mouth pushes deep into your throat and lets out a grunt. A flood of cum starts to spill into your mouth.'
|
|
|
gs 'arousal', 'bj', 5, 'dick', 'sub', 'group', 'deepthroat'
|
|
|
- gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, 0, 20000, 120
|
|
|
|
|
|
act 'Swallow it all':
|
|
|
cls
|
|
@@ -1082,7 +1078,7 @@ if $ARGS[0] = 'whore5':
|
|
|
'You again choke and gag as the huge tip hits your throat and another flood of cum enters your mouth. You are again forced to gulp it down before he pulls out. Once he does, you roll over and start coughing and gasping for breath.'
|
|
|
'You then look up at the guys, your face a mess of tears and drool. They both pat you on the head. "I guess you white girls really do crave it." You finish them off by jerking their huge cocks and licking them clean.'
|
|
|
gs 'arousal', 'bj', 5, 'dick', 'sub', 'group', 'deepthroat', 'humiliation'
|
|
|
- gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, 0, 20000, 120
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
act 'Call a taxi': gt 'AlbStars', 'cab_home'
|
|
@@ -1096,9 +1092,9 @@ if $ARGS[0] = 'whore5':
|
|
|
'You cough when the cock in your mouth is pulled out. "Get ready for it girl!" is all you hear before you are hit in the face with a massive stream of cum that drenches you.'
|
|
|
'Your eyes glued closed, you hear the other guy tell you to stay still and another huge load of thick cum is deposited over your face and into your hair. You roll over and wipe the cum away from your eyes.'
|
|
|
'Your face is covered in thick cum and drool. "Damn girl, you are a hot mess!" one of the men laughs as you finish them off by slowly jerking their massive cocks.'
|
|
|
- gs 'cum_call', 'face', $AlbinaQW['Cust'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'face', $AlbinaQW['Cust'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'hair', $AlbinaQW['Cust']
|
|
|
- gs 'cum_call', 'face', $AlbinaQW['Cust1'], 0, , 20000, 120
|
|
|
+ gs 'cum_call', 'face', $AlbinaQW['Cust1'], 0, 0, 20000, 120
|
|
|
gs 'cum_call', 'hair', $AlbinaQW['Cust1']
|
|
|
gs 'cum_call', 'breasts', $AlbinaQW['Cust1']
|
|
|
gs 'arousal', 'hj', 5, 'dick', 'sub', 'group'
|
|
@@ -1111,6 +1107,7 @@ if $ARGS[0] = 'whore5':
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
+end
|
|
|
|
|
|
if $ARGS[0] = 'whore6':
|
|
|
minut += 5
|
|
@@ -1161,7 +1158,7 @@ if $ARGS[0] = 'whore6':
|
|
|
gs 'cum_call', 'butt', $AlbinaQW['Cust']
|
|
|
gs 'stat'
|
|
|
|
|
|
- act 'Get your reward'
|
|
|
+ act 'Get your reward':
|
|
|
cls
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/reward.jpg"></center>'
|
|
|
'The man flips you back onto your back and spreads your legs. You moan heavily as his tongue returns to your clit and starts swirling away as his fingers slide into your wet hole and start working their magic once more.'
|
|
@@ -1173,7 +1170,7 @@ if $ARGS[0] = 'whore6':
|
|
|
gs 'arousal', 'BDSM', -1, 'sub', 'humiliation'
|
|
|
gs 'cum_call', 'pantyrear', $AlbinaQW['Cust']
|
|
|
gs 'pain', 1, 'asscheeks', 'slap'
|
|
|
- gs 'arousal' 'end'
|
|
|
+ gs 'arousal', 'end'
|
|
|
act 'Call a taxi' : gt 'AlbStars', 'cab_home', 'no_clean'
|
|
|
end
|
|
|
end
|
|
@@ -1211,8 +1208,13 @@ if $ARGS[0] = 'parkrally':
|
|
|
if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
|
|
|
act 'Leave': gt 'pav_park', 'start'
|
|
|
end
|
|
|
-
|
|
|
end
|
|
|
|
|
|
+if $ARGS[0] = 'Starletsreact':
|
|
|
+ cla
|
|
|
+ menu_off = 1
|
|
|
+ 'As you approach the Starlets, Albina looks at you in disgust. Loudly enough for the whole team to hear, she says "<<$pcs_nickname>>, no one wants to see some pregnant whore dance. Leave. You''re done." Tears welling in your eyes, you leave, the sound of laughter and taunting following your departure.'
|
|
|
+ act 'Continue':npc_pregtalk['A23'] = 1 & gt 'pav_commcenter'
|
|
|
+end
|
|
|
|
|
|
--- AlbStars ---------------------------------
|