| ... | ... |
@@ -67,8 +67,9 @@ BRK |
| 67 | 67 |
|
| 68 | 68 |
,no-toolbar-click ~dev/mouse.y ~bankview.y #0010 SUB2 SUB2 #0008 DIV2 #0000 NEQ2 JMP? POP2 |
| 69 | 69 |
,no-toolbar-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000c LTH2 JMP? POP2 |
| 70 |
- ,no-toolbar-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000f GTH2 JMP? POP2 |
|
| 70 |
+ ,no-toolbar-click ~dev/mouse.x ~bankview.x SUB2 #0008 DIV2 #000e GTH2 JMP? POP2 |
|
| 71 | 71 |
~mouse.x ~bankview.x SUB2 #0008 DIV2 #000c SUB2 SWP POP =bankview.mode |
| 72 |
+ ,redraw JSR ,click-end JMP |
|
| 72 | 73 |
@no-toolbar-click |
| 73 | 74 |
|
| 74 | 75 |
( bankview ) |
| ... | ... |
@@ -132,8 +133,6 @@ BRK |
| 132 | 133 |
|
| 133 | 134 |
BRK |
| 134 | 135 |
|
| 135 |
- |
|
| 136 |
- |
|
| 137 | 136 |
@redraw |
| 138 | 137 |
|
| 139 | 138 |
,draw-bankview JSR |
| ... | ... |
@@ -156,19 +155,15 @@ RTS |
| 156 | 155 |
~bankview.x #0060 ADD2 =dev/sprite.x |
| 157 | 156 |
~bankview.y #0010 SUB2 =dev/sprite.y |
| 158 | 157 |
,tool_selector =dev/sprite.addr |
| 159 |
- #01 =dev/sprite.color |
|
| 158 |
+ #01 ~bankview.mode #00 EQU ADD =dev/sprite.color |
|
| 160 | 159 |
|
| 161 | 160 |
~dev/sprite.x #0008 ADD2 =dev/sprite.x |
| 162 | 161 |
,tool_hand =dev/sprite.addr |
| 163 |
- #02 =dev/sprite.color |
|
| 162 |
+ #01 ~bankview.mode #01 EQU ADD =dev/sprite.color |
|
| 164 | 163 |
|
| 165 | 164 |
~dev/sprite.x #0008 ADD2 =dev/sprite.x |
| 166 | 165 |
,tool_eraser =dev/sprite.addr |
| 167 |
- #02 =dev/sprite.color |
|
| 168 |
- |
|
| 169 |
- ~dev/sprite.x #0008 ADD2 =dev/sprite.x |
|
| 170 |
- ,tool_copy =dev/sprite.addr |
|
| 171 |
- #02 =dev/sprite.color |
|
| 166 |
+ #01 ~bankview.mode #02 EQU ADD =dev/sprite.color |
|
| 172 | 167 |
|
| 173 | 168 |
( guides ) |
| 174 | 169 |
|
| ... | ... |
@@ -379,8 +374,7 @@ RTS |
| 379 | 374 |
|
| 380 | 375 |
@tool_selector [ 80c0 e0f0 f8e0 1000 ] |
| 381 | 376 |
@tool_hand [ 4040 4070 f8f8 f870 ] |
| 382 |
-@tool_eraser [ 0814 2244 a850 2d00 ] |
|
| 383 |
-@tool_copy [ 5824 5a42 4242 3c00 ] |
|
| 377 |
+@tool_eraser [ 2050 b87c 3e1c 0800 ] |
|
| 384 | 378 |
|
| 385 | 379 |
@blank_icn [ 0000 0000 0000 0000 ] |
| 386 | 380 |
@cell1_icn [ 7cfe fefe fefe 7c00 ] |