kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

handloose make action arrows

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-01-28 11:15:25 -07:00
parent ed32957755
commit 5803b77c3e
4 changed files with 39 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
projects/handloose/source/TypingState.kiss
View File

@@ -31,8 +31,6 @@
add(actionSprites);
var actionSprite = makeTriangleSprite(Right, "a", -SPRITE_SIZE, ()->{trace("a");});
actionSprite = makeTriangleSprite(Right, "a", -SPRITE_SIZE*4, ()->{trace("a");});
}|#)
(prop :Map<Int,ArrowDir> inputCodes (new Map))
@@ -74,6 +72,14 @@
(prop :FlxTypedGroup<ActionSprite> actionSprites (new FlxTypedGroup))
(prop &mut :DocumentModel _model null)
(method setModel [:DocumentModel m]
(set _model m)
(doFor i (range 100)
#|{
var stuff = m.generateArrowStuff();
makeTriangleSprite(DIR_ORDER[i % DIR_ORDER.length], stuff.text, -SPRITE_SIZE*i, stuff.action);
}|#))
(method :FlxSprite makeTriangleSprite [:ArrowDir dir :String text :Int y &opt :Void->Void action]
#|{
@@ -93,6 +99,14 @@
case Right:
90;
};
text = switch (text) {
case "\n": "<newline>";
case "\r": "<bad newline>";
case " ": "<space>";
case "\t": "<tab>";
default: text;
};
var text = new FlxText(text, TEXT_SIZE);
text.angle = -spr.angle;
text.color = FlxColor.BLACK;