https://wiki.flexiblesurvival.com/index.php?action=history&feed=atom&title=Big_Boned%2FExtra_Notes
Big Boned/Extra Notes - Revision history
2026-04-09T14:16:03Z
Revision history for this page on the wiki
MediaWiki 1.43.1
https://wiki.flexiblesurvival.com/index.php?title=Big_Boned/Extra_Notes&diff=134519&oldid=prev
Sparhawk: Created page with "============================= OOC - Code Updates ============================= Message: 3/11 Posted Author Size Cap Code ..."
2014-06-13T15:03:34Z
<p>Created page with "============================= OOC - Code Updates ============================= Message: 3/11 Posted Author Size Cap Code ..."</p>
<p><b>New page</b></p><div>============================= OOC - Code Updates =============================<br />
Message: 3/11 Posted Author <br />
Size Cap Code 06/13/14 Nuku <br />
------------------------------------------------------------------------------<br />
Here's the code that handles your size! You'll have to decode it, but here it is in all its naked glory:<br />
: size[ ref:target -- int:amount ]<br />
target @ "Size" getstatint ?dup if exit then<br />
$ifdef is_rp<br />
5<br />
$endif<br />
$ifdef is_fs<br />
rpsys { "Infection/" target @ "Mutation/Torso" getstatstr "/Torso/Size" }cat getpropstr toint<br />
rpsys { "Infection/" target @ "Mutation/Torso" getstatstr "/Torso/Template" }cat getprop if pop<br />
rpsys { "Infection/" target @ "template/torso" getstatstr "/Torso/Size" }cat getpropstr toint<br />
then<br />
target @ "Jnote" "Human Sized" findboxitem if pop 5 then<br />
target @ "Jnote" "Inverted" findboxitem if<br />
dup var! x<br />
case<br />
5 = when 5 end<br />
5 < when x @ 5 - -15 * end<br />
5 > when 5 x @ 5 - 10 / - 1 greater end<br />
endcase<br />
then<br />
target @ "Jnote" "Overblown" findboxitem if<br />
dup var! x<br />
case<br />
6 < when x @ end<br />
5 > when x @ 5 - 2 * 5 + end<br />
endcase<br />
then<br />
$endif dup var! orig<br />
100<br />
target @ "Jnote" "Giant" findboxitem if 30 + then<br />
target @ "Jnote" "Tall" findboxitem if 20 + then<br />
target @ "Jnote" "Short" findboxitem if 20 - then<br />
target @ "Jnote" "Chubby" findboxitem if 20 + then<br />
target @ "Jnote" "Thin" findboxitem if 20 - then<br />
target @ "Jnote" "Tiny" findboxitem if 50 - then<br />
target @ "Jnote" "Midget" findboxitem if 50 - then<br />
dup var! mod * 100 /<br />
dup orig @ = if<br />
mod @ 100 > if 1 + then<br />
mod @ 100 < if 1 - then<br />
then<br />
target @ "Size" getstatus<br />
target @ "Jnote" "Small Clan Sized" findboxitem if<br />
target @ "Race" getstatstr "heavy folk" stringcmp not if 2 - then<br />
target @ "Race" getstatstr "small folk" stringcmp not if 2 + then<br />
2 -<br />
then<br />
target @ "Jnote" "heavy Clan Sized" findboxitem if<br />
target @ "Race" getstatstr "small folk" stringcmp not if 2 + then<br />
target @ "Race" getstatstr "heavy folk" stringcmp not if 2 - then<br />
2 +<br />
then<br />
target @ "Weight" getstatus +<br />
target @ "Height" getstatus 3 / +<br />
var! siz<br />
siz @ 0 > if siz @ + then<br />
target @ isplayer? if<br />
target @ "Supernatural" getstatstr "{Kaiju|Quetzalcoatl}" smatch not<br />
target @ "Badge" "Kaiju" findboxitem target @ "Gear" "Big Heart" findboxitem and not and if<br />
dup 10 > if 10 - 2 / 10 + then<br />
target @ "Jnote" "Large Tendencies" findboxitem not if<br />
dup 15 > if 15 - 2 / 15 + then<br />
then<br />
target @ "Jnote" "Big Boned" findboxitem not if<br />
20 lesser<br />
<br />
then<br />
else<br />
target @ "Jnote" "Large Tendencies" findboxitem not if<br />
dup 15 > if 15 - 2 / 15 + then<br />
then<br />
then<br />
else 60 lesser then<br />
dup 90 > if 90 - sqrt 90 + then<br />
siz @ 0 < if siz @ + then<br />
1 greater toint<br />
target @ "Jnote" "Empty" findboxitem if 2 / then<br />
; PUBLIC size<br />
$libdef size<br />
<br />
==============================================================================</div>
Sparhawk