...
|
...
|
@@ -67,30 +67,29 @@ BRK
|
67
|
67
|
( toolbar )
|
68
|
68
|
|
69
|
69
|
,no-toolbar-click ~dev/mouse.y ~bankview.y #0010 SUB2 SUB2 #0008 DIV2 #0000 NEQ2 JMP? POP2
|
70
|
|
- ,no-toolbar-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000d LTH2 JMP? POP2
|
71
|
|
- ,no-toolbar-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000f GTH2 JMP? POP2
|
72
|
|
- ~mouse.x ~bankview.x SUB2 #0008 DIV2 #000d SUB2 SWP POP =bankview.mode
|
73
|
|
- ( release ) #00 =dev/mouse.state
|
74
|
|
- ,redraw JSR ,click-end JMP
|
75
|
|
- @no-toolbar-click
|
76
|
70
|
|
77
|
|
- ( load button )
|
|
71
|
+ ( brush )
|
|
72
|
+
|
|
73
|
+ ,no-brush-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000d LTH2 JMP? POP2
|
|
74
|
+ ,no-brush-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000f GTH2 JMP? POP2
|
|
75
|
+ ( select ) ~mouse.x ~bankview.x SUB2 #0008 DIV2 #000d SUB2 SWP POP =bankview.mode
|
|
76
|
+ ( release ) #00 =dev/mouse.state
|
|
77
|
+ ,redraw JSR ,click-end JMP
|
|
78
|
+ @no-brush-click
|
78
|
79
|
|
79
|
|
- ,no-load-click ~dev/mouse.y ~bankview.y #0010 SUB2 SUB2 #0008 DIV2 #0000 NEQ2 JMP? POP2
|
80
|
80
|
,no-load-click ~dev/mouse.x ~tileview.x SUB2 #0008 DIV2 #000e NEQU2 JMP? POP2
|
81
|
|
- ( load ) ,filename =dev/file.name #0800 =dev/file.length ~bankview.addr =dev/file.load
|
82
|
|
- ( release ) #00 =dev/mouse.state
|
83
|
|
- ,redraw JSR ,click-end JMP
|
84
|
|
- @no-load-click
|
85
|
|
-
|
86
|
|
- ( save button )
|
|
81
|
+ ( load ) ,filename =dev/file.name #0800 =dev/file.length ~bankview.addr =dev/file.load
|
|
82
|
+ ( release ) #00 =dev/mouse.state
|
|
83
|
+ ,redraw JSR ,click-end JMP
|
|
84
|
+ @no-load-click
|
87
|
85
|
|
88
|
|
- ,no-save-click ~dev/mouse.y ~bankview.y #0010 SUB2 SUB2 #0008 DIV2 #0000 NEQ2 JMP? POP2
|
89
|
86
|
,no-save-click ~dev/mouse.x ~tileview.x SUB2 #0008 DIV2 #000f NEQU2 JMP? POP2
|
90
|
|
- ( save ) ,filename =dev/file.name #0800 =dev/file.length ~bankview.addr =dev/file.save
|
91
|
|
- ( release ) #00 =dev/mouse.state
|
92
|
|
- ,redraw JSR ,click-end JMP
|
93
|
|
- @no-save-click
|
|
87
|
+ ( save ) ,filename =dev/file.name #0800 =dev/file.length ~bankview.addr =dev/file.save
|
|
88
|
+ ( release ) #00 =dev/mouse.state
|
|
89
|
+ ,redraw JSR ,click-end JMP
|
|
90
|
+ @no-save-click
|
|
91
|
+
|
|
92
|
+ @no-toolbar-click
|
94
|
93
|
|
95
|
94
|
( bankview )
|
96
|
95
|
|
...
|
...
|
@@ -189,6 +188,10 @@ RTS
|
189
|
188
|
,tool_eraser =dev/sprite.addr
|
190
|
189
|
#01 ~bankview.mode #02 EQU ADD =dev/sprite.color
|
191
|
190
|
|
|
191
|
+ ~tileview.x #0070 ADD2 =dev/sprite.x
|
|
192
|
+ ,load_icn =dev/sprite.addr
|
|
193
|
+ #01 =dev/sprite.color
|
|
194
|
+
|
192
|
195
|
~tileview.x #0078 ADD2 =dev/sprite.x
|
193
|
196
|
,save_icn =dev/sprite.addr
|
194
|
197
|
#01 =dev/sprite.color
|
...
|
...
|
@@ -405,7 +408,8 @@ RTS
|
405
|
408
|
@tool_eraser [ 2050 b87c 3e1c 0800 ]
|
406
|
409
|
@blank_icn [ 0000 0000 0000 0000 ]
|
407
|
410
|
@cell1_icn [ 7cfe fefe fefe 7c00 ]
|
408
|
|
-@save_icn [ fe82 8282 848e f400 ]
|
|
411
|
+@load_icn [ feaa d6aa d4aa f400 ]
|
|
412
|
+@save_icn [ fe82 8282 848a f400 ]
|
409
|
413
|
@filename [ nasu_project.chr 00 ]
|
410
|
414
|
|
411
|
415
|
@font_hex ( 0-F )
|