Cleanup
This commit is contained in:
@@ -206,8 +206,8 @@ targetLaserUpdate it cr w t
|
||||
}
|
||||
wpammo = _itConsumption it
|
||||
reloadFrac
|
||||
| _ammoLoaded wpammo == 0 = 1
|
||||
| otherwise = case _reloadState wpammo of
|
||||
Just' rs -> fromIntegral rs / fromIntegral (_reloadTime wpammo)
|
||||
| _laLoaded wpammo == 0 = 1
|
||||
| otherwise = case _laReloadState wpammo of
|
||||
Just' rs -> fromIntegral rs / fromIntegral (_laReloadTime wpammo)
|
||||
Nothing' -> 1
|
||||
col = mixColors reloadFrac (1-reloadFrac) blue red
|
||||
|
||||
Reference in New Issue
Block a user