Don't works like mIRC 6.2.
My pool game works in different way using mIRC 6.2, and using mIRC 6.21, and now with mIRC 6.3.
Perhaps there are changes in the way of decimal numbers are managed ?
Changes in $abs ?
Some thing in this code works different in mIRC 6.2 / 6.21 /6.3:
if ($abs($calc(%x - %bx)) < 16) { if ($abs($calc(%y - %by)) < 16) {
if ($inroundrect(%x,%y,$calc(%bx - 16),$calc(%by - 16),32,32,32,32)) {
var %bw = $gettok(%b,3,22) , %bh = $gettok(%b,4,22) , %bF = $gettok(%b,5,22) , %bn = $gettok(%b,6,22) , %bxx = %bx , %byy = %by
if (!%billar.t.pri) { %billar.t.pri = %bn }
if (!%nocho) { if %sloc == on splay " $+ $mircdirmod\billar\taco.wav" | %nocho = %ii %i }
var %dx = $calc(%bx - %x) , %dy = $calc(%by - %y) , %m = $abs(%dx)
if ($abs(%dy) > %m) { %m = $abs(%dy) } | var %dx = $calc(%dx / %m) , %dy = $calc(%dy / %m)
var %z = $abs(%dx) | if ($abs(%dy) > %z) { %z = $abs(%dy) } | %dx = $calc(%dx / %z) | %dy = $calc(%dy / %z)
hadd billar %ii %bx $+ $+ %by $+ $+ %dx $+ $+ %dy $+ $+ $calc(%f / 1.15) $+ $+ %bn
%f = $calc(%f / 1.2)
%x = %xx | %y = %yy
%w = $calc(%w - (%dx / 1.15))
%h = $calc(%h - (%dy / 1.15))
var %z = $abs(%w) | if ($abs(%h) > %z) { %z = $abs(%h) } | %z = $calc(1 / %z)
var %ff = $calc(%f / %z) | if (%ff < %f) { %f = %ff }
}
(Control codes between $+ $+ are not displayed in the forum)
