|
@@ -103,11 +103,11 @@ if $ARGS[0] = 'read':
|
|
'For an hour you read the book.'
|
|
'For an hour you read the book.'
|
|
end
|
|
end
|
|
|
|
|
|
- act 'Close the book':$loc, $Metka
|
|
|
|
|
|
+ act 'Close the book':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
- act ' Close the book':$loc, $Metka
|
|
|
|
|
|
+ act ' Close the book':gt $loc, $Metka
|
|
end
|
|
end
|
|
|
|
|
|
if cookmag = 0 and fashmag = 0 and compmag = 0 and biomag = 0 and knitmag = 0 and fitmag = 0:
|
|
if cookmag = 0 and fashmag = 0 and compmag = 0 and biomag = 0 and knitmag = 0 and fitmag = 0:
|
|
@@ -120,66 +120,72 @@ if $ARGS[0] = 'read':
|
|
|
|
|
|
if cookmag = 1:
|
|
if cookmag = 1:
|
|
act 'Read your cooking magazine':
|
|
act 'Read your cooking magazine':
|
|
|
|
+ cla
|
|
cookmag = 0
|
|
cookmag = 0
|
|
manna += 5
|
|
manna += 5
|
|
minut += 30
|
|
minut += 30
|
|
'You relax for half an hour reading your cooking magazine.'
|
|
'You relax for half an hour reading your cooking magazine.'
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
if fashmag = 1:
|
|
if fashmag = 1:
|
|
act 'Read your fashion magazine':
|
|
act 'Read your fashion magazine':
|
|
|
|
+ cla
|
|
fashmag = 0
|
|
fashmag = 0
|
|
manna += 5
|
|
manna += 5
|
|
minut += 30
|
|
minut += 30
|
|
'You relax for half an hour reading your fashion magazine.'
|
|
'You relax for half an hour reading your fashion magazine.'
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
if compmag = 1:
|
|
if compmag = 1:
|
|
act 'Read your computing magazine':
|
|
act 'Read your computing magazine':
|
|
|
|
+ cla
|
|
compmag = 0
|
|
compmag = 0
|
|
manna += 5
|
|
manna += 5
|
|
minut += 30
|
|
minut += 30
|
|
'You relax for half an hour reading your computing magazine.'
|
|
'You relax for half an hour reading your computing magazine.'
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
if biomag = 1:
|
|
if biomag = 1:
|
|
act 'Read your biographical magazine':
|
|
act 'Read your biographical magazine':
|
|
|
|
+ cla
|
|
biomag = 0
|
|
biomag = 0
|
|
manna += 5
|
|
manna += 5
|
|
minut += 30
|
|
minut += 30
|
|
'You relax for half an hour reading your biographical magazine.'
|
|
'You relax for half an hour reading your biographical magazine.'
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
if knitmag = 1:
|
|
if knitmag = 1:
|
|
act 'Read your knitting magazine':
|
|
act 'Read your knitting magazine':
|
|
|
|
+ cla
|
|
knitmag = 0
|
|
knitmag = 0
|
|
manna += 5
|
|
manna += 5
|
|
minut += 30
|
|
minut += 30
|
|
if poSkill <= 100: poSkill += rand(1,3)
|
|
if poSkill <= 100: poSkill += rand(1,3)
|
|
'You relax for half an hour reading your knitting magazine.'
|
|
'You relax for half an hour reading your knitting magazine.'
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
if fitmag = 1:
|
|
if fitmag = 1:
|
|
act 'Read your fitness magazine':
|
|
act 'Read your fitness magazine':
|
|
|
|
+ cla
|
|
fitmag = 0
|
|
fitmag = 0
|
|
manna += 5
|
|
manna += 5
|
|
minut += 30
|
|
minut += 30
|
|
'You relax for half an hour reading your fitness magazine.'
|
|
'You relax for half an hour reading your fitness magazine.'
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
- act 'Return':$loc, $Metka
|
|
|
|
|
|
+ act 'Return':gt $loc, $Metka
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
@@ -188,28 +194,34 @@ if $ARGS[0] = 'snkayf':
|
|
snkz = RAND(1,6)
|
|
snkz = RAND(1,6)
|
|
if tanga = 1:tanga = 0
|
|
if tanga = 1:tanga = 0
|
|
if snkz = 1:
|
|
if snkz = 1:
|
|
- gt'gdk' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'gdk'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 2:
|
|
if snkz = 2:
|
|
- gt'gskver' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'gskver'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 3:
|
|
if snkz = 3:
|
|
- gt'bedrPar' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'bedrPar'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 4:
|
|
if snkz = 4:
|
|
- gt'gopskver' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'gopskver'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 5:
|
|
if snkz = 5:
|
|
- gt 'vokmantoiev', 'female' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt 'vokmantoiev', 'female'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 6:
|
|
if snkz = 6:
|
|
$clothingworntype = 'nude'
|
|
$clothingworntype = 'nude'
|
|
- gt'Glake' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'Glake'
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
@@ -251,27 +263,33 @@ if $ARGS[0] = 'snkayf1':
|
|
snkz = RAND(1,6)
|
|
snkz = RAND(1,6)
|
|
if tanga = 1:tanga = 0
|
|
if tanga = 1:tanga = 0
|
|
if snkz = 1:
|
|
if snkz = 1:
|
|
- gt'park','start' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'park','start'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 2:
|
|
if snkz = 2:
|
|
- gt'down' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'down'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 3:
|
|
if snkz = 3:
|
|
- gt'nord' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'nord'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 4:
|
|
if snkz = 4:
|
|
- gt'street' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'street'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 5:
|
|
if snkz = 5:
|
|
- gt'dachi' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'dachi'
|
|
end
|
|
end
|
|
|
|
|
|
if snkz = 6:
|
|
if snkz = 6:
|
|
- gt'lake','start' & hour += 2
|
|
|
|
|
|
+ hour += 2
|
|
|
|
+ gt'lake','start'
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|