# paysex
if $ARGS[0] = 'start':
minut += 30
gang += 1
sweat += 1
picrand = rand(0, 1)
gt 'paysex', 'var'
end
if $ARGS[0] = 'var':
colpaysex += 1
paysexrand = rand(0, 2)
if paysexrand = 0:
cla
*clr
horny += 10
SUB += 1
if paysxbj = 0:
bj += 1
paysxbj = 1
end
if paysxsex = 0:
sex += 1
paysxsex = 1
end
'
'
'While one guy fucks your pussy, you sucked the rest.'
act 'More':gt 'paysex', 'var'
if colpaysex > 3:
act 'Finish.':gt 'paysex', 'end'
end
elseif paysexrand = 1:
cla
*clr
horny += 10
SUB += 1
if paysxbj = 0:
bj += 1
paysxbj = 1
end
if paysxanal = 0:
anal += 1
paysxanal = 1
end
'
'
'While one guy fucks you in the ass, you sucked the rest.'
act 'More':gt 'paysex', 'var'
if colpaysex > 3:
act 'Finish.':gt 'paysex', 'end'
end
elseif paysexrand = 2:
cla
*clr
horny += 10
if paysxbj = 0:
bj += 1
paysxbj = 1
end
if paysxsex = 0:
sex += 1
paysxsex = 1
end
if paysxanal = 0:
anal += 1
paysxanal = 1
end
'
'
'Fuck you in all the cracks.'
act 'More':gt 'paysex', 'var'
if colpaysex > 3:
act 'Finish.':gt 'paysex', 'end'
end
end
end
if $ARGS[0] = 'end':
cla
*clr
paysxbj = 0
paysxsex = 0
paysxanal = 0
colpaysex = 0
cumbelly = 1
cumpussy = 1
cumass = 1
cumlip = 1
cumface = 1
if horny >= 80:
horny = 0
orgasm += 1
end
'
'
'When they were satisfied that you have filled in all his sperm.'
act 'Leave':
if picrand = 16 or picrand = 17:gt 'office', 'work'
if picrand = 18:gt 'husbSex', 'dolgend'
gt '<<$sexloc>>', 'start'
end
end
--- paysex ---------------------------------