|
@@ -117,8 +117,11 @@ if hour >= 6 and hour <= 21:
|
|
|
|
|
|
if preg = 2:
|
|
|
act 'Give birth':
|
|
|
- cla
|
|
|
:multikidloop
|
|
|
+ *clr
|
|
|
+ cla
|
|
|
+ $ImageNeededPlacholder
|
|
|
+ ! WD: IMAGE NEEDED ~ '<center><img src="images/etogame/abort.jpg"></center>'
|
|
|
'You lay on the bed and your feet are put in stirups.'
|
|
|
if BabyEmbryo > 1:
|
|
|
'Your contractions get closer and closer, and after some time (and a lot of swearing) you finally give birth. But as soon as it is out, you are hit with contractions. Another is coming!'
|
|
@@ -129,30 +132,28 @@ if hour >= 6 and hour <= 21:
|
|
|
preg = 0
|
|
|
pregtalk = 0
|
|
|
sterilewb += 1
|
|
|
- nextbaby = ARRPOS('yearkid',0)
|
|
|
+ !nextbaby = ARRPOS('yearkid',0)
|
|
|
kid += 1
|
|
|
BabyEmbryo -= 1
|
|
|
daykid[nextbaby] = day
|
|
|
monthkid[nextbaby] = month
|
|
|
yearkid[nextbaby] = year
|
|
|
- $ImageNeededPlacholder
|
|
|
- ! WD: IMAGE NEEDED ~ '<center><img src="images/etogame/abort.jpg"></center>'
|
|
|
if polkid[nextbaby] = 0:$polreb[nextbaby] = 'girl' & '"Congratulations it''s a girl."'
|
|
|
if polkid[nextbaby] = 1:$polreb[nextbaby] = 'boy' & '"Congratulations it''s a boy."'
|
|
|
|
|
|
- act 'Name your child':
|
|
|
- $kidname[nextbaby] = input ("Enter your babys name")
|
|
|
+ wait 350
|
|
|
+ $kidname[nextbaby] = input("Enter your babys name")
|
|
|
|
|
|
- if $kidname[nextbaby] ! '':
|
|
|
- if polkid[nextbaby] = 0:$kidname[nextbaby] = 'Masha'
|
|
|
- if polkid[nextbaby] = 1:$kidname[nextbaby] = 'Misha'
|
|
|
- end
|
|
|
- if BabyEmbryo > 0:
|
|
|
- jump 'multikidloop'
|
|
|
- end
|
|
|
-
|
|
|
- act 'Leave':gt $curloc
|
|
|
+ if $kidname[nextbaby] = '':
|
|
|
+ if polkid[nextbaby] = 0:$kidname[nextbaby] = 'Masha'
|
|
|
+ if polkid[nextbaby] = 1:$kidname[nextbaby] = 'Misha'
|
|
|
end
|
|
|
+ nextbaby += 1
|
|
|
+ if BabyEmbryo > 0:
|
|
|
+ jump 'multikidloop'
|
|
|
+ end
|
|
|
+
|
|
|
+ act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -295,66 +296,66 @@ if hour >= 6 and hour <= 21:
|
|
|
if Gorslut = 6:
|
|
|
act 'Check gynecologist':
|
|
|
cls
|
|
|
+ minut += 5
|
|
|
+ gs'stat'
|
|
|
+
|
|
|
+ '<center><img src="images/Y4enik/gpoli/gpoli_1.jpg"></center>'
|
|
|
+ 'You had to check the gynecologist'
|
|
|
+ if docKnow = 0:
|
|
|
+ '- Hello, <<$name>>. Check came?'
|
|
|
+ '- Hello, Peter. Yes, checked.'
|
|
|
+ '- They say, you`re a prostitute?'
|
|
|
+ '- Yes, Peter, and there is.'
|
|
|
+ '- A mother knows?'
|
|
|
+ '- Peter, the whole town knows. And me go. Well, for more Sonya.'
|
|
|
+ '- Well, let`s see your means of production and reproduction. Undress'
|
|
|
+ elseif docKnow = 1:
|
|
|
+ '- Hello, <<$name>>. Check came?'
|
|
|
+ '- Hello, Peter. Yes, checked.'
|
|
|
+ '- All also push the legs?'
|
|
|
+ '- Yes, doctor, I toil keeping his feet.'
|
|
|
+ '- Tie is not going to?'
|
|
|
+ '- Peter, for studies to be earned? On the clothing is necessary? The family , too, need help. And I love this thing.'
|
|
|
+ '- Well, let`s see your means of production and reproduction. Undress'
|
|
|
+ end
|
|
|
+ act 'Undress':
|
|
|
+ cls
|
|
|
minut += 5
|
|
|
gs'stat'
|
|
|
-
|
|
|
- '<center><img src="images/Y4enik/gpoli/gpoli_1.jpg"></center>'
|
|
|
- 'You had to check the gynecologist'
|
|
|
- if docKnow = 0:
|
|
|
- '- Hello, <<$name>>. Check came?'
|
|
|
- '- Hello, Peter. Yes, checked.'
|
|
|
- '- They say, you`re a prostitute?'
|
|
|
- '- Yes, Peter, and there is.'
|
|
|
- '- A mother knows?'
|
|
|
- '- Peter, the whole town knows. And me go. Well, for more Sonya.'
|
|
|
- '- Well, let`s see your means of production and reproduction. Undress'
|
|
|
- elseif docKnow = 1:
|
|
|
- '- Hello, <<$name>>. Check came?'
|
|
|
- '- Hello, Peter. Yes, checked.'
|
|
|
- '- All also push the legs?'
|
|
|
- '- Yes, doctor, I toil keeping his feet.'
|
|
|
- '- Tie is not going to?'
|
|
|
- '- Peter, for studies to be earned? On the clothing is necessary? The family , too, need help. And I love this thing.'
|
|
|
- '- Well, let`s see your means of production and reproduction. Undress'
|
|
|
- end
|
|
|
- act 'Undress':
|
|
|
+ '<center><img src="images/Y4enik/gpoli/gpoli_3.jpg"></center>'
|
|
|
+ 'You undress.'
|
|
|
+ act 'Sit in a chair':
|
|
|
cls
|
|
|
minut += 5
|
|
|
+ docKnow = 1
|
|
|
gs'stat'
|
|
|
- '<center><img src="images/Y4enik/gpoli/gpoli_3.jpg"></center>'
|
|
|
- 'You undress.'
|
|
|
- act 'Sit in a chair':
|
|
|
- cls
|
|
|
- minut += 5
|
|
|
- docKnow = 1
|
|
|
- gs'stat'
|
|
|
- '<center><img src="images/Y4enik/gpoli/gpoli_4.jpg"></center>'
|
|
|
- 'Taking off her clothes, you sit in a chair.'
|
|
|
- 'Doctor check you.'
|
|
|
- $gpoli_sick = ''
|
|
|
- if cumcondslip > 0:
|
|
|
- $gpoli_sick = 'are suffering from toxic shock from a spent condom in your body which I have removed'
|
|
|
- cumspclnt = 8
|
|
|
- gs 'cum_cleanup'
|
|
|
- end
|
|
|
- if preg > 0:
|
|
|
- knowpreg = 1
|
|
|
- $gpoli_sick = 'are pregnant'
|
|
|
- end
|
|
|
- if venera > 0:
|
|
|
- if $gpoli_sick ! '':$gpoli_sick = $gpoli_sick + ', you have a sexually transmitted disease'
|
|
|
- if $gpoli_sick = '':$gpoli_sick = 'you have a sexually transmitted disease'
|
|
|
- end
|
|
|
- if $gpoli_sick = '':
|
|
|
- '- Well, Health in your order. Truth, and you have developed a procedure.'
|
|
|
- '- I have a favor to ask, doctor.'
|
|
|
- '- It`s all good, Just do not forget to protect themselves.'
|
|
|
- else
|
|
|
- '- Well, you have a problem. You <<$gpoli_sick>>.'
|
|
|
- end
|
|
|
- '- <<$name>>, doctors will give thanks?'
|
|
|
-
|
|
|
- act 'Suggest money.':
|
|
|
+ '<center><img src="images/Y4enik/gpoli/gpoli_4.jpg"></center>'
|
|
|
+ 'Taking off her clothes, you sit in a chair.'
|
|
|
+ 'Doctor check you.'
|
|
|
+ $gpoli_sick = ''
|
|
|
+ if cumcondslip > 0:
|
|
|
+ $gpoli_sick = 'are suffering from toxic shock from a spent condom in your body which I have removed'
|
|
|
+ cumspclnt = 8
|
|
|
+ gs 'cum_cleanup'
|
|
|
+ end
|
|
|
+ if preg > 0:
|
|
|
+ knowpreg = 1
|
|
|
+ $gpoli_sick = 'are pregnant'
|
|
|
+ end
|
|
|
+ if venera > 0:
|
|
|
+ if $gpoli_sick ! '':$gpoli_sick = $gpoli_sick + ', you have a sexually transmitted disease'
|
|
|
+ if $gpoli_sick = '':$gpoli_sick = 'you have a sexually transmitted disease'
|
|
|
+ end
|
|
|
+ if $gpoli_sick = '':
|
|
|
+ '- Well, Health in your order. Truth, and you have developed a procedure.'
|
|
|
+ '- I have a favor to ask, doctor.'
|
|
|
+ '- It`s all good, Just do not forget to protect themselves.'
|
|
|
+ else
|
|
|
+ '- Well, you have a problem. You <<$gpoli_sick>>.'
|
|
|
+ end
|
|
|
+ '- <<$name>>, doctors will give thanks?'
|
|
|
+
|
|
|
+ act 'Suggest money.':
|
|
|
cls
|
|
|
minut += 5
|
|
|
gs'stat'
|
|
@@ -362,24 +363,24 @@ if hour >= 6 and hour <= 21:
|
|
|
'- Well, and if I tell you money, Ladies.'
|
|
|
'- <<$name>>, only for you. 1000 r'
|
|
|
|
|
|
- act 'Pay':
|
|
|
- cls
|
|
|
- minut += 5
|
|
|
- money -= 1000
|
|
|
-
|
|
|
- 'Thank you, doctor. You can always contact. And bring your friends..'
|
|
|
- act 'Leave':gt $curloc
|
|
|
- end
|
|
|
- end
|
|
|
-
|
|
|
-
|
|
|
- act 'offer yourself.':
|
|
|
+ act 'Pay':
|
|
|
cls
|
|
|
minut += 5
|
|
|
- horny += 5
|
|
|
- gs'stat'
|
|
|
- '<center><img src="images/Y4enik/gpoli/gpoli_6.jpg"></center>'
|
|
|
- 'You kneeling, reluctantly begin to lick a member, leading hand, and a member of its nalizyvaya, you appear interesting sensations. And you catch yourself thinking, that start to get involved. And what-this, even starts you like, slightly accelerating, you think maybe that`s it, and end. But, no, here you awake, from, that the heavy hand of the doctor lay your head. You want to raise your head, learning, he wants Dr.. But, he just silently, I began to stretch your mouth, on his penis.'
|
|
|
+ money -= 1000
|
|
|
+
|
|
|
+ 'Thank you, doctor. You can always contact. And bring your friends..'
|
|
|
+ act 'Leave':gt $curloc
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+
|
|
|
+ act 'offer yourself.':
|
|
|
+ cls
|
|
|
+ minut += 5
|
|
|
+ horny += 5
|
|
|
+ gs'stat'
|
|
|
+ '<center><img src="images/Y4enik/gpoli/gpoli_6.jpg"></center>'
|
|
|
+ 'You kneeling, reluctantly begin to lick a member, leading hand, and a member of its nalizyvaya, you appear interesting sensations. And you catch yourself thinking, that start to get involved. And what-this, even starts you like, slightly accelerating, you think maybe that`s it, and end. But, no, here you awake, from, that the heavy hand of the doctor lay your head. You want to raise your head, learning, he wants Dr.. But, he just silently, I began to stretch your mouth, on his penis.'
|
|
|
act 'Blow job':
|
|
|
cls
|
|
|
minut += 5
|