Я правильно тут намудрил?
Под словом правильно я подразумеваю не формулу, а полученный результат - будет ли он действительно "да" или "нет"?
code forth
: calc-STUN-success
skill "MagicLevel" p@
target level@ f/ dup
self "STR" p@ f*
target "CON" p@ f/
atan pi f/ 4. f*
skill "ActivateRate" p@ 100. f/
swap dup 1. f> if
f*
then drop
"Chance =" . dup 100. f* "%2.1f" .f "%" .
rnd f>
;