# webcam_site
if $args[0] = 'start':
!count-in the show day:
if webcam_show_day ! daystart: webcam_show_count = 2
cls
minut += 1
gs'stat'
'Video chat with the best girls online!'
'![]()
> src="images/shared/accessories/computer/webcam/webcam.jpg">'
act 'Logout': gt 'Komp', 'start'
if $webcam_name = 0:
'If you are beautiful and you want to earn a little revealing itself, you need to have a webcam and go through a simple registration.'
act 'Register': dynamic $webcam_rega
else
if $webcam_name > 0: 'Your username: <<$webcam_name>>'
if $webcam_name > 0: 'View your statistics'
if webcam_show_count <= 0:
'You have already done a show today.'
else
act 'Post Show': dynamic $webcam_index
end
act 'Help': dynamic $webcam_help
act 'Change username': dynamic $webcam_rega
end
end
!-----------------------------------------------!
!------Registration page online chat---------!
!-----------------------------------------------!
$webcam_rega = {
cls
minut = minut + 5
gs 'stat'
*nl
'Registering online, please choose a username...'
!$web_gg_name = '<<$pcs_nickname>>'
$webcam_name = input ('Your username')
cla
'Your username: <<$webcam_name>>'
act 'Further': gt 'webcam_site'
!if $webcam_name = 0: $webcam_name = $web_gg_name
}
!-----------------------------------------------!
!-------Page statistics online chat---------!
!-----------------------------------------------!
$webcam_stat = {
cls
minut = minut + 5
gs'stat'
'Your webcam username: <<$webcam_name>>
Number of shows performed: <>
Times stretching: <>
Times stripping: <>
Played with breasts: <>
Masturbated: <>
Dildo in mouth: <>
Dildo in pussy: <>
Dildo in ass: <>
Dildo ass and pussy: <>
Fisting: <>
Anal Fisting: <>
Orgasmed: <>
Squirted: <>
Total time on cam: <> minutes.
Total tips earned: <> ₽.
'
act 'Return': gt 'webcam_site'
}
!-----------------------------------------------!
!-------Help page online chat-------------!
!-----------------------------------------------!
$webcam_help = {
cls
minut = minut + 5
gs'stat'
'
Description of service:
Video conference - this software, allowing users to conduct real-time video chat via the Web-Camera
After registering, you will be able to broadcast shows, receiving tips from customers.
In order to receive more tips you need attract more users.
One show per day only.
Things that will increasing your tips:
Use dildos, available from your local sex shop (The larger the better)
Self-fisting earns lots of tips, but for this you need lubricant and the ability to take it, otherwise you will cause yourself a lot of pain and you will not be able to put on a show when in pain.
Orgasming during a show will earn you a bonus tip.
'
act 'To main': gt 'webcam_site'
}
!-----------------------------------------------!
!--------Home online chat-----------!
!-----------------------------------------------!
$webcam_index = {
!act 'Exit': gt 'Komp', 'start'
if week < 6 and hour < 19 or week >= 6 and hour < 15:
if week < 6 and hour >= 7 and hour < 19: 'It is too early to make a show, Most spectators at work.'
if week >= 6 and hour >= 7 and hour < 15: 'It is too early to make a show, most viewers still sleep off after the working week.'
if hour >= 0 and hour < 7: 'Even so late. You do not want to scare away all their viewers sleepy views.'
if pav_slut <= 25: 'I hesitate to get up... every. Let just before the camera.'
else
my_show_show = 0
my_show_tits = 0
my_show_mast = 0
my_show_throat = 0
my_show_pussy = 0
my_show_anus = 0
my_show_afisting = 0
my_show_vfisting = 0
my_show_dp = 0
my_show_sex = 0
my_show_squirt = 0
my_show_flex = 0
show_counter = 0
my_show_tip_all = 0
my_show_tip = 0
dynamic $webcam_show
end
}
!-----------------------------------------------!
!---------Webcam shows online chat----------------!
!-----------------------------------------------!
!if $args[0] = 'show':
$webcam_show = {
act 'Exit': gt 'Komp', 'start'
my_show_tip_all += my_show_tip
!------------------------------!
!----------Late Show-----------!
!------------------------------!
if show_counter = 4:
*clr
''
'You have already greatly so tired. And the viewers need to take a breath after your super-duper show. It''s time to call it a day.'
'You collected <> ₽ during today''s show.'
webcam_show_day = daystart
webcam_show_count -= 1
money += my_show_tip_all
webcam_show_money += my_show_tip_all
webcam_show_time += 60
webcam_show_counter += 1
elektro += 3
internet -= 1
minut += 60
cla
act 'Logout': gt 'webcam_site'
end
!------------------------------!
!-------Continued show--------!
!------------------------------!
if show_counter > 0 and show_counter < 4:
gs'stat'
*clr
''
'Show must go on!'
'You have already collected <> ₽ for the show.'
show_counter += 1
cla
if my_show_show = 0:
act 'Show yourself':
gs'stat'
*clr
''
'Are you satisfied with the way, to your crotch was right in the camera against, and provides all viewers can see everything as it should be.'
my_show_tip = rand(50, 400)
'For this little idea you have earned <> ₽.'
my_show_show = 1
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!-----------Boobs-------------!
!------------------------------!
if my_show_tits = 0:
act 'Play with the breast':
gs'stat'
*clr
''
'At the request of the audience you are playing with her breasts.'
my_show_tip = rand(100, 400)
'For this little idea you have earned <> ₽.'
my_show_tits = 1
webcam_show_tits +=1
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!---------Masturbation----------!
!------------------------------!
if my_show_mast = 0:
act 'Masturbate':
gs'stat'
*clr
''
'You caress stroking her pussy and ass, fumble clitoris and nipples wriggle.'
my_show_tip = rand(100, 500)
pcs_horny += 30
!orgasm-Bonus Money
if pcs_horny > 100:
'Soon you bring themselves to the limit and ends violently. Counter tips from this sharply increases.'
webcam_show_orgazm +=1
my_show_tip += rand(50, 500)
pcs_horny = 0
end
'For this little idea you have earned <> ₽.'
my_show_mast = 1
webcam_show_mast +=1
cla
act 'Further': dynamic $webcam_show
end
end
!-----------------------------------------------!
!-----------Rubber cock in her mouth----------------!
!-----------------------------------------------!
if pcs_throat >= 1 and dildo = 1 and my_show_throat = 0:
act 'Dildo in the mouth':
gs'stat'
*clr
!Average dildo 15see
if pcs_throat >= 15 and pcs_throat < 25 and middildo = 1:
''
'Did you get your big 15See dildos and start licking, suck at, shove in your mouth.'
my_show_tip = rand(100, 500)
if pcs_throat < 25: pcs_throat += 1
end
!Big Dildo 25see
if pcs_throat >= 25 and pcs_throat < 35 and bigdildo = 1:
*clr
''
'Did you get a giant 25See dildo and begin rhythmically to drive him in the throat.'
my_show_tip = rand(500, 1000)
if pcs_throat < 35: pcs_throat += 1
end
!Huge Dildo 40see
if pcs_throat >= 35 and maddildo = 1:
*clr
''
'You took out his extremely giant 40See dildo and start poking him in the throat.'
my_show_tip = rand(600, 1400)
end
!normal dildo
if pcs_throat < 15 and dildo = 1:
''
'Did you get your normal dildo and start to gently suck.'
my_show_tip = rand(100, 500)
pcs_throat += 1
end
'For this little idea you have earned <> ₽.'
my_show_throat = 1
webcam_show_throat +=1
cla
act 'Further': dynamic $webcam_show
end
end
!-----------------------------------------------!
!---------Rubber dick in pussy----------------!
!-----------------------------------------------!
if vgape < 3 and pcs_vag >= 1 and dildo = 1 and my_show_pussy = 0:
act 'Dildo in the pussy':
gs'stat'
*clr
!Average dildo 15see
if pcs_vag >= 15 and pcs_vag < 25 and middildo = 1:
''
'Did you get my middle 15See dildo and begin rhythmic drive it into pussy.'
my_show_tip = rand(200, 700)
if pcs_vag < 25: pcs_vag += 1
end
!Big Dildo 25see
if pcs_vag >= 25 and pcs_vag < 35 and bigdildo = 1:
*clr
''
'Did you get your big 25See dildo and begin rhythmic drive it into pussy.'
my_show_tip = rand(400, 800)
if pcs_vag < 35: pcs_vag += 1
end
!a giant dildo 40see
if pcs_vag >= 35 and maddildo = 1:
*clr
''
'You took out his extremely giant 40See dildo and start poking him in the pussy.'
my_show_tip = rand(700, 1400)
end
!normal dildo
if pcs_vag < 15 and dildo = 1:
''
'Did you get your normal dildo and begin rhythmic drive it into pussy.'
my_show_tip = rand(100, 600)
pcs_vag += 1
end
pcs_horny += 30
!orgasm-Bonus Money
if pcs_horny > 100:
'Soon you bring themselves to the limit and ends violently. Counter tips from this sharply increases.'
webcam_show_orgazm +=1
my_show_tip += rand(100, 500)
pcs_horny = 0
end
'For this little idea you have earned <> ₽.'
my_show_pussy = 1
webcam_show_pussy +=1
cla
act 'Further': dynamic $webcam_show
end
end
!-----------------------------------------------!
!---------Rubber dick in the ass----------------!
!-----------------------------------------------!
if agape < 3 and pcs_ass => 1 and dildo = 1 and my_show_anus = 0:
act 'Dildo in the ass':
gs'stat'
*clr
'You parted my buttocks began to massage the anus with your fingers, first one, then two.'
!Butt plug
if analplugin = 1:
analplugin = 0
'You pulled out of your ass anal plug,'
end
!grease
if lubri > 0:
lubri -= 1
'You squeezed anal grease on his hand and began to spread his ass. After that, you''re a little smeared dildo.'
end
!Average dildo 15see
if pcs_ass >= 15 and pcs_ass < 25 and middildo = 1:
''
'Did you get my middle 15See dildo and begin rhythmic drive it in the ass.'
my_show_tip = rand(300, 800)
if pcs_ass < 25: pcs_ass += 1
end
!Big Dildo 25see
if pcs_ass >= 25 and pcs_ass < 35 and bigdildo = 1:
*clr
''
'Did you get your big 25See dildo and begin rhythmic drive it in the ass.'
my_show_tip = rand(500, 1000)
if pcs_ass < 35: pcs_ass += 1
end
!a giant dildo 40see
if pcs_ass >= 35 and maddildo = 1:
*clr
''
'You took out his extremely giant 40See dildo and start poking him in the ass.'
my_show_tip = rand(700, 1400)
end
!normal dildo
if pcs_ass < 15 and dildo = 1:
''
'Did you get your normal dildo and begin rhythmic drive it in the ass.'
my_show_tip = rand(100, 500)
pcs_ass += 1
end
pcs_horny += 30
!orgasm-Bonus Money
if pcs_horny > 100:
'Soon you bring themselves to the limit and ends violently. Counter tips from this sharply increases.'
webcam_show_orgazm +=1
my_show_tip += rand(100, 500)
pcs_horny = 0
end
'For this little idea you have earned <> ₽.'
my_show_anus = 1
webcam_show_anus +=1
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!----Double penetration-----!
!------------------------------!
if agape < 3 and vgape < 3 and pcs_ass >= 20 and pcs_vag >= 20 and my_show_dp = 0:
act 'Dildo in ass and pussy':
gs'stat'
*clr
''
'You parted their charms began massaging the hole with your fingers, first pussy, Then the ass.'
!Butt plug
if analplugin = 1:
analplugin = 0
'You pulled out of your ass anal plug,'
end
!grease
if lubri > 0:
lubri -= 1
'You squeezed grease on his hand and began to spread its charms.'
end
'Thrusting his pisku dildo and ass, rhythmically began to fuck her holes.'
pcs_horny += 30
!orgasm-Bonus Money
if pcs_horny > 100:
'Soon you bring themselves to orgasm and not hiding emotions violently ends. Counter tips from this sharply increases.'
webcam_show_orgazm +=1
my_show_tip += rand(100, 600)
pcs_horny = 0
end
my_show_tip = rand(600, 1600)
my_show_dp = 1
webcam_show_dp +=1
'For this little idea you have earned <> ₽.'
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!---------Hand in the ass----------!
!------------------------------!
if agape < 3 and pcs_ass >= 30 and my_show_afisting = 0:
act 'Anal Fisting':
gs'stat'
*clr
''
'You parted their charms began massaging the hole with your fingers, first one, then two.'
!Butt plug
if analplugin = 1:
analplugin = 0
'You pulled out of your ass anal plug,'
end
!grease
if lubri = 0: agape = 3
if lubri > 0:
lubri -= 1
'You squeezed anal grease on his hand and began to spread his ass.'
end
'You slowly began to introduce his hand yourself in the ass.'
my_show_tip = rand(400, 1800)
my_show_afisting = 1
webcam_show_afisting +=1
if pcs_ass <= 30: pcs_ass +=1
'For this little idea you have earned <> ₽.'
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!---------Hand in pussy---------!
!------------------------------!
if vgape < 3 and pcs_vag >= 30 and my_show_vfisting = 0:
act 'Fisting vaginal':
gs'stat'
*clr
''
'You parted their charms began massaging the hole with your fingers, first one, then two.'
!grease
if lubri = 0: vgape = 3
if lubri > 0:
lubri -= 1
'You squeezed grease on his hand and began to smear her pussy.'
end
'You slowly began to introduce his hand himself in pussy.'
my_show_tip = rand(400, 1600)
my_show_vfisting = 1
webcam_show_vfisting +=1
if pcs_vag <= 30: pcs_vag +=1
'For this little idea you have earned <> ₽.'
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!---------Sex - Vasya---------!
!------------------------------!
if $loc='shulga_room' and npc_rel['A11'] >= 100 and week >= 6 and hour >= 15 and vgape < 3 and agape < 3 and pcs_vag >= 1 and my_show_sex = 0:
act 'Call Vasya and arrange sex show':
gs'stat'
*clr
''
!Butt plug
if analplugin = 1:
analplugin = 0
'Vaska pulled out of your ass anal plug.'
end
'Basil began to stroke your charms, He began massaging the hole with your fingers.'
!grease
if lubri = 0: vgape = 1
if lubri > 0:
lubri -= 1
'He forced lubrication his arms and began to lubricate your charms'
end
'Minutes 30 You fucked with him on camera. He wanted to spit you like, sometimes pochityvaya chat and perform the whim of spectators: fucked something quickly, then slowly, He thrusts his dick in pussy, in the ass, Do not forget about your mouth.'
'Viewers liked all the action, count-in increased, gratuities fell even faster'
pcs_horny += 30
!orgasm-Bonus Money
if pcs_horny > 100:
'Soon he bring you to orgasm and you''re not hiding emotions violently ends. Counter tips from this sharply increases.'
webcam_show_orgazm +=1
my_show_tip += rand(100, 500)
pcs_horny = 0
end
my_show_tip = rand(800, 2000)
my_show_sex = 1
webcam_show_sex +=1
'For this little idea you have earned <> ₽.'
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!-----------Squirt-------------!
!------------------------------!
if webcam_show_counter >= 30 and my_show_squirt = 0:
act 'Squirt':
gs'stat'
*clr
''
'At the request of the audience you skvirtuete directly at the camera.'
my_show_tip = rand(400, 1200)
'For this little idea you have earned <> ₽.'
my_show_squirt = 1
webcam_show_squirt +=1
cla
act 'Further': dynamic $webcam_show
end
end
!------------------------------!
!----------Bracing------------!
!------------------------------!
if pcs_danc >= 50 and my_show_flex = 0:
act 'Bracing':
*clr
''
'You show the audience their flexibility.'
my_show_tip = rand(pcs_dancero,pcs_dancero*2)
'For this little idea you have earned <> ₽.'
my_show_flex = 1
webcam_show_flex +=1
cla
act 'Further': dynamic $webcam_show
end
end
end
!------------------------------!
!----------Start the show-----------!
!------------------------------!
if show_counter = 0:
'You turn on the webcam. It''s time to start the presentation!'
show_counter = 1
!if dyed and combed bonus money
if pcs_makeup = 1: my_show_tip = rand(10, 50)
if pcs_makeup = 2: my_show_tip = rand(10, 100)
if pcs_makeup = 3: my_show_tip = rand(10, 150)
if pcs_makeup = 4: my_show_tip = rand(10, 200)
if pcs_hairbsh = 1: my_show_tip = rand(10, 200)
cla
act 'Undress':
*clr
''
'You take off her clothes.'
my_show_tip = rand(100, 200)
'For this little idea you have earned <> ₽.'
cla
act 'Further': dynamic $webcam_show
end
!------------------------------!
!----------STRIPTEASE------------!
!------------------------------!
if pcs_dancero > 10:
act 'Striptease':
gs'stat'
*clr
''
'You slowly undress to the music, gently removing one garment after another.'
!health check
if agape > 2 or vgape > 2 or pcs_sleep < 8:
'You do not feel good. You only manage to dance half as well, as usual.'
my_show_tip_mod = 2
else
my_show_tip_mod = 1
end
my_show_tip = (pcs_dancero + pcs_danc/2)/my_show_tip_mod
webcam_show_strip +=1
'For this little idea you have earned <> ₽.'
cla
act 'Further': dynamic $webcam_show
end
end
end
}
--- webcam_site ---------------------------------