# dorm
if $ARGS[0] = 'start':
cla
*clr
minut += 5
gs 'stat'
if night_mode = 1:
fcolor = rgb(255, 255, 255)
bcolor = rgb(0, 0, 0)
lcolor = rgb(106, 90, 205)
else
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
end
'Dormitory'
'
'
if student =0:
'Since you are not a student you are not allowed to go in unless you''re visiting someone you know.'
act 'Leave':gt 'down'
if afra > 0 and hour < 22 and hour >= 7:
act 'I''m here to see DeMarcus':
cla
'You said that you are here to see DeMarcus. The janitor chuckled, "Whore, sleeping with niggers, go jump on his black cock."'
reccoldorm = 1
demarcusflag = 1
act 'Enter':gt 'dorm', 'korr'
end
end
if gosh > 0 and hour >= 8 and hour < 22:
act 'I''m here to see Gosha':
cla
'You said that you are here to see Gosha. The janitor chuckled, "Gosha''s new bitch? What you sluts see in that scrawny bastard, I''ll never understand. Fucked half the dorm already. Heh, go to your stud, bitch."'
reccoldorm = 1
goshiflag = 1
act 'Enter':gt 'dorm', 'korr'
end
end
if afra > 20 and afragang = 1 and kendra > 0 and hour >= 8 and hour < 22:
act 'I''m here to see Kendra':
cla
'You said that you are here to see Kendra. The janitor chuckled, "Go on, have fun!"'
reccoldorm = 1
kendraflag = 1
act 'Enter':gt 'dorm', 'korr'
end
end
if afra > 10 and afragang = 1 and hour >= 8 and hour < 22:
act 'I''m here to see the african students':
cla
'You said that you are here to see the african students. The janitor chuckled, "Whore, sleeping with niggers, go jump on their black cocks."'
reccoldorm = 1
afraflag = 1
act 'Enter':gt 'dorm', 'korr'
end
end
else
act 'Enter':
cla
minut += 5
reccoldorm = 1
gt 'dorm', 'korr'
end
end
act 'Leave':
cla
minut += 5
reccoldorm = 0
gt 'down'
end
end
if $ARGS[0] = 'korr':
$metkaM = 'korr'
$locM = 'dorm'
$location_type = 'public_indoors'
cla
clr
*clr
gs 'stat'
'
'
'Before you is a usual hostel hallway with dilapidated walls, out of some rooms music and the yelling of drunken students is heard.'
act 'Leave':
cla
minut += 5
reccoldorm = 0
gt 'down'
end
if student > 0:
act 'Your room':gt 'obroom', 'start'
act 'Go to the shared kitchen':
minut += 5
gt 'obkitchen'
end
act 'Go to the shared bathroom':
minut += 5
obdysh = 1
gt 'vann', 'start'
end
if week = 5 and hour > 18 and hour < 23:
'In the corridor rumbles music it seems the Friday party is in full swing.'
act 'The party':gt 'vecher', 'start'
end
end
if afra > 0 and hour < 22 and hour >= 7:
act 'DeMarcus'' room':
cla
afrand = rand(1, 2)
if afrand = 1:
minut += 5
gs 'stat'
'You knocked on the door, but he is not there.'
act 'Leave':gt 'dorm', 'korr'
elseif afrand = 2:
gt 'dorm', 'demarcusfuck'
end
end
end
if afra > 10 and hour >= 8 and hour < 22:
act 'African students'' room':
cls
minut += 5
gs 'stat'
afrand = rand(1, 2)
if afrand = 1:
'You knocked on the door, but there was no answer.'
act 'Leave':minut += 5 & gt 'dorm', 'korr'
elseif afrand = 2:
minut += 120
if afragang = 0:afragang = 1 & guy += 6
gt 'dorm', 'afragangfuck'
end
end
end
if afra > 20 and afragang = 1 and hour >= 8 and hour < 22:
act 'Kendra''s room':
cls
gt 'dorm', 'kendrafuck'
minut += 15
gs 'stat'
end
end
if gosh > 0 and hour >= 8 and hour < 22:
act 'Gosha''s room':
cla
minut += 15
gs 'stat'
'Gosha opens the door and invites you inside'
act 'Walk into Gosha''s Room':
cla
gt 'dorm', 'goshifuck'
end
act 'Go for a walk with Gosha':
cla
gosh += 1
minut += 120
gs 'stat'
'You walk with Gosha, it is very interesting. He is a great conversationalist and gallant.'
act 'Leave':gt 'dorm', 'korr'
end
end
end
if reccoldorm = 1:
if demarcusflag = 1:demarcusflag = 0 & gt 'dorm', 'demarcusfuck'
if goshiflag = 1:goshiflag = 0 & gt 'dorm', 'goshifuck'
if afraflag = 1:afraflag = 0 & gt 'dorm', 'afragangfuck'
if kendraflag = 1:kendraflag = 0 & gt 'dorm', 'kendrafuck'
end
end
if $ARGS[0] = 'demarcusfuck':
cla
$location_type = 'event'
reccoldorm = 0
demarcusflag = 0
gs 'boyStat', 82
*clr
'You knocked on the door. After a couple of seconds the door opened and you see a large African. He smiled when he saw your snow-white smile and invited you to his room. There he quickly cleared a quite luxurious table for a student and invited you to sit at the table.'
if afra < 17:
afrand1 = rand(1,afra)
else
afrand1 = rand(1,17)
end
gs 'stat'
act 'Drink with DeMarcus':
cla
cls
minut += 120
'You drank wine with DeMarcus and he began to grope your the chest. Then he raised your T-shirt and began to suck your nipples and play with your breasts, you become very wet.'
if demarkus = 0:guy += 1 & demarkus = 1
sexpartkno = 1
if afrand1 = 1:
gs 'cum_manage'
afra += 1
pcs_vag += 1
'
'
'DeMarcus lays you on the bed, and pulls out his huge black cock. Spreading your legs apart he enters your pussy.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your stomach.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 2:
gs 'cum_manage'
afra += 1
pcs_vag += 1
'
'
'DeMarcus lays you on the floor, and pulls out his huge black cock. Spreading your legs apart he enters your pussy.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your stomach.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 3:
gs 'cum_manage'
afra += 1
pcs_vag += 1
'
'
'DeMarcus pushes you to all fours on the bed, he pulled out his huge black cock and spreads apart your ass cheeks before pushing his thick cock into your pussy.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your ass.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 4:
spafinloc = 3
gs 'cum_manage'
afra += 1
pcs_ass += 1
'
'
'DeMarcus pushes you to all fours on the bed, he pulled out his huge black cock and spreads apart your ass cheeks before pushing his thick cock into your asshole.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your ass.'
$orgasm_or = 'yes'
gs 'arousal', 'anal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 5:
gs 'cum_manage'
afra += 1
pcs_vag += 1
'
'
'DeMarcus pushes you to all fours on the bed, he pulled out his huge black cock and salms into your pussy stretching it to the limit.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out on your ass.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 6:
spafinloc = 3
gs 'cum_manage'
afra += 1
pcs_ass += 1
'
'
'DeMarcus pushes you face down on the bed and pulled out his huge black cock. Spreading your legs apart he enters your asshole.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out.'
$orgasm_or = 'yes'
gs 'arousal', 'anal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 7:
spafinloc = 3
gs 'cum_manage'
afra += 1
pcs_ass += 1
'
'
'DeMarcus lays on he bed and easily picks you up and you pushes your asshole down on his huge black cock.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out.'
$orgasm_or = 'yes'
gs 'arousal', 'anal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 8:
spafinloc = 3
gs 'cum_manage'
afra += 1
pcs_ass += 1
'
'
'DeMarcus lays on the bed, you stradle him and force your asshole down on his huge black cock.'
'You ride his thick cock until you orgasm a few times on his cock. He cums inside you and passes out.'
$orgasm_or = 'yes'
gs 'arousal', 'anal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 9:
gs 'cum_manage'
afra += 1
pcs_vag += 1
'
'
'DeMarcus lays on he bed and easily picks you up and you pushes your pussy down on his huge black cock.'
'DeMarcus brutally pounds you with his huge tool, you orgasm a few times on his cock. He cums inside you and passes out.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
elseif afrand1 = 10 or afrand1 = 11:
afrand2 = rand(1,9)
if afrand2 = 1:'
'
if afrand2 = 2:'
'
if afrand2 = 3:'
'
if afrand2 = 4:'
'
if afrand2 = 5:'
'
if afrand2 = 6:'
'
if afrand2 = 7:'
'
if afrand2 = 8:'
'
if afrand2 = 9:'
'
pcs_throat += 1
spafinloc = 11
gs 'cum_manage'
afra += 1
VAF += 1
'DeMarcus pushes you to your knees and pushes your mouth down his huge black cock.'
'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'bj', 20
gs 'arousal', 'end'
minut -= 20
gs 'stat'
elseif afrand1 = 12 or afrand1 = 13:
afrand2 = rand(0,6)
if afrand2 = 0:'
'
if afrand2 = 1:'
'
if afrand2 = 2:'
'
if afrand2 = 3:'
'
if afrand2 = 4:'
'
if afrand2 = 5:'
'
if afrand2 = 6:'
'
pcs_throat += 1
spafinloc = 11
gs 'cum_manage'
afra += 1
VAF += 1
''
'DeMarcus pushes you to your knees and you wrap your lips around his huge black cock.'
'While DeMarcus fucked your mouth with his black cock, and you carefully massaged and fingered your pussy. When DeMarcus took out cock and began to cum on your face, you orgasmed.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'bj', 20
gs 'arousal', 'end'
minut -= 20
gs 'stat'
else
spafinloc = 1
gs 'cum_manage'
afra += 1
pcs_vag += 1
'
'
'DeMarcus lays you on the bed, and pulls out his huge black cock. Spreading your legs apart he slams ino your pussy.'
'While DeMarcus brutal pounds you with his member, you orgasm a few times on his dick. Then he pulls out and cums on you abused pussy.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20, 'rough'
gs 'arousal', 'end'
gs 'stat'
end
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
end
if $ARGS[0] = 'afragangfuck':
$location_type = 'event'
reccoldorm = 0
afraflag = 0
hour += 2
'You knocked on door and are greeted by a black giant. He grabs you by the arm and drags you into the room in which you see five Africans. They surrounded you and start to grab for your breasts and ass. The only words you understand are Cumdump, whore, white trash, bimbo slut.'
afrand = rand(1, afra)
if afrand = 1:
'
'
elseif afrand = 2:
'
'
elseif afrand = 3:
'
'
elseif afrand = 4:
'
'
elseif afrand = 5:
'
'
elseif afrand = 6:
'
'
elseif afrand = 7:
'
'
elseif afrand = 8:
'
'
elseif afrand = 9:
'
'
elseif afrand = 10:
'
'
elseif afrand = 11:
'
'
elseif afrand = 12:
'
'
elseif afrand >= 13:
'
'
end
gs 'stat'
afraboy = 6
:afraboys
gs 'npcgeneratec', 0, 'african student', rand(18,22)
gs 'npcgenext', 'dick', 3
$npc_thdick[$npclastgenerated] = $npctempgn[4]
npc_dick[$npclastgenerated] = npctempgn[5]
npc_Malen[$npclastgenerated] = rand(10,15)
gs 'boyStat', $npclastgenerated
fucloc = rand(0,2)
if fucloc = 0:
sexpartkno = 1
cumprecheck = 1
gs 'arousal', 'vaginal', 20
gs 'stat'
gs 'cum_manage'
elseif fucloc = 1:
gs 'arousal', 'anal', 20
gs 'stat'
else
gs 'arousal', 'bj', 20
gs 'stat'
end
!random finishes, 17 and 18 default to spafinloc = 0
fucloc = rand(0,18)
if fucloc < 3:
spafinloc = 1
elseif fucloc < 6:
spafinloc = 3
elseif fucloc < 8:
spafinloc = 4
elseif fucloc < 10:
spafinloc = 12
elseif fucloc < 12:
spafinloc = 11
elseif fucloc = 12:
spafinloc = 8
elseif fucloc = 13:
spafinloc = 13
elseif fucloc = 14:
spafinloc = 14
elseif fucloc = 15:
spafinloc = 15
elseif fucloc = 16:
spafinloc = 16
end
gs 'cum_manage'
afraboy -= 1
if afraboy > 0: jump 'afraboys'
gang += 1
afra += 1
'The Africans have stripped and started to play with your body like a toy, giving you all sorts of poses and fucking you in all your holes in turns.'
'While they fucked you in all your holes you orgasmed a few times and African cum covers almost your entire body.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20
gs 'arousal', 'anal', 20
gs 'arousal', 'bj', 20
gs 'arousal', 'hj', 20
gs 'arousal', 'end'
minut -= 20
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
if $ARGS[0] = 'kendrafuck':
$location_type = 'event'
reccoldorm = 0
kendraflag = 0
gs 'stat'
if kendra = 5:
'Kendra comes out of the room and invited you in, she is not thinking long undressed and offers her pussy for you to service.'
act 'Unclothed':
cla
lesb += 1
gs 'stat'
'Kendra slides on the strapon and fucks you hard.'
picrand = rand(1, 5)
'
'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal_strap', 20, 'sub'
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
elseif kendra =4:
'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'
act 'Leave':gt 'dorm', 'korr'
act 'Get a tattoo':
cla
minut += 60
kendra = 5
tat = 5
gs 'stat'
if tatlip = 1 or tatlip = 3:
'"Agaa. So you already have it? Well done, good bitch. Now get to work!"'
else
if rand(1, 2) = 1:
tatlip = 1
'
'
else
tatlip = 3
'
'
end
if tatlip > 1 and tatlip ! 3:
'Kendra sees that you already have a tattoo on your lip. "Nothing, it''s a quick fix." - she says, and tattoos your lip with the tattoo for a cocksucker. She does it so masterfully that the old tattoo is not noticeable.'
else
tattCount += 1
'Kendra fills you on the lip of the tattoo of a cocksucker.'
end
end
act 'Give yourself to Kendra':
cla
lesb += 1
'
'
'Kendra undresses and puts you on all fours, she slides on a strapon and pushes it in your pussy.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal_strap', 20, 'sub'
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
end
elseif kendra =3:
'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'
act 'Leave':gt 'dorm', 'korr'
act 'Get a tattoo':
cla
minut += 60
kendra = 4
tat = 4
gs 'stat'
if tatvag = 3 or tatvag = 18:
'
'
'Kendra says that you already have such a stigma, a predatory smile and savory otveschshivaem you slap on the vagina.'
else
if rand(1, 2) = 1:
tatvag = 3
''
else
tatvag = 18
'
'
end
if tatvag ! 18 and tatvag ! 3:
'Kendra sees that you already have a tattoo above your pussy. "Nothing, it''s a quick fix." - she says, and tattoos you above the pussy with the whore for blacks tattoo over the old one. She does it so masterfully that old tattoo is not noticeable.'
else
tattCount += 1
'Kendra tattoos you above the pussy with the whore for blacks tattoo.'
end
end
act 'Lick Kendra':
cla
*clr
lesb += 1
'
'
'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently.'
gs 'arousal', 'cuni_give', 20, 'sub'
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
end
elseif kendra = 2:
'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'
act 'Leave':gt 'dorm', 'korr'
act 'Get a tattoo':
cla
minut += 60
kendra = 3
tat = 3
gs 'stat'
if tatplech = 4:
'
'
'Kendra sees your tattoo on the shoulder showing you are a whore for blacks, grins and goes to bed'
elseif tatplech = 0:
tatplech = 4
tattCount += 1
''
'Kendra tattoos your shoulder with the symbol of a whore for blacks.'
elseif tatplech > 0 and tatplech ! 4:
tatplech = 4
''
'Kendra sees that you already have a tattoo on his shoulder. "Nothing, it''s a quick fix." - she says, tattoos your shoulder with the symbol of a whore for blacks over the old tattoo. She does it so masterfully that old tattoo is not noticeable.'
end
act 'Lick Kendra':
cls
lesb += 1
'
'
'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently'
gs 'arousal', 'cuni_give', 20, 'sub'
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
end
elseif kendra = 1:
'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'
act 'Leave':gt 'dorm', 'korr'
act 'Get a tattoo':
cls
minut += 60
kendra = 2
tat = 2
gs 'stat'
if tatankle = 1 or tatankle = 2:
'
'
'Oh, what an independent girl, you''ve already got one. Now you can do what you came for.'
elseif tatankle = 0:
tatankle = 2
tattCount += 1
''
'Kendra tattoos your ankle with the symbol of a whore for blacks.'
elseif tatankle > 2:
tatankle = 2
''
'Kendra sees that you already have a tattoo on your ankle. "Nothing I can''t fix." She says, before tattooing your ankle with the symbol of a whore for blacks over the old tattoo. She does it so masterfully that the old tattoo is not noticeable.'
end
act 'Lick Kendra':
cls
repa = 9
lesb += 1
if kendrasex = 0:kendrasex = 1 & girl = girl + 1
pcs_horny += 20
'
'
'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently'
gs 'arousal', 'cuni_give', 20, 'sub'
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
end
elseif kendra = 0:
'A pretty African comes out of the room, she introduces herself as Kendra and says that he knows you are a Bitch for Africans. She invites you to get a proper tattoo, after which whe will allow you to lick her.'
act 'Leave':gt 'dorm', 'korr'
act 'Get a tattoo':
cla
minut += 60
kendra = 1
tat = 1
gs 'stat'
if tatupb = 4 or tatupb = 29:
'
'
'Oh, so you already have the slut as a tramp stamp? No need to waste time here! Come on, eat my pussy, whore.'
elseif tatupb = 0:
tatupb = 4
tattCount += 1
'
'
'Kendra tattoos a tramp stamp with the word "Slut."'
elseif tatupb > 0 and tatupb ! 4:
tatupb = 4
''
'Kendra sees that you already have a tramp stamp. "Nothing I can''t fix." She says, before tattooing a tramp stamp with the word "Slut" over the old tattoo. She does it so masterfully that the old tattoo is not noticeable.'
end
act 'Lick at Kendra':
cla
*clr
if kendrasex = 0:kendrasex = 1 & girl += 1
lesb += 1
'
'
'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently'
gs 'arousal', 'cuni_give', 20, 'sub'
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
end
end
end
if $ARGS[0] = 'goshifuck':
$location_type = 'event'
reccoldorm = 0
goshiflag = 0
gs 'boyStat', 83
minut += 60
sexpartkno = 1
if goshsex = 0:goshsex = 1 & guy += 1
'As soon as you walk into Gosha''s room he begins fondling your breasts, and slowly undressing you.'
gs 'arousal', 'foreplay', 10
gs 'stat'
srand = rand(1, 3)
if srand = 1:
gs 'cum_manage'
picrand = rand(1, 5)
if picrand = 1:'
'
if picrand = 2:'
'
if picrand = 3:'
'
if picrand = 4:'
'
if picrand = 5:'
'
'Gosha slides his cock into your pussy while he fucked you, you orgasm and then he cums inside you.'
$orgasm_or = 'yes'
gs 'arousal', 'vaginal', 20
gs 'arousal', 'end'
gs 'stat'
elseif srand = 2:
spafinloc = 12
gs 'cum_manage'
picrand = rand(1, 5)
if picrand = 1:'
'
if picrand = 2:'
'
if picrand = 3:'
'
if picrand = 4:'
'
if picrand = 5:'
'
'Gosha pushes you to your knees and fucks you in the mouth, then he pulls out and cums on your face.'
gs 'arousal', 'bj', 20
gs 'arousal', 'end'
gs 'stat'
elseif srand = 3:
anal += 1
spafinloc = 3
gs 'cum_manage'
picrand = rand(1, 5)
if picrand = 1:'
'
if picrand = 2:'
'
if picrand = 3:'
'
if picrand = 4:'
'
if picrand = 5:'
'
'Gosha lubricates your asshole and starts flexing his fingers, then he pushes his dick in your ass. He fucks you and cums inside you.'
$orgasm_or = 'yes'
gs 'arousal', 'anal_finger', 20
gs 'arousal', 'anal', 20
gs 'arousal', 'end'
minut -= 20
gs 'stat'
end
gs 'stat'
act 'Leave':gt 'dorm', 'korr'
end
--- dorm ---------------------------------