|
@@ -13,17 +13,17 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'billiard_engine':
|
|
|
cla
|
|
|
- if pcs_billiard < 10:billwin = rand(0, 10)
|
|
|
- elseif pcs_billiard >= 10 and pcs_billiard < 20:billwin = rand(0, 12)
|
|
|
- elseif pcs_billiard >= 20 and pcs_billiard < 30:billwin = rand(0, 14)
|
|
|
- elseif pcs_billiard >= 30 and pcs_billiard < 40:billwin = rand(0, 16)
|
|
|
- elseif pcs_billiard >= 40 and pcs_billiard < 50:billwin = rand(0, 18)
|
|
|
- elseif pcs_billiard >= 50 and pcs_billiard < 60:billwin = rand(0, 20)
|
|
|
- elseif pcs_billiard >= 60 and pcs_billiard < 70:billwin = rand(0, 22)
|
|
|
- elseif pcs_billiard >= 70 and pcs_billiard < 80:billwin = rand(0, 24)
|
|
|
- elseif pcs_billiard >= 80 and pcs_billiard < 90:billwin = rand(0, 26)
|
|
|
- elseif pcs_billiard >= 90 and pcs_billiard < 100:billwin = rand(0, 28)
|
|
|
- elseif pcs_billiard >= 100:billwin = rand(0, 30)
|
|
|
+ if pcs_pool < 10:billwin = rand(0, 10)
|
|
|
+ elseif pcs_pool >= 10 and pcs_pool < 20:billwin = rand(0, 12)
|
|
|
+ elseif pcs_pool >= 20 and pcs_pool < 30:billwin = rand(0, 14)
|
|
|
+ elseif pcs_pool >= 30 and pcs_pool < 40:billwin = rand(0, 16)
|
|
|
+ elseif pcs_pool >= 40 and pcs_pool < 50:billwin = rand(0, 18)
|
|
|
+ elseif pcs_pool >= 50 and pcs_pool < 60:billwin = rand(0, 20)
|
|
|
+ elseif pcs_pool >= 60 and pcs_pool < 70:billwin = rand(0, 22)
|
|
|
+ elseif pcs_pool >= 70 and pcs_pool < 80:billwin = rand(0, 24)
|
|
|
+ elseif pcs_pool >= 80 and pcs_pool < 90:billwin = rand(0, 26)
|
|
|
+ elseif pcs_pool >= 90 and pcs_pool < 100:billwin = rand(0, 28)
|
|
|
+ elseif pcs_pool >= 100:billwin = rand(0, 30)
|
|
|
end
|
|
|
end
|
|
|
|
|
@@ -40,7 +40,7 @@ if $ARGS[0] = 'billiard_ev1':
|
|
|
cls
|
|
|
!check pictures?
|
|
|
'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poolw.jpg"></center>'
|
|
|
- pcs_billiard += rand(1,3)
|
|
|
+ pool_exp += rand(1,3)
|
|
|
money += 2500
|
|
|
killvar 'billiard_ev_var'
|
|
|
minut += 30
|
|
@@ -58,7 +58,7 @@ if $ARGS[0] = 'billiard_ev1':
|
|
|
act 'Lose':
|
|
|
cla
|
|
|
*nl
|
|
|
- pcs_billiard += rand(1,3)
|
|
|
+ pool_exp += rand(1,3)
|
|
|
money -= 2500
|
|
|
killvar 'billiard_ev_var'
|
|
|
minut += 30
|
|
@@ -142,7 +142,7 @@ if $ARGS[0] = 'billiard_ev1':
|
|
|
if billwin > 16:
|
|
|
act 'Win':
|
|
|
cls
|
|
|
- pcs_billiard += rand(1,3)
|
|
|
+ pool_exp += rand(1,3)
|
|
|
money += 2500
|
|
|
killvar 'billiard_ev_var'
|
|
|
minut += 30
|
|
@@ -161,7 +161,7 @@ if $ARGS[0] = 'billiard_ev1':
|
|
|
else
|
|
|
act 'Lose':
|
|
|
cls
|
|
|
- pcs_billiard += rand(1,3)
|
|
|
+ pool_exp += rand(1,3)
|
|
|
money -= 2500
|
|
|
killvar 'billiard_ev_var'
|
|
|
minut += 30
|
|
@@ -374,7 +374,7 @@ if $ARGS[0] = 'billiard_ev2':
|
|
|
act 'Play a round':
|
|
|
cls
|
|
|
minut += 20
|
|
|
- pcs_billiard += rand(1,2)
|
|
|
+ pool_exp += rand(1,2)
|
|
|
pcs_mood += rand(1,3)
|
|
|
Jaska_Friend_Bill = 1
|
|
|
!picture (gif of breaking the balls?)
|
|
@@ -391,7 +391,7 @@ if $ARGS[0] = 'billiard_ev2':
|
|
|
act 'Sure, let''s play':
|
|
|
cls
|
|
|
minut += 20
|
|
|
- pcs_billiard += rand(1,2)
|
|
|
+ pool_exp += rand(1,2)
|
|
|
pcs_mood += rand(3,5)
|
|
|
money += 1000
|
|
|
!picture
|
|
@@ -425,7 +425,7 @@ if $ARGS[0] = 'billiard_ev2':
|
|
|
act 'Sure, let''s play':
|
|
|
cls
|
|
|
minut += 20
|
|
|
- pcs_billiard += rand(1,2)
|
|
|
+ pool_exp += rand(1,2)
|
|
|
pcs_mood += rand(1,3)
|
|
|
!picture (gif of breaking the balls?)
|
|
|
'You agree to play another friendly match. You cannot help but notice the scowl on Artyom''s face, and it seems to have very little to do with the fact that you are, once again, coming out ahead at the end.'
|
|
@@ -530,7 +530,7 @@ if $ARGS[0] = 'billiard_ev2':
|
|
|
'"How about we make this more interesting?" You suggest. "We could play for money. Maybe like 300 rubles each?"'
|
|
|
|
|
|
if bill_rand > 3:
|
|
|
- if pcs_billiard >= 60: temp = rand(1,4)
|
|
|
+ if pool_exp >= 60: temp = rand(1,4)
|
|
|
if temp = 1:
|
|
|
'One of them shakes their head. "I don''t think so. I know you. You play way too well."'
|
|
|
'"Yeah, I don''t think I wanna play for money with you either," another one agrees.'
|
|
@@ -548,7 +548,7 @@ if $ARGS[0] = 'billiard_ev2':
|
|
|
'"It''s been a long day," one of them explains, "and I don''t think any of us are really up for a wager tonight, even if it''s a small one. We''d rather just have a good time, no risk involved."'
|
|
|
|
|
|
act 'Have a friendly match instead':
|
|
|
- pcs_billiard += rand(0,1)
|
|
|
+ pool_exp += rand(0,1)
|
|
|
pcs_mood += rand(1,3)
|
|
|
minut += 30
|
|
|
temp = rand(1,4)
|
|
@@ -565,7 +565,7 @@ if $ARGS[0] = 'billiard_ev2':
|
|
|
|
|
|
act 'Suggest a friendly match':
|
|
|
cls
|
|
|
- pcs_billiard += rand(0,1)
|
|
|
+ pool_exp += rand(0,1)
|
|
|
pcs_mood += rand(1,3)
|
|
|
minut += 30
|
|
|
temp = rand(1,4)
|
|
@@ -581,7 +581,7 @@ if $ARGS[0] = 'billiard_friendly':
|
|
|
if temp <= 2:
|
|
|
'The following match is slow but enjoyable, thanks to the cheerful conversation you are having with the guys as you wait for whoever''s turn it is to take their shot.'
|
|
|
if temp = 1:
|
|
|
- pcs_billiard += rand(0,1)
|
|
|
+ pool_exp += rand(0,1)
|
|
|
'But you and the guys end up trying to do trick-shots to impress each other. Most of them fail spectacularly but those that work are quite impressive.'
|
|
|
else
|
|
|
'As it turns out, the guys are pretty terrible at billiards. You don''t exactly play like a champ yourself but their shots are remarkably badly aimed. That would have been a great boost in confidence if you didn''t catch two of them staring at your ass as you bent over for your final shot - maybe they were just distracted?'
|
|
@@ -606,7 +606,7 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'billiard_money':
|
|
|
cls
|
|
|
- pcs_billiard += rand(0,1)
|
|
|
+ pool_exp += rand(0,1)
|
|
|
minut += 30
|
|
|
!picture
|
|
|
'You give it your best shot. True, there''s not a lot of money riding on this, but losing money is never fun.'
|
|
@@ -616,14 +616,14 @@ if $ARGS[0] = 'billiard_money':
|
|
|
if billwin >= 8:
|
|
|
pcs_mood += rand(1,4)
|
|
|
money += 500
|
|
|
- 'Lady Luck seems to be smiling on you tonight - you end up ' + iif(pcs_billiard>50,'comfortably','closely') + ' winning the game.'
|
|
|
+ 'Lady Luck seems to be smiling on you tonight - you end up ' + iif(pcs_pool>50,'comfortably','closely') + ' winning the game.'
|
|
|
'Your opponents look disappointed but remain friendly as they hand over your winnings.'
|
|
|
'Understandably, they don''t feel like playing another round, so you all return to the main room together. Still, 900 rubles isn''t a bad turnout for half an hour''s work.'
|
|
|
|
|
|
else
|
|
|
pcs_mood -= rand(1,4)
|
|
|
money -= 250
|
|
|
- 'Luck really wasn''t on your side this time: You ' + iif(pcs_billiard>50,'give them a run for their money but end up fumbling several critical shots','are getting absolutely destroyed by them') + ' and have to admit defeat.'
|
|
|
+ 'Luck really wasn''t on your side this time: You ' + iif(pcs_pool>50,'give them a run for their money but end up fumbling several critical shots','are getting absolutely destroyed by them') + ' and have to admit defeat.'
|
|
|
'You commend them for their skill as you hand over the cash, since you don''t wanna be a sore loser, but you don''t really feel like playing another round with them.'
|
|
|
'Since they also have to leave, you return to the main room with them where you part ways, 300 rubles poorer than half an hour ago.'
|
|
|
end
|