|
@@ -55,7 +55,7 @@ if $ARGS[0] = 'start':
|
|
gs 'arousal', 'end'
|
|
gs 'arousal', 'end'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
gt 'Komp','browse'
|
|
gt 'Komp','browse'
|
|
- end
|
|
|
|
|
|
+ end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
@@ -126,9 +126,9 @@ if $ARGS[0] = 'waitclients':
|
|
else
|
|
else
|
|
img_source = 6
|
|
img_source = 6
|
|
end
|
|
end
|
|
-
|
|
|
|
|
|
+
|
|
'<center><img <<$set_imgh>> src="images/pc/items/accessories/computer/camwhore' + img_source + '.jpg"></center>'
|
|
'<center><img <<$set_imgh>> src="images/pc/items/accessories/computer/camwhore' + img_source + '.jpg"></center>'
|
|
-
|
|
|
|
|
|
+
|
|
if camclients = 0:
|
|
if camclients = 0:
|
|
'You take a moment of rest, unfortunately, you currently have no viewers.'
|
|
'You take a moment of rest, unfortunately, you currently have no viewers.'
|
|
else
|
|
else
|
|
@@ -183,7 +183,7 @@ if $ARGS[0] = 'waitclients':
|
|
*clr & cla
|
|
*clr & cla
|
|
|
|
|
|
mfcclients += rand(-1,1)
|
|
mfcclients += rand(-1,1)
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -206,7 +206,7 @@ if $ARGS[0] = 'waitclients':
|
|
end
|
|
end
|
|
else
|
|
else
|
|
act 'Refuse to take off your bra (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
act 'Refuse to take off your bra (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
- end
|
|
|
|
|
|
+ end
|
|
end
|
|
end
|
|
if backmfc = 1 and clientask >= 81 and clientask < 91:
|
|
if backmfc = 1 and clientask >= 81 and clientask < 91:
|
|
*clr & cla
|
|
*clr & cla
|
|
@@ -216,7 +216,7 @@ if $ARGS[0] = 'waitclients':
|
|
*clr & cla
|
|
*clr & cla
|
|
mfcclients -= 1
|
|
mfcclients -= 1
|
|
backmfc = 0
|
|
backmfc = 0
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -257,7 +257,7 @@ if $ARGS[0] = 'waitclients':
|
|
*clr & cla
|
|
*clr & cla
|
|
|
|
|
|
mfcclients += rand(-1,1)
|
|
mfcclients += rand(-1,1)
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -269,7 +269,7 @@ if $ARGS[0] = 'waitclients':
|
|
gs 'stat'
|
|
gs 'stat'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
end
|
|
end
|
|
-
|
|
|
|
|
|
+
|
|
gs 'willpower', 'exhib', 'resist', 'hard'
|
|
gs 'willpower', 'exhib', 'resist', 'hard'
|
|
if will_cost <= pcs_willpwr:
|
|
if will_cost <= pcs_willpwr:
|
|
act 'Refuse to take off your panties (<<will_cost>> Willpower)':
|
|
act 'Refuse to take off your panties (<<will_cost>> Willpower)':
|
|
@@ -280,7 +280,7 @@ if $ARGS[0] = 'waitclients':
|
|
end
|
|
end
|
|
else
|
|
else
|
|
act 'Refuse to take off your panties (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
act 'Refuse to take off your panties (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
- end
|
|
|
|
|
|
+ end
|
|
end
|
|
end
|
|
if topmfc = 0 and clientask >= 95 and clientask < 99:
|
|
if topmfc = 0 and clientask >= 95 and clientask < 99:
|
|
menu_off = 1
|
|
menu_off = 1
|
|
@@ -291,7 +291,7 @@ if $ARGS[0] = 'waitclients':
|
|
mfcclients = 0
|
|
mfcclients = 0
|
|
|
|
|
|
backmfc = 0
|
|
backmfc = 0
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -325,7 +325,7 @@ if $ARGS[0] = 'waitclients':
|
|
*clr & cla
|
|
*clr & cla
|
|
mfcclients = 0
|
|
mfcclients = 0
|
|
|
|
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -345,7 +345,7 @@ if $ARGS[0] = 'waitclients':
|
|
end
|
|
end
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
end
|
|
end
|
|
-
|
|
|
|
|
|
+
|
|
gs 'willpower', 'exhib', 'resist', 'hard'
|
|
gs 'willpower', 'exhib', 'resist', 'hard'
|
|
if will_cost <= pcs_willpwr:
|
|
if will_cost <= pcs_willpwr:
|
|
act 'Ignore him (<<will_cost>> Willpower)':
|
|
act 'Ignore him (<<will_cost>> Willpower)':
|
|
@@ -365,7 +365,7 @@ if $ARGS[0] = 'waitclients':
|
|
act 'Show him your vagina':
|
|
act 'Show him your vagina':
|
|
*clr & cla
|
|
*clr & cla
|
|
mfcclients = 0
|
|
mfcclients = 0
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -400,7 +400,7 @@ if $ARGS[0] = 'waitclients':
|
|
end
|
|
end
|
|
else
|
|
else
|
|
act 'Ignore him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
act 'Ignore him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
- end
|
|
|
|
|
|
+ end
|
|
end
|
|
end
|
|
if backmfc = 0 and pcs_ass >= 30 and webpopular >= 50 and clientask = 80:
|
|
if backmfc = 0 and pcs_ass >= 30 and webpopular >= 50 and clientask = 80:
|
|
menu_off = 1
|
|
menu_off = 1
|
|
@@ -411,7 +411,7 @@ if $ARGS[0] = 'waitclients':
|
|
mfcclients = 0
|
|
mfcclients = 0
|
|
|
|
|
|
backmfc = 0
|
|
backmfc = 0
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
@@ -425,7 +425,7 @@ if $ARGS[0] = 'waitclients':
|
|
'Oh no! Your face turns a deep red... you''re so ashamed right now! You try to calm the chat down, but the vulgar comments just keep coming and coming.'
|
|
'Oh no! Your face turns a deep red... you''re so ashamed right now! You try to calm the chat down, but the vulgar comments just keep coming and coming.'
|
|
'At least the viewer who promised to donate did, so you''re a few tokens richer.'
|
|
'At least the viewer who promised to donate did, so you''re a few tokens richer.'
|
|
|
|
|
|
- gs 'arousal', 'porn', -5
|
|
|
|
|
|
+ gs 'arousal', 'porn', -5
|
|
gs 'stat'
|
|
gs 'stat'
|
|
|
|
|
|
else
|
|
else
|
|
@@ -460,7 +460,7 @@ if $ARGS[0] = 'waitclients':
|
|
end
|
|
end
|
|
else
|
|
else
|
|
act 'Ignore him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
act 'Ignore him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
- end
|
|
|
|
|
|
+ end
|
|
end
|
|
end
|
|
|
|
|
|
if webpopular >= 15 and pcs_ass >= 15 and clientask = 89:
|
|
if webpopular >= 15 and pcs_ass >= 15 and clientask = 89:
|
|
@@ -486,7 +486,7 @@ if $ARGS[0] = 'waitclients':
|
|
*clr & cla
|
|
*clr & cla
|
|
gt 'kompMFCtwo', 86
|
|
gt 'kompMFCtwo', 86
|
|
end
|
|
end
|
|
-
|
|
|
|
|
|
+
|
|
if webpopular >= 50 and pcs_vag + pcs_ass > 0 and alko >= 4 and clientask = 85:
|
|
if webpopular >= 50 and pcs_vag + pcs_ass > 0 and alko >= 4 and clientask = 85:
|
|
menu_off = 1
|
|
menu_off = 1
|
|
*clr & cla
|
|
*clr & cla
|
|
@@ -540,7 +540,7 @@ if $ARGS[0] = 'waitclients':
|
|
act 'Dance':
|
|
act 'Dance':
|
|
menu_off = 1
|
|
menu_off = 1
|
|
*clr & cla
|
|
*clr & cla
|
|
- minut += 5
|
|
|
|
|
|
+ minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'stat'
|
|
gs 'stat'
|
|
if topmfc = 1 and backmfc = 1:
|
|
if topmfc = 1 and backmfc = 1:
|
|
@@ -562,7 +562,7 @@ if $ARGS[0] = 'waitclients':
|
|
gs 'stat'
|
|
gs 'stat'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
end
|
|
end
|
|
- end
|
|
|
|
|
|
+ end
|
|
|
|
|
|
if topmfc = 1 and backmfc = 1 and clientask < 74:
|
|
if topmfc = 1 and backmfc = 1 and clientask < 74:
|
|
act 'Perform a striptease':
|
|
act 'Perform a striptease':
|
|
@@ -581,11 +581,11 @@ if $ARGS[0] = 'waitclients':
|
|
gs 'stat'
|
|
gs 'stat'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
act 'Continue': gt 'komp_camgirl','waitclients'
|
|
end
|
|
end
|
|
- end
|
|
|
|
|
|
+ end
|
|
|
|
|
|
if topmfc = 1 and clientask < 74:
|
|
if topmfc = 1 and clientask < 74:
|
|
act 'Take off your bra':
|
|
act 'Take off your bra':
|
|
- menu_off = 1
|
|
|
|
|
|
+ menu_off = 1
|
|
*clr & cla
|
|
*clr & cla
|
|
topmfc = 0
|
|
topmfc = 0
|
|
minut += 5
|
|
minut += 5
|
|
@@ -614,7 +614,7 @@ if $ARGS[0] = 'waitclients':
|
|
*clr & cla
|
|
*clr & cla
|
|
minut += 5
|
|
minut += 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
gs 'internet_mobile', 'use_internet', $subs, 5
|
|
- gs 'komp_camgirl', 'views'
|
|
|
|
|
|
+ gs 'komp_camgirl', 'views'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'komp_camgirl', 'donate'
|
|
gs 'stat'
|
|
gs 'stat'
|
|
|
|
|
|
@@ -761,78 +761,78 @@ if $ARGS[0] = 'IncreaseFame':
|
|
gs 'komp_camgirl', 'UpdateCamBonus'
|
|
gs 'komp_camgirl', 'UpdateCamBonus'
|
|
FameIncMin = CamBonus / 30
|
|
FameIncMin = CamBonus / 30
|
|
FameIncMax = CamBonus / 15
|
|
FameIncMax = CamBonus / 15
|
|
- fame['city_social'] += rand(FameIncMin, FameIncMax)
|
|
|
|
- fame['city_sexind'] += rand(FameIncMin, FameIncMax)
|
|
|
|
|
|
+ fame['city_social'] += rand(FameIncMin, FameIncMax)
|
|
|
|
+ fame['city_sexind'] += rand(FameIncMin, FameIncMax)
|
|
webpopular = (fame['city_sexind'] + fame['city_social']) / 5
|
|
webpopular = (fame['city_sexind'] + fame['city_social']) / 5
|
|
killvar 'FameIncMin'
|
|
killvar 'FameIncMin'
|
|
killvar 'FameIncMax'
|
|
killvar 'FameIncMax'
|
|
end
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'danceviewer':
|
|
if $ARGS[0] = 'danceviewer':
|
|
- gs 'komp_camgirl', 'IncreaseFame'
|
|
|
|
- minClient = (pcs_dancero/30) + (webpopular / 50) + (CamBonus/30)
|
|
|
|
- maxClient = (pcs_dancero/10) + (webpopular / 50) + (CamBonus/20)
|
|
|
|
- camclients += rand(minClient, maxClient)
|
|
|
|
|
|
+ gs 'komp_camgirl', 'IncreaseFame'
|
|
|
|
+ minClient = (pcs_dancero/30) + (webpopular / 50) + (CamBonus/30)
|
|
|
|
+ maxClient = (pcs_dancero/10) + (webpopular / 50) + (CamBonus/20)
|
|
|
|
+ camclients += rand(minClient, maxClient)
|
|
if rand(1,3) = 1:
|
|
if rand(1,3) = 1:
|
|
- maxRegview = (camclients + CamBonus) / 200
|
|
|
|
- end
|
|
|
|
- regview += rand(0, maxRegview)
|
|
|
|
|
|
+ maxRegview = (camclients + CamBonus) / 200
|
|
|
|
+ end
|
|
|
|
+ regview += rand(0, maxRegview)
|
|
end
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'views':
|
|
if $ARGS[0] = 'views':
|
|
- gs 'komp_camgirl', 'IncreaseFame'
|
|
|
|
- maxClient = (CamBonus / 10) - (mfcclients*2)
|
|
|
|
- minClient = (CamBonus / 15) - (mfcclients*2)
|
|
|
|
- camclients += rand(minClient, maxClient)
|
|
|
|
- if rand(1,3) = 1:
|
|
|
|
- maxRegview = (camclients + CamBonus) / 200
|
|
|
|
- end
|
|
|
|
- regview += rand(0, maxRegview)
|
|
|
|
|
|
+ gs 'komp_camgirl', 'IncreaseFame'
|
|
|
|
+ maxClient = (CamBonus / 10) - (mfcclients*2)
|
|
|
|
+ minClient = (CamBonus / 15) - (mfcclients*2)
|
|
|
|
+ camclients += rand(minClient, maxClient)
|
|
|
|
+ if rand(1,3) = 1:
|
|
|
|
+ maxRegview = (camclients + CamBonus) / 200
|
|
|
|
+ end
|
|
|
|
+ regview += rand(0, maxRegview)
|
|
end
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'UpdateCamBonus':
|
|
if $ARGS[0] = 'UpdateCamBonus':
|
|
- CamBonus = (pcs_apprnc + webpopular + (fame['city_sexind']/2)+ pcs_exhib + (fame['city_performer']/2) + (fame['city_social']/2) + (regview/2) + (pcs_mood*2)) / 12
|
|
|
|
- if topmfc = 0: CamBonus += 10
|
|
|
|
- if backmfc = 0: CamBonus += 15
|
|
|
|
|
|
+ CamBonus = (pcs_apprnc + webpopular + (fame['city_sexind']/2)+ pcs_exhib + (fame['city_performer']/2) + (fame['city_social']/2) + (regview/2) + (pcs_mood*2)) / 12
|
|
|
|
+ if topmfc = 0: CamBonus += 10
|
|
|
|
+ if backmfc = 0: CamBonus += 15
|
|
end
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'donate':
|
|
if $ARGS[0] = 'donate':
|
|
- gs 'komp_camgirl', 'UpdateCamBonus'
|
|
|
|
- minChance = CamBonus / 4
|
|
|
|
- chancetips = rand(minChance, 100)
|
|
|
|
- minTokens = (CamBonus + camclients) / 50
|
|
|
|
- maxTokens = (CamBonus + camclients) / 20
|
|
|
|
- chance = 100 - minTokens
|
|
|
|
- if chancetips >= chance:
|
|
|
|
- tokens_made = rand(minTokens, maxTokens)
|
|
|
|
|
|
+ gs 'komp_camgirl', 'UpdateCamBonus'
|
|
|
|
+ minChance = CamBonus / 4
|
|
|
|
+ chancetips = rand(minChance, 100)
|
|
|
|
+ minTokens = (CamBonus + camclients) / 50
|
|
|
|
+ maxTokens = (CamBonus + camclients) / 20
|
|
|
|
+ chance = 100 - minTokens
|
|
|
|
+ if chancetips >= chance:
|
|
|
|
+ tokens_made = rand(minTokens, maxTokens)
|
|
if tokens_made >= 1:'<font color="green">+<<tokens_made>>Tokens</font>'
|
|
if tokens_made >= 1:'<font color="green">+<<tokens_made>>Tokens</font>'
|
|
tokens += tokens_made
|
|
tokens += tokens_made
|
|
- end
|
|
|
|
- tokenpay = tokens * 2
|
|
|
|
|
|
+ end
|
|
|
|
+ tokenpay = tokens * 2
|
|
end
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'clientrequest':
|
|
if $ARGS[0] = 'clientrequest':
|
|
- if topmfc = 1 and backmfc = 1:
|
|
|
|
- if pcs_apprnc < 100:
|
|
|
|
- clientask = rand(20, 100)
|
|
|
|
- else
|
|
|
|
- clientask = rand(30, 100)
|
|
|
|
- end
|
|
|
|
- end
|
|
|
|
- if (topmfc = 0 and backmfc = 1) or (topmfc = 1 and backmfc = 0):
|
|
|
|
- if pcs_apprnc < 100:
|
|
|
|
- clientask = rand(30, 100)
|
|
|
|
- else
|
|
|
|
- clientask = rand(35, 100)
|
|
|
|
- end
|
|
|
|
- end
|
|
|
|
- if topmfc = 0 and backmfc = 0:
|
|
|
|
- if pcs_apprnc < 100:
|
|
|
|
- clientask = rand(35, 100)
|
|
|
|
- else
|
|
|
|
- clientask = rand(45, 100)
|
|
|
|
- end
|
|
|
|
- end
|
|
|
|
|
|
+ if topmfc = 1 and backmfc = 1:
|
|
|
|
+ if pcs_apprnc < 100:
|
|
|
|
+ clientask = rand(20, 100)
|
|
|
|
+ else
|
|
|
|
+ clientask = rand(30, 100)
|
|
|
|
+ end
|
|
|
|
+ end
|
|
|
|
+ if (topmfc = 0 and backmfc = 1) or (topmfc = 1 and backmfc = 0):
|
|
|
|
+ if pcs_apprnc < 100:
|
|
|
|
+ clientask = rand(30, 100)
|
|
|
|
+ else
|
|
|
|
+ clientask = rand(35, 100)
|
|
|
|
+ end
|
|
|
|
+ end
|
|
|
|
+ if topmfc = 0 and backmfc = 0:
|
|
|
|
+ if pcs_apprnc < 100:
|
|
|
|
+ clientask = rand(35, 100)
|
|
|
|
+ else
|
|
|
|
+ clientask = rand(45, 100)
|
|
|
|
+ end
|
|
|
|
+ end
|
|
end
|
|
end
|
|
|
|
|
|
|
|
|