2019-06-10 14:39:25 +00:00
|
|
|
(label) @1
|
|
|
|
(label) @begin
|
|
|
|
(label) @end
|
2019-09-29 18:57:23 +00:00
|
|
|
(const byte[]) DIGITS DIGITS = (string) "0123456789abcdef"
|
|
|
|
(const word[]) UTOA10_SUB UTOA10_SUB = { (word) $7530, (word) $2710, (word) $bb8, (word) $3e8, (word) $12c, (word) $64, (word) $1e, (word) $a }
|
|
|
|
(const byte[]) UTOA10_VAL UTOA10_VAL = { (byte) 3, (byte) 1, (byte) 3, (byte) 1, (byte) 3, (byte) 1, (byte) 3, (byte) 1 }
|
|
|
|
(const byte*) bordercol bordercol = (byte*) 53280
|
2019-06-10 14:39:25 +00:00
|
|
|
(void()) cls()
|
|
|
|
(label) cls::@1
|
|
|
|
(label) cls::@return
|
|
|
|
(byte*) cls::sc
|
2019-07-31 11:47:21 +00:00
|
|
|
(byte*) cls::sc#1 sc zp ZP_WORD:6 16.5
|
|
|
|
(byte*) cls::sc#2 sc zp ZP_WORD:6 16.5
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte*) cls::screen
|
|
|
|
(const byte*) cls::screen#0 screen = (byte*) 1024
|
2019-09-29 18:57:23 +00:00
|
|
|
(const byte*) control control = (byte*) 53265
|
2019-06-10 14:39:25 +00:00
|
|
|
(void()) main()
|
2019-07-31 11:47:21 +00:00
|
|
|
(byte~) main::$1 $1 zp ZP_BYTE:8 101.0
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte~) main::$2 reg byte a 202.0
|
|
|
|
(label) main::@1
|
|
|
|
(label) main::@2
|
|
|
|
(label) main::@3
|
|
|
|
(label) main::@4
|
|
|
|
(label) main::@5
|
|
|
|
(label) main::@6
|
|
|
|
(label) main::@7
|
|
|
|
(label) main::@8
|
2019-08-07 09:27:55 +00:00
|
|
|
(label) main::@9
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte) main::i
|
2019-08-07 09:27:55 +00:00
|
|
|
(byte) main::i#1 reg byte x 202.0
|
|
|
|
(byte) main::i#2 reg byte x 168.33333333333331
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte[]) main::msg
|
2019-08-07 17:36:19 +00:00
|
|
|
(const byte[]) main::msg#0 msg = (string) "raster lines"
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte) main::rst
|
|
|
|
(byte) main::rst#0 reg byte a 202.0
|
|
|
|
(byte*) main::screen
|
|
|
|
(byte) main::time
|
|
|
|
(byte) main::time#0 reg byte a 11.0
|
|
|
|
(byte) main::time_end
|
|
|
|
(byte) main::time_end#0 reg byte x 11.0
|
|
|
|
(byte) main::time_start
|
2019-07-31 11:47:21 +00:00
|
|
|
(byte) main::time_start#0 time_start zp ZP_BYTE:9 1.2941176470588236
|
2019-09-29 18:57:23 +00:00
|
|
|
(const byte*) raster raster = (byte*) 53266
|
2019-06-10 14:39:25 +00:00
|
|
|
(void()) utoa10w((word) utoa10w::value , (byte*) utoa10w::dst)
|
|
|
|
(byte~) utoa10w::$0 reg byte a 4.0
|
|
|
|
(byte~) utoa10w::$2 reg byte a 202.0
|
|
|
|
(byte~) utoa10w::$8 reg byte a 202.0
|
|
|
|
(byte~) utoa10w::$9 reg byte a 202.0
|
|
|
|
(label) utoa10w::@1
|
|
|
|
(label) utoa10w::@2
|
|
|
|
(label) utoa10w::@3
|
|
|
|
(label) utoa10w::@4
|
|
|
|
(label) utoa10w::@5
|
|
|
|
(label) utoa10w::@6
|
|
|
|
(label) utoa10w::@7
|
|
|
|
(label) utoa10w::@8
|
|
|
|
(label) utoa10w::@return
|
|
|
|
(byte) utoa10w::bStarted
|
2019-07-31 11:47:21 +00:00
|
|
|
(byte) utoa10w::bStarted#2 bStarted zp ZP_BYTE:9 25.25
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte) utoa10w::digit
|
2019-07-31 11:47:21 +00:00
|
|
|
(byte) utoa10w::digit#1 digit zp ZP_BYTE:8 67.33333333333333
|
|
|
|
(byte) utoa10w::digit#3 digit zp ZP_BYTE:8 84.16666666666666
|
|
|
|
(byte) utoa10w::digit#7 digit zp ZP_BYTE:8 67.33333333333333
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte*) utoa10w::dst
|
|
|
|
(byte*) utoa10w::dst#1 dst zp ZP_WORD:6 202.0
|
2019-07-25 12:35:43 +00:00
|
|
|
(byte*) utoa10w::dst#11 dst zp ZP_WORD:6 70.7
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte*) utoa10w::dst#2 dst zp ZP_WORD:6 4.0
|
|
|
|
(byte*) utoa10w::dst#4 dst zp ZP_WORD:6 61.39999999999999
|
|
|
|
(byte*) utoa10w::dst#7 dst zp ZP_WORD:6 303.0
|
|
|
|
(byte) utoa10w::i
|
|
|
|
(byte) utoa10w::i#1 reg byte x 151.5
|
2019-07-25 12:35:43 +00:00
|
|
|
(byte) utoa10w::i#2 reg byte x 62.153846153846146
|
2019-06-10 14:39:25 +00:00
|
|
|
(word) utoa10w::value
|
|
|
|
(word) utoa10w::value#0 value zp ZP_WORD:2 6.5
|
|
|
|
(word) utoa10w::value#1 value zp ZP_WORD:2 202.0
|
2019-07-25 12:35:43 +00:00
|
|
|
(word) utoa10w::value#10 value zp ZP_WORD:2 36.214285714285715
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte()) utoa16n((byte) utoa16n::nybble , (word**) utoa16n::dst , (byte) utoa16n::started)
|
|
|
|
(label) utoa16n::@1
|
|
|
|
(label) utoa16n::@2
|
|
|
|
(label) utoa16n::@3
|
|
|
|
(label) utoa16n::@return
|
|
|
|
(word**) utoa16n::dst
|
|
|
|
(byte) utoa16n::nybble
|
|
|
|
(byte) utoa16n::nybble#0 reg byte a 4.0
|
|
|
|
(byte) utoa16n::nybble#1 reg byte a 2.0
|
|
|
|
(byte) utoa16n::nybble#2 reg byte a 2.0
|
|
|
|
(byte) utoa16n::nybble#3 reg byte a 4.0
|
|
|
|
(byte) utoa16n::nybble#4 reg byte a 2.4
|
|
|
|
(byte) utoa16n::return
|
|
|
|
(byte) utoa16n::return#0 reg byte x 4.0
|
|
|
|
(byte) utoa16n::return#1 reg byte x 4.0
|
|
|
|
(byte) utoa16n::return#4 reg byte x 1.1428571428571428
|
|
|
|
(byte) utoa16n::started
|
|
|
|
(byte) utoa16n::started#1 reg byte x 4.0
|
|
|
|
(byte) utoa16n::started#2 reg byte x 4.0
|
|
|
|
(byte) utoa16n::started#7 reg byte x 2.0
|
|
|
|
(void()) utoa16w((word) utoa16w::value , (byte*) utoa16w::dst)
|
|
|
|
(byte~) utoa16w::$0 reg byte a 4.0
|
|
|
|
(byte~) utoa16w::$12 reg byte a 4.0
|
|
|
|
(byte~) utoa16w::$4 reg byte a 4.0
|
|
|
|
(byte~) utoa16w::$8 reg byte a 4.0
|
|
|
|
(label) utoa16w::@1
|
|
|
|
(label) utoa16w::@2
|
|
|
|
(label) utoa16w::@3
|
|
|
|
(label) utoa16w::@4
|
|
|
|
(label) utoa16w::@return
|
|
|
|
(byte*) utoa16w::dst
|
2019-07-31 11:47:21 +00:00
|
|
|
(byte*) utoa16w::dst#0 dst zp ZP_WORD:4 22.0
|
|
|
|
(byte*) utoa16w::dst#1 dst zp ZP_WORD:4 22.0
|
|
|
|
(byte*) utoa16w::dst#2 dst zp ZP_WORD:4 22.0
|
|
|
|
(byte*) utoa16w::dst#3 dst zp ZP_WORD:4 22.0
|
|
|
|
(byte*) utoa16w::dst#4 dst zp ZP_WORD:4 22.0
|
|
|
|
(byte*) utoa16w::dst#5 dst zp ZP_WORD:4 2.1111111111111107
|
2019-06-10 14:39:25 +00:00
|
|
|
(byte) utoa16w::started
|
|
|
|
(byte) utoa16w::started#1 reg byte x 1.3333333333333333
|
|
|
|
(byte) utoa16w::started#2 reg byte x 1.3333333333333333
|
|
|
|
(word) utoa16w::value
|
2019-07-31 11:47:21 +00:00
|
|
|
(word) utoa16w::value#5 value zp ZP_WORD:2 0.5
|
2019-06-10 14:39:25 +00:00
|
|
|
|
|
|
|
reg byte x [ main::i#2 main::i#1 ]
|
|
|
|
reg byte x [ utoa10w::i#2 utoa10w::i#1 ]
|
2019-07-31 11:47:21 +00:00
|
|
|
zp ZP_WORD:2 [ utoa16w::value#5 utoa10w::value#10 utoa10w::value#0 utoa10w::value#1 ]
|
|
|
|
zp ZP_WORD:4 [ utoa16w::dst#5 utoa16w::dst#1 utoa16w::dst#2 utoa16w::dst#3 utoa16w::dst#4 utoa16w::dst#0 ]
|
2019-06-10 14:39:25 +00:00
|
|
|
reg byte a [ utoa16n::nybble#4 utoa16n::nybble#0 utoa16n::nybble#1 utoa16n::nybble#2 utoa16n::nybble#3 ]
|
|
|
|
reg byte x [ utoa16n::return#4 utoa16n::started#7 utoa16n::started#1 utoa16n::started#2 ]
|
2019-07-31 11:47:21 +00:00
|
|
|
zp ZP_WORD:6 [ cls::sc#2 cls::sc#1 utoa10w::dst#7 utoa10w::dst#11 utoa10w::dst#4 utoa10w::dst#1 utoa10w::dst#2 ]
|
|
|
|
zp ZP_BYTE:8 [ main::$1 utoa10w::digit#3 utoa10w::digit#7 utoa10w::digit#1 ]
|
2019-06-10 14:39:25 +00:00
|
|
|
reg byte a [ main::$2 ]
|
|
|
|
reg byte a [ main::rst#0 ]
|
2019-07-31 11:47:21 +00:00
|
|
|
zp ZP_BYTE:9 [ main::time_start#0 utoa10w::bStarted#2 ]
|
2019-06-10 14:39:25 +00:00
|
|
|
reg byte x [ main::time_end#0 ]
|
|
|
|
reg byte a [ main::time#0 ]
|
|
|
|
reg byte a [ utoa10w::$8 ]
|
|
|
|
reg byte a [ utoa10w::$2 ]
|
|
|
|
reg byte a [ utoa10w::$0 ]
|
|
|
|
reg byte a [ utoa10w::$9 ]
|
|
|
|
reg byte a [ utoa16w::$0 ]
|
|
|
|
reg byte x [ utoa16n::return#0 ]
|
|
|
|
reg byte x [ utoa16w::started#1 ]
|
|
|
|
reg byte a [ utoa16w::$4 ]
|
|
|
|
reg byte x [ utoa16n::return#1 ]
|
|
|
|
reg byte x [ utoa16w::started#2 ]
|
|
|
|
reg byte a [ utoa16w::$8 ]
|
|
|
|
reg byte a [ utoa16w::$12 ]
|