...
|
...
|
@@ -89,12 +89,12 @@ BRK
|
89
|
89
|
( scrollbar )
|
90
|
90
|
,no-click-scroll ~dev/mouse.x ~dev/screen.width #0008 SUB2 LTH2 JMP? POP2
|
91
|
91
|
|
92
|
|
- ,no-click-scroll-up ~dev/mouse.y #0008 DIV2 #0000 NEQ2 JMP? POP2
|
|
92
|
+ ,no-click-scroll-up ~dev/mouse.y #0008 GTH2 JMP? POP2
|
93
|
93
|
,scroll-up JSR
|
94
|
94
|
,click-end JMP
|
95
|
95
|
@no-click-scroll-up
|
96
|
96
|
|
97
|
|
- ,no-click-scroll-down ~dev/mouse.y #0008 DIV2 #0008 MUL2 ~dev/screen.height #0008 SUB2 NEQ2 JMP? POP2
|
|
97
|
+ ,no-click-scroll-down ~dev/mouse.y ~dev/screen.height #0008 SUB2 LTH2 JMP? POP2
|
98
|
98
|
,scroll-down JSR
|
99
|
99
|
,click-end JMP
|
100
|
100
|
@no-click-scroll-down
|
...
|
...
|
@@ -269,7 +269,7 @@ RTS
|
269
|
269
|
#0000 =j ( j is linebreaks )
|
270
|
270
|
@find-scroll-offset
|
271
|
271
|
,find-scroll-offset-end ~scroll.y ~j EQU2 JMP? POP2
|
272
|
|
- ,no-break ~textarea.addr LDR #0a ~textarea.addr LDR #0d NEQ #0101 EQU2 JMP? POP2
|
|
272
|
+ ,no-break ~textarea.addr LDR #0a NEQ ~textarea.addr LDR #0d NEQ #0101 EQU2 JMP? POP2
|
273
|
273
|
( incr ) ~j #0001 ADD2 =j
|
274
|
274
|
@no-break
|
275
|
275
|
( incr ) ~textarea.addr #0001 ADD2 =textarea.addr
|
...
|
...
|
@@ -435,8 +435,8 @@ RTS
|
435
|
435
|
@arrowdown_icn [ 0010 1010 fe7c 3810 ]
|
436
|
436
|
@load_icn [ feaa d6aa d4aa f400 ]
|
437
|
437
|
@save_icn [ fe82 8282 848a f400 ]
|
438
|
|
-@filepath [ test.txt 00 ]
|
439
|
|
-@filepath1 [ projects/software/left.usm 00 ]
|
|
438
|
+@filepath1 [ test.txt 00 ]
|
|
439
|
+@filepath [ projects/software/left.usm 00 ]
|
440
|
440
|
|
441
|
441
|
|4000 ;document Document
|
442
|
442
|
|
...
|
...
|
@@ -451,4 +451,4 @@ RTS
|
451
|
451
|
|FF60 ;dev/file File
|
452
|
452
|
|
453
|
453
|
|FFF0 .RESET .FRAME .ERROR ( vectors )
|
454
|
|
-|FFF8 [ a1f3 a14d a16c ] ( palette )
|
|
454
|
+|FFF8 [ 0a4f 0a4f 0a4f ] ( palette )
|