specify whether flixel projects need to pass html5/c++ compilation

This commit is contained in:
2021-09-18 19:16:27 -06:00
parent fe84da9ad4
commit 64902bbe3b
24 changed files with 13 additions and 5 deletions

View File

@@ -0,0 +1,19 @@
(loadFrom "nat-archive-tool" "src/nat/Lib.kiss")
(defNew [:String positionKey
&prop :Archive archive
&prop :Entry e]
(let [images (readComponent archive e Images)]
(case (dictGet (readComponent archive e Positions) positionKey)
((object x x y y z z)
(super x y)))
(.onComplete (BitmapData.loadFromFile (joinPath archive.archiveDir "files" (nth images.imageFiles images.pinnedImageIndex)))
->bitmapData {
(loadGraphic bitmapData)
(enableMouseClicks false)
(enableMouseDrag)
}))
(set mouseStopDragCallback
->[self _dx _dy]
(withWritableComponents archive e [positions Positions]
(dictSet positions positionKey (object x (cast this.x Float) y (cast this.y Float) z 0.0)))))