Tweak drawing parameters

This commit is contained in:
jgk
2021-06-25 18:43:45 +02:00
parent 06a92e70ee
commit 726cd425f2
8 changed files with 36 additions and 31 deletions
+7 -5
View File
@@ -16,17 +16,19 @@ pictureWeaponOnAim
-> Picture
pictureWeaponOnAim p cr posInInv
| isSelected && _posture (_crStance cr) == Aiming && isTwisting
= onLayer PtLayer twistWep
= shoulderD twistWep
| isSelected && _posture (_crStance cr) == Aiming && isOneHand
= onLayer PtLayer oneHandWep
= shoulderD oneHandWep
| isSelected && _posture (_crStance cr) == Aiming
= onLayer PtLayer drawnWep
= shoulderD drawnWep
| isSelected && isOneHand
= onLayerL [levLayer CrLayer, -5] holsteredOneHandWep
= handD holsteredOneHandWep
| isSelected
= onLayerL [levLayer CrLayer, -3] holsteredWep
= handD holsteredWep
| otherwise = blank
where
shoulderD = setDepth $ negate 0.005
handD = setDepth 0.01
isSelected = _crInvSel cr == posInInv
drawnWep = uncurry translate (_crRad cr,0) p
twistWep = uncurry translate (0.5 * _crRad cr,0) p