First thank you for this auto rating script. It works quite good for me. I modified it a little to suit my need.
Here's a version of foo_DAR_noskip v.3 that doesn't need foo_cwb_hooks for Columns UI. You need to enable "Make date info available" in Columns UI Preferences, Global tab. This does not work with DUI. The result is a little different than the original version due to me rounding off the date and Columns UI does not provide system minute and second.
$puts(a_fp_d,
$div(
$sub(
$add(
$mul($substr(%first_played%,1,4),8760),
$mul($substr(%first_played%,6,7),720),
$mul($substr(%first_played%,9,10),24),
$substr(%first_played%,12,13)
),
$add(
$mul($substr(%added%,1,4),8760),
$mul($substr(%added%,6,7),720),
$mul($substr(%added%,9,10),24),
$substr(%added%,12,13)
)
),
24
)
)
$puts(a_lp_d,
$div(
$sub(
$add(
$mul($substr(%last_played%,1,4),8760),
$mul($substr(%last_played%,6,7),720),
$mul($substr(%last_played%,9,10),24),
$substr(%last_played%,12,13)
),
$add(
$mul($substr(%added%,1,4),8760),
$mul($substr(%added%,6,7),720),
$mul($substr(%added%,9,10),24),
$substr(%added%,12,13)
)
),
24
)
)
$puts(a_curr_d,
$div(
$sub(
$add(
$mul(%_system_year%,8760),
$mul(%_system_month%,720),
$mul(%_system_day%,24),
%_system_hour%
),
$add(
$mul($substr(%added%,1,4),8760),
$mul($substr(%added%,6,7),720),
$mul($substr(%added%,9,10),24),
$substr(%added%,12,13)
)
),
24
)
)
$puts(dur,$div($add(%length_seconds%,180),2))
$puts(ra,$mul($add(1000,$div($mul($get(dur),$sub(%play_count%,$div(%skip%,2))),100)),10))
$puts(dd,$div($add($get(a_lp_d),50),10))
$puts(pp,$div($mul(%play_count%,10000),$get(a_curr_d)))
$puts(pd,$mul($get(dd),$get(pp)))
$puts(pd2,$div($get(pd),100))
$puts(pd3,$div($mul($get(a_curr_d),125),100))
$puts(pd4,$div($get(pp),40))
$puts(r1,$add($get(pd2),$get(ra)))
$puts(pd5,$div($mul($get(a_fp_d),5),%play_count%))
$puts(pd6,$add($get(pd3),$get(pd5)))
$puts(r1,$add($get(pd2),$get(ra)))
$puts(r2,$add($get(pd4),$sub($get(r1),$get(pd6))))
$puts(r3,$ifgreater($get(r2),0,$get(r2),1))
$puts(r4,$ifgreater($get(a_curr_d),7,$get(r3),10000))
$ifgreater(%play_count%,0,$num($get(r4),5),-----)