88 lines
2.3 KiB
Text
88 lines
2.3 KiB
Text
#base "../mod.vmt"
|
|
|
|
"UnlitGeneric" {
|
|
$digit 0
|
|
$override 0
|
|
|
|
$leading 0
|
|
$leading_check 0
|
|
|
|
$left 0
|
|
$left_factor1 0
|
|
$left_factor2 0
|
|
$left_factor3 0
|
|
|
|
$lt 9999
|
|
$gt -1
|
|
|
|
$const_interval 0.06 // update interval
|
|
$const_ten 10 $const_one 1 $const_half 0.5 $const_zero 0
|
|
$const_hun 100 $const_tou 1000
|
|
|
|
$value 0 $value_digit 0
|
|
|
|
Proxies {
|
|
// Get player's speed
|
|
PlayerSpeed { scale 1 resultVar $value }
|
|
|
|
// Swap digits if ($left == 1)
|
|
Equals { srcVar1 $digit resultVar $override }
|
|
|
|
Equals { srcVar1 $const_ten resultVar $left_factor1 }
|
|
Equals { srcVar1 $const_hun resultVar $left_factor2 }
|
|
Equals { srcVar1 $const_tou resultVar $left_factor3 }
|
|
Divide { srcVar1 $left_factor1 srcVar2 $digit resultVar $left_factor1 }
|
|
Divide { srcVar1 $left_factor2 srcVar2 $digit resultVar $left_factor2 }
|
|
Divide { srcVar1 $left_factor3 srcVar2 $digit resultVar $left_factor3 }
|
|
LessOrEqual {
|
|
lessEqualVar $override greaterVar $left_factor1
|
|
srcVar1 $value srcVar2 $const_ten
|
|
resultVar $override
|
|
}
|
|
LessOrEqual {
|
|
lessEqualVar $override greaterVar $left_factor2
|
|
srcVar1 $value srcVar2 $const_hun
|
|
resultVar $override
|
|
}
|
|
LessOrEqual {
|
|
lessEqualVar $override greaterVar $left_factor3
|
|
srcVar1 $value srcVar2 $const_tou
|
|
resultVar $override
|
|
}
|
|
LessOrEqual {
|
|
lessEqualVar $digit greaterVar $override
|
|
srcVar1 $left srcVar2 $const_zero
|
|
resultVar $override
|
|
}
|
|
|
|
// Display digit
|
|
Divide { srcVar1 $value srcVar2 $override resultVar $value_digit }
|
|
WrapMinMax { srcVar1 $value_digit maxVal $const_ten resultVar $frame }
|
|
|
|
// Set to frame 10 (empty) if ($leading == 1) && digit is leading zero
|
|
Equals { srcVar1 $const_zero resultVar $leading_check }
|
|
LessOrEqual {
|
|
lessEqualVar $value greaterVar $const_tou
|
|
srcVar1 $leading srcVar2 $const_zero
|
|
resultVar $leading_check
|
|
}
|
|
Add { srcVar1 $leading_check srcVar2 $const_one resultVar $leading_check }
|
|
LessOrEqual {
|
|
lessEqualVar $const_ten greaterVar $frame
|
|
srcVar1 $leading_check srcVar2 $digit
|
|
resultVar $frame
|
|
}
|
|
|
|
// Set to frame 10 (empty) if (less than $lt or greater than $gt)
|
|
LessOrEqual {
|
|
lessEqualVar $frame greaterVar $const_ten
|
|
srcVar1 $value srcVar2 $lt
|
|
resultVar $frame
|
|
}
|
|
LessOrEqual {
|
|
lessEqualVar $const_ten greaterVar $frame
|
|
srcVar1 $value srcVar2 $gt
|
|
resultVar $frame
|
|
}
|
|
}
|
|
}
|