justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Cleanup

Browse Source
This commit is contained in:
justin
2024-12-27 22:32:56 +00:00
parent 3b19e7e530
commit 9168acf12e
5 changed files with 123 additions and 107 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Projectile/Draw.hs
+1 -1
View File
@@ -22,7 +22,7 @@ drawShell pj =
noPic
. translateSHz (_prjZ pj)
. uncurryV translateSHxy (_prjPos pj)
$ rotateSH (argV $ _prjAcc pj) shellShape
$ rotateSH (_prjDir pj) shellShape
shellShape :: Shape
shellShape = colorSH black $ upperPrismPoly Small Typical 4 $ map toV2 [(-6, 4), (-6, -4), (6, -4), (8, 0), (6, 4)]