|
@@ -1,5 +1,6 @@
|
|
|
-# din2
|
|
|
-$din_street_cum = {
|
|
|
+# events
|
|
|
+
|
|
|
+if $ARGS[0] = 'street_cum':
|
|
|
if spdirtyc > 0 or spdirtyv > 0:
|
|
|
if hour >= 7 and hour <= 21:
|
|
|
manna -= 5
|
|
@@ -11,14 +12,13 @@ $din_street_cum = {
|
|
|
end
|
|
|
end
|
|
|
elseif spdirtyc = 0 and spdirtyv = 0 and face_write > 0:
|
|
|
- manna -= 5
|
|
|
- 'Surrounding look at you with surprise, grin or a slight contempt. Someone just point the finger and laughs. Someone photographed phone. Hair obviously can not hide "art" on your face.'
|
|
|
-
|
|
|
+ manna -= 5
|
|
|
+ 'Surrounding look at you with surprise, grin or a slight contempt. Someone just point the finger and laughs. Someone photographed phone. Hair obviously can not hide "art" on your face.'
|
|
|
end
|
|
|
-}
|
|
|
+end
|
|
|
|
|
|
-$d_read_book = {
|
|
|
- act 'Read the book':
|
|
|
+if $ARGS[0] = 'read':
|
|
|
+ act 'Read a book':
|
|
|
cls
|
|
|
gs 'stat'
|
|
|
'<center><img src="images/pics/book.jpg"></center>'
|
|
@@ -61,7 +61,7 @@ $d_read_book = {
|
|
|
'For an hour you read the book.'
|
|
|
end
|
|
|
|
|
|
- act 'Close the book':gt $loc
|
|
|
+ act 'Close the book':gt $loc, $Metka
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -103,43 +103,88 @@ $d_read_book = {
|
|
|
'For an hour you read the book.'
|
|
|
end
|
|
|
|
|
|
- act 'Close the book':gt $loc
|
|
|
+ act 'Close the book':$loc, $Metka
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- act ' Close the book':gt $loc
|
|
|
+ act ' Close the book':$loc, $Metka
|
|
|
end
|
|
|
-}
|
|
|
-
|
|
|
-$d_slut_horny = {
|
|
|
- you_slut += 1
|
|
|
-
|
|
|
- !!if you_slut < 10:end
|
|
|
-
|
|
|
- if you_slut >= 10 and you_slut < 20:
|
|
|
- horny += 1
|
|
|
- elseif you_slut >= 20 and you_slut < 30:
|
|
|
- horny += 2
|
|
|
- elseif you_slut >= 30 and you_slut < 40:
|
|
|
- horny += 3
|
|
|
- elseif you_slut >= 40 and you_slut < 50:
|
|
|
- horny += 4
|
|
|
- elseif you_slut >= 50 and you_slut < 60:
|
|
|
- horny += 5
|
|
|
- elseif you_slut >= 60 and you_slut < 70:
|
|
|
- horny += 6
|
|
|
- elseif you_slut >= 70 and you_slut < 80:
|
|
|
- horny += 7
|
|
|
- elseif you_slut >= 80 and you_slut < 90:
|
|
|
- horny += 8
|
|
|
- elseif you_slut >= 90 and you_slut < 100:
|
|
|
- horny += 9
|
|
|
- elseif you_slut >= 100:
|
|
|
- horny += 10
|
|
|
+
|
|
|
+ if cookmag = 0 and fashmag = 0 and compmag = 0 and biomag = 0 and knitmag = 0 and fitmag = 0:
|
|
|
+ 'You have no magazines to read.'
|
|
|
+ else
|
|
|
+ act 'Read a magazine':
|
|
|
+ cls
|
|
|
+ gs 'stat'
|
|
|
+ '<center><img src="images/pics/book.jpg"></center>'
|
|
|
+
|
|
|
+ if cookmag = 1:
|
|
|
+ act 'Read your cooking magazine':
|
|
|
+ cookmag = 0
|
|
|
+ manna += 5
|
|
|
+ minut += 30
|
|
|
+ 'You relax for half an hour reading your cooking magazine.'
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ if fashmag = 1:
|
|
|
+ act 'Read your fashion magazine':
|
|
|
+ fashmag = 0
|
|
|
+ manna += 5
|
|
|
+ minut += 30
|
|
|
+ 'You relax for half an hour reading your fashion magazine.'
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ if compmag = 1:
|
|
|
+ act 'Read your computing magazine':
|
|
|
+ compmag = 0
|
|
|
+ manna += 5
|
|
|
+ minut += 30
|
|
|
+ 'You relax for half an hour reading your computing magazine.'
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ if biomag = 1:
|
|
|
+ act 'Read your biographical magazine':
|
|
|
+ biomag = 0
|
|
|
+ manna += 5
|
|
|
+ minut += 30
|
|
|
+ 'You relax for half an hour reading your biographical magazine.'
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ if knitmag = 1:
|
|
|
+ act 'Read your knitting magazine':
|
|
|
+ knitmag = 0
|
|
|
+ manna += 5
|
|
|
+ minut += 30
|
|
|
+ if poSkill <= 100: poSkill += rand(1,3)
|
|
|
+ 'You relax for half an hour reading your knitting magazine.'
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ if fitmag = 1:
|
|
|
+ act 'Read your fitness magazine':
|
|
|
+ fitmag = 0
|
|
|
+ manna += 5
|
|
|
+ minut += 30
|
|
|
+ 'You relax for half an hour reading your fitness magazine.'
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ act 'Return':$loc, $Metka
|
|
|
+ end
|
|
|
end
|
|
|
-}
|
|
|
+end
|
|
|
|
|
|
-$snkayf = {
|
|
|
+if $ARGS[0] = 'snkayf':
|
|
|
snkz = RAND(1,6)
|
|
|
if tanga = 1:tanga = 0
|
|
|
if snkz = 1:
|
|
@@ -159,16 +204,16 @@ $snkayf = {
|
|
|
end
|
|
|
|
|
|
if snkz = 5:
|
|
|
- dynamic $din_vokzalg_toilet & hour += 2
|
|
|
+ gt 'vokmantoiev', 'female' & hour += 2
|
|
|
end
|
|
|
|
|
|
if snkz = 6:
|
|
|
$clothingworntype = 'nude'
|
|
|
gt'Glake' & hour += 2
|
|
|
end
|
|
|
-}
|
|
|
+end
|
|
|
|
|
|
-$narkozakladka = {
|
|
|
+if $ARGS[0] = 'narkozakladka':
|
|
|
cls
|
|
|
'<center><b>Shooting galleries</b></center>'
|
|
|
'<center><img src="images/etogame/narkopriton.jpg"></center>'
|
|
@@ -184,9 +229,9 @@ $narkozakladka = {
|
|
|
'Guy added, that bookmarks will be on the train/train station from the platform. '
|
|
|
act 'Escape':gt'narkopriton'
|
|
|
end
|
|
|
-}
|
|
|
+end
|
|
|
|
|
|
-$snarkozaka = {
|
|
|
+if $ARGS[0] = 'snarkozaka':
|
|
|
cls
|
|
|
minut += 20
|
|
|
money -= 2000
|
|
@@ -199,10 +244,10 @@ $snarkozaka = {
|
|
|
'<center><img src="images/pic/vokzalperG.jpg"></center>'
|
|
|
'You buy the drugs and without thinking twice you shoot up.'
|
|
|
|
|
|
- act 'Escape':dynamic $snkayf
|
|
|
-}
|
|
|
+ act 'Escape':gt 'events', 'snkayf'
|
|
|
+end
|
|
|
|
|
|
-$snkayf1 = {
|
|
|
+if $ARGS[0] = 'snkayf1':
|
|
|
snkz = RAND(1,6)
|
|
|
if tanga = 1:tanga = 0
|
|
|
if snkz = 1:
|
|
@@ -228,52 +273,7 @@ $snkayf1 = {
|
|
|
if snkz = 6:
|
|
|
gt'lake','start' & hour += 2
|
|
|
end
|
|
|
-}
|
|
|
-
|
|
|
-$budilnikOn = {
|
|
|
- if budilnikOn = 0:
|
|
|
- 'You lie on the bed. Alarm set for <<timer>> hours <<timerM>> minutes and currently turned <a href="exec: budilnikOn = 1 & GT ''bed2''">off</a>.'
|
|
|
- else
|
|
|
- 'You lie on the bed. Alarm set for <<timer>> hours <<timerM>> minutes and currently turned <a href="exec: budilnikOn = 0 & GT ''bed2''">on</a>.'
|
|
|
- end
|
|
|
-}
|
|
|
-
|
|
|
-$wakepar = {
|
|
|
- InSleep = 0
|
|
|
- if bedpanty = 0 and clrbelo > 0:
|
|
|
- tanga = 1
|
|
|
- else
|
|
|
- tanga =0
|
|
|
- end
|
|
|
- gt $locM, $metkaM
|
|
|
-}
|
|
|
-
|
|
|
-$sopts = {
|
|
|
- cla
|
|
|
- act 'Set Alarm Clock':gt 'budilnik', 'start'
|
|
|
- if bedPanty = 0:
|
|
|
- act 'You will wear panties in the morning, click to turn off':bedpanty = 1 & dynamic $sopts
|
|
|
- else
|
|
|
- act 'You will not wear panties in the morning, click to turn on':bedpanty = 0 & dynamic $sopts
|
|
|
- end
|
|
|
- if analplug = 1:
|
|
|
- if bedanal = 0:
|
|
|
- act 'If worn, you will remove your analplug at night, click to always leave it in':bedanal = 1 & dynamic $sopts
|
|
|
- else
|
|
|
- act 'If worn, you will wear your analplug through the night, click to always remove it':bedanal = 0 & dynamic $sopts
|
|
|
- end
|
|
|
- end
|
|
|
-
|
|
|
- if vibrator = 1 and cheatVib = 1:
|
|
|
- if bedvibrator = 0:
|
|
|
- act 'If worn, you will remove your vibrator at night, click to always leave it in':bedvibrator = 1 & dynamic $sopts
|
|
|
- else
|
|
|
- act 'If worn, you will wear your vibrator through the night, click to always remove it':bedvibrator = 0 & dynamic $sopts
|
|
|
- end
|
|
|
- end
|
|
|
-
|
|
|
- act 'Return':gt 'bed2'
|
|
|
-}
|
|
|
+end
|
|
|
|
|
|
---- din2 ---------------------------------
|
|
|
+--- events ---------------------------------
|
|
|
|