|
@@ -3,6 +3,10 @@ $gL_boy_z = {
|
|
|
act '<<$pcs_nickname>>':
|
|
|
*clr & cla
|
|
|
gs 'stat'
|
|
|
+ if $clothingworntype = 'nude':
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/sunbathe_nudelake.jpg"></center>'
|
|
|
+ else
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/sunbathe_lake.jpg"></center>'
|
|
|
'He seems nice enough so you decide to give him your name.'
|
|
|
randvnesh = rand(40,120)
|
|
|
if rand(0,10) = 0 and pcs_apprnc >= randvnesh:
|
|
@@ -44,6 +48,7 @@ $gL_boy_z = {
|
|
|
minut += 15
|
|
|
gs 'drugs', 'alcohol', 'beer', 1
|
|
|
gs 'stat'
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/drinkbeer.jpg"></center>'
|
|
|
'You drink beer with the guy, and the two of you chat for a while.'
|
|
|
'Suddenly, he puts his hand on your thigh.'
|
|
|
'"Another beer, <<$pcs_nickname>>?"'
|
|
@@ -58,6 +63,7 @@ $gL_boy_z = {
|
|
|
gs 'drugs', 'alcohol', 'beer', 1
|
|
|
gs 'arousal', 'foreplay', 5
|
|
|
gs 'stat'
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/drinkbeer.jpg"></center>'
|
|
|
'You drink more beer with <<$boydesc>>. He begins stroking your leg and puts his hand on your chest as he leans into you.'
|
|
|
if rand(1,100) <= 20:
|
|
|
'Leaned in he whispers to you, "I need to taste those lips."'
|
|
@@ -72,6 +78,10 @@ $gL_boy_z = {
|
|
|
gs 'arousal', 'kiss', 5
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
+ if $clothingworntype = 'nude':
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/kissnude.jpg"></center>'
|
|
|
+ else
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/kissboy.jpg"></center>'
|
|
|
'You passionately kiss <<$boydesc>>, as he continues to caress your body, paying particular interest to your breasts.'
|
|
|
'<<$boydesc>> invites you to his house.'
|
|
|
gs 'willpower', 'sex', 'resist', 'easy'
|
|
@@ -99,9 +109,11 @@ $gL_boy_z = {
|
|
|
minut += 15
|
|
|
if $clothingworntype = 'nude':
|
|
|
gs 'clothing', 'wear_last_worn'
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/changenude.jpg"></center>'
|
|
|
if $clothingworntype = 'swimwear':gs 'clothing', 'wear', $normalclothingworntype, normalclothingwornno
|
|
|
else
|
|
|
gs 'clothing', 'wear', $normalclothingworntype, normalclothingwornno
|
|
|
+ '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/changebikini.jpg"></center>'
|
|
|
end
|
|
|
gs'stat'
|
|
|
'You quickly get changed into your regular clothes and go for a walk with <<$boydesc>>.'
|