mirror of
https://gitlab.com/camelot/kickc.git
synced 2024-10-21 02:24:34 +00:00
4268 lines
229 KiB
Plaintext
4268 lines
229 KiB
Plaintext
Resolved forward reference FONT_HEX_PROTO to (byte[]) FONT_HEX_PROTO
|
|
Resolved forward reference FONT_HEX_PROTO to (byte[]) FONT_HEX_PROTO
|
|
Fixing pointer array-indexing *((word[CORDIC_ITERATIONS_16]) CORDIC_ATAN2_ANGLES_16 + (byte) atan2_16::i)
|
|
Fixing pointer array-indexing *((word[CORDIC_ITERATIONS_16]) CORDIC_ATAN2_ANGLES_16 + (byte) atan2_16::i)
|
|
Warning! Adding boolean cast to non-boolean sub-expression (byte) atan2_16::shift
|
|
Inlined call (byte~) vicSelectGfxBank::$0 ← call toDd00 (byte*) vicSelectGfxBank::gfx
|
|
Inlined call (byte~) main::$1 ← call toD018 (byte*) SCREEN (byte*) CHARSET
|
|
Culled Empty Block (label) init_font_hex::@6
|
|
Culled Empty Block (label) atan2_16::@9
|
|
Culled Empty Block (label) atan2_16::@10
|
|
Culled Empty Block (label) atan2_16::@11
|
|
Culled Empty Block (label) atan2_16::@12
|
|
Culled Empty Block (label) atan2_16::@28
|
|
Culled Empty Block (label) atan2_16::@29
|
|
Culled Empty Block (label) atan2_16::@21
|
|
Culled Empty Block (label) atan2_16::@22
|
|
Culled Empty Block (label) atan2_16::@23
|
|
Culled Empty Block (label) atan2_16::@31
|
|
Culled Empty Block (label) atan2_16::@32
|
|
Culled Empty Block (label) atan2_16::@14
|
|
Culled Empty Block (label) @2
|
|
Culled Empty Block (label) @4
|
|
Culled Empty Block (label) @5
|
|
Culled Empty Block (label) @6
|
|
Culled Empty Block (label) main::toD0181_@1
|
|
Culled Empty Block (label) main::@8
|
|
Culled Empty Block (label) main::@7
|
|
Culled Empty Block (label) main::@9
|
|
Culled Empty Block (label) main::@10
|
|
|
|
CONTROL FLOW GRAPH SSA
|
|
@begin: scope:[] from
|
|
to:@1
|
|
init_font_hex: scope:[init_font_hex] from main
|
|
(byte*) init_font_hex::charset#6 ← phi( main/(byte*) init_font_hex::charset#1 )
|
|
(byte*) init_font_hex::proto_hi#0 ← (byte[]) FONT_HEX_PROTO#0
|
|
(byte) init_font_hex::c#0 ← (byte) 0
|
|
to:init_font_hex::@1
|
|
init_font_hex::@1: scope:[init_font_hex] from init_font_hex init_font_hex::@5
|
|
(byte) init_font_hex::c#6 ← phi( init_font_hex/(byte) init_font_hex::c#0 init_font_hex::@5/(byte) init_font_hex::c#1 )
|
|
(byte*) init_font_hex::proto_hi#6 ← phi( init_font_hex/(byte*) init_font_hex::proto_hi#0 init_font_hex::@5/(byte*) init_font_hex::proto_hi#1 )
|
|
(byte*) init_font_hex::charset#5 ← phi( init_font_hex/(byte*) init_font_hex::charset#6 init_font_hex::@5/(byte*) init_font_hex::charset#7 )
|
|
(byte*) init_font_hex::proto_lo#0 ← (byte[]) FONT_HEX_PROTO#0
|
|
(byte) init_font_hex::c1#0 ← (byte) 0
|
|
to:init_font_hex::@2
|
|
init_font_hex::@2: scope:[init_font_hex] from init_font_hex::@1 init_font_hex::@4
|
|
(byte) init_font_hex::c#5 ← phi( init_font_hex::@1/(byte) init_font_hex::c#6 init_font_hex::@4/(byte) init_font_hex::c#3 )
|
|
(byte) init_font_hex::c1#4 ← phi( init_font_hex::@1/(byte) init_font_hex::c1#0 init_font_hex::@4/(byte) init_font_hex::c1#1 )
|
|
(byte*) init_font_hex::proto_lo#4 ← phi( init_font_hex::@1/(byte*) init_font_hex::proto_lo#0 init_font_hex::@4/(byte*) init_font_hex::proto_lo#1 )
|
|
(byte*) init_font_hex::proto_hi#4 ← phi( init_font_hex::@1/(byte*) init_font_hex::proto_hi#6 init_font_hex::@4/(byte*) init_font_hex::proto_hi#5 )
|
|
(byte*) init_font_hex::charset#2 ← phi( init_font_hex::@1/(byte*) init_font_hex::charset#5 init_font_hex::@4/(byte*) init_font_hex::charset#0 )
|
|
(byte) init_font_hex::idx#0 ← (number) 0
|
|
*((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#0) ← (number) 0
|
|
(byte) init_font_hex::idx#1 ← ++ (byte) init_font_hex::idx#0
|
|
(byte) init_font_hex::i#0 ← (byte) 0
|
|
to:init_font_hex::@3
|
|
init_font_hex::@3: scope:[init_font_hex] from init_font_hex::@2 init_font_hex::@3
|
|
(byte) init_font_hex::c#4 ← phi( init_font_hex::@2/(byte) init_font_hex::c#5 init_font_hex::@3/(byte) init_font_hex::c#4 )
|
|
(byte) init_font_hex::c1#3 ← phi( init_font_hex::@2/(byte) init_font_hex::c1#4 init_font_hex::@3/(byte) init_font_hex::c1#3 )
|
|
(byte) init_font_hex::idx#5 ← phi( init_font_hex::@2/(byte) init_font_hex::idx#1 init_font_hex::@3/(byte) init_font_hex::idx#2 )
|
|
(byte*) init_font_hex::charset#3 ← phi( init_font_hex::@2/(byte*) init_font_hex::charset#2 init_font_hex::@3/(byte*) init_font_hex::charset#3 )
|
|
(byte*) init_font_hex::proto_lo#2 ← phi( init_font_hex::@2/(byte*) init_font_hex::proto_lo#4 init_font_hex::@3/(byte*) init_font_hex::proto_lo#2 )
|
|
(byte) init_font_hex::i#2 ← phi( init_font_hex::@2/(byte) init_font_hex::i#0 init_font_hex::@3/(byte) init_font_hex::i#1 )
|
|
(byte*) init_font_hex::proto_hi#2 ← phi( init_font_hex::@2/(byte*) init_font_hex::proto_hi#4 init_font_hex::@3/(byte*) init_font_hex::proto_hi#2 )
|
|
(byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#2 + (byte) init_font_hex::i#2) << (number) 4
|
|
(byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#2 + (byte) init_font_hex::i#2) << (number) 1
|
|
(byte~) init_font_hex::$2 ← (byte~) init_font_hex::$0 | (byte~) init_font_hex::$1
|
|
*((byte*) init_font_hex::charset#3 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2
|
|
(byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5
|
|
(byte) init_font_hex::i#1 ← (byte) init_font_hex::i#2 + rangenext(0,4)
|
|
(bool~) init_font_hex::$3 ← (byte) init_font_hex::i#1 != rangelast(0,4)
|
|
if((bool~) init_font_hex::$3) goto init_font_hex::@3
|
|
to:init_font_hex::@4
|
|
init_font_hex::@4: scope:[init_font_hex] from init_font_hex::@3
|
|
(byte) init_font_hex::c#3 ← phi( init_font_hex::@3/(byte) init_font_hex::c#4 )
|
|
(byte*) init_font_hex::proto_hi#5 ← phi( init_font_hex::@3/(byte*) init_font_hex::proto_hi#2 )
|
|
(byte) init_font_hex::c1#2 ← phi( init_font_hex::@3/(byte) init_font_hex::c1#3 )
|
|
(byte*) init_font_hex::proto_lo#3 ← phi( init_font_hex::@3/(byte*) init_font_hex::proto_lo#2 )
|
|
(byte) init_font_hex::idx#6 ← phi( init_font_hex::@3/(byte) init_font_hex::idx#2 )
|
|
(byte*) init_font_hex::charset#4 ← phi( init_font_hex::@3/(byte*) init_font_hex::charset#3 )
|
|
*((byte*) init_font_hex::charset#4 + (byte) init_font_hex::idx#6) ← (number) 0
|
|
(byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#6
|
|
*((byte*) init_font_hex::charset#4 + (byte) init_font_hex::idx#3) ← (number) 0
|
|
(byte) init_font_hex::idx#4 ← ++ (byte) init_font_hex::idx#3
|
|
(byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#3 + (number) 5
|
|
(byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#4 + (number) 8
|
|
(byte) init_font_hex::c1#1 ← (byte) init_font_hex::c1#2 + rangenext(0,$f)
|
|
(bool~) init_font_hex::$4 ← (byte) init_font_hex::c1#1 != rangelast(0,$f)
|
|
if((bool~) init_font_hex::$4) goto init_font_hex::@2
|
|
to:init_font_hex::@5
|
|
init_font_hex::@5: scope:[init_font_hex] from init_font_hex::@4
|
|
(byte*) init_font_hex::charset#7 ← phi( init_font_hex::@4/(byte*) init_font_hex::charset#0 )
|
|
(byte) init_font_hex::c#2 ← phi( init_font_hex::@4/(byte) init_font_hex::c#3 )
|
|
(byte*) init_font_hex::proto_hi#3 ← phi( init_font_hex::@4/(byte*) init_font_hex::proto_hi#5 )
|
|
(byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#3 + (number) 5
|
|
(byte) init_font_hex::c#1 ← (byte) init_font_hex::c#2 + rangenext(0,$f)
|
|
(bool~) init_font_hex::$5 ← (byte) init_font_hex::c#1 != rangelast(0,$f)
|
|
if((bool~) init_font_hex::$5) goto init_font_hex::@1
|
|
to:init_font_hex::@return
|
|
init_font_hex::@return: scope:[init_font_hex] from init_font_hex::@5
|
|
return
|
|
to:@return
|
|
@1: scope:[] from @begin
|
|
(byte[]) FONT_HEX_PROTO#0 ← { (number) 2, (number) 5, (number) 5, (number) 5, (number) 2, (number) 6, (number) 2, (number) 2, (number) 2, (number) 7, (number) 6, (number) 1, (number) 2, (number) 4, (number) 7, (number) 6, (number) 1, (number) 2, (number) 1, (number) 6, (number) 5, (number) 5, (number) 7, (number) 1, (number) 1, (number) 7, (number) 4, (number) 6, (number) 1, (number) 6, (number) 3, (number) 4, (number) 6, (number) 5, (number) 2, (number) 7, (number) 1, (number) 1, (number) 1, (number) 1, (number) 2, (number) 5, (number) 2, (number) 5, (number) 2, (number) 2, (number) 5, (number) 3, (number) 1, (number) 1, (number) 2, (number) 5, (number) 7, (number) 5, (number) 5, (number) 6, (number) 5, (number) 6, (number) 5, (number) 6, (number) 2, (number) 5, (number) 4, (number) 5, (number) 2, (number) 6, (number) 5, (number) 5, (number) 5, (number) 6, (number) 7, (number) 4, (number) 6, (number) 4, (number) 7, (number) 7, (number) 4, (number) 6, (number) 4, (number) 4 }
|
|
(byte) CORDIC_ITERATIONS_16#0 ← (number) $f
|
|
(word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 ← kickasm {{ .for (var i=0; i<CORDIC_ITERATIONS_16; i++)
|
|
.word 256*2*256*atan(1/pow(2,i))/PI/2
|
|
}}
|
|
to:@3
|
|
atan2_16: scope:[atan2_16] from main::@2
|
|
(signed word) atan2_16::x#9 ← phi( main::@2/(signed word) atan2_16::x#0 )
|
|
(signed word) atan2_16::y#1 ← phi( main::@2/(signed word) atan2_16::y#0 )
|
|
(bool~) atan2_16::$0 ← (signed word) atan2_16::y#1 >= (number) 0
|
|
if((bool~) atan2_16::$0) goto atan2_16::@1
|
|
to:atan2_16::@2
|
|
atan2_16::@1: scope:[atan2_16] from atan2_16
|
|
(signed word) atan2_16::x#5 ← phi( atan2_16/(signed word) atan2_16::x#9 )
|
|
(signed word) atan2_16::y#2 ← phi( atan2_16/(signed word) atan2_16::y#1 )
|
|
(signed word~) atan2_16::$3 ← (signed word) atan2_16::y#2
|
|
to:atan2_16::@3
|
|
atan2_16::@2: scope:[atan2_16] from atan2_16
|
|
(signed word) atan2_16::x#6 ← phi( atan2_16/(signed word) atan2_16::x#9 )
|
|
(signed word) atan2_16::y#3 ← phi( atan2_16/(signed word) atan2_16::y#1 )
|
|
(signed word~) atan2_16::$1 ← - (signed word) atan2_16::y#3
|
|
(signed word~) atan2_16::$2 ← (signed word~) atan2_16::$1
|
|
to:atan2_16::@3
|
|
atan2_16::@3: scope:[atan2_16] from atan2_16::@1 atan2_16::@2
|
|
(signed word) atan2_16::y#15 ← phi( atan2_16::@1/(signed word) atan2_16::y#2 atan2_16::@2/(signed word) atan2_16::y#3 )
|
|
(signed word) atan2_16::x#1 ← phi( atan2_16::@1/(signed word) atan2_16::x#5 atan2_16::@2/(signed word) atan2_16::x#6 )
|
|
(signed word~) atan2_16::$4 ← phi( atan2_16::@1/(signed word~) atan2_16::$3 atan2_16::@2/(signed word~) atan2_16::$2 )
|
|
(signed word) atan2_16::yi#0 ← (signed word~) atan2_16::$4
|
|
(bool~) atan2_16::$5 ← (signed word) atan2_16::x#1 >= (number) 0
|
|
if((bool~) atan2_16::$5) goto atan2_16::@4
|
|
to:atan2_16::@5
|
|
atan2_16::@4: scope:[atan2_16] from atan2_16::@3
|
|
(signed word) atan2_16::y#12 ← phi( atan2_16::@3/(signed word) atan2_16::y#15 )
|
|
(signed word) atan2_16::yi#12 ← phi( atan2_16::@3/(signed word) atan2_16::yi#0 )
|
|
(signed word) atan2_16::x#2 ← phi( atan2_16::@3/(signed word) atan2_16::x#1 )
|
|
(signed word~) atan2_16::$8 ← (signed word) atan2_16::x#2
|
|
to:atan2_16::@6
|
|
atan2_16::@5: scope:[atan2_16] from atan2_16::@3
|
|
(signed word) atan2_16::y#13 ← phi( atan2_16::@3/(signed word) atan2_16::y#15 )
|
|
(signed word) atan2_16::yi#13 ← phi( atan2_16::@3/(signed word) atan2_16::yi#0 )
|
|
(signed word) atan2_16::x#3 ← phi( atan2_16::@3/(signed word) atan2_16::x#1 )
|
|
(signed word~) atan2_16::$6 ← - (signed word) atan2_16::x#3
|
|
(signed word~) atan2_16::$7 ← (signed word~) atan2_16::$6
|
|
to:atan2_16::@6
|
|
atan2_16::@6: scope:[atan2_16] from atan2_16::@4 atan2_16::@5
|
|
(signed word) atan2_16::y#9 ← phi( atan2_16::@4/(signed word) atan2_16::y#12 atan2_16::@5/(signed word) atan2_16::y#13 )
|
|
(signed word) atan2_16::x#10 ← phi( atan2_16::@4/(signed word) atan2_16::x#2 atan2_16::@5/(signed word) atan2_16::x#3 )
|
|
(signed word) atan2_16::yi#9 ← phi( atan2_16::@4/(signed word) atan2_16::yi#12 atan2_16::@5/(signed word) atan2_16::yi#13 )
|
|
(signed word~) atan2_16::$9 ← phi( atan2_16::@4/(signed word~) atan2_16::$8 atan2_16::@5/(signed word~) atan2_16::$7 )
|
|
(signed word) atan2_16::xi#0 ← (signed word~) atan2_16::$9
|
|
(word) atan2_16::angle#0 ← (number) 0
|
|
(number~) atan2_16::$16 ← (byte) CORDIC_ITERATIONS_16#0 - (number) 1
|
|
(byte) atan2_16::i#0 ← (byte) 0
|
|
to:atan2_16::@15
|
|
atan2_16::@15: scope:[atan2_16] from atan2_16::@27 atan2_16::@6
|
|
(signed word) atan2_16::y#7 ← phi( atan2_16::@27/(signed word) atan2_16::y#8 atan2_16::@6/(signed word) atan2_16::y#9 )
|
|
(signed word) atan2_16::x#7 ← phi( atan2_16::@27/(signed word) atan2_16::x#8 atan2_16::@6/(signed word) atan2_16::x#10 )
|
|
(word) atan2_16::angle#12 ← phi( atan2_16::@27/(word) atan2_16::angle#13 atan2_16::@6/(word) atan2_16::angle#0 )
|
|
(byte) atan2_16::i#6 ← phi( atan2_16::@27/(byte) atan2_16::i#1 atan2_16::@6/(byte) atan2_16::i#0 )
|
|
(signed word) atan2_16::xi#6 ← phi( atan2_16::@27/(signed word) atan2_16::xi#8 atan2_16::@6/(signed word) atan2_16::xi#0 )
|
|
(signed word) atan2_16::yi#3 ← phi( atan2_16::@27/(signed word) atan2_16::yi#8 atan2_16::@6/(signed word) atan2_16::yi#9 )
|
|
(bool~) atan2_16::$17 ← (signed word) atan2_16::yi#3 == (number) 0
|
|
(bool~) atan2_16::$18 ← ! (bool~) atan2_16::$17
|
|
if((bool~) atan2_16::$18) goto atan2_16::@16
|
|
to:atan2_16::@17
|
|
atan2_16::@16: scope:[atan2_16] from atan2_16::@15
|
|
(signed word) atan2_16::y#19 ← phi( atan2_16::@15/(signed word) atan2_16::y#7 )
|
|
(signed word) atan2_16::x#17 ← phi( atan2_16::@15/(signed word) atan2_16::x#7 )
|
|
(word) atan2_16::angle#19 ← phi( atan2_16::@15/(word) atan2_16::angle#12 )
|
|
(byte) atan2_16::i#2 ← phi( atan2_16::@15/(byte) atan2_16::i#6 )
|
|
(signed word) atan2_16::yi#4 ← phi( atan2_16::@15/(signed word) atan2_16::yi#3 )
|
|
(signed word) atan2_16::xi#3 ← phi( atan2_16::@15/(signed word) atan2_16::xi#6 )
|
|
(signed word) atan2_16::xd#0 ← (signed word) atan2_16::xi#3
|
|
(signed word) atan2_16::yd#0 ← (signed word) atan2_16::yi#4
|
|
(byte) atan2_16::shift#0 ← (byte) atan2_16::i#2
|
|
to:atan2_16::@18
|
|
atan2_16::@17: scope:[atan2_16] from atan2_16::@15 atan2_16::@27
|
|
(signed word) atan2_16::y#5 ← phi( atan2_16::@15/(signed word) atan2_16::y#7 atan2_16::@27/(signed word) atan2_16::y#8 )
|
|
(signed word) atan2_16::x#4 ← phi( atan2_16::@15/(signed word) atan2_16::x#7 atan2_16::@27/(signed word) atan2_16::x#8 )
|
|
(word) atan2_16::angle#6 ← phi( atan2_16::@15/(word) atan2_16::angle#12 atan2_16::@27/(word) atan2_16::angle#13 )
|
|
(word) atan2_16::angle#1 ← (word) atan2_16::angle#6 / (number) 2
|
|
(bool~) atan2_16::$10 ← (signed word) atan2_16::x#4 < (number) 0
|
|
(bool~) atan2_16::$11 ← ! (bool~) atan2_16::$10
|
|
if((bool~) atan2_16::$11) goto atan2_16::@7
|
|
to:atan2_16::@33
|
|
atan2_16::@18: scope:[atan2_16] from atan2_16::@16 atan2_16::@19
|
|
(signed word) atan2_16::y#18 ← phi( atan2_16::@16/(signed word) atan2_16::y#19 atan2_16::@19/(signed word) atan2_16::y#20 )
|
|
(signed word) atan2_16::x#16 ← phi( atan2_16::@16/(signed word) atan2_16::x#17 atan2_16::@19/(signed word) atan2_16::x#18 )
|
|
(word) atan2_16::angle#18 ← phi( atan2_16::@16/(word) atan2_16::angle#19 atan2_16::@19/(word) atan2_16::angle#20 )
|
|
(byte) atan2_16::i#10 ← phi( atan2_16::@16/(byte) atan2_16::i#2 atan2_16::@19/(byte) atan2_16::i#11 )
|
|
(signed word) atan2_16::xi#11 ← phi( atan2_16::@16/(signed word) atan2_16::xi#3 atan2_16::@19/(signed word) atan2_16::xi#12 )
|
|
(signed word) atan2_16::yi#14 ← phi( atan2_16::@16/(signed word) atan2_16::yi#4 atan2_16::@19/(signed word) atan2_16::yi#15 )
|
|
(signed word) atan2_16::yd#7 ← phi( atan2_16::@16/(signed word) atan2_16::yd#0 atan2_16::@19/(signed word) atan2_16::yd#1 )
|
|
(signed word) atan2_16::xd#7 ← phi( atan2_16::@16/(signed word) atan2_16::xd#0 atan2_16::@19/(signed word) atan2_16::xd#1 )
|
|
(byte) atan2_16::shift#2 ← phi( atan2_16::@16/(byte) atan2_16::shift#0 atan2_16::@19/(byte) atan2_16::shift#1 )
|
|
(bool~) atan2_16::$19 ← (byte) atan2_16::shift#2 >= (number) 2
|
|
if((bool~) atan2_16::$19) goto atan2_16::@19
|
|
to:atan2_16::@20
|
|
atan2_16::@19: scope:[atan2_16] from atan2_16::@18
|
|
(signed word) atan2_16::y#20 ← phi( atan2_16::@18/(signed word) atan2_16::y#18 )
|
|
(signed word) atan2_16::x#18 ← phi( atan2_16::@18/(signed word) atan2_16::x#16 )
|
|
(word) atan2_16::angle#20 ← phi( atan2_16::@18/(word) atan2_16::angle#18 )
|
|
(byte) atan2_16::i#11 ← phi( atan2_16::@18/(byte) atan2_16::i#10 )
|
|
(signed word) atan2_16::xi#12 ← phi( atan2_16::@18/(signed word) atan2_16::xi#11 )
|
|
(signed word) atan2_16::yi#15 ← phi( atan2_16::@18/(signed word) atan2_16::yi#14 )
|
|
(byte) atan2_16::shift#3 ← phi( atan2_16::@18/(byte) atan2_16::shift#2 )
|
|
(signed word) atan2_16::yd#3 ← phi( atan2_16::@18/(signed word) atan2_16::yd#7 )
|
|
(signed word) atan2_16::xd#3 ← phi( atan2_16::@18/(signed word) atan2_16::xd#7 )
|
|
(signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (number) 2
|
|
(signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (number) 2
|
|
(byte) atan2_16::shift#1 ← (byte) atan2_16::shift#3 - (number) 2
|
|
to:atan2_16::@18
|
|
atan2_16::@20: scope:[atan2_16] from atan2_16::@18
|
|
(signed word) atan2_16::y#16 ← phi( atan2_16::@18/(signed word) atan2_16::y#18 )
|
|
(signed word) atan2_16::x#14 ← phi( atan2_16::@18/(signed word) atan2_16::x#16 )
|
|
(word) atan2_16::angle#16 ← phi( atan2_16::@18/(word) atan2_16::angle#18 )
|
|
(byte) atan2_16::i#8 ← phi( atan2_16::@18/(byte) atan2_16::i#10 )
|
|
(signed word) atan2_16::xi#9 ← phi( atan2_16::@18/(signed word) atan2_16::xi#11 )
|
|
(signed word) atan2_16::yd#8 ← phi( atan2_16::@18/(signed word) atan2_16::yd#7 )
|
|
(signed word) atan2_16::xd#8 ← phi( atan2_16::@18/(signed word) atan2_16::xd#7 )
|
|
(signed word) atan2_16::yi#10 ← phi( atan2_16::@18/(signed word) atan2_16::yi#14 )
|
|
(byte) atan2_16::shift#4 ← phi( atan2_16::@18/(byte) atan2_16::shift#2 )
|
|
(bool~) atan2_16::$25 ← (number) 0 != (byte) atan2_16::shift#4
|
|
(bool~) atan2_16::$20 ← ! (bool~) atan2_16::$25
|
|
if((bool~) atan2_16::$20) goto atan2_16::@25
|
|
to:atan2_16::@24
|
|
atan2_16::@25: scope:[atan2_16] from atan2_16::@20 atan2_16::@24
|
|
(signed word) atan2_16::y#14 ← phi( atan2_16::@20/(signed word) atan2_16::y#16 atan2_16::@24/(signed word) atan2_16::y#17 )
|
|
(signed word) atan2_16::x#13 ← phi( atan2_16::@20/(signed word) atan2_16::x#14 atan2_16::@24/(signed word) atan2_16::x#15 )
|
|
(word) atan2_16::angle#14 ← phi( atan2_16::@20/(word) atan2_16::angle#16 atan2_16::@24/(word) atan2_16::angle#17 )
|
|
(byte) atan2_16::i#7 ← phi( atan2_16::@20/(byte) atan2_16::i#8 atan2_16::@24/(byte) atan2_16::i#9 )
|
|
(signed word) atan2_16::xd#9 ← phi( atan2_16::@20/(signed word) atan2_16::xd#8 atan2_16::@24/(signed word) atan2_16::xd#2 )
|
|
(signed word) atan2_16::yd#9 ← phi( atan2_16::@20/(signed word) atan2_16::yd#8 atan2_16::@24/(signed word) atan2_16::yd#2 )
|
|
(signed word) atan2_16::xi#7 ← phi( atan2_16::@20/(signed word) atan2_16::xi#9 atan2_16::@24/(signed word) atan2_16::xi#10 )
|
|
(signed word) atan2_16::yi#5 ← phi( atan2_16::@20/(signed word) atan2_16::yi#10 atan2_16::@24/(signed word) atan2_16::yi#11 )
|
|
(bool~) atan2_16::$21 ← (signed word) atan2_16::yi#5 >= (number) 0
|
|
if((bool~) atan2_16::$21) goto atan2_16::@26
|
|
to:atan2_16::@30
|
|
atan2_16::@24: scope:[atan2_16] from atan2_16::@20
|
|
(signed word) atan2_16::y#17 ← phi( atan2_16::@20/(signed word) atan2_16::y#16 )
|
|
(signed word) atan2_16::x#15 ← phi( atan2_16::@20/(signed word) atan2_16::x#14 )
|
|
(word) atan2_16::angle#17 ← phi( atan2_16::@20/(word) atan2_16::angle#16 )
|
|
(byte) atan2_16::i#9 ← phi( atan2_16::@20/(byte) atan2_16::i#8 )
|
|
(signed word) atan2_16::xi#10 ← phi( atan2_16::@20/(signed word) atan2_16::xi#9 )
|
|
(signed word) atan2_16::yi#11 ← phi( atan2_16::@20/(signed word) atan2_16::yi#10 )
|
|
(signed word) atan2_16::yd#4 ← phi( atan2_16::@20/(signed word) atan2_16::yd#8 )
|
|
(signed word) atan2_16::xd#4 ← phi( atan2_16::@20/(signed word) atan2_16::xd#8 )
|
|
(signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#4 >> (number) 1
|
|
(signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#4 >> (number) 1
|
|
to:atan2_16::@25
|
|
atan2_16::@26: scope:[atan2_16] from atan2_16::@25
|
|
(signed word) atan2_16::y#10 ← phi( atan2_16::@25/(signed word) atan2_16::y#14 )
|
|
(signed word) atan2_16::x#11 ← phi( atan2_16::@25/(signed word) atan2_16::x#13 )
|
|
(word) atan2_16::angle#7 ← phi( atan2_16::@25/(word) atan2_16::angle#14 )
|
|
(byte) atan2_16::i#3 ← phi( atan2_16::@25/(byte) atan2_16::i#7 )
|
|
(signed word) atan2_16::xd#5 ← phi( atan2_16::@25/(signed word) atan2_16::xd#9 )
|
|
(signed word) atan2_16::yi#6 ← phi( atan2_16::@25/(signed word) atan2_16::yi#5 )
|
|
(signed word) atan2_16::yd#5 ← phi( atan2_16::@25/(signed word) atan2_16::yd#9 )
|
|
(signed word) atan2_16::xi#4 ← phi( atan2_16::@25/(signed word) atan2_16::xi#7 )
|
|
(signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#4 + (signed word) atan2_16::yd#5
|
|
(signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#6 - (signed word) atan2_16::xd#5
|
|
(byte~) atan2_16::$23 ← (byte) atan2_16::i#3 * (const byte) SIZEOF_WORD
|
|
(word) atan2_16::angle#2 ← (word) atan2_16::angle#7 + *((word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23)
|
|
to:atan2_16::@27
|
|
atan2_16::@30: scope:[atan2_16] from atan2_16::@25
|
|
(signed word) atan2_16::y#11 ← phi( atan2_16::@25/(signed word) atan2_16::y#14 )
|
|
(signed word) atan2_16::x#12 ← phi( atan2_16::@25/(signed word) atan2_16::x#13 )
|
|
(word) atan2_16::angle#8 ← phi( atan2_16::@25/(word) atan2_16::angle#14 )
|
|
(byte) atan2_16::i#4 ← phi( atan2_16::@25/(byte) atan2_16::i#7 )
|
|
(signed word) atan2_16::xd#6 ← phi( atan2_16::@25/(signed word) atan2_16::xd#9 )
|
|
(signed word) atan2_16::yi#7 ← phi( atan2_16::@25/(signed word) atan2_16::yi#5 )
|
|
(signed word) atan2_16::yd#6 ← phi( atan2_16::@25/(signed word) atan2_16::yd#9 )
|
|
(signed word) atan2_16::xi#5 ← phi( atan2_16::@25/(signed word) atan2_16::xi#7 )
|
|
(signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#5 - (signed word) atan2_16::yd#6
|
|
(signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#7 + (signed word) atan2_16::xd#6
|
|
(byte~) atan2_16::$24 ← (byte) atan2_16::i#4 * (const byte) SIZEOF_WORD
|
|
(word) atan2_16::angle#3 ← (word) atan2_16::angle#8 - *((word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24)
|
|
to:atan2_16::@27
|
|
atan2_16::@27: scope:[atan2_16] from atan2_16::@26 atan2_16::@30
|
|
(signed word) atan2_16::y#8 ← phi( atan2_16::@26/(signed word) atan2_16::y#10 atan2_16::@30/(signed word) atan2_16::y#11 )
|
|
(signed word) atan2_16::xi#8 ← phi( atan2_16::@26/(signed word) atan2_16::xi#1 atan2_16::@30/(signed word) atan2_16::xi#2 )
|
|
(signed word) atan2_16::x#8 ← phi( atan2_16::@26/(signed word) atan2_16::x#11 atan2_16::@30/(signed word) atan2_16::x#12 )
|
|
(word) atan2_16::angle#13 ← phi( atan2_16::@26/(word) atan2_16::angle#2 atan2_16::@30/(word) atan2_16::angle#3 )
|
|
(signed word) atan2_16::yi#8 ← phi( atan2_16::@26/(signed word) atan2_16::yi#1 atan2_16::@30/(signed word) atan2_16::yi#2 )
|
|
(byte) atan2_16::i#5 ← phi( atan2_16::@26/(byte) atan2_16::i#3 atan2_16::@30/(byte) atan2_16::i#4 )
|
|
(byte) atan2_16::i#1 ← (byte) atan2_16::i#5 + rangenext(0,atan2_16::$16)
|
|
(bool~) atan2_16::$22 ← (byte) atan2_16::i#1 != rangelast(0,atan2_16::$16)
|
|
if((bool~) atan2_16::$22) goto atan2_16::@15
|
|
to:atan2_16::@17
|
|
atan2_16::@7: scope:[atan2_16] from atan2_16::@17 atan2_16::@33
|
|
(word) atan2_16::angle#15 ← phi( atan2_16::@17/(word) atan2_16::angle#1 atan2_16::@33/(word) atan2_16::angle#4 )
|
|
(signed word) atan2_16::y#4 ← phi( atan2_16::@17/(signed word) atan2_16::y#5 atan2_16::@33/(signed word) atan2_16::y#6 )
|
|
(bool~) atan2_16::$13 ← (signed word) atan2_16::y#4 < (number) 0
|
|
(bool~) atan2_16::$14 ← ! (bool~) atan2_16::$13
|
|
if((bool~) atan2_16::$14) goto atan2_16::@8
|
|
to:atan2_16::@13
|
|
atan2_16::@33: scope:[atan2_16] from atan2_16::@17
|
|
(signed word) atan2_16::y#6 ← phi( atan2_16::@17/(signed word) atan2_16::y#5 )
|
|
(word) atan2_16::angle#9 ← phi( atan2_16::@17/(word) atan2_16::angle#1 )
|
|
(number~) atan2_16::$12 ← (number) $8000 - (word) atan2_16::angle#9
|
|
(word) atan2_16::angle#4 ← (number~) atan2_16::$12
|
|
to:atan2_16::@7
|
|
atan2_16::@8: scope:[atan2_16] from atan2_16::@13 atan2_16::@7
|
|
(word) atan2_16::angle#10 ← phi( atan2_16::@13/(word) atan2_16::angle#5 atan2_16::@7/(word) atan2_16::angle#15 )
|
|
(word) atan2_16::return#0 ← (word) atan2_16::angle#10
|
|
to:atan2_16::@return
|
|
atan2_16::@13: scope:[atan2_16] from atan2_16::@7
|
|
(word) atan2_16::angle#11 ← phi( atan2_16::@7/(word) atan2_16::angle#15 )
|
|
(word~) atan2_16::$15 ← - (word) atan2_16::angle#11
|
|
(word) atan2_16::angle#5 ← (word~) atan2_16::$15
|
|
to:atan2_16::@8
|
|
atan2_16::@return: scope:[atan2_16] from atan2_16::@8
|
|
(word) atan2_16::return#3 ← phi( atan2_16::@8/(word) atan2_16::return#0 )
|
|
(word) atan2_16::return#1 ← (word) atan2_16::return#3
|
|
return
|
|
to:@return
|
|
@3: scope:[] from @1
|
|
(byte*) D018#0 ← ((byte*)) (number) $d018
|
|
(byte*) COLS#0 ← ((byte*)) (number) $d800
|
|
to:@7
|
|
@7: scope:[] from @3
|
|
(byte*) CHARSET#0 ← ((byte*)) (number) $2000
|
|
(byte*) SCREEN#0 ← ((byte*)) (number) $2800
|
|
to:@8
|
|
main: scope:[main] from @8
|
|
(byte*) init_font_hex::charset#1 ← (byte*) CHARSET#0
|
|
call init_font_hex
|
|
to:main::@12
|
|
main::@12: scope:[main] from main
|
|
(byte*) main::toD0181_screen#0 ← (byte*) SCREEN#0
|
|
(byte*) main::toD0181_gfx#0 ← (byte*) CHARSET#0
|
|
to:main::toD0181
|
|
main::toD0181: scope:[main] from main::@12
|
|
(byte*) main::toD0181_gfx#1 ← phi( main::@12/(byte*) main::toD0181_gfx#0 )
|
|
(byte*) main::toD0181_screen#1 ← phi( main::@12/(byte*) main::toD0181_screen#0 )
|
|
(word~) main::toD0181_$0#0 ← ((word)) (byte*) main::toD0181_screen#1
|
|
(number~) main::toD0181_$1#0 ← (word~) main::toD0181_$0#0 & (number) $3fff
|
|
(number~) main::toD0181_$2#0 ← (number~) main::toD0181_$1#0 * (number) 4
|
|
(number~) main::toD0181_$3#0 ← > (number~) main::toD0181_$2#0
|
|
(word~) main::toD0181_$4#0 ← ((word)) (byte*) main::toD0181_gfx#1
|
|
(byte~) main::toD0181_$5#0 ← > (word~) main::toD0181_$4#0
|
|
(number~) main::toD0181_$6#0 ← (byte~) main::toD0181_$5#0 / (number) 4
|
|
(number~) main::toD0181_$7#0 ← (number~) main::toD0181_$6#0 & (number) $f
|
|
(number~) main::toD0181_$8#0 ← (number~) main::toD0181_$3#0 | (number~) main::toD0181_$7#0
|
|
(byte) main::toD0181_return#0 ← (number~) main::toD0181_$8#0
|
|
to:main::toD0181_@return
|
|
main::toD0181_@return: scope:[main] from main::toD0181
|
|
(byte) main::toD0181_return#2 ← phi( main::toD0181/(byte) main::toD0181_return#0 )
|
|
(byte) main::toD0181_return#1 ← (byte) main::toD0181_return#2
|
|
to:main::@11
|
|
main::@11: scope:[main] from main::toD0181_@return
|
|
(byte) main::toD0181_return#3 ← phi( main::toD0181_@return/(byte) main::toD0181_return#1 )
|
|
(byte~) main::$1 ← (byte) main::toD0181_return#3
|
|
*((byte*) D018#0) ← (byte~) main::$1
|
|
(byte*) main::screen#0 ← (byte*) SCREEN#0
|
|
(signed byte) main::y#0 ← (signed byte) -$c
|
|
to:main::@1
|
|
main::@1: scope:[main] from main::@11 main::@3
|
|
(byte*) main::screen#4 ← phi( main::@11/(byte*) main::screen#0 main::@3/(byte*) main::screen#5 )
|
|
(signed byte) main::y#4 ← phi( main::@11/(signed byte) main::y#0 main::@3/(signed byte) main::y#1 )
|
|
(signed byte) main::x#0 ← (signed byte) -$13
|
|
to:main::@2
|
|
main::@2: scope:[main] from main::@1 main::@13
|
|
(byte*) main::screen#3 ← phi( main::@1/(byte*) main::screen#4 main::@13/(byte*) main::screen#1 )
|
|
(signed byte) main::y#2 ← phi( main::@1/(signed byte) main::y#4 main::@13/(signed byte) main::y#5 )
|
|
(signed byte) main::x#2 ← phi( main::@1/(signed byte) main::x#0 main::@13/(signed byte) main::x#1 )
|
|
(byte~) main::$4 ← ((byte)) (signed byte) main::x#2
|
|
(word~) main::$5 ← ((word)) { (byte~) main::$4, (number) 0 }
|
|
(signed word~) main::$6 ← ((signed word)) (word~) main::$5
|
|
(signed word) main::xw#0 ← (signed word~) main::$6
|
|
(byte~) main::$7 ← ((byte)) (signed byte) main::y#2
|
|
(word~) main::$8 ← ((word)) { (byte~) main::$7, (number) 0 }
|
|
(signed word~) main::$9 ← ((signed word)) (word~) main::$8
|
|
(signed word) main::yw#0 ← (signed word~) main::$9
|
|
(signed word) atan2_16::x#0 ← (signed word) main::xw#0
|
|
(signed word) atan2_16::y#0 ← (signed word) main::yw#0
|
|
call atan2_16
|
|
(word) atan2_16::return#2 ← (word) atan2_16::return#1
|
|
to:main::@13
|
|
main::@13: scope:[main] from main::@2
|
|
(signed byte) main::y#5 ← phi( main::@2/(signed byte) main::y#2 )
|
|
(signed byte) main::x#3 ← phi( main::@2/(signed byte) main::x#2 )
|
|
(byte*) main::screen#2 ← phi( main::@2/(byte*) main::screen#3 )
|
|
(word) atan2_16::return#4 ← phi( main::@2/(word) atan2_16::return#2 )
|
|
(word~) main::$10 ← (word) atan2_16::return#4
|
|
(word) main::angle_w#0 ← (word~) main::$10
|
|
(number~) main::$11 ← (word) main::angle_w#0 + (number) $80
|
|
(number~) main::$12 ← > (number~) main::$11
|
|
(byte) main::ang_w#0 ← (number~) main::$12
|
|
*((byte*) main::screen#2) ← (byte) main::ang_w#0
|
|
(byte*) main::screen#1 ← ++ (byte*) main::screen#2
|
|
(signed byte) main::x#1 ← (signed byte) main::x#3 + rangenext(-$13,$14)
|
|
(bool~) main::$13 ← (signed byte) main::x#1 != rangelast(-$13,$14)
|
|
if((bool~) main::$13) goto main::@2
|
|
to:main::@3
|
|
main::@3: scope:[main] from main::@13
|
|
(byte*) main::screen#5 ← phi( main::@13/(byte*) main::screen#1 )
|
|
(signed byte) main::y#3 ← phi( main::@13/(signed byte) main::y#5 )
|
|
(signed byte) main::y#1 ← (signed byte) main::y#3 + rangenext(-$c,$c)
|
|
(bool~) main::$14 ← (signed byte) main::y#1 != rangelast(-$c,$c)
|
|
if((bool~) main::$14) goto main::@1
|
|
to:main::@4
|
|
main::@4: scope:[main] from main::@3
|
|
(byte*~) main::$2 ← (byte*) COLS#0 + (number) $c*(number) $28
|
|
(byte*~) main::$3 ← (byte*~) main::$2 + (number) $13
|
|
(byte*) main::col00#0 ← (byte*~) main::$3
|
|
to:main::@5
|
|
main::@5: scope:[main] from main::@4 main::@6
|
|
(byte*) main::col00#2 ← phi( main::@4/(byte*) main::col00#0 main::@6/(byte*) main::col00#1 )
|
|
if(true) goto main::@6
|
|
to:main::@return
|
|
main::@6: scope:[main] from main::@5
|
|
(byte*) main::col00#1 ← phi( main::@5/(byte*) main::col00#2 )
|
|
*((byte*) main::col00#1) ← ++ *((byte*) main::col00#1)
|
|
to:main::@5
|
|
main::@return: scope:[main] from main::@5
|
|
return
|
|
to:@return
|
|
@8: scope:[] from @7
|
|
call main
|
|
to:@9
|
|
@9: scope:[] from @8
|
|
to:@end
|
|
@end: scope:[] from @9
|
|
|
|
SYMBOL TABLE SSA
|
|
(label) @1
|
|
(label) @3
|
|
(label) @7
|
|
(label) @8
|
|
(label) @9
|
|
(label) @begin
|
|
(label) @end
|
|
(byte*) CHARSET
|
|
(byte*) CHARSET#0
|
|
(byte*) COLS
|
|
(byte*) COLS#0
|
|
(word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16
|
|
(word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0
|
|
(byte) CORDIC_ITERATIONS_16
|
|
(byte) CORDIC_ITERATIONS_16#0
|
|
(byte*) D018
|
|
(byte*) D018#0
|
|
(byte[]) FONT_HEX_PROTO
|
|
(byte[]) FONT_HEX_PROTO#0
|
|
(byte*) SCREEN
|
|
(byte*) SCREEN#0
|
|
(const byte) SIZEOF_WORD = (byte) 2
|
|
(word()) atan2_16((signed word) atan2_16::x , (signed word) atan2_16::y)
|
|
(bool~) atan2_16::$0
|
|
(signed word~) atan2_16::$1
|
|
(bool~) atan2_16::$10
|
|
(bool~) atan2_16::$11
|
|
(number~) atan2_16::$12
|
|
(bool~) atan2_16::$13
|
|
(bool~) atan2_16::$14
|
|
(word~) atan2_16::$15
|
|
(number~) atan2_16::$16
|
|
(bool~) atan2_16::$17
|
|
(bool~) atan2_16::$18
|
|
(bool~) atan2_16::$19
|
|
(signed word~) atan2_16::$2
|
|
(bool~) atan2_16::$20
|
|
(bool~) atan2_16::$21
|
|
(bool~) atan2_16::$22
|
|
(byte~) atan2_16::$23
|
|
(byte~) atan2_16::$24
|
|
(bool~) atan2_16::$25
|
|
(signed word~) atan2_16::$3
|
|
(signed word~) atan2_16::$4
|
|
(bool~) atan2_16::$5
|
|
(signed word~) atan2_16::$6
|
|
(signed word~) atan2_16::$7
|
|
(signed word~) atan2_16::$8
|
|
(signed word~) atan2_16::$9
|
|
(label) atan2_16::@1
|
|
(label) atan2_16::@13
|
|
(label) atan2_16::@15
|
|
(label) atan2_16::@16
|
|
(label) atan2_16::@17
|
|
(label) atan2_16::@18
|
|
(label) atan2_16::@19
|
|
(label) atan2_16::@2
|
|
(label) atan2_16::@20
|
|
(label) atan2_16::@24
|
|
(label) atan2_16::@25
|
|
(label) atan2_16::@26
|
|
(label) atan2_16::@27
|
|
(label) atan2_16::@3
|
|
(label) atan2_16::@30
|
|
(label) atan2_16::@33
|
|
(label) atan2_16::@4
|
|
(label) atan2_16::@5
|
|
(label) atan2_16::@6
|
|
(label) atan2_16::@7
|
|
(label) atan2_16::@8
|
|
(label) atan2_16::@return
|
|
(word) atan2_16::angle
|
|
(word) atan2_16::angle#0
|
|
(word) atan2_16::angle#1
|
|
(word) atan2_16::angle#10
|
|
(word) atan2_16::angle#11
|
|
(word) atan2_16::angle#12
|
|
(word) atan2_16::angle#13
|
|
(word) atan2_16::angle#14
|
|
(word) atan2_16::angle#15
|
|
(word) atan2_16::angle#16
|
|
(word) atan2_16::angle#17
|
|
(word) atan2_16::angle#18
|
|
(word) atan2_16::angle#19
|
|
(word) atan2_16::angle#2
|
|
(word) atan2_16::angle#20
|
|
(word) atan2_16::angle#3
|
|
(word) atan2_16::angle#4
|
|
(word) atan2_16::angle#5
|
|
(word) atan2_16::angle#6
|
|
(word) atan2_16::angle#7
|
|
(word) atan2_16::angle#8
|
|
(word) atan2_16::angle#9
|
|
(byte) atan2_16::i
|
|
(byte) atan2_16::i#0
|
|
(byte) atan2_16::i#1
|
|
(byte) atan2_16::i#10
|
|
(byte) atan2_16::i#11
|
|
(byte) atan2_16::i#2
|
|
(byte) atan2_16::i#3
|
|
(byte) atan2_16::i#4
|
|
(byte) atan2_16::i#5
|
|
(byte) atan2_16::i#6
|
|
(byte) atan2_16::i#7
|
|
(byte) atan2_16::i#8
|
|
(byte) atan2_16::i#9
|
|
(word) atan2_16::return
|
|
(word) atan2_16::return#0
|
|
(word) atan2_16::return#1
|
|
(word) atan2_16::return#2
|
|
(word) atan2_16::return#3
|
|
(word) atan2_16::return#4
|
|
(byte) atan2_16::shift
|
|
(byte) atan2_16::shift#0
|
|
(byte) atan2_16::shift#1
|
|
(byte) atan2_16::shift#2
|
|
(byte) atan2_16::shift#3
|
|
(byte) atan2_16::shift#4
|
|
(signed word) atan2_16::x
|
|
(signed word) atan2_16::x#0
|
|
(signed word) atan2_16::x#1
|
|
(signed word) atan2_16::x#10
|
|
(signed word) atan2_16::x#11
|
|
(signed word) atan2_16::x#12
|
|
(signed word) atan2_16::x#13
|
|
(signed word) atan2_16::x#14
|
|
(signed word) atan2_16::x#15
|
|
(signed word) atan2_16::x#16
|
|
(signed word) atan2_16::x#17
|
|
(signed word) atan2_16::x#18
|
|
(signed word) atan2_16::x#2
|
|
(signed word) atan2_16::x#3
|
|
(signed word) atan2_16::x#4
|
|
(signed word) atan2_16::x#5
|
|
(signed word) atan2_16::x#6
|
|
(signed word) atan2_16::x#7
|
|
(signed word) atan2_16::x#8
|
|
(signed word) atan2_16::x#9
|
|
(signed word) atan2_16::xd
|
|
(signed word) atan2_16::xd#0
|
|
(signed word) atan2_16::xd#1
|
|
(signed word) atan2_16::xd#2
|
|
(signed word) atan2_16::xd#3
|
|
(signed word) atan2_16::xd#4
|
|
(signed word) atan2_16::xd#5
|
|
(signed word) atan2_16::xd#6
|
|
(signed word) atan2_16::xd#7
|
|
(signed word) atan2_16::xd#8
|
|
(signed word) atan2_16::xd#9
|
|
(signed word) atan2_16::xi
|
|
(signed word) atan2_16::xi#0
|
|
(signed word) atan2_16::xi#1
|
|
(signed word) atan2_16::xi#10
|
|
(signed word) atan2_16::xi#11
|
|
(signed word) atan2_16::xi#12
|
|
(signed word) atan2_16::xi#2
|
|
(signed word) atan2_16::xi#3
|
|
(signed word) atan2_16::xi#4
|
|
(signed word) atan2_16::xi#5
|
|
(signed word) atan2_16::xi#6
|
|
(signed word) atan2_16::xi#7
|
|
(signed word) atan2_16::xi#8
|
|
(signed word) atan2_16::xi#9
|
|
(signed word) atan2_16::y
|
|
(signed word) atan2_16::y#0
|
|
(signed word) atan2_16::y#1
|
|
(signed word) atan2_16::y#10
|
|
(signed word) atan2_16::y#11
|
|
(signed word) atan2_16::y#12
|
|
(signed word) atan2_16::y#13
|
|
(signed word) atan2_16::y#14
|
|
(signed word) atan2_16::y#15
|
|
(signed word) atan2_16::y#16
|
|
(signed word) atan2_16::y#17
|
|
(signed word) atan2_16::y#18
|
|
(signed word) atan2_16::y#19
|
|
(signed word) atan2_16::y#2
|
|
(signed word) atan2_16::y#20
|
|
(signed word) atan2_16::y#3
|
|
(signed word) atan2_16::y#4
|
|
(signed word) atan2_16::y#5
|
|
(signed word) atan2_16::y#6
|
|
(signed word) atan2_16::y#7
|
|
(signed word) atan2_16::y#8
|
|
(signed word) atan2_16::y#9
|
|
(signed word) atan2_16::yd
|
|
(signed word) atan2_16::yd#0
|
|
(signed word) atan2_16::yd#1
|
|
(signed word) atan2_16::yd#2
|
|
(signed word) atan2_16::yd#3
|
|
(signed word) atan2_16::yd#4
|
|
(signed word) atan2_16::yd#5
|
|
(signed word) atan2_16::yd#6
|
|
(signed word) atan2_16::yd#7
|
|
(signed word) atan2_16::yd#8
|
|
(signed word) atan2_16::yd#9
|
|
(signed word) atan2_16::yi
|
|
(signed word) atan2_16::yi#0
|
|
(signed word) atan2_16::yi#1
|
|
(signed word) atan2_16::yi#10
|
|
(signed word) atan2_16::yi#11
|
|
(signed word) atan2_16::yi#12
|
|
(signed word) atan2_16::yi#13
|
|
(signed word) atan2_16::yi#14
|
|
(signed word) atan2_16::yi#15
|
|
(signed word) atan2_16::yi#2
|
|
(signed word) atan2_16::yi#3
|
|
(signed word) atan2_16::yi#4
|
|
(signed word) atan2_16::yi#5
|
|
(signed word) atan2_16::yi#6
|
|
(signed word) atan2_16::yi#7
|
|
(signed word) atan2_16::yi#8
|
|
(signed word) atan2_16::yi#9
|
|
(void()) init_font_hex((byte*) init_font_hex::charset)
|
|
(byte~) init_font_hex::$0
|
|
(byte~) init_font_hex::$1
|
|
(byte~) init_font_hex::$2
|
|
(bool~) init_font_hex::$3
|
|
(bool~) init_font_hex::$4
|
|
(bool~) init_font_hex::$5
|
|
(label) init_font_hex::@1
|
|
(label) init_font_hex::@2
|
|
(label) init_font_hex::@3
|
|
(label) init_font_hex::@4
|
|
(label) init_font_hex::@5
|
|
(label) init_font_hex::@return
|
|
(byte) init_font_hex::c
|
|
(byte) init_font_hex::c#0
|
|
(byte) init_font_hex::c#1
|
|
(byte) init_font_hex::c#2
|
|
(byte) init_font_hex::c#3
|
|
(byte) init_font_hex::c#4
|
|
(byte) init_font_hex::c#5
|
|
(byte) init_font_hex::c#6
|
|
(byte) init_font_hex::c1
|
|
(byte) init_font_hex::c1#0
|
|
(byte) init_font_hex::c1#1
|
|
(byte) init_font_hex::c1#2
|
|
(byte) init_font_hex::c1#3
|
|
(byte) init_font_hex::c1#4
|
|
(byte*) init_font_hex::charset
|
|
(byte*) init_font_hex::charset#0
|
|
(byte*) init_font_hex::charset#1
|
|
(byte*) init_font_hex::charset#2
|
|
(byte*) init_font_hex::charset#3
|
|
(byte*) init_font_hex::charset#4
|
|
(byte*) init_font_hex::charset#5
|
|
(byte*) init_font_hex::charset#6
|
|
(byte*) init_font_hex::charset#7
|
|
(byte) init_font_hex::i
|
|
(byte) init_font_hex::i#0
|
|
(byte) init_font_hex::i#1
|
|
(byte) init_font_hex::i#2
|
|
(byte) init_font_hex::idx
|
|
(byte) init_font_hex::idx#0
|
|
(byte) init_font_hex::idx#1
|
|
(byte) init_font_hex::idx#2
|
|
(byte) init_font_hex::idx#3
|
|
(byte) init_font_hex::idx#4
|
|
(byte) init_font_hex::idx#5
|
|
(byte) init_font_hex::idx#6
|
|
(byte*) init_font_hex::proto_hi
|
|
(byte*) init_font_hex::proto_hi#0
|
|
(byte*) init_font_hex::proto_hi#1
|
|
(byte*) init_font_hex::proto_hi#2
|
|
(byte*) init_font_hex::proto_hi#3
|
|
(byte*) init_font_hex::proto_hi#4
|
|
(byte*) init_font_hex::proto_hi#5
|
|
(byte*) init_font_hex::proto_hi#6
|
|
(byte*) init_font_hex::proto_lo
|
|
(byte*) init_font_hex::proto_lo#0
|
|
(byte*) init_font_hex::proto_lo#1
|
|
(byte*) init_font_hex::proto_lo#2
|
|
(byte*) init_font_hex::proto_lo#3
|
|
(byte*) init_font_hex::proto_lo#4
|
|
(void()) main()
|
|
(byte~) main::$1
|
|
(word~) main::$10
|
|
(number~) main::$11
|
|
(number~) main::$12
|
|
(bool~) main::$13
|
|
(bool~) main::$14
|
|
(byte*~) main::$2
|
|
(byte*~) main::$3
|
|
(byte~) main::$4
|
|
(word~) main::$5
|
|
(signed word~) main::$6
|
|
(byte~) main::$7
|
|
(word~) main::$8
|
|
(signed word~) main::$9
|
|
(label) main::@1
|
|
(label) main::@11
|
|
(label) main::@12
|
|
(label) main::@13
|
|
(label) main::@2
|
|
(label) main::@3
|
|
(label) main::@4
|
|
(label) main::@5
|
|
(label) main::@6
|
|
(label) main::@return
|
|
(byte) main::ang_w
|
|
(byte) main::ang_w#0
|
|
(word) main::angle_w
|
|
(word) main::angle_w#0
|
|
(byte*) main::col00
|
|
(byte*) main::col00#0
|
|
(byte*) main::col00#1
|
|
(byte*) main::col00#2
|
|
(byte*) main::screen
|
|
(byte*) main::screen#0
|
|
(byte*) main::screen#1
|
|
(byte*) main::screen#2
|
|
(byte*) main::screen#3
|
|
(byte*) main::screen#4
|
|
(byte*) main::screen#5
|
|
(label) main::toD0181
|
|
(word~) main::toD0181_$0
|
|
(word~) main::toD0181_$0#0
|
|
(number~) main::toD0181_$1
|
|
(number~) main::toD0181_$1#0
|
|
(number~) main::toD0181_$2
|
|
(number~) main::toD0181_$2#0
|
|
(number~) main::toD0181_$3
|
|
(number~) main::toD0181_$3#0
|
|
(word~) main::toD0181_$4
|
|
(word~) main::toD0181_$4#0
|
|
(byte~) main::toD0181_$5
|
|
(byte~) main::toD0181_$5#0
|
|
(number~) main::toD0181_$6
|
|
(number~) main::toD0181_$6#0
|
|
(number~) main::toD0181_$7
|
|
(number~) main::toD0181_$7#0
|
|
(number~) main::toD0181_$8
|
|
(number~) main::toD0181_$8#0
|
|
(label) main::toD0181_@return
|
|
(byte*) main::toD0181_gfx
|
|
(byte*) main::toD0181_gfx#0
|
|
(byte*) main::toD0181_gfx#1
|
|
(byte) main::toD0181_return
|
|
(byte) main::toD0181_return#0
|
|
(byte) main::toD0181_return#1
|
|
(byte) main::toD0181_return#2
|
|
(byte) main::toD0181_return#3
|
|
(byte*) main::toD0181_screen
|
|
(byte*) main::toD0181_screen#0
|
|
(byte*) main::toD0181_screen#1
|
|
(signed byte) main::x
|
|
(signed byte) main::x#0
|
|
(signed byte) main::x#1
|
|
(signed byte) main::x#2
|
|
(signed byte) main::x#3
|
|
(signed word) main::xw
|
|
(signed word) main::xw#0
|
|
(signed byte) main::y
|
|
(signed byte) main::y#0
|
|
(signed byte) main::y#1
|
|
(signed byte) main::y#2
|
|
(signed byte) main::y#3
|
|
(signed byte) main::y#4
|
|
(signed byte) main::y#5
|
|
(signed word) main::yw
|
|
(signed word) main::yw#0
|
|
|
|
Fixing inline constructor with main::$16 ← (byte)main::$4 w= (byte)0
|
|
Fixing inline constructor with main::$17 ← (byte)main::$7 w= (byte)0
|
|
Successful SSA optimization Pass2FixInlineConstructors
|
|
Adding number conversion cast (unumber) 0 in (byte) init_font_hex::idx#0 ← (number) 0
|
|
Adding number conversion cast (unumber) 0 in *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#0) ← (number) 0
|
|
Adding number conversion cast (unumber) 4 in (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#2 + (byte) init_font_hex::i#2) << (number) 4
|
|
Adding number conversion cast (unumber) 1 in (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#2 + (byte) init_font_hex::i#2) << (number) 1
|
|
Adding number conversion cast (unumber) 0 in *((byte*) init_font_hex::charset#4 + (byte) init_font_hex::idx#6) ← (number) 0
|
|
Adding number conversion cast (unumber) 0 in *((byte*) init_font_hex::charset#4 + (byte) init_font_hex::idx#3) ← (number) 0
|
|
Adding number conversion cast (unumber) 5 in (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#3 + (number) 5
|
|
Adding number conversion cast (unumber) 8 in (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#4 + (number) 8
|
|
Adding number conversion cast (unumber) 5 in (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#3 + (number) 5
|
|
Adding number conversion cast (unumber) $f in (byte) CORDIC_ITERATIONS_16#0 ← (number) $f
|
|
Adding number conversion cast (snumber) 0 in (bool~) atan2_16::$0 ← (signed word) atan2_16::y#1 >= (number) 0
|
|
Adding number conversion cast (snumber) 0 in (bool~) atan2_16::$5 ← (signed word) atan2_16::x#1 >= (number) 0
|
|
Adding number conversion cast (unumber) 0 in (word) atan2_16::angle#0 ← (number) 0
|
|
Adding number conversion cast (unumber) 1 in (number~) atan2_16::$16 ← (byte) CORDIC_ITERATIONS_16#0 - (number) 1
|
|
Adding number conversion cast (unumber) atan2_16::$16 in (number~) atan2_16::$16 ← (byte) CORDIC_ITERATIONS_16#0 - (unumber)(number) 1
|
|
Adding number conversion cast (snumber) 0 in (bool~) atan2_16::$17 ← (signed word) atan2_16::yi#3 == (number) 0
|
|
Adding number conversion cast (unumber) 2 in (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 / (number) 2
|
|
Adding number conversion cast (snumber) 0 in (bool~) atan2_16::$10 ← (signed word) atan2_16::x#4 < (number) 0
|
|
Adding number conversion cast (unumber) 2 in (bool~) atan2_16::$19 ← (byte) atan2_16::shift#2 >= (number) 2
|
|
Adding number conversion cast (snumber) 2 in (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (number) 2
|
|
Adding number conversion cast (snumber) 2 in (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (number) 2
|
|
Adding number conversion cast (unumber) 2 in (byte) atan2_16::shift#1 ← (byte) atan2_16::shift#3 - (number) 2
|
|
Adding number conversion cast (unumber) 0 in (bool~) atan2_16::$25 ← (number) 0 != (byte) atan2_16::shift#4
|
|
Adding number conversion cast (snumber) 0 in (bool~) atan2_16::$21 ← (signed word) atan2_16::yi#5 >= (number) 0
|
|
Adding number conversion cast (snumber) 1 in (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#4 >> (number) 1
|
|
Adding number conversion cast (snumber) 1 in (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#4 >> (number) 1
|
|
Adding number conversion cast (snumber) 0 in (bool~) atan2_16::$13 ← (signed word) atan2_16::y#4 < (number) 0
|
|
Adding number conversion cast (unumber) $8000 in (number~) atan2_16::$12 ← (number) $8000 - (word) atan2_16::angle#9
|
|
Adding number conversion cast (unumber) atan2_16::$12 in (number~) atan2_16::$12 ← (unumber)(number) $8000 - (word) atan2_16::angle#9
|
|
Adding number conversion cast (unumber) $3fff in (number~) main::toD0181_$1#0 ← (word~) main::toD0181_$0#0 & (number) $3fff
|
|
Adding number conversion cast (unumber) main::toD0181_$1#0 in (number~) main::toD0181_$1#0 ← (word~) main::toD0181_$0#0 & (unumber)(number) $3fff
|
|
Adding number conversion cast (unumber) 4 in (number~) main::toD0181_$2#0 ← (unumber~) main::toD0181_$1#0 * (number) 4
|
|
Adding number conversion cast (unumber) main::toD0181_$2#0 in (number~) main::toD0181_$2#0 ← (unumber~) main::toD0181_$1#0 * (unumber)(number) 4
|
|
Adding number conversion cast (unumber) main::toD0181_$3#0 in (number~) main::toD0181_$3#0 ← > (unumber~) main::toD0181_$2#0
|
|
Adding number conversion cast (unumber) 4 in (number~) main::toD0181_$6#0 ← (byte~) main::toD0181_$5#0 / (number) 4
|
|
Adding number conversion cast (unumber) main::toD0181_$6#0 in (number~) main::toD0181_$6#0 ← (byte~) main::toD0181_$5#0 / (unumber)(number) 4
|
|
Adding number conversion cast (unumber) $f in (number~) main::toD0181_$7#0 ← (unumber~) main::toD0181_$6#0 & (number) $f
|
|
Adding number conversion cast (unumber) main::toD0181_$7#0 in (number~) main::toD0181_$7#0 ← (unumber~) main::toD0181_$6#0 & (unumber)(number) $f
|
|
Adding number conversion cast (unumber) main::toD0181_$8#0 in (number~) main::toD0181_$8#0 ← (unumber~) main::toD0181_$3#0 | (unumber~) main::toD0181_$7#0
|
|
Adding number conversion cast (unumber) $80 in (number~) main::$11 ← (word) main::angle_w#0 + (number) $80
|
|
Adding number conversion cast (unumber) main::$11 in (number~) main::$11 ← (word) main::angle_w#0 + (unumber)(number) $80
|
|
Adding number conversion cast (unumber) main::$12 in (number~) main::$12 ← > (unumber~) main::$11
|
|
Adding number conversion cast (unumber) $c*$28 in (byte*~) main::$2 ← (byte*) COLS#0 + (number) $c*(number) $28
|
|
Adding number conversion cast (unumber) $13 in (byte*~) main::$3 ← (byte*~) main::$2 + (number) $13
|
|
Successful SSA optimization PassNAddNumberTypeConversions
|
|
Added casts to value list in (byte[]) FONT_HEX_PROTO#0 ← (byte[]){ (byte)(number) 2, (byte)(number) 5, (byte)(number) 5, (byte)(number) 5, (byte)(number) 2, (byte)(number) 6, (byte)(number) 2, (byte)(number) 2, (byte)(number) 2, (byte)(number) 7, (byte)(number) 6, (byte)(number) 1, (byte)(number) 2, (byte)(number) 4, (byte)(number) 7, (byte)(number) 6, (byte)(number) 1, (byte)(number) 2, (byte)(number) 1, (byte)(number) 6, (byte)(number) 5, (byte)(number) 5, (byte)(number) 7, (byte)(number) 1, (byte)(number) 1, (byte)(number) 7, (byte)(number) 4, (byte)(number) 6, (byte)(number) 1, (byte)(number) 6, (byte)(number) 3, (byte)(number) 4, (byte)(number) 6, (byte)(number) 5, (byte)(number) 2, (byte)(number) 7, (byte)(number) 1, (byte)(number) 1, (byte)(number) 1, (byte)(number) 1, (byte)(number) 2, (byte)(number) 5, (byte)(number) 2, (byte)(number) 5, (byte)(number) 2, (byte)(number) 2, (byte)(number) 5, (byte)(number) 3, (byte)(number) 1, (byte)(number) 1, (byte)(number) 2, (byte)(number) 5, (byte)(number) 7, (byte)(number) 5, (byte)(number) 5, (byte)(number) 6, (byte)(number) 5, (byte)(number) 6, (byte)(number) 5, (byte)(number) 6, (byte)(number) 2, (byte)(number) 5, (byte)(number) 4, (byte)(number) 5, (byte)(number) 2, (byte)(number) 6, (byte)(number) 5, (byte)(number) 5, (byte)(number) 5, (byte)(number) 6, (byte)(number) 7, (byte)(number) 4, (byte)(number) 6, (byte)(number) 4, (byte)(number) 7, (byte)(number) 7, (byte)(number) 4, (byte)(number) 6, (byte)(number) 4, (byte)(number) 4 }
|
|
Successful SSA optimization PassNAddInitializerValueListTypeCasts
|
|
Inlining cast (byte) init_font_hex::idx#0 ← (unumber)(number) 0
|
|
Inlining cast *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#0) ← (unumber)(number) 0
|
|
Inlining cast *((byte*) init_font_hex::charset#4 + (byte) init_font_hex::idx#6) ← (unumber)(number) 0
|
|
Inlining cast *((byte*) init_font_hex::charset#4 + (byte) init_font_hex::idx#3) ← (unumber)(number) 0
|
|
Inlining cast (byte) CORDIC_ITERATIONS_16#0 ← (unumber)(number) $f
|
|
Inlining cast (word) atan2_16::angle#0 ← (unumber)(number) 0
|
|
Inlining cast (byte*) D018#0 ← (byte*)(number) $d018
|
|
Inlining cast (byte*) COLS#0 ← (byte*)(number) $d800
|
|
Inlining cast (byte*) CHARSET#0 ← (byte*)(number) $2000
|
|
Inlining cast (byte*) SCREEN#0 ← (byte*)(number) $2800
|
|
Inlining cast (word~) main::toD0181_$0#0 ← (word)(byte*) main::toD0181_screen#1
|
|
Inlining cast (word~) main::toD0181_$4#0 ← (word)(byte*) main::toD0181_gfx#1
|
|
Inlining cast (byte~) main::$4 ← (byte)(signed byte) main::x#2
|
|
Inlining cast (signed word~) main::$6 ← (signed word)(word~) main::$5
|
|
Inlining cast (byte~) main::$7 ← (byte)(signed byte) main::y#2
|
|
Inlining cast (signed word~) main::$9 ← (signed word)(word~) main::$8
|
|
Successful SSA optimization Pass2InlineCast
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 8
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 3
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 3
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 7
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 6
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast $f
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 2
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 1
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast $8000
|
|
Simplifying constant pointer cast (byte*) 53272
|
|
Simplifying constant pointer cast (byte*) 55296
|
|
Simplifying constant pointer cast (byte*) 8192
|
|
Simplifying constant pointer cast (byte*) 10240
|
|
Simplifying constant integer cast $3fff
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast 4
|
|
Simplifying constant integer cast $f
|
|
Simplifying constant integer cast (byte~) main::$4
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast (byte~) main::$7
|
|
Simplifying constant integer cast 0
|
|
Simplifying constant integer cast $80
|
|
Simplifying constant integer cast $13
|
|
Successful SSA optimization PassNCastSimplification
|
|
Finalized unsigned number type (byte) 0
|
|
Finalized unsigned number type (byte) 0
|
|
Finalized unsigned number type (byte) 4
|
|
Finalized unsigned number type (byte) 1
|
|
Finalized unsigned number type (byte) 0
|
|
Finalized unsigned number type (byte) 0
|
|
Finalized unsigned number type (byte) 5
|
|
Finalized unsigned number type (byte) 8
|
|
Finalized unsigned number type (byte) 5
|
|
Finalized unsigned number type (byte) $f
|
|
Finalized signed number type (signed byte) 0
|
|
Finalized signed number type (signed byte) 0
|
|
Finalized unsigned number type (byte) 0
|
|
Finalized unsigned number type (byte) 1
|
|
Finalized signed number type (signed byte) 0
|
|
Finalized unsigned number type (byte) 2
|
|
Finalized signed number type (signed byte) 0
|
|
Finalized unsigned number type (byte) 2
|
|
Finalized signed number type (signed byte) 2
|
|
Finalized signed number type (signed byte) 2
|
|
Finalized unsigned number type (byte) 2
|
|
Finalized unsigned number type (byte) 0
|
|
Finalized signed number type (signed byte) 0
|
|
Finalized signed number type (signed byte) 1
|
|
Finalized signed number type (signed byte) 1
|
|
Finalized signed number type (signed byte) 0
|
|
Finalized unsigned number type (word) $8000
|
|
Finalized unsigned number type (word) $3fff
|
|
Finalized unsigned number type (byte) 4
|
|
Finalized unsigned number type (byte) 4
|
|
Finalized unsigned number type (byte) $f
|
|
Finalized unsigned number type (byte) $80
|
|
Finalized unsigned number type (byte) $13
|
|
Successful SSA optimization PassNFinalizeNumberTypeConversions
|
|
Inferred type updated to byte in (unumber~) atan2_16::$16 ← (byte) CORDIC_ITERATIONS_16#0 - (byte) 1
|
|
Inferred type updated to word in (unumber~) atan2_16::$12 ← (word) $8000 - (word) atan2_16::angle#9
|
|
Inferred type updated to word in (unumber~) main::toD0181_$1#0 ← (word~) main::toD0181_$0#0 & (word) $3fff
|
|
Inferred type updated to word in (unumber~) main::toD0181_$2#0 ← (word~) main::toD0181_$1#0 * (byte) 4
|
|
Inferred type updated to byte in (unumber~) main::toD0181_$3#0 ← > (word~) main::toD0181_$2#0
|
|
Inferred type updated to byte in (unumber~) main::toD0181_$6#0 ← (byte~) main::toD0181_$5#0 / (byte) 4
|
|
Inferred type updated to byte in (unumber~) main::toD0181_$7#0 ← (byte~) main::toD0181_$6#0 & (byte) $f
|
|
Inferred type updated to byte in (unumber~) main::toD0181_$8#0 ← (byte~) main::toD0181_$3#0 | (byte~) main::toD0181_$7#0
|
|
Inferred type updated to word in (unumber~) main::$11 ← (word) main::angle_w#0 + (byte) $80
|
|
Inferred type updated to byte in (unumber~) main::$12 ← > (word~) main::$11
|
|
Inversing boolean not [63] (bool~) atan2_16::$18 ← (signed word) atan2_16::yi#3 != (signed byte) 0 from [62] (bool~) atan2_16::$17 ← (signed word) atan2_16::yi#3 == (signed byte) 0
|
|
Inversing boolean not [72] (bool~) atan2_16::$11 ← (signed word) atan2_16::x#4 >= (signed byte) 0 from [71] (bool~) atan2_16::$10 ← (signed word) atan2_16::x#4 < (signed byte) 0
|
|
Inversing boolean not [83] (bool~) atan2_16::$20 ← (byte) 0 == (byte) atan2_16::shift#4 from [82] (bool~) atan2_16::$25 ← (byte) 0 != (byte) atan2_16::shift#4
|
|
Inversing boolean not [107] (bool~) atan2_16::$14 ← (signed word) atan2_16::y#4 >= (signed byte) 0 from [106] (bool~) atan2_16::$13 ← (signed word) atan2_16::y#4 < (signed byte) 0
|
|
Successful SSA optimization Pass2UnaryNotSimplification
|
|
Alias (byte*) init_font_hex::charset#3 = (byte*) init_font_hex::charset#4
|
|
Alias (byte) init_font_hex::idx#2 = (byte) init_font_hex::idx#6
|
|
Alias (byte*) init_font_hex::proto_lo#2 = (byte*) init_font_hex::proto_lo#3
|
|
Alias (byte) init_font_hex::c1#2 = (byte) init_font_hex::c1#3
|
|
Alias (byte*) init_font_hex::proto_hi#2 = (byte*) init_font_hex::proto_hi#5 (byte*) init_font_hex::proto_hi#3
|
|
Alias (byte) init_font_hex::c#2 = (byte) init_font_hex::c#3 (byte) init_font_hex::c#4
|
|
Alias (byte*) init_font_hex::charset#0 = (byte*) init_font_hex::charset#7
|
|
Alias (signed word) atan2_16::y#1 = (signed word) atan2_16::y#2 (signed word~) atan2_16::$3 (signed word) atan2_16::y#3
|
|
Alias (signed word) atan2_16::x#5 = (signed word) atan2_16::x#9 (signed word) atan2_16::x#6
|
|
Alias (signed word~) atan2_16::$2 = (signed word~) atan2_16::$1
|
|
Alias (signed word) atan2_16::yi#0 = (signed word~) atan2_16::$4 (signed word) atan2_16::yi#12 (signed word) atan2_16::yi#13
|
|
Alias (signed word) atan2_16::x#1 = (signed word) atan2_16::x#2 (signed word~) atan2_16::$8 (signed word) atan2_16::x#3
|
|
Alias (signed word) atan2_16::y#12 = (signed word) atan2_16::y#15 (signed word) atan2_16::y#13
|
|
Alias (signed word~) atan2_16::$7 = (signed word~) atan2_16::$6
|
|
Alias (signed word) atan2_16::xi#0 = (signed word~) atan2_16::$9
|
|
Alias (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#6 (signed word) atan2_16::xd#0
|
|
Alias (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#4 (signed word) atan2_16::yd#0
|
|
Alias (byte) atan2_16::i#2 = (byte) atan2_16::i#6 (byte) atan2_16::shift#0
|
|
Alias (word) atan2_16::angle#12 = (word) atan2_16::angle#19
|
|
Alias (signed word) atan2_16::x#17 = (signed word) atan2_16::x#7
|
|
Alias (signed word) atan2_16::y#19 = (signed word) atan2_16::y#7
|
|
Alias (signed word) atan2_16::xd#3 = (signed word) atan2_16::xd#7 (signed word) atan2_16::xd#8 (signed word) atan2_16::xd#4
|
|
Alias (signed word) atan2_16::yd#3 = (signed word) atan2_16::yd#7 (signed word) atan2_16::yd#8 (signed word) atan2_16::yd#4
|
|
Alias (byte) atan2_16::shift#2 = (byte) atan2_16::shift#3 (byte) atan2_16::shift#4
|
|
Alias (signed word) atan2_16::yi#10 = (signed word) atan2_16::yi#15 (signed word) atan2_16::yi#14 (signed word) atan2_16::yi#11
|
|
Alias (signed word) atan2_16::xi#10 = (signed word) atan2_16::xi#12 (signed word) atan2_16::xi#11 (signed word) atan2_16::xi#9
|
|
Alias (byte) atan2_16::i#10 = (byte) atan2_16::i#11 (byte) atan2_16::i#8 (byte) atan2_16::i#9
|
|
Alias (word) atan2_16::angle#16 = (word) atan2_16::angle#20 (word) atan2_16::angle#18 (word) atan2_16::angle#17
|
|
Alias (signed word) atan2_16::x#14 = (signed word) atan2_16::x#18 (signed word) atan2_16::x#16 (signed word) atan2_16::x#15
|
|
Alias (signed word) atan2_16::y#16 = (signed word) atan2_16::y#20 (signed word) atan2_16::y#18 (signed word) atan2_16::y#17
|
|
Alias (signed word) atan2_16::xi#4 = (signed word) atan2_16::xi#7 (signed word) atan2_16::xi#5
|
|
Alias (signed word) atan2_16::yd#5 = (signed word) atan2_16::yd#9 (signed word) atan2_16::yd#6
|
|
Alias (signed word) atan2_16::yi#5 = (signed word) atan2_16::yi#6 (signed word) atan2_16::yi#7
|
|
Alias (signed word) atan2_16::xd#5 = (signed word) atan2_16::xd#9 (signed word) atan2_16::xd#6
|
|
Alias (byte) atan2_16::i#3 = (byte) atan2_16::i#7 (byte) atan2_16::i#4
|
|
Alias (word) atan2_16::angle#14 = (word) atan2_16::angle#7 (word) atan2_16::angle#8
|
|
Alias (signed word) atan2_16::x#11 = (signed word) atan2_16::x#13 (signed word) atan2_16::x#12
|
|
Alias (signed word) atan2_16::y#10 = (signed word) atan2_16::y#14 (signed word) atan2_16::y#11
|
|
Alias (word) atan2_16::angle#1 = (word) atan2_16::angle#9
|
|
Alias (signed word) atan2_16::y#5 = (signed word) atan2_16::y#6
|
|
Alias (word) atan2_16::angle#4 = (word~) atan2_16::$12
|
|
Alias (word) atan2_16::return#0 = (word) atan2_16::angle#10 (word) atan2_16::return#3 (word) atan2_16::return#1
|
|
Alias (word) atan2_16::angle#11 = (word) atan2_16::angle#15
|
|
Alias (word) atan2_16::angle#5 = (word~) atan2_16::$15
|
|
Alias (byte*) main::toD0181_screen#0 = (byte*) main::toD0181_screen#1
|
|
Alias (byte*) main::toD0181_gfx#0 = (byte*) main::toD0181_gfx#1
|
|
Alias (byte) main::toD0181_return#0 = (byte~) main::toD0181_$8#0 (byte) main::toD0181_return#2 (byte) main::toD0181_return#1 (byte) main::toD0181_return#3 (byte~) main::$1
|
|
Alias (word~) main::$5 = (word~) main::$16
|
|
Alias (signed word) main::xw#0 = (signed word~) main::$6
|
|
Alias (word~) main::$8 = (word~) main::$17
|
|
Alias (signed word) main::yw#0 = (signed word~) main::$9
|
|
Alias (word) atan2_16::return#2 = (word) atan2_16::return#4
|
|
Alias (byte*) main::screen#2 = (byte*) main::screen#3
|
|
Alias (signed byte) main::x#2 = (signed byte) main::x#3
|
|
Alias (signed byte) main::y#2 = (signed byte) main::y#5 (signed byte) main::y#3
|
|
Alias (word) main::angle_w#0 = (word~) main::$10
|
|
Alias (byte) main::ang_w#0 = (byte~) main::$12
|
|
Alias (byte*) main::screen#1 = (byte*) main::screen#5
|
|
Alias (byte*) main::col00#0 = (byte*~) main::$3
|
|
Alias (byte*) main::col00#1 = (byte*) main::col00#2
|
|
Successful SSA optimization Pass2AliasElimination
|
|
Alias (signed word) atan2_16::x#1 = (signed word) atan2_16::x#5 (signed word) atan2_16::x#10
|
|
Alias (signed word) atan2_16::y#1 = (signed word) atan2_16::y#12 (signed word) atan2_16::y#9
|
|
Alias (signed word) atan2_16::yi#0 = (signed word) atan2_16::yi#9
|
|
Alias (signed word) atan2_16::yi#10 = (signed word) atan2_16::yi#5
|
|
Alias (signed word) atan2_16::xi#10 = (signed word) atan2_16::xi#4
|
|
Alias (byte) atan2_16::i#10 = (byte) atan2_16::i#3 (byte) atan2_16::i#5
|
|
Alias (word) atan2_16::angle#14 = (word) atan2_16::angle#16
|
|
Alias (signed word) atan2_16::x#11 = (signed word) atan2_16::x#14 (signed word) atan2_16::x#8
|
|
Alias (signed word) atan2_16::y#10 = (signed word) atan2_16::y#16 (signed word) atan2_16::y#8
|
|
Alias (signed word) atan2_16::y#4 = (signed word) atan2_16::y#5
|
|
Successful SSA optimization Pass2AliasElimination
|
|
Identical Phi Values (byte*) init_font_hex::charset#6 (byte*) init_font_hex::charset#1
|
|
Identical Phi Values (byte*) init_font_hex::proto_hi#2 (byte*) init_font_hex::proto_hi#4
|
|
Identical Phi Values (byte*) init_font_hex::proto_lo#2 (byte*) init_font_hex::proto_lo#4
|
|
Identical Phi Values (byte*) init_font_hex::charset#3 (byte*) init_font_hex::charset#2
|
|
Identical Phi Values (byte) init_font_hex::c1#2 (byte) init_font_hex::c1#4
|
|
Identical Phi Values (byte) init_font_hex::c#2 (byte) init_font_hex::c#5
|
|
Identical Phi Values (signed word) atan2_16::y#1 (signed word) atan2_16::y#0
|
|
Identical Phi Values (signed word) atan2_16::x#1 (signed word) atan2_16::x#0
|
|
Identical Phi Values (signed word) atan2_16::yi#10 (signed word) atan2_16::yi#3
|
|
Identical Phi Values (signed word) atan2_16::xi#10 (signed word) atan2_16::xi#3
|
|
Identical Phi Values (byte) atan2_16::i#10 (byte) atan2_16::i#2
|
|
Identical Phi Values (word) atan2_16::angle#14 (word) atan2_16::angle#12
|
|
Identical Phi Values (signed word) atan2_16::x#11 (signed word) atan2_16::x#17
|
|
Identical Phi Values (signed word) atan2_16::y#10 (signed word) atan2_16::y#19
|
|
Identical Phi Values (signed byte) main::y#2 (signed byte) main::y#4
|
|
Identical Phi Values (byte*) main::col00#1 (byte*) main::col00#0
|
|
Successful SSA optimization Pass2IdenticalPhiElimination
|
|
Identical Phi Values (byte*) init_font_hex::proto_hi#4 (byte*) init_font_hex::proto_hi#6
|
|
Identical Phi Values (byte) init_font_hex::c#5 (byte) init_font_hex::c#6
|
|
Identical Phi Values (signed word) atan2_16::x#17 (signed word) atan2_16::x#0
|
|
Identical Phi Values (signed word) atan2_16::y#19 (signed word) atan2_16::y#0
|
|
Identical Phi Values (signed word) atan2_16::x#4 (signed word) atan2_16::x#17
|
|
Identical Phi Values (signed word) atan2_16::y#4 (signed word) atan2_16::y#19
|
|
Successful SSA optimization Pass2IdenticalPhiElimination
|
|
Simple Condition (bool~) init_font_hex::$3 [19] if((byte) init_font_hex::i#1!=rangelast(0,4)) goto init_font_hex::@3
|
|
Simple Condition (bool~) init_font_hex::$4 [29] if((byte) init_font_hex::c1#1!=rangelast(0,$f)) goto init_font_hex::@2
|
|
Simple Condition (bool~) init_font_hex::$5 [34] if((byte) init_font_hex::c#1!=rangelast(0,$f)) goto init_font_hex::@1
|
|
Simple Condition (bool~) atan2_16::$0 [41] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1
|
|
Simple Condition (bool~) atan2_16::$5 [50] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4
|
|
Simple Condition (bool~) atan2_16::$18 [64] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@16
|
|
Simple Condition (bool~) atan2_16::$11 [73] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7
|
|
Simple Condition (bool~) atan2_16::$19 [76] if((byte) atan2_16::shift#2>=(byte) 2) goto atan2_16::@19
|
|
Simple Condition (bool~) atan2_16::$20 [84] if((byte) 0==(byte) atan2_16::shift#2) goto atan2_16::@25
|
|
Simple Condition (bool~) atan2_16::$21 [87] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@26
|
|
Simple Condition (bool~) atan2_16::$22 [104] if((byte) atan2_16::i#1!=rangelast(0,atan2_16::$16)) goto atan2_16::@15
|
|
Simple Condition (bool~) atan2_16::$14 [108] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8
|
|
Simple Condition (bool~) main::$13 [173] if((signed byte) main::x#1!=rangelast(-$13,$14)) goto main::@2
|
|
Simple Condition (bool~) main::$14 [177] if((signed byte) main::y#1!=rangelast(-$c,$c)) goto main::@1
|
|
Successful SSA optimization Pass2ConditionalJumpSimplification
|
|
Negating conditional jump and destination [104] if((byte) atan2_16::i#1==rangelast(0,atan2_16::$16)) goto atan2_16::@17
|
|
Successful SSA optimization Pass2ConditionalJumpSequenceImprovement
|
|
Identified constant from value list (byte[]) { (byte) 2, (byte) 5, (byte) 5, (byte) 5, (byte) 2, (byte) 6, (byte) 2, (byte) 2, (byte) 2, (byte) 7, (byte) 6, (byte) 1, (byte) 2, (byte) 4, (byte) 7, (byte) 6, (byte) 1, (byte) 2, (byte) 1, (byte) 6, (byte) 5, (byte) 5, (byte) 7, (byte) 1, (byte) 1, (byte) 7, (byte) 4, (byte) 6, (byte) 1, (byte) 6, (byte) 3, (byte) 4, (byte) 6, (byte) 5, (byte) 2, (byte) 7, (byte) 1, (byte) 1, (byte) 1, (byte) 1, (byte) 2, (byte) 5, (byte) 2, (byte) 5, (byte) 2, (byte) 2, (byte) 5, (byte) 3, (byte) 1, (byte) 1, (byte) 2, (byte) 5, (byte) 7, (byte) 5, (byte) 5, (byte) 6, (byte) 5, (byte) 6, (byte) 5, (byte) 6, (byte) 2, (byte) 5, (byte) 4, (byte) 5, (byte) 2, (byte) 6, (byte) 5, (byte) 5, (byte) 5, (byte) 6, (byte) 7, (byte) 4, (byte) 6, (byte) 4, (byte) 7, (byte) 7, (byte) 4, (byte) 6, (byte) 4, (byte) 4 }
|
|
Successful SSA optimization Pass2ConstantInitializerValueLists
|
|
Constant (const byte) init_font_hex::c#0 = 0
|
|
Constant (const byte) init_font_hex::c1#0 = 0
|
|
Constant (const byte) init_font_hex::idx#0 = 0
|
|
Constant (const byte) init_font_hex::i#0 = 0
|
|
Constant (const byte[]) FONT_HEX_PROTO#0 = { 2, 5, 5, 5, 2, 6, 2, 2, 2, 7, 6, 1, 2, 4, 7, 6, 1, 2, 1, 6, 5, 5, 7, 1, 1, 7, 4, 6, 1, 6, 3, 4, 6, 5, 2, 7, 1, 1, 1, 1, 2, 5, 2, 5, 2, 2, 5, 3, 1, 1, 2, 5, 7, 5, 5, 6, 5, 6, 5, 6, 2, 5, 4, 5, 2, 6, 5, 5, 5, 6, 7, 4, 6, 4, 7, 7, 4, 6, 4, 4 }
|
|
Constant (const byte) CORDIC_ITERATIONS_16#0 = $f
|
|
Constant (const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 = kickasm {{ .for (var i=0; i<CORDIC_ITERATIONS_16; i++)
|
|
.word 256*2*256*atan(1/pow(2,i))/PI/2
|
|
}}
|
|
Constant (const word) atan2_16::angle#0 = 0
|
|
Constant (const byte) atan2_16::i#0 = 0
|
|
Constant (const byte*) D018#0 = (byte*) 53272
|
|
Constant (const byte*) COLS#0 = (byte*) 55296
|
|
Constant (const byte*) CHARSET#0 = (byte*) 8192
|
|
Constant (const byte*) SCREEN#0 = (byte*) 10240
|
|
Constant (const signed byte) main::y#0 = -$c
|
|
Constant (const signed byte) main::x#0 = -$13
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Constant (const byte*) init_font_hex::proto_hi#0 = FONT_HEX_PROTO#0
|
|
Constant (const byte*) init_font_hex::proto_lo#0 = FONT_HEX_PROTO#0
|
|
Constant (const byte*) init_font_hex::charset#1 = CHARSET#0
|
|
Constant (const byte*) main::toD0181_screen#0 = SCREEN#0
|
|
Constant (const byte*) main::toD0181_gfx#0 = CHARSET#0
|
|
Constant (const byte*) main::screen#0 = SCREEN#0
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Constant value identified (word)main::toD0181_screen#0 in [129] (word~) main::toD0181_$0#0 ← (word)(const byte*) main::toD0181_screen#0
|
|
Constant value identified (word)main::toD0181_gfx#0 in [133] (word~) main::toD0181_$4#0 ← (word)(const byte*) main::toD0181_gfx#0
|
|
Successful SSA optimization Pass2ConstantValues
|
|
if() condition always true - replacing block destination [182] if(true) goto main::@6
|
|
Successful SSA optimization Pass2ConstantIfs
|
|
Resolved ranged next value [17] init_font_hex::i#1 ← ++ init_font_hex::i#2 to ++
|
|
Resolved ranged comparison value [19] if(init_font_hex::i#1!=rangelast(0,4)) goto init_font_hex::@3 to (number) 5
|
|
Resolved ranged next value [27] init_font_hex::c1#1 ← ++ init_font_hex::c1#4 to ++
|
|
Resolved ranged comparison value [29] if(init_font_hex::c1#1!=rangelast(0,$f)) goto init_font_hex::@2 to (number) $10
|
|
Resolved ranged next value [32] init_font_hex::c#1 ← ++ init_font_hex::c#6 to ++
|
|
Resolved ranged comparison value [34] if(init_font_hex::c#1!=rangelast(0,$f)) goto init_font_hex::@1 to (number) $10
|
|
Resolved ranged next value [171] main::x#1 ← ++ main::x#2 to ++
|
|
Resolved ranged comparison value [173] if(main::x#1!=rangelast(-$13,$14)) goto main::@2 to (number) $15
|
|
Resolved ranged next value [175] main::y#1 ← ++ main::y#4 to ++
|
|
Resolved ranged comparison value [177] if(main::y#1!=rangelast(-$c,$c)) goto main::@1 to (number) $d
|
|
Converting *(pointer+n) to pointer[n] [184] *((byte*) main::col00#0) ← ++ *((byte*) main::col00#0) -- *(main::$2 + $13)
|
|
Converting *(pointer+n) to pointer[n] [184] *((byte*) main::col00#0) ← ++ *((byte*~) main::$2 + (byte) $13) -- *(main::$2 + $13)
|
|
Successful SSA optimization Pass2InlineDerefIdx
|
|
Simplifying expression containing zero init_font_hex::charset#2 in [8] *((byte*) init_font_hex::charset#2 + (const byte) init_font_hex::idx#0) ← (byte) 0
|
|
Successful SSA optimization PassNSimplifyExpressionWithZero
|
|
Eliminating unused variable (byte) init_font_hex::idx#4 and assignment [15] (byte) init_font_hex::idx#4 ← ++ (byte) init_font_hex::idx#3
|
|
Eliminating unused variable (byte*) main::col00#0 and assignment [96] (byte*) main::col00#0 ← (byte*~) main::$2 + (byte) $13
|
|
Successful SSA optimization PassNEliminateUnusedVars
|
|
Removing unused block main::@return
|
|
Successful SSA optimization Pass2EliminateUnusedBlocks
|
|
Adding number conversion cast (unumber) 5 in if((byte) init_font_hex::i#1!=(number) 5) goto init_font_hex::@3
|
|
Adding number conversion cast (unumber) $10 in if((byte) init_font_hex::c1#1!=(number) $10) goto init_font_hex::@2
|
|
Adding number conversion cast (unumber) $10 in if((byte) init_font_hex::c#1!=(number) $10) goto init_font_hex::@1
|
|
Adding number conversion cast (snumber) $15 in if((signed byte) main::x#1!=(number) $15) goto main::@2
|
|
Adding number conversion cast (snumber) $d in if((signed byte) main::y#1!=(number) $d) goto main::@1
|
|
Successful SSA optimization PassNAddNumberTypeConversions
|
|
Simplifying constant integer cast 5
|
|
Simplifying constant integer cast $10
|
|
Simplifying constant integer cast $10
|
|
Simplifying constant integer cast $15
|
|
Simplifying constant integer cast $d
|
|
Successful SSA optimization PassNCastSimplification
|
|
Finalized unsigned number type (byte) 5
|
|
Finalized unsigned number type (byte) $10
|
|
Finalized unsigned number type (byte) $10
|
|
Finalized signed number type (signed byte) $15
|
|
Finalized signed number type (signed byte) $d
|
|
Successful SSA optimization PassNFinalizeNumberTypeConversions
|
|
Constant right-side identified [3] (byte) init_font_hex::idx#1 ← ++ (const byte) init_font_hex::idx#0
|
|
Constant right-side identified [29] (byte~) atan2_16::$16 ← (const byte) CORDIC_ITERATIONS_16#0 - (byte) 1
|
|
Constant right-side identified [94] (byte*~) main::$2 ← (const byte*) COLS#0 + (word)(number) $c*(number) $28
|
|
Successful SSA optimization Pass2ConstantRValueConsolidation
|
|
Constant (const byte) init_font_hex::idx#1 = ++init_font_hex::idx#0
|
|
Constant (const byte) atan2_16::$16 = CORDIC_ITERATIONS_16#0-1
|
|
Constant (const word) main::toD0181_$0#0 = (word)main::toD0181_screen#0
|
|
Constant (const word) main::toD0181_$4#0 = (word)main::toD0181_gfx#0
|
|
Constant (const byte*) main::$2 = COLS#0+(word)$c*$28
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Resolved ranged next value [54] atan2_16::i#1 ← ++ atan2_16::i#2 to ++
|
|
Resolved ranged comparison value [55] if(atan2_16::i#1==rangelast(0,atan2_16::$16)) goto atan2_16::@17 to (const byte) atan2_16::$16+(number) 1
|
|
Adding number conversion cast (unumber) atan2_16::$16+1 in if((byte) atan2_16::i#1==(const byte) atan2_16::$16+(number) 1) goto atan2_16::@17
|
|
Adding number conversion cast (unumber) 1 in if((byte) atan2_16::i#1==(unumber)(const byte) atan2_16::$16+(number) 1) goto atan2_16::@17
|
|
Successful SSA optimization PassNAddNumberTypeConversions
|
|
Simplifying constant integer cast (const byte) atan2_16::$16+(unumber)(number) 1
|
|
Simplifying constant integer cast 1
|
|
Successful SSA optimization PassNCastSimplification
|
|
Finalized unsigned number type (byte) 1
|
|
Successful SSA optimization PassNFinalizeNumberTypeConversions
|
|
Constant right-side identified [61] (word~) main::toD0181_$1#0 ← (const word) main::toD0181_$0#0 & (word) $3fff
|
|
Constant right-side identified [64] (byte~) main::toD0181_$5#0 ← > (const word) main::toD0181_$4#0
|
|
Successful SSA optimization Pass2ConstantRValueConsolidation
|
|
Constant (const word) main::toD0181_$1#0 = main::toD0181_$0#0&$3fff
|
|
Constant (const byte) main::toD0181_$5#0 = >main::toD0181_$4#0
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Constant right-side identified [61] (word~) main::toD0181_$2#0 ← (const word) main::toD0181_$1#0 * (byte) 4
|
|
Constant right-side identified [63] (byte~) main::toD0181_$6#0 ← (const byte) main::toD0181_$5#0 / (byte) 4
|
|
Successful SSA optimization Pass2ConstantRValueConsolidation
|
|
Constant (const word) main::toD0181_$2#0 = main::toD0181_$1#0*4
|
|
Constant (const byte) main::toD0181_$6#0 = main::toD0181_$5#0/4
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Constant right-side identified [61] (byte~) main::toD0181_$3#0 ← > (const word) main::toD0181_$2#0
|
|
Constant right-side identified [62] (byte~) main::toD0181_$7#0 ← (const byte) main::toD0181_$6#0 & (byte) $f
|
|
Successful SSA optimization Pass2ConstantRValueConsolidation
|
|
Constant (const byte) main::toD0181_$3#0 = >main::toD0181_$2#0
|
|
Constant (const byte) main::toD0181_$7#0 = main::toD0181_$6#0&$f
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Constant right-side identified [61] (byte) main::toD0181_return#0 ← (const byte) main::toD0181_$3#0 | (const byte) main::toD0181_$7#0
|
|
Successful SSA optimization Pass2ConstantRValueConsolidation
|
|
Constant (const byte) main::toD0181_return#0 = main::toD0181_$3#0|main::toD0181_$7#0
|
|
Successful SSA optimization Pass2ConstantIdentification
|
|
Inlining Noop Cast [64] (byte~) main::$4 ← (byte)(signed byte) main::x#2 keeping main::x#2
|
|
Inlining Noop Cast [67] (byte~) main::$7 ← (byte)(signed byte) main::y#4 keeping main::y#4
|
|
Successful SSA optimization Pass2NopCastInlining
|
|
Inlining Noop Cast [66] (signed word) main::xw#0 ← (signed word)(word~) main::$5 keeping main::xw#0
|
|
Inlining Noop Cast [69] (signed word) main::yw#0 ← (signed word)(word~) main::$8 keeping main::yw#0
|
|
Successful SSA optimization Pass2NopCastInlining
|
|
Rewriting division to use shift [31] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 / (byte) 2
|
|
Rewriting multiplication to use shift [45] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 * (const byte) SIZEOF_WORD
|
|
Rewriting multiplication to use shift [49] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 * (const byte) SIZEOF_WORD
|
|
Successful SSA optimization Pass2MultiplyToShiftRewriting
|
|
Inlining constant with var siblings (const byte) init_font_hex::c#0
|
|
Inlining constant with var siblings (const byte) init_font_hex::c1#0
|
|
Inlining constant with var siblings (const byte) init_font_hex::idx#0
|
|
Inlining constant with var siblings (const byte) init_font_hex::i#0
|
|
Inlining constant with var siblings (const byte*) init_font_hex::proto_hi#0
|
|
Inlining constant with var siblings (const byte*) init_font_hex::proto_lo#0
|
|
Inlining constant with var siblings (const byte*) init_font_hex::charset#1
|
|
Inlining constant with var siblings (const byte) init_font_hex::idx#1
|
|
Inlining constant with var siblings (const word) atan2_16::angle#0
|
|
Inlining constant with var siblings (const byte) atan2_16::i#0
|
|
Inlining constant with var siblings (const signed byte) main::y#0
|
|
Inlining constant with var siblings (const signed byte) main::x#0
|
|
Inlining constant with var siblings (const byte*) main::screen#0
|
|
Constant inlined main::screen#0 = (const byte*) SCREEN#0
|
|
Constant inlined main::toD0181_screen#0 = (const byte*) SCREEN#0
|
|
Constant inlined main::toD0181_gfx#0 = (const byte*) CHARSET#0
|
|
Constant inlined init_font_hex::proto_hi#0 = (const byte[]) FONT_HEX_PROTO#0
|
|
Constant inlined atan2_16::angle#0 = (byte) 0
|
|
Constant inlined init_font_hex::charset#1 = (const byte*) CHARSET#0
|
|
Constant inlined init_font_hex::c1#0 = (byte) 0
|
|
Constant inlined atan2_16::$16 = (const byte) CORDIC_ITERATIONS_16#0-(byte) 1
|
|
Constant inlined atan2_16::i#0 = (byte) 0
|
|
Constant inlined main::toD0181_$0#0 = (word)(const byte*) SCREEN#0
|
|
Constant inlined main::x#0 = (signed byte) -$13
|
|
Constant inlined main::toD0181_$1#0 = (word)(const byte*) SCREEN#0&(word) $3fff
|
|
Constant inlined main::y#0 = (signed byte) -$c
|
|
Constant inlined init_font_hex::i#0 = (byte) 0
|
|
Constant inlined main::toD0181_$6#0 = >(word)(const byte*) CHARSET#0/(byte) 4
|
|
Constant inlined main::toD0181_$7#0 = >(word)(const byte*) CHARSET#0/(byte) 4&(byte) $f
|
|
Constant inlined init_font_hex::idx#1 = ++(byte) 0
|
|
Constant inlined init_font_hex::idx#0 = (byte) 0
|
|
Constant inlined main::toD0181_$2#0 = (word)(const byte*) SCREEN#0&(word) $3fff*(byte) 4
|
|
Constant inlined main::$2 = (const byte*) COLS#0+(word)(number) $c*(number) $28
|
|
Constant inlined main::toD0181_$3#0 = >(word)(const byte*) SCREEN#0&(word) $3fff*(byte) 4
|
|
Constant inlined main::toD0181_$4#0 = (word)(const byte*) CHARSET#0
|
|
Constant inlined main::toD0181_$5#0 = >(word)(const byte*) CHARSET#0
|
|
Constant inlined init_font_hex::proto_lo#0 = (const byte[]) FONT_HEX_PROTO#0
|
|
Constant inlined init_font_hex::c#0 = (byte) 0
|
|
Successful SSA optimization Pass2ConstantInlining
|
|
Consolidated array index constant in *(COLS#0+(word)$c*$28+$13)
|
|
Consolidated array index constant in *(COLS#0+(word)$c*$28+$13)
|
|
Successful SSA optimization Pass2ConstantAdditionElimination
|
|
Simplifying constant integer increment ++0
|
|
Successful SSA optimization Pass2ConstantSimplification
|
|
Eliminating unused constant (const byte) SIZEOF_WORD
|
|
Successful SSA optimization PassNEliminateUnusedVars
|
|
Added new block during phi lifting init_font_hex::@7(between init_font_hex::@5 and init_font_hex::@1)
|
|
Added new block during phi lifting init_font_hex::@8(between init_font_hex::@4 and init_font_hex::@2)
|
|
Added new block during phi lifting init_font_hex::@9(between init_font_hex::@3 and init_font_hex::@3)
|
|
Added new block during phi lifting atan2_16::@34(between atan2_16::@27 and atan2_16::@15)
|
|
Added new block during phi lifting atan2_16::@35(between atan2_16::@15 and atan2_16::@17)
|
|
Added new block during phi lifting atan2_16::@36(between atan2_16::@27 and atan2_16::@17)
|
|
Added new block during phi lifting atan2_16::@37(between atan2_16::@20 and atan2_16::@25)
|
|
Added new block during phi lifting atan2_16::@38(between atan2_16::@17 and atan2_16::@7)
|
|
Added new block during phi lifting atan2_16::@39(between atan2_16::@7 and atan2_16::@8)
|
|
Added new block during phi lifting main::@14(between main::@3 and main::@1)
|
|
Added new block during phi lifting main::@15(between main::@13 and main::@2)
|
|
Adding NOP phi() at start of @begin
|
|
Adding NOP phi() at start of @1
|
|
Adding NOP phi() at start of @3
|
|
Adding NOP phi() at start of @7
|
|
Adding NOP phi() at start of @8
|
|
Adding NOP phi() at start of @9
|
|
Adding NOP phi() at start of @end
|
|
Adding NOP phi() at start of main
|
|
Adding NOP phi() at start of main::@12
|
|
Adding NOP phi() at start of main::toD0181
|
|
Adding NOP phi() at start of main::toD0181_@return
|
|
Adding NOP phi() at start of main::@4
|
|
Adding NOP phi() at start of main::@5
|
|
Adding NOP phi() at start of init_font_hex
|
|
CALL GRAPH
|
|
Calls in [] to main:5
|
|
Calls in [main] to init_font_hex:9 atan2_16:21
|
|
|
|
Created 29 initial phi equivalence classes
|
|
Coalesced [15] main::screen#7 ← main::screen#4
|
|
Coalesced [35] main::y#6 ← main::y#1
|
|
Coalesced [36] main::screen#6 ← main::screen#1
|
|
Coalesced [37] main::x#4 ← main::x#1
|
|
Coalesced (already) [38] main::screen#8 ← main::screen#1
|
|
Coalesced [41] atan2_16::yi#17 ← atan2_16::$2
|
|
Coalesced [45] atan2_16::xi#14 ← atan2_16::$7
|
|
Coalesced [47] atan2_16::yi#19 ← atan2_16::yi#0
|
|
Coalesced [48] atan2_16::xi#16 ← atan2_16::xi#0
|
|
Coalesced [51] atan2_16::angle#22 ← atan2_16::angle#12
|
|
Coalesced [56] atan2_16::angle#27 ← atan2_16::angle#4
|
|
Coalesced [60] atan2_16::return#5 ← atan2_16::angle#5
|
|
Coalesced [63] atan2_16::return#6 ← atan2_16::angle#11
|
|
Coalesced [64] atan2_16::angle#26 ← atan2_16::angle#1
|
|
Not coalescing [65] atan2_16::shift#5 ← atan2_16::i#2
|
|
Not coalescing [66] atan2_16::xd#10 ← atan2_16::xi#3
|
|
Not coalescing [67] atan2_16::yd#10 ← atan2_16::yi#3
|
|
Coalesced [73] atan2_16::yd#13 ← atan2_16::yd#2
|
|
Coalesced [74] atan2_16::xd#13 ← atan2_16::xd#2
|
|
Coalesced [81] atan2_16::yi#21 ← atan2_16::yi#2
|
|
Coalesced [82] atan2_16::angle#25 ← atan2_16::angle#3
|
|
Coalesced [83] atan2_16::xi#18 ← atan2_16::xi#2
|
|
Coalesced [87] atan2_16::yi#18 ← atan2_16::yi#8
|
|
Coalesced [88] atan2_16::xi#15 ← atan2_16::xi#8
|
|
Coalesced [89] atan2_16::i#12 ← atan2_16::i#1
|
|
Coalesced [90] atan2_16::angle#21 ← atan2_16::angle#13
|
|
Coalesced (already) [91] atan2_16::angle#23 ← atan2_16::angle#13
|
|
Coalesced [96] atan2_16::yi#20 ← atan2_16::yi#1
|
|
Coalesced [97] atan2_16::angle#24 ← atan2_16::angle#2
|
|
Coalesced [98] atan2_16::xi#17 ← atan2_16::xi#1
|
|
Coalesced [99] atan2_16::yd#12 ← atan2_16::yd#3
|
|
Coalesced [100] atan2_16::xd#12 ← atan2_16::xd#3
|
|
Coalesced [104] atan2_16::shift#6 ← atan2_16::shift#1
|
|
Coalesced [105] atan2_16::xd#11 ← atan2_16::xd#1
|
|
Coalesced [106] atan2_16::yd#11 ← atan2_16::yd#1
|
|
Not coalescing [107] atan2_16::xi#13 ← atan2_16::x#0
|
|
Not coalescing [108] atan2_16::yi#16 ← atan2_16::y#0
|
|
Coalesced [111] init_font_hex::charset#9 ← init_font_hex::charset#5
|
|
Coalesced [133] init_font_hex::charset#8 ← init_font_hex::charset#0
|
|
Coalesced [134] init_font_hex::proto_hi#7 ← init_font_hex::proto_hi#1
|
|
Coalesced [135] init_font_hex::c#7 ← init_font_hex::c#1
|
|
Coalesced (already) [136] init_font_hex::charset#10 ← init_font_hex::charset#0
|
|
Coalesced [137] init_font_hex::proto_lo#5 ← init_font_hex::proto_lo#1
|
|
Coalesced [138] init_font_hex::c1#5 ← init_font_hex::c1#1
|
|
Coalesced [139] init_font_hex::i#3 ← init_font_hex::i#1
|
|
Coalesced [140] init_font_hex::idx#7 ← init_font_hex::idx#2
|
|
Coalesced down to 20 phi equivalence classes
|
|
Culled Empty Block (label) @1
|
|
Culled Empty Block (label) @3
|
|
Culled Empty Block (label) @7
|
|
Culled Empty Block (label) @9
|
|
Culled Empty Block (label) main::@12
|
|
Culled Empty Block (label) main::toD0181_@return
|
|
Culled Empty Block (label) main::@4
|
|
Culled Empty Block (label) main::@5
|
|
Culled Empty Block (label) main::@14
|
|
Culled Empty Block (label) main::@15
|
|
Culled Empty Block (label) atan2_16::@35
|
|
Culled Empty Block (label) atan2_16::@39
|
|
Culled Empty Block (label) atan2_16::@38
|
|
Culled Empty Block (label) atan2_16::@34
|
|
Culled Empty Block (label) atan2_16::@36
|
|
Culled Empty Block (label) atan2_16::@37
|
|
Culled Empty Block (label) init_font_hex::@7
|
|
Culled Empty Block (label) init_font_hex::@8
|
|
Culled Empty Block (label) init_font_hex::@9
|
|
Renumbering block @8 to @1
|
|
Renumbering block atan2_16::@13 to atan2_16::@9
|
|
Renumbering block atan2_16::@15 to atan2_16::@10
|
|
Renumbering block atan2_16::@16 to atan2_16::@11
|
|
Renumbering block atan2_16::@17 to atan2_16::@12
|
|
Renumbering block atan2_16::@18 to atan2_16::@13
|
|
Renumbering block atan2_16::@19 to atan2_16::@14
|
|
Renumbering block atan2_16::@20 to atan2_16::@15
|
|
Renumbering block atan2_16::@24 to atan2_16::@16
|
|
Renumbering block atan2_16::@25 to atan2_16::@17
|
|
Renumbering block atan2_16::@26 to atan2_16::@18
|
|
Renumbering block atan2_16::@27 to atan2_16::@19
|
|
Renumbering block atan2_16::@30 to atan2_16::@20
|
|
Renumbering block atan2_16::@33 to atan2_16::@21
|
|
Renumbering block main::@6 to main::@4
|
|
Renumbering block main::@11 to main::@5
|
|
Renumbering block main::@13 to main::@6
|
|
Adding NOP phi() at start of @begin
|
|
Adding NOP phi() at start of @1
|
|
Adding NOP phi() at start of @end
|
|
Adding NOP phi() at start of main
|
|
Adding NOP phi() at start of main::toD0181
|
|
Adding NOP phi() at start of init_font_hex
|
|
|
|
FINAL CONTROL FLOW GRAPH
|
|
@begin: scope:[] from
|
|
[0] phi()
|
|
to:@1
|
|
@1: scope:[] from @begin
|
|
[1] phi()
|
|
[2] call main
|
|
to:@end
|
|
@end: scope:[] from @1
|
|
[3] phi()
|
|
main: scope:[main] from @1
|
|
[4] phi()
|
|
[5] call init_font_hex
|
|
to:main::toD0181
|
|
main::toD0181: scope:[main] from main
|
|
[6] phi()
|
|
to:main::@5
|
|
main::@5: scope:[main] from main::toD0181
|
|
[7] *((const byte*) D018#0) ← (const byte) main::toD0181_return#0
|
|
to:main::@1
|
|
main::@1: scope:[main] from main::@3 main::@5
|
|
[8] (byte*) main::screen#4 ← phi( main::@5/(const byte*) SCREEN#0 main::@3/(byte*) main::screen#1 )
|
|
[8] (signed byte) main::y#4 ← phi( main::@5/(signed byte) -$c main::@3/(signed byte) main::y#1 )
|
|
to:main::@2
|
|
main::@2: scope:[main] from main::@1 main::@6
|
|
[9] (byte*) main::screen#2 ← phi( main::@1/(byte*) main::screen#4 main::@6/(byte*) main::screen#1 )
|
|
[9] (signed byte) main::x#2 ← phi( main::@1/(signed byte) -$13 main::@6/(signed byte) main::x#1 )
|
|
[10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0
|
|
[11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0
|
|
[12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0
|
|
[13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0
|
|
[14] call atan2_16
|
|
[15] (word) atan2_16::return#2 ← (word) atan2_16::return#0
|
|
to:main::@6
|
|
main::@6: scope:[main] from main::@2
|
|
[16] (word) main::angle_w#0 ← (word) atan2_16::return#2
|
|
[17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80
|
|
[18] (byte) main::ang_w#0 ← > (word~) main::$11
|
|
[19] *((byte*) main::screen#2) ← (byte) main::ang_w#0
|
|
[20] (byte*) main::screen#1 ← ++ (byte*) main::screen#2
|
|
[21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2
|
|
[22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2
|
|
to:main::@3
|
|
main::@3: scope:[main] from main::@6
|
|
[23] (signed byte) main::y#1 ← ++ (signed byte) main::y#4
|
|
[24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1
|
|
to:main::@4
|
|
main::@4: scope:[main] from main::@3 main::@4
|
|
[25] *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) ← ++ *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13)
|
|
to:main::@4
|
|
atan2_16: scope:[atan2_16] from main::@2
|
|
[26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1
|
|
to:atan2_16::@2
|
|
atan2_16::@2: scope:[atan2_16] from atan2_16
|
|
[27] (signed word~) atan2_16::$2 ← - (signed word) atan2_16::y#0
|
|
to:atan2_16::@3
|
|
atan2_16::@3: scope:[atan2_16] from atan2_16::@1 atan2_16::@2
|
|
[28] (signed word) atan2_16::yi#0 ← phi( atan2_16::@1/(signed word~) atan2_16::yi#16 atan2_16::@2/(signed word~) atan2_16::$2 )
|
|
[29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4
|
|
to:atan2_16::@5
|
|
atan2_16::@5: scope:[atan2_16] from atan2_16::@3
|
|
[30] (signed word~) atan2_16::$7 ← - (signed word) atan2_16::x#0
|
|
to:atan2_16::@6
|
|
atan2_16::@6: scope:[atan2_16] from atan2_16::@4 atan2_16::@5
|
|
[31] (signed word) atan2_16::xi#0 ← phi( atan2_16::@4/(signed word~) atan2_16::xi#13 atan2_16::@5/(signed word~) atan2_16::$7 )
|
|
to:atan2_16::@10
|
|
atan2_16::@10: scope:[atan2_16] from atan2_16::@19 atan2_16::@6
|
|
[32] (word) atan2_16::angle#12 ← phi( atan2_16::@19/(word) atan2_16::angle#13 atan2_16::@6/(byte) 0 )
|
|
[32] (byte) atan2_16::i#2 ← phi( atan2_16::@19/(byte) atan2_16::i#1 atan2_16::@6/(byte) 0 )
|
|
[32] (signed word) atan2_16::xi#3 ← phi( atan2_16::@19/(signed word) atan2_16::xi#8 atan2_16::@6/(signed word) atan2_16::xi#0 )
|
|
[32] (signed word) atan2_16::yi#3 ← phi( atan2_16::@19/(signed word) atan2_16::yi#8 atan2_16::@6/(signed word) atan2_16::yi#0 )
|
|
[33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11
|
|
to:atan2_16::@12
|
|
atan2_16::@12: scope:[atan2_16] from atan2_16::@10 atan2_16::@19
|
|
[34] (word) atan2_16::angle#6 ← phi( atan2_16::@10/(word) atan2_16::angle#12 atan2_16::@19/(word) atan2_16::angle#13 )
|
|
[35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1
|
|
[36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7
|
|
to:atan2_16::@21
|
|
atan2_16::@21: scope:[atan2_16] from atan2_16::@12
|
|
[37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1
|
|
to:atan2_16::@7
|
|
atan2_16::@7: scope:[atan2_16] from atan2_16::@12 atan2_16::@21
|
|
[38] (word) atan2_16::angle#11 ← phi( atan2_16::@12/(word) atan2_16::angle#1 atan2_16::@21/(word) atan2_16::angle#4 )
|
|
[39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8
|
|
to:atan2_16::@9
|
|
atan2_16::@9: scope:[atan2_16] from atan2_16::@7
|
|
[40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11
|
|
to:atan2_16::@8
|
|
atan2_16::@8: scope:[atan2_16] from atan2_16::@7 atan2_16::@9
|
|
[41] (word) atan2_16::return#0 ← phi( atan2_16::@9/(word) atan2_16::angle#5 atan2_16::@7/(word) atan2_16::angle#11 )
|
|
to:atan2_16::@return
|
|
atan2_16::@return: scope:[atan2_16] from atan2_16::@8
|
|
[42] return
|
|
to:@return
|
|
atan2_16::@11: scope:[atan2_16] from atan2_16::@10
|
|
[43] (byte~) atan2_16::shift#5 ← (byte) atan2_16::i#2
|
|
[44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3
|
|
[45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3
|
|
to:atan2_16::@13
|
|
atan2_16::@13: scope:[atan2_16] from atan2_16::@11 atan2_16::@14
|
|
[46] (signed word) atan2_16::yd#3 ← phi( atan2_16::@11/(signed word~) atan2_16::yd#10 atan2_16::@14/(signed word) atan2_16::yd#1 )
|
|
[46] (signed word) atan2_16::xd#3 ← phi( atan2_16::@11/(signed word~) atan2_16::xd#10 atan2_16::@14/(signed word) atan2_16::xd#1 )
|
|
[46] (byte) atan2_16::shift#2 ← phi( atan2_16::@11/(byte~) atan2_16::shift#5 atan2_16::@14/(byte) atan2_16::shift#1 )
|
|
[47] if((byte) atan2_16::shift#2>=(byte) 2) goto atan2_16::@14
|
|
to:atan2_16::@15
|
|
atan2_16::@15: scope:[atan2_16] from atan2_16::@13
|
|
[48] if((byte) 0==(byte) atan2_16::shift#2) goto atan2_16::@17
|
|
to:atan2_16::@16
|
|
atan2_16::@16: scope:[atan2_16] from atan2_16::@15
|
|
[49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1
|
|
[50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1
|
|
to:atan2_16::@17
|
|
atan2_16::@17: scope:[atan2_16] from atan2_16::@15 atan2_16::@16
|
|
[51] (signed word) atan2_16::xd#5 ← phi( atan2_16::@15/(signed word) atan2_16::xd#3 atan2_16::@16/(signed word) atan2_16::xd#2 )
|
|
[51] (signed word) atan2_16::yd#5 ← phi( atan2_16::@15/(signed word) atan2_16::yd#3 atan2_16::@16/(signed word) atan2_16::yd#2 )
|
|
[52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18
|
|
to:atan2_16::@20
|
|
atan2_16::@20: scope:[atan2_16] from atan2_16::@17
|
|
[53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5
|
|
[54] (signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#3 + (signed word) atan2_16::xd#5
|
|
[55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1
|
|
[56] (word) atan2_16::angle#3 ← (word) atan2_16::angle#12 - *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24)
|
|
to:atan2_16::@19
|
|
atan2_16::@19: scope:[atan2_16] from atan2_16::@18 atan2_16::@20
|
|
[57] (signed word) atan2_16::xi#8 ← phi( atan2_16::@18/(signed word) atan2_16::xi#1 atan2_16::@20/(signed word) atan2_16::xi#2 )
|
|
[57] (word) atan2_16::angle#13 ← phi( atan2_16::@18/(word) atan2_16::angle#2 atan2_16::@20/(word) atan2_16::angle#3 )
|
|
[57] (signed word) atan2_16::yi#8 ← phi( atan2_16::@18/(signed word) atan2_16::yi#1 atan2_16::@20/(signed word) atan2_16::yi#2 )
|
|
[58] (byte) atan2_16::i#1 ← ++ (byte) atan2_16::i#2
|
|
[59] if((byte) atan2_16::i#1==(const byte) CORDIC_ITERATIONS_16#0-(byte) 1+(byte) 1) goto atan2_16::@12
|
|
to:atan2_16::@10
|
|
atan2_16::@18: scope:[atan2_16] from atan2_16::@17
|
|
[60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5
|
|
[61] (signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#3 - (signed word) atan2_16::xd#5
|
|
[62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1
|
|
[63] (word) atan2_16::angle#2 ← (word) atan2_16::angle#12 + *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23)
|
|
to:atan2_16::@19
|
|
atan2_16::@14: scope:[atan2_16] from atan2_16::@13
|
|
[64] (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (signed byte) 2
|
|
[65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2
|
|
[66] (byte) atan2_16::shift#1 ← (byte) atan2_16::shift#2 - (byte) 2
|
|
to:atan2_16::@13
|
|
atan2_16::@4: scope:[atan2_16] from atan2_16::@3
|
|
[67] (signed word~) atan2_16::xi#13 ← (signed word) atan2_16::x#0
|
|
to:atan2_16::@6
|
|
atan2_16::@1: scope:[atan2_16] from atan2_16
|
|
[68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0
|
|
to:atan2_16::@3
|
|
init_font_hex: scope:[init_font_hex] from main
|
|
[69] phi()
|
|
to:init_font_hex::@1
|
|
init_font_hex::@1: scope:[init_font_hex] from init_font_hex init_font_hex::@5
|
|
[70] (byte) init_font_hex::c#6 ← phi( init_font_hex/(byte) 0 init_font_hex::@5/(byte) init_font_hex::c#1 )
|
|
[70] (byte*) init_font_hex::proto_hi#6 ← phi( init_font_hex/(const byte[]) FONT_HEX_PROTO#0 init_font_hex::@5/(byte*) init_font_hex::proto_hi#1 )
|
|
[70] (byte*) init_font_hex::charset#5 ← phi( init_font_hex/(const byte*) CHARSET#0 init_font_hex::@5/(byte*) init_font_hex::charset#0 )
|
|
to:init_font_hex::@2
|
|
init_font_hex::@2: scope:[init_font_hex] from init_font_hex::@1 init_font_hex::@4
|
|
[71] (byte) init_font_hex::c1#4 ← phi( init_font_hex::@1/(byte) 0 init_font_hex::@4/(byte) init_font_hex::c1#1 )
|
|
[71] (byte*) init_font_hex::proto_lo#4 ← phi( init_font_hex::@1/(const byte[]) FONT_HEX_PROTO#0 init_font_hex::@4/(byte*) init_font_hex::proto_lo#1 )
|
|
[71] (byte*) init_font_hex::charset#2 ← phi( init_font_hex::@1/(byte*) init_font_hex::charset#5 init_font_hex::@4/(byte*) init_font_hex::charset#0 )
|
|
[72] *((byte*) init_font_hex::charset#2) ← (byte) 0
|
|
to:init_font_hex::@3
|
|
init_font_hex::@3: scope:[init_font_hex] from init_font_hex::@2 init_font_hex::@3
|
|
[73] (byte) init_font_hex::idx#5 ← phi( init_font_hex::@2/(byte) 1 init_font_hex::@3/(byte) init_font_hex::idx#2 )
|
|
[73] (byte) init_font_hex::i#2 ← phi( init_font_hex::@2/(byte) 0 init_font_hex::@3/(byte) init_font_hex::i#1 )
|
|
[74] (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#6 + (byte) init_font_hex::i#2) << (byte) 4
|
|
[75] (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#4 + (byte) init_font_hex::i#2) << (byte) 1
|
|
[76] (byte~) init_font_hex::$2 ← (byte~) init_font_hex::$0 | (byte~) init_font_hex::$1
|
|
[77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2
|
|
[78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5
|
|
[79] (byte) init_font_hex::i#1 ← ++ (byte) init_font_hex::i#2
|
|
[80] if((byte) init_font_hex::i#1!=(byte) 5) goto init_font_hex::@3
|
|
to:init_font_hex::@4
|
|
init_font_hex::@4: scope:[init_font_hex] from init_font_hex::@3
|
|
[81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0
|
|
[82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2
|
|
[83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0
|
|
[84] (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#4 + (byte) 5
|
|
[85] (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#2 + (byte) 8
|
|
[86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4
|
|
[87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2
|
|
to:init_font_hex::@5
|
|
init_font_hex::@5: scope:[init_font_hex] from init_font_hex::@4
|
|
[88] (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#6 + (byte) 5
|
|
[89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6
|
|
[90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1
|
|
to:init_font_hex::@return
|
|
init_font_hex::@return: scope:[init_font_hex] from init_font_hex::@5
|
|
[91] return
|
|
to:@return
|
|
|
|
|
|
VARIABLE REGISTER WEIGHTS
|
|
(byte*) CHARSET
|
|
(byte*) COLS
|
|
(word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16
|
|
(byte) CORDIC_ITERATIONS_16
|
|
(byte*) D018
|
|
(byte[]) FONT_HEX_PROTO
|
|
(byte*) SCREEN
|
|
(word()) atan2_16((signed word) atan2_16::x , (signed word) atan2_16::y)
|
|
(signed word~) atan2_16::$2 4.0
|
|
(byte~) atan2_16::$23 2002.0
|
|
(byte~) atan2_16::$24 2002.0
|
|
(signed word~) atan2_16::$7 4.0
|
|
(word) atan2_16::angle
|
|
(word) atan2_16::angle#1 3.0
|
|
(word) atan2_16::angle#11 4.0
|
|
(word) atan2_16::angle#12 190.66666666666666
|
|
(word) atan2_16::angle#13 1334.6666666666667
|
|
(word) atan2_16::angle#2 2002.0
|
|
(word) atan2_16::angle#3 2002.0
|
|
(word) atan2_16::angle#4 4.0
|
|
(word) atan2_16::angle#5 4.0
|
|
(word) atan2_16::angle#6 2004.0
|
|
(byte) atan2_16::i
|
|
(byte) atan2_16::i#1 1501.5
|
|
(byte) atan2_16::i#2 208.54166666666669
|
|
(word) atan2_16::return
|
|
(word) atan2_16::return#0 34.99999999999999
|
|
(word) atan2_16::return#2 202.0
|
|
(byte) atan2_16::shift
|
|
(byte) atan2_16::shift#1 20002.0
|
|
(byte) atan2_16::shift#2 8001.25
|
|
(byte~) atan2_16::shift#5 667.3333333333334
|
|
(signed word) atan2_16::x
|
|
(signed word) atan2_16::x#0 2.8684210526315796
|
|
(signed word) atan2_16::xd
|
|
(signed word) atan2_16::xd#1 6667.333333333333
|
|
(signed word~) atan2_16::xd#10 1001.0
|
|
(signed word) atan2_16::xd#2 1001.0
|
|
(signed word) atan2_16::xd#3 7668.333333333332
|
|
(signed word) atan2_16::xd#5 1001.0
|
|
(signed word) atan2_16::xi
|
|
(signed word) atan2_16::xi#0 6.0
|
|
(signed word) atan2_16::xi#1 500.5
|
|
(signed word~) atan2_16::xi#13 4.0
|
|
(signed word) atan2_16::xi#2 500.5
|
|
(signed word) atan2_16::xi#3 267.0666666666667
|
|
(signed word) atan2_16::xi#8 1001.0
|
|
(signed word) atan2_16::y
|
|
(signed word) atan2_16::y#0 2.724999999999999
|
|
(signed word) atan2_16::yd
|
|
(signed word) atan2_16::yd#1 10001.0
|
|
(signed word~) atan2_16::yd#10 2002.0
|
|
(signed word) atan2_16::yd#2 2002.0
|
|
(signed word) atan2_16::yd#3 4601.0
|
|
(signed word) atan2_16::yd#5 2002.0
|
|
(signed word) atan2_16::yi
|
|
(signed word) atan2_16::yi#0 1.2000000000000002
|
|
(signed word) atan2_16::yi#1 667.3333333333334
|
|
(signed word~) atan2_16::yi#16 4.0
|
|
(signed word) atan2_16::yi#2 667.3333333333334
|
|
(signed word) atan2_16::yi#3 353.4117647058823
|
|
(signed word) atan2_16::yi#8 1001.0
|
|
(void()) init_font_hex((byte*) init_font_hex::charset)
|
|
(byte~) init_font_hex::$0 1001.0
|
|
(byte~) init_font_hex::$1 2002.0
|
|
(byte~) init_font_hex::$2 2002.0
|
|
(byte) init_font_hex::c
|
|
(byte) init_font_hex::c#1 16.5
|
|
(byte) init_font_hex::c#6 1.1578947368421053
|
|
(byte) init_font_hex::c1
|
|
(byte) init_font_hex::c1#1 151.5
|
|
(byte) init_font_hex::c1#4 13.466666666666667
|
|
(byte*) init_font_hex::charset
|
|
(byte*) init_font_hex::charset#0 35.5
|
|
(byte*) init_font_hex::charset#2 108.35714285714285
|
|
(byte*) init_font_hex::charset#5 22.0
|
|
(byte) init_font_hex::i
|
|
(byte) init_font_hex::i#1 1501.5
|
|
(byte) init_font_hex::i#2 667.3333333333334
|
|
(byte) init_font_hex::idx
|
|
(byte) init_font_hex::idx#2 551.0
|
|
(byte) init_font_hex::idx#3 202.0
|
|
(byte) init_font_hex::idx#5 600.5999999999999
|
|
(byte*) init_font_hex::proto_hi
|
|
(byte*) init_font_hex::proto_hi#1 7.333333333333333
|
|
(byte*) init_font_hex::proto_hi#6 56.83333333333334
|
|
(byte*) init_font_hex::proto_lo
|
|
(byte*) init_font_hex::proto_lo#1 50.5
|
|
(byte*) init_font_hex::proto_lo#4 92.53846153846155
|
|
(void()) main()
|
|
(word~) main::$11 202.0
|
|
(byte) main::ang_w
|
|
(byte) main::ang_w#0 202.0
|
|
(word) main::angle_w
|
|
(word) main::angle_w#0 202.0
|
|
(byte*) main::col00
|
|
(byte*) main::screen
|
|
(byte*) main::screen#1 42.599999999999994
|
|
(byte*) main::screen#2 28.545454545454547
|
|
(byte*) main::screen#4 22.0
|
|
(word~) main::toD0181_$0
|
|
(number~) main::toD0181_$1
|
|
(number~) main::toD0181_$2
|
|
(number~) main::toD0181_$3
|
|
(word~) main::toD0181_$4
|
|
(byte~) main::toD0181_$5
|
|
(number~) main::toD0181_$6
|
|
(number~) main::toD0181_$7
|
|
(number~) main::toD0181_$8
|
|
(byte*) main::toD0181_gfx
|
|
(byte) main::toD0181_return
|
|
(byte*) main::toD0181_screen
|
|
(signed byte) main::x
|
|
(signed byte) main::x#1 151.5
|
|
(signed byte) main::x#2 16.833333333333332
|
|
(signed word) main::xw
|
|
(word) main::xw#0 50.5
|
|
(signed byte) main::y
|
|
(signed byte) main::y#1 16.5
|
|
(signed byte) main::y#4 1.4666666666666666
|
|
(signed word) main::yw
|
|
(word) main::yw#0 50.5
|
|
|
|
Initial phi equivalence classes
|
|
[ main::y#4 main::y#1 ]
|
|
[ main::x#2 main::x#1 ]
|
|
[ main::screen#2 main::screen#4 main::screen#1 ]
|
|
[ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ]
|
|
[ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ]
|
|
[ atan2_16::i#2 atan2_16::i#1 ]
|
|
[ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ]
|
|
[ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ]
|
|
[ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ]
|
|
[ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ]
|
|
[ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ]
|
|
[ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ]
|
|
[ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
[ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ]
|
|
[ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ]
|
|
[ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
[ init_font_hex::i#2 init_font_hex::i#1 ]
|
|
[ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Added variable main::xw#0 to zero page equivalence class [ main::xw#0 ]
|
|
Added variable main::yw#0 to zero page equivalence class [ main::yw#0 ]
|
|
Added variable atan2_16::x#0 to zero page equivalence class [ atan2_16::x#0 ]
|
|
Added variable atan2_16::y#0 to zero page equivalence class [ atan2_16::y#0 ]
|
|
Added variable atan2_16::return#2 to zero page equivalence class [ atan2_16::return#2 ]
|
|
Added variable main::angle_w#0 to zero page equivalence class [ main::angle_w#0 ]
|
|
Added variable main::$11 to zero page equivalence class [ main::$11 ]
|
|
Added variable main::ang_w#0 to zero page equivalence class [ main::ang_w#0 ]
|
|
Added variable atan2_16::$24 to zero page equivalence class [ atan2_16::$24 ]
|
|
Added variable atan2_16::$23 to zero page equivalence class [ atan2_16::$23 ]
|
|
Added variable init_font_hex::$0 to zero page equivalence class [ init_font_hex::$0 ]
|
|
Added variable init_font_hex::$1 to zero page equivalence class [ init_font_hex::$1 ]
|
|
Added variable init_font_hex::$2 to zero page equivalence class [ init_font_hex::$2 ]
|
|
Added variable init_font_hex::idx#3 to zero page equivalence class [ init_font_hex::idx#3 ]
|
|
Complete equivalence classes
|
|
[ main::y#4 main::y#1 ]
|
|
[ main::x#2 main::x#1 ]
|
|
[ main::screen#2 main::screen#4 main::screen#1 ]
|
|
[ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ]
|
|
[ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ]
|
|
[ atan2_16::i#2 atan2_16::i#1 ]
|
|
[ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ]
|
|
[ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ]
|
|
[ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ]
|
|
[ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ]
|
|
[ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ]
|
|
[ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ]
|
|
[ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
[ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ]
|
|
[ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ]
|
|
[ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
[ init_font_hex::i#2 init_font_hex::i#1 ]
|
|
[ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
[ main::xw#0 ]
|
|
[ main::yw#0 ]
|
|
[ atan2_16::x#0 ]
|
|
[ atan2_16::y#0 ]
|
|
[ atan2_16::return#2 ]
|
|
[ main::angle_w#0 ]
|
|
[ main::$11 ]
|
|
[ main::ang_w#0 ]
|
|
[ atan2_16::$24 ]
|
|
[ atan2_16::$23 ]
|
|
[ init_font_hex::$0 ]
|
|
[ init_font_hex::$1 ]
|
|
[ init_font_hex::$2 ]
|
|
[ init_font_hex::idx#3 ]
|
|
Allocated zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Allocated zp ZP_BYTE:3 [ main::x#2 main::x#1 ]
|
|
Allocated zp ZP_WORD:4 [ main::screen#2 main::screen#4 main::screen#1 ]
|
|
Allocated zp ZP_WORD:6 [ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ]
|
|
Allocated zp ZP_WORD:8 [ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ]
|
|
Allocated zp ZP_BYTE:10 [ atan2_16::i#2 atan2_16::i#1 ]
|
|
Allocated zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ]
|
|
Allocated zp ZP_WORD:13 [ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ]
|
|
Allocated zp ZP_BYTE:15 [ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ]
|
|
Allocated zp ZP_WORD:16 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ]
|
|
Allocated zp ZP_WORD:18 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ]
|
|
Allocated zp ZP_WORD:20 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ]
|
|
Allocated zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Allocated zp ZP_WORD:23 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ]
|
|
Allocated zp ZP_WORD:25 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ]
|
|
Allocated zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
Allocated zp ZP_BYTE:28 [ init_font_hex::i#2 init_font_hex::i#1 ]
|
|
Allocated zp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Allocated zp ZP_WORD:30 [ main::xw#0 ]
|
|
Allocated zp ZP_WORD:32 [ main::yw#0 ]
|
|
Allocated zp ZP_WORD:34 [ atan2_16::x#0 ]
|
|
Allocated zp ZP_WORD:36 [ atan2_16::y#0 ]
|
|
Allocated zp ZP_WORD:38 [ atan2_16::return#2 ]
|
|
Allocated zp ZP_WORD:40 [ main::angle_w#0 ]
|
|
Allocated zp ZP_WORD:42 [ main::$11 ]
|
|
Allocated zp ZP_BYTE:44 [ main::ang_w#0 ]
|
|
Allocated zp ZP_BYTE:45 [ atan2_16::$24 ]
|
|
Allocated zp ZP_BYTE:46 [ atan2_16::$23 ]
|
|
Allocated zp ZP_BYTE:47 [ init_font_hex::$0 ]
|
|
Allocated zp ZP_BYTE:48 [ init_font_hex::$1 ]
|
|
Allocated zp ZP_BYTE:49 [ init_font_hex::$2 ]
|
|
Allocated zp ZP_BYTE:50 [ init_font_hex::idx#3 ]
|
|
|
|
INITIAL ASM
|
|
Target platform is c64basic / MOS6502X
|
|
// File Comments
|
|
// Find atan2(x, y) using the CORDIC method
|
|
// See http://bsvi.ru/uploads/CORDIC--_10EBA/cordic.pdf
|
|
// Upstart
|
|
.pc = $801 "Basic"
|
|
:BasicUpstart(bbegin)
|
|
.pc = $80d "Program"
|
|
// Global Constants & labels
|
|
// The number of iterations performed during 16-bit CORDIC atan2 calculation
|
|
.const CORDIC_ITERATIONS_16 = $f
|
|
.label D018 = $d018
|
|
// Color Ram
|
|
.label COLS = $d800
|
|
.label CHARSET = $2000
|
|
.label SCREEN = $2800
|
|
// @begin
|
|
bbegin:
|
|
// [1] phi from @begin to @1 [phi:@begin->@1]
|
|
b1_from_bbegin:
|
|
jmp b1
|
|
// @1
|
|
b1:
|
|
// [2] call main
|
|
// [4] phi from @1 to main [phi:@1->main]
|
|
main_from_b1:
|
|
jsr main
|
|
// [3] phi from @1 to @end [phi:@1->@end]
|
|
bend_from_b1:
|
|
jmp bend
|
|
// @end
|
|
bend:
|
|
// main
|
|
main: {
|
|
.const toD0181_return = (>(SCREEN&$3fff)*4)|(>CHARSET)/4&$f
|
|
.label _11 = $2a
|
|
.label xw = $1e
|
|
.label yw = $20
|
|
.label angle_w = $28
|
|
.label ang_w = $2c
|
|
.label screen = 4
|
|
.label x = 3
|
|
.label y = 2
|
|
// [5] call init_font_hex
|
|
// [69] phi from main to init_font_hex [phi:main->init_font_hex]
|
|
init_font_hex_from_main:
|
|
jsr init_font_hex
|
|
// [6] phi from main to main::toD0181 [phi:main->main::toD0181]
|
|
toD0181_from_main:
|
|
jmp toD0181
|
|
// main::toD0181
|
|
toD0181:
|
|
jmp b5
|
|
// main::@5
|
|
b5:
|
|
// [7] *((const byte*) D018#0) ← (const byte) main::toD0181_return#0 -- _deref_pbuc1=vbuc2
|
|
lda #toD0181_return
|
|
sta D018
|
|
// [8] phi from main::@5 to main::@1 [phi:main::@5->main::@1]
|
|
b1_from_b5:
|
|
// [8] phi (byte*) main::screen#4 = (const byte*) SCREEN#0 [phi:main::@5->main::@1#0] -- pbuz1=pbuc1
|
|
lda #<SCREEN
|
|
sta.z screen
|
|
lda #>SCREEN
|
|
sta.z screen+1
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) -$c [phi:main::@5->main::@1#1] -- vbsz1=vbsc1
|
|
lda #-$c
|
|
sta.z y
|
|
jmp b1
|
|
// [8] phi from main::@3 to main::@1 [phi:main::@3->main::@1]
|
|
b1_from_b3:
|
|
// [8] phi (byte*) main::screen#4 = (byte*) main::screen#1 [phi:main::@3->main::@1#0] -- register_copy
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) main::y#1 [phi:main::@3->main::@1#1] -- register_copy
|
|
jmp b1
|
|
// main::@1
|
|
b1:
|
|
// [9] phi from main::@1 to main::@2 [phi:main::@1->main::@2]
|
|
b2_from_b1:
|
|
// [9] phi (byte*) main::screen#2 = (byte*) main::screen#4 [phi:main::@1->main::@2#0] -- register_copy
|
|
// [9] phi (signed byte) main::x#2 = (signed byte) -$13 [phi:main::@1->main::@2#1] -- vbsz1=vbsc1
|
|
lda #-$13
|
|
sta.z x
|
|
jmp b2
|
|
// [9] phi from main::@6 to main::@2 [phi:main::@6->main::@2]
|
|
b2_from_b6:
|
|
// [9] phi (byte*) main::screen#2 = (byte*) main::screen#1 [phi:main::@6->main::@2#0] -- register_copy
|
|
// [9] phi (signed byte) main::x#2 = (signed byte) main::x#1 [phi:main::@6->main::@2#1] -- register_copy
|
|
jmp b2
|
|
// main::@2
|
|
b2:
|
|
// [10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda.z x
|
|
ldy #0
|
|
sta.z xw+1
|
|
sty.z xw
|
|
// [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda.z y
|
|
ldy #0
|
|
sta.z yw+1
|
|
sty.z yw
|
|
// [12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0 -- vwsz1=vwsz2
|
|
lda.z xw
|
|
sta.z atan2_16.x
|
|
lda.z xw+1
|
|
sta.z atan2_16.x+1
|
|
// [13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0 -- vwsz1=vwsz2
|
|
lda.z yw
|
|
sta.z atan2_16.y
|
|
lda.z yw+1
|
|
sta.z atan2_16.y+1
|
|
// [14] call atan2_16
|
|
jsr atan2_16
|
|
// [15] (word) atan2_16::return#2 ← (word) atan2_16::return#0 -- vwuz1=vwuz2
|
|
lda.z atan2_16.return
|
|
sta.z atan2_16.return_2
|
|
lda.z atan2_16.return+1
|
|
sta.z atan2_16.return_2+1
|
|
jmp b6
|
|
// main::@6
|
|
b6:
|
|
// [16] (word) main::angle_w#0 ← (word) atan2_16::return#2 -- vwuz1=vwuz2
|
|
lda.z atan2_16.return_2
|
|
sta.z angle_w
|
|
lda.z atan2_16.return_2+1
|
|
sta.z angle_w+1
|
|
// [17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80 -- vwuz1=vwuz2_plus_vbuc1
|
|
lda #$80
|
|
clc
|
|
adc.z angle_w
|
|
sta.z _11
|
|
lda #0
|
|
adc.z angle_w+1
|
|
sta.z _11+1
|
|
// [18] (byte) main::ang_w#0 ← > (word~) main::$11 -- vbuz1=_hi_vwuz2
|
|
lda.z _11+1
|
|
sta.z ang_w
|
|
// [19] *((byte*) main::screen#2) ← (byte) main::ang_w#0 -- _deref_pbuz1=vbuz2
|
|
lda.z ang_w
|
|
ldy #0
|
|
sta (screen),y
|
|
// [20] (byte*) main::screen#1 ← ++ (byte*) main::screen#2 -- pbuz1=_inc_pbuz1
|
|
inc.z screen
|
|
bne !+
|
|
inc.z screen+1
|
|
!:
|
|
// [21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2 -- vbsz1=_inc_vbsz1
|
|
inc.z x
|
|
// [22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$15
|
|
cmp.z x
|
|
bne b2_from_b6
|
|
jmp b3
|
|
// main::@3
|
|
b3:
|
|
// [23] (signed byte) main::y#1 ← ++ (signed byte) main::y#4 -- vbsz1=_inc_vbsz1
|
|
inc.z y
|
|
// [24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$d
|
|
cmp.z y
|
|
bne b1_from_b3
|
|
jmp b4
|
|
// main::@4
|
|
b4:
|
|
// [25] *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) ← ++ *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) -- _deref_pbuc1=_inc__deref_pbuc2
|
|
lda COLS+$c*$28+$13
|
|
clc
|
|
adc #1
|
|
sta COLS+$c*$28+$13
|
|
jmp b4
|
|
}
|
|
// atan2_16
|
|
// Find the atan2(x, y) - which is the angle of the line from (0,0) to (x,y)
|
|
// Finding the angle requires a binary search using CORDIC_ITERATIONS_16
|
|
// Returns the angle in hex-degrees (0=0, 0x8000=PI, 0x10000=2*PI)
|
|
// atan2_16(signed word zeropage($22) x, signed word zeropage($24) y)
|
|
atan2_16: {
|
|
.label _2 = 6
|
|
.label _7 = 8
|
|
.label _23 = $2e
|
|
.label _24 = $2d
|
|
.label yi = 6
|
|
.label xi = 8
|
|
.label angle = $d
|
|
.label xd = $12
|
|
.label yd = $10
|
|
.label shift = $f
|
|
.label angle_2 = $b
|
|
.label angle_3 = $b
|
|
.label i = $a
|
|
.label return = $d
|
|
.label x = $22
|
|
.label y = $24
|
|
.label return_2 = $26
|
|
.label angle_6 = $b
|
|
.label angle_12 = $b
|
|
.label angle_13 = $b
|
|
// [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 -- vwsz1_ge_0_then_la1
|
|
lda.z y+1
|
|
bpl b1
|
|
jmp b2
|
|
// atan2_16::@2
|
|
b2:
|
|
// [27] (signed word~) atan2_16::$2 ← - (signed word) atan2_16::y#0 -- vwsz1=_neg_vwsz2
|
|
sec
|
|
lda #0
|
|
sbc.z y
|
|
sta.z _2
|
|
lda #0
|
|
sbc.z y+1
|
|
sta.z _2+1
|
|
// [28] phi from atan2_16::@1 atan2_16::@2 to atan2_16::@3 [phi:atan2_16::@1/atan2_16::@2->atan2_16::@3]
|
|
b3_from_b1:
|
|
b3_from_b2:
|
|
// [28] phi (signed word) atan2_16::yi#0 = (signed word~) atan2_16::yi#16 [phi:atan2_16::@1/atan2_16::@2->atan2_16::@3#0] -- register_copy
|
|
jmp b3
|
|
// atan2_16::@3
|
|
b3:
|
|
// [29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4 -- vwsz1_ge_0_then_la1
|
|
lda.z x+1
|
|
bpl b4
|
|
jmp b5
|
|
// atan2_16::@5
|
|
b5:
|
|
// [30] (signed word~) atan2_16::$7 ← - (signed word) atan2_16::x#0 -- vwsz1=_neg_vwsz2
|
|
sec
|
|
lda #0
|
|
sbc.z x
|
|
sta.z _7
|
|
lda #0
|
|
sbc.z x+1
|
|
sta.z _7+1
|
|
// [31] phi from atan2_16::@4 atan2_16::@5 to atan2_16::@6 [phi:atan2_16::@4/atan2_16::@5->atan2_16::@6]
|
|
b6_from_b4:
|
|
b6_from_b5:
|
|
// [31] phi (signed word) atan2_16::xi#0 = (signed word~) atan2_16::xi#13 [phi:atan2_16::@4/atan2_16::@5->atan2_16::@6#0] -- register_copy
|
|
jmp b6
|
|
// atan2_16::@6
|
|
b6:
|
|
// [32] phi from atan2_16::@6 to atan2_16::@10 [phi:atan2_16::@6->atan2_16::@10]
|
|
b10_from_b6:
|
|
// [32] phi (word) atan2_16::angle#12 = (byte) 0 [phi:atan2_16::@6->atan2_16::@10#0] -- vwuz1=vbuc1
|
|
lda #<0
|
|
sta.z angle_12
|
|
lda #>0
|
|
sta.z angle_12+1
|
|
// [32] phi (byte) atan2_16::i#2 = (byte) 0 [phi:atan2_16::@6->atan2_16::@10#1] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z i
|
|
// [32] phi (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#0 [phi:atan2_16::@6->atan2_16::@10#2] -- register_copy
|
|
// [32] phi (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#0 [phi:atan2_16::@6->atan2_16::@10#3] -- register_copy
|
|
jmp b10
|
|
// atan2_16::@10
|
|
b10:
|
|
// [33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11 -- vwsz1_neq_0_then_la1
|
|
lda.z yi+1
|
|
bne b11
|
|
lda.z yi
|
|
bne b11
|
|
// [34] phi from atan2_16::@10 atan2_16::@19 to atan2_16::@12 [phi:atan2_16::@10/atan2_16::@19->atan2_16::@12]
|
|
b12_from_b10:
|
|
b12_from_b19:
|
|
// [34] phi (word) atan2_16::angle#6 = (word) atan2_16::angle#12 [phi:atan2_16::@10/atan2_16::@19->atan2_16::@12#0] -- register_copy
|
|
jmp b12
|
|
// atan2_16::@12
|
|
b12:
|
|
// [35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1 -- vwuz1=vwuz2_ror_1
|
|
lda.z angle_6+1
|
|
lsr
|
|
sta.z angle+1
|
|
lda.z angle_6
|
|
ror
|
|
sta.z angle
|
|
// [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 -- vwsz1_ge_0_then_la1
|
|
lda.z x+1
|
|
bpl b7_from_b12
|
|
jmp b21
|
|
// atan2_16::@21
|
|
b21:
|
|
// [37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1 -- vwuz1=vwuc1_minus_vwuz1
|
|
sec
|
|
lda #<$8000
|
|
sbc.z angle
|
|
sta.z angle
|
|
lda #>$8000
|
|
sbc.z angle+1
|
|
sta.z angle+1
|
|
// [38] phi from atan2_16::@12 atan2_16::@21 to atan2_16::@7 [phi:atan2_16::@12/atan2_16::@21->atan2_16::@7]
|
|
b7_from_b12:
|
|
b7_from_b21:
|
|
// [38] phi (word) atan2_16::angle#11 = (word) atan2_16::angle#1 [phi:atan2_16::@12/atan2_16::@21->atan2_16::@7#0] -- register_copy
|
|
jmp b7
|
|
// atan2_16::@7
|
|
b7:
|
|
// [39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8 -- vwsz1_ge_0_then_la1
|
|
lda.z y+1
|
|
bpl b8_from_b7
|
|
jmp b9
|
|
// atan2_16::@9
|
|
b9:
|
|
// [40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11 -- vwuz1=_neg_vwuz1
|
|
sec
|
|
lda #0
|
|
sbc.z angle
|
|
sta.z angle
|
|
lda #0
|
|
sbc.z angle+1
|
|
sta.z angle+1
|
|
// [41] phi from atan2_16::@7 atan2_16::@9 to atan2_16::@8 [phi:atan2_16::@7/atan2_16::@9->atan2_16::@8]
|
|
b8_from_b7:
|
|
b8_from_b9:
|
|
// [41] phi (word) atan2_16::return#0 = (word) atan2_16::angle#11 [phi:atan2_16::@7/atan2_16::@9->atan2_16::@8#0] -- register_copy
|
|
jmp b8
|
|
// atan2_16::@8
|
|
b8:
|
|
jmp breturn
|
|
// atan2_16::@return
|
|
breturn:
|
|
// [42] return
|
|
rts
|
|
// atan2_16::@11
|
|
b11:
|
|
// [43] (byte~) atan2_16::shift#5 ← (byte) atan2_16::i#2 -- vbuz1=vbuz2
|
|
lda.z i
|
|
sta.z shift
|
|
// [44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3 -- vwsz1=vwsz2
|
|
lda.z xi
|
|
sta.z xd
|
|
lda.z xi+1
|
|
sta.z xd+1
|
|
// [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 -- vwsz1=vwsz2
|
|
lda.z yi
|
|
sta.z yd
|
|
lda.z yi+1
|
|
sta.z yd+1
|
|
// [46] phi from atan2_16::@11 atan2_16::@14 to atan2_16::@13 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13]
|
|
b13_from_b11:
|
|
b13_from_b14:
|
|
// [46] phi (signed word) atan2_16::yd#3 = (signed word~) atan2_16::yd#10 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#0] -- register_copy
|
|
// [46] phi (signed word) atan2_16::xd#3 = (signed word~) atan2_16::xd#10 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#1] -- register_copy
|
|
// [46] phi (byte) atan2_16::shift#2 = (byte~) atan2_16::shift#5 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#2] -- register_copy
|
|
jmp b13
|
|
// atan2_16::@13
|
|
b13:
|
|
// [47] if((byte) atan2_16::shift#2>=(byte) 2) goto atan2_16::@14 -- vbuz1_ge_vbuc1_then_la1
|
|
lda.z shift
|
|
cmp #2
|
|
bcs b14
|
|
jmp b15
|
|
// atan2_16::@15
|
|
b15:
|
|
// [48] if((byte) 0==(byte) atan2_16::shift#2) goto atan2_16::@17 -- vbuc1_eq_vbuz1_then_la1
|
|
lda #0
|
|
cmp.z shift
|
|
beq b17_from_b15
|
|
jmp b16
|
|
// atan2_16::@16
|
|
b16:
|
|
// [49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
// [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
// [51] phi from atan2_16::@15 atan2_16::@16 to atan2_16::@17 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17]
|
|
b17_from_b15:
|
|
b17_from_b16:
|
|
// [51] phi (signed word) atan2_16::xd#5 = (signed word) atan2_16::xd#3 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17#0] -- register_copy
|
|
// [51] phi (signed word) atan2_16::yd#5 = (signed word) atan2_16::yd#3 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17#1] -- register_copy
|
|
jmp b17
|
|
// atan2_16::@17
|
|
b17:
|
|
// [52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18 -- vwsz1_ge_0_then_la1
|
|
lda.z yi+1
|
|
bpl b18
|
|
jmp b20
|
|
// atan2_16::@20
|
|
b20:
|
|
// [53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda.z xi
|
|
sec
|
|
sbc.z yd
|
|
sta.z xi
|
|
lda.z xi+1
|
|
sbc.z yd+1
|
|
sta.z xi+1
|
|
// [54] (signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#3 + (signed word) atan2_16::xd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda.z yi
|
|
clc
|
|
adc.z xd
|
|
sta.z yi
|
|
lda.z yi+1
|
|
adc.z xd+1
|
|
sta.z yi+1
|
|
// [55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuz1=vbuz2_rol_1
|
|
lda.z i
|
|
asl
|
|
sta.z _24
|
|
// [56] (word) atan2_16::angle#3 ← (word) atan2_16::angle#12 - *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24) -- vwuz1=vwuz1_minus_pwuc1_derefidx_vbuz2
|
|
ldy.z _24
|
|
sec
|
|
lda.z angle_3
|
|
sbc CORDIC_ATAN2_ANGLES_16,y
|
|
sta.z angle_3
|
|
lda.z angle_3+1
|
|
sbc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta.z angle_3+1
|
|
// [57] phi from atan2_16::@18 atan2_16::@20 to atan2_16::@19 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19]
|
|
b19_from_b18:
|
|
b19_from_b20:
|
|
// [57] phi (signed word) atan2_16::xi#8 = (signed word) atan2_16::xi#1 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#0] -- register_copy
|
|
// [57] phi (word) atan2_16::angle#13 = (word) atan2_16::angle#2 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#1] -- register_copy
|
|
// [57] phi (signed word) atan2_16::yi#8 = (signed word) atan2_16::yi#1 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#2] -- register_copy
|
|
jmp b19
|
|
// atan2_16::@19
|
|
b19:
|
|
// [58] (byte) atan2_16::i#1 ← ++ (byte) atan2_16::i#2 -- vbuz1=_inc_vbuz1
|
|
inc.z i
|
|
// [59] if((byte) atan2_16::i#1==(const byte) CORDIC_ITERATIONS_16#0-(byte) 1+(byte) 1) goto atan2_16::@12 -- vbuz1_eq_vbuc1_then_la1
|
|
lda #CORDIC_ITERATIONS_16-1+1
|
|
cmp.z i
|
|
beq b12_from_b19
|
|
// [32] phi from atan2_16::@19 to atan2_16::@10 [phi:atan2_16::@19->atan2_16::@10]
|
|
b10_from_b19:
|
|
// [32] phi (word) atan2_16::angle#12 = (word) atan2_16::angle#13 [phi:atan2_16::@19->atan2_16::@10#0] -- register_copy
|
|
// [32] phi (byte) atan2_16::i#2 = (byte) atan2_16::i#1 [phi:atan2_16::@19->atan2_16::@10#1] -- register_copy
|
|
// [32] phi (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#8 [phi:atan2_16::@19->atan2_16::@10#2] -- register_copy
|
|
// [32] phi (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#8 [phi:atan2_16::@19->atan2_16::@10#3] -- register_copy
|
|
jmp b10
|
|
// atan2_16::@18
|
|
b18:
|
|
// [60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda.z xi
|
|
clc
|
|
adc.z yd
|
|
sta.z xi
|
|
lda.z xi+1
|
|
adc.z yd+1
|
|
sta.z xi+1
|
|
// [61] (signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#3 - (signed word) atan2_16::xd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda.z yi
|
|
sec
|
|
sbc.z xd
|
|
sta.z yi
|
|
lda.z yi+1
|
|
sbc.z xd+1
|
|
sta.z yi+1
|
|
// [62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuz1=vbuz2_rol_1
|
|
lda.z i
|
|
asl
|
|
sta.z _23
|
|
// [63] (word) atan2_16::angle#2 ← (word) atan2_16::angle#12 + *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23) -- vwuz1=vwuz1_plus_pwuc1_derefidx_vbuz2
|
|
ldy.z _23
|
|
clc
|
|
lda.z angle_2
|
|
adc CORDIC_ATAN2_ANGLES_16,y
|
|
sta.z angle_2
|
|
lda.z angle_2+1
|
|
adc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta.z angle_2+1
|
|
jmp b19_from_b18
|
|
// atan2_16::@14
|
|
b14:
|
|
// [64] (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
// [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
// [66] (byte) atan2_16::shift#1 ← (byte) atan2_16::shift#2 - (byte) 2 -- vbuz1=vbuz1_minus_2
|
|
dec.z shift
|
|
dec.z shift
|
|
jmp b13_from_b14
|
|
// atan2_16::@4
|
|
b4:
|
|
// [67] (signed word~) atan2_16::xi#13 ← (signed word) atan2_16::x#0 -- vwsz1=vwsz2
|
|
lda.z x
|
|
sta.z xi
|
|
lda.z x+1
|
|
sta.z xi+1
|
|
jmp b6_from_b4
|
|
// atan2_16::@1
|
|
b1:
|
|
// [68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0 -- vwsz1=vwsz2
|
|
lda.z y
|
|
sta.z yi
|
|
lda.z y+1
|
|
sta.z yi+1
|
|
jmp b3_from_b1
|
|
}
|
|
// init_font_hex
|
|
// Make charset from proto chars
|
|
// init_font_hex(byte* zeropage($17) charset)
|
|
init_font_hex: {
|
|
.label _0 = $2f
|
|
.label _1 = $30
|
|
.label _2 = $31
|
|
.label idx = $1d
|
|
.label i = $1c
|
|
.label idx_3 = $32
|
|
.label proto_lo = $19
|
|
.label charset = $17
|
|
.label c1 = $1b
|
|
.label proto_hi = $14
|
|
.label c = $16
|
|
// [70] phi from init_font_hex to init_font_hex::@1 [phi:init_font_hex->init_font_hex::@1]
|
|
b1_from_init_font_hex:
|
|
// [70] phi (byte) init_font_hex::c#6 = (byte) 0 [phi:init_font_hex->init_font_hex::@1#0] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z c
|
|
// [70] phi (byte*) init_font_hex::proto_hi#6 = (const byte[]) FONT_HEX_PROTO#0 [phi:init_font_hex->init_font_hex::@1#1] -- pbuz1=pbuc1
|
|
lda #<FONT_HEX_PROTO
|
|
sta.z proto_hi
|
|
lda #>FONT_HEX_PROTO
|
|
sta.z proto_hi+1
|
|
// [70] phi (byte*) init_font_hex::charset#5 = (const byte*) CHARSET#0 [phi:init_font_hex->init_font_hex::@1#2] -- pbuz1=pbuc1
|
|
lda #<CHARSET
|
|
sta.z charset
|
|
lda #>CHARSET
|
|
sta.z charset+1
|
|
jmp b1
|
|
// [70] phi from init_font_hex::@5 to init_font_hex::@1 [phi:init_font_hex::@5->init_font_hex::@1]
|
|
b1_from_b5:
|
|
// [70] phi (byte) init_font_hex::c#6 = (byte) init_font_hex::c#1 [phi:init_font_hex::@5->init_font_hex::@1#0] -- register_copy
|
|
// [70] phi (byte*) init_font_hex::proto_hi#6 = (byte*) init_font_hex::proto_hi#1 [phi:init_font_hex::@5->init_font_hex::@1#1] -- register_copy
|
|
// [70] phi (byte*) init_font_hex::charset#5 = (byte*) init_font_hex::charset#0 [phi:init_font_hex::@5->init_font_hex::@1#2] -- register_copy
|
|
jmp b1
|
|
// init_font_hex::@1
|
|
b1:
|
|
// [71] phi from init_font_hex::@1 to init_font_hex::@2 [phi:init_font_hex::@1->init_font_hex::@2]
|
|
b2_from_b1:
|
|
// [71] phi (byte) init_font_hex::c1#4 = (byte) 0 [phi:init_font_hex::@1->init_font_hex::@2#0] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z c1
|
|
// [71] phi (byte*) init_font_hex::proto_lo#4 = (const byte[]) FONT_HEX_PROTO#0 [phi:init_font_hex::@1->init_font_hex::@2#1] -- pbuz1=pbuc1
|
|
lda #<FONT_HEX_PROTO
|
|
sta.z proto_lo
|
|
lda #>FONT_HEX_PROTO
|
|
sta.z proto_lo+1
|
|
// [71] phi (byte*) init_font_hex::charset#2 = (byte*) init_font_hex::charset#5 [phi:init_font_hex::@1->init_font_hex::@2#2] -- register_copy
|
|
jmp b2
|
|
// [71] phi from init_font_hex::@4 to init_font_hex::@2 [phi:init_font_hex::@4->init_font_hex::@2]
|
|
b2_from_b4:
|
|
// [71] phi (byte) init_font_hex::c1#4 = (byte) init_font_hex::c1#1 [phi:init_font_hex::@4->init_font_hex::@2#0] -- register_copy
|
|
// [71] phi (byte*) init_font_hex::proto_lo#4 = (byte*) init_font_hex::proto_lo#1 [phi:init_font_hex::@4->init_font_hex::@2#1] -- register_copy
|
|
// [71] phi (byte*) init_font_hex::charset#2 = (byte*) init_font_hex::charset#0 [phi:init_font_hex::@4->init_font_hex::@2#2] -- register_copy
|
|
jmp b2
|
|
// init_font_hex::@2
|
|
b2:
|
|
// [72] *((byte*) init_font_hex::charset#2) ← (byte) 0 -- _deref_pbuz1=vbuc1
|
|
lda #0
|
|
ldy #0
|
|
sta (charset),y
|
|
// [73] phi from init_font_hex::@2 to init_font_hex::@3 [phi:init_font_hex::@2->init_font_hex::@3]
|
|
b3_from_b2:
|
|
// [73] phi (byte) init_font_hex::idx#5 = (byte) 1 [phi:init_font_hex::@2->init_font_hex::@3#0] -- vbuz1=vbuc1
|
|
lda #1
|
|
sta.z idx
|
|
// [73] phi (byte) init_font_hex::i#2 = (byte) 0 [phi:init_font_hex::@2->init_font_hex::@3#1] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z i
|
|
jmp b3
|
|
// [73] phi from init_font_hex::@3 to init_font_hex::@3 [phi:init_font_hex::@3->init_font_hex::@3]
|
|
b3_from_b3:
|
|
// [73] phi (byte) init_font_hex::idx#5 = (byte) init_font_hex::idx#2 [phi:init_font_hex::@3->init_font_hex::@3#0] -- register_copy
|
|
// [73] phi (byte) init_font_hex::i#2 = (byte) init_font_hex::i#1 [phi:init_font_hex::@3->init_font_hex::@3#1] -- register_copy
|
|
jmp b3
|
|
// init_font_hex::@3
|
|
b3:
|
|
// [74] (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#6 + (byte) init_font_hex::i#2) << (byte) 4 -- vbuz1=pbuz2_derefidx_vbuz3_rol_4
|
|
ldy.z i
|
|
lda (proto_hi),y
|
|
asl
|
|
asl
|
|
asl
|
|
asl
|
|
sta.z _0
|
|
// [75] (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#4 + (byte) init_font_hex::i#2) << (byte) 1 -- vbuz1=pbuz2_derefidx_vbuz3_rol_1
|
|
ldy.z i
|
|
lda (proto_lo),y
|
|
asl
|
|
sta.z _1
|
|
// [76] (byte~) init_font_hex::$2 ← (byte~) init_font_hex::$0 | (byte~) init_font_hex::$1 -- vbuz1=vbuz2_bor_vbuz3
|
|
lda.z _0
|
|
ora.z _1
|
|
sta.z _2
|
|
// [77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2 -- pbuz1_derefidx_vbuz2=vbuz3
|
|
lda.z _2
|
|
ldy.z idx
|
|
sta (charset),y
|
|
// [78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5 -- vbuz1=_inc_vbuz1
|
|
inc.z idx
|
|
// [79] (byte) init_font_hex::i#1 ← ++ (byte) init_font_hex::i#2 -- vbuz1=_inc_vbuz1
|
|
inc.z i
|
|
// [80] if((byte) init_font_hex::i#1!=(byte) 5) goto init_font_hex::@3 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #5
|
|
cmp.z i
|
|
bne b3_from_b3
|
|
jmp b4
|
|
// init_font_hex::@4
|
|
b4:
|
|
// [81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0 -- pbuz1_derefidx_vbuz2=vbuc1
|
|
lda #0
|
|
ldy.z idx
|
|
sta (charset),y
|
|
// [82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2 -- vbuz1=_inc_vbuz2
|
|
ldy.z idx
|
|
iny
|
|
sty.z idx_3
|
|
// [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 -- pbuz1_derefidx_vbuz2=vbuc1
|
|
lda #0
|
|
ldy.z idx_3
|
|
sta (charset),y
|
|
// [84] (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#4 + (byte) 5 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #5
|
|
clc
|
|
adc.z proto_lo
|
|
sta.z proto_lo
|
|
bcc !+
|
|
inc.z proto_lo+1
|
|
!:
|
|
// [85] (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#2 + (byte) 8 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #8
|
|
clc
|
|
adc.z charset
|
|
sta.z charset
|
|
bcc !+
|
|
inc.z charset+1
|
|
!:
|
|
// [86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4 -- vbuz1=_inc_vbuz1
|
|
inc.z c1
|
|
// [87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp.z c1
|
|
bne b2_from_b4
|
|
jmp b5
|
|
// init_font_hex::@5
|
|
b5:
|
|
// [88] (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#6 + (byte) 5 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #5
|
|
clc
|
|
adc.z proto_hi
|
|
sta.z proto_hi
|
|
bcc !+
|
|
inc.z proto_hi+1
|
|
!:
|
|
// [89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6 -- vbuz1=_inc_vbuz1
|
|
inc.z c
|
|
// [90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp.z c
|
|
bne b1_from_b5
|
|
jmp breturn
|
|
// init_font_hex::@return
|
|
breturn:
|
|
// [91] return
|
|
rts
|
|
}
|
|
// File Data
|
|
// Bit patterns for symbols 0-f (3x5 pixels) used in font hex
|
|
FONT_HEX_PROTO: .byte 2, 5, 5, 5, 2, 6, 2, 2, 2, 7, 6, 1, 2, 4, 7, 6, 1, 2, 1, 6, 5, 5, 7, 1, 1, 7, 4, 6, 1, 6, 3, 4, 6, 5, 2, 7, 1, 1, 1, 1, 2, 5, 2, 5, 2, 2, 5, 3, 1, 1, 2, 5, 7, 5, 5, 6, 5, 6, 5, 6, 2, 5, 4, 5, 2, 6, 5, 5, 5, 6, 7, 4, 6, 4, 7, 7, 4, 6, 4, 4
|
|
// Angles representing ATAN(0.5), ATAN(0.25), ATAN(0.125), ...
|
|
CORDIC_ATAN2_ANGLES_16:
|
|
.for (var i=0; i<CORDIC_ITERATIONS_16; i++)
|
|
.word 256*2*256*atan(1/pow(2,i))/PI/2
|
|
|
|
|
|
REGISTER UPLIFT POTENTIAL REGISTERS
|
|
Statement [7] *((const byte*) D018#0) ← (const byte) main::toD0181_return#0 [ ] ( main:2 [ ] ) always clobbers reg byte a
|
|
Statement [10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0 [ main::y#4 main::x#2 main::screen#2 main::xw#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::xw#0 ] ) always clobbers reg byte y
|
|
Removing always clobbered register reg byte y as potential for zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Removing always clobbered register reg byte y as potential for zp ZP_BYTE:3 [ main::x#2 main::x#1 ]
|
|
Statement [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 [ main::y#4 main::x#2 main::screen#2 main::xw#0 main::yw#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::xw#0 main::yw#0 ] ) always clobbers reg byte y
|
|
Statement [12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0 [ main::y#4 main::x#2 main::screen#2 main::yw#0 atan2_16::x#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::yw#0 atan2_16::x#0 ] ) always clobbers reg byte a
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:3 [ main::x#2 main::x#1 ]
|
|
Statement [13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 ] ) always clobbers reg byte a
|
|
Statement [15] (word) atan2_16::return#2 ← (word) atan2_16::return#0 [ main::y#4 main::x#2 main::screen#2 atan2_16::return#2 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 atan2_16::return#2 ] ) always clobbers reg byte a
|
|
Statement [16] (word) main::angle_w#0 ← (word) atan2_16::return#2 [ main::y#4 main::x#2 main::screen#2 main::angle_w#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::angle_w#0 ] ) always clobbers reg byte a
|
|
Statement [17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80 [ main::y#4 main::x#2 main::screen#2 main::$11 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::$11 ] ) always clobbers reg byte a
|
|
Statement [18] (byte) main::ang_w#0 ← > (word~) main::$11 [ main::y#4 main::x#2 main::screen#2 main::ang_w#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::ang_w#0 ] ) always clobbers reg byte a
|
|
Statement [19] *((byte*) main::screen#2) ← (byte) main::ang_w#0 [ main::y#4 main::x#2 main::screen#2 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 ] ) always clobbers reg byte y
|
|
Statement [25] *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) ← ++ *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) [ ] ( main:2 [ ] ) always clobbers reg byte a
|
|
Statement [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 [ atan2_16::x#0 atan2_16::y#0 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 ] ) always clobbers reg byte a
|
|
Statement [27] (signed word~) atan2_16::$2 ← - (signed word) atan2_16::y#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::$2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::$2 ] ) always clobbers reg byte a
|
|
Statement [29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 ] ) always clobbers reg byte a
|
|
Statement [30] (signed word~) atan2_16::$7 ← - (signed word) atan2_16::x#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::$7 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::$7 ] ) always clobbers reg byte a
|
|
Statement [33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 ] ) always clobbers reg byte a
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:10 [ atan2_16::i#2 atan2_16::i#1 ]
|
|
Statement [35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::angle#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::angle#1 ] ) always clobbers reg byte a
|
|
Statement [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 [ atan2_16::y#0 atan2_16::angle#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::y#0 atan2_16::angle#1 ] ) always clobbers reg byte a
|
|
Statement [37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1 [ atan2_16::y#0 atan2_16::angle#4 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::y#0 atan2_16::angle#4 ] ) always clobbers reg byte a
|
|
Statement [39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8 [ atan2_16::angle#11 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::angle#11 ] ) always clobbers reg byte a
|
|
Statement [40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11 [ atan2_16::angle#5 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::angle#5 ] ) always clobbers reg byte a
|
|
Statement [44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 ] ) always clobbers reg byte a
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:15 [ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ]
|
|
Statement [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 atan2_16::yd#10 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 atan2_16::yd#10 ] ) always clobbers reg byte a
|
|
Statement [49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#3 atan2_16::xd#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#3 atan2_16::xd#2 ] ) always clobbers reg byte a
|
|
Statement [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#2 atan2_16::yd#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#2 atan2_16::yd#2 ] ) always clobbers reg byte a
|
|
Statement [52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#5 atan2_16::xd#5 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#5 atan2_16::xd#5 ] ) always clobbers reg byte a
|
|
Statement [53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#2 ] ) always clobbers reg byte a
|
|
Statement [54] (signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#3 + (signed word) atan2_16::xd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 ] ) always clobbers reg byte a
|
|
Statement [55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 atan2_16::$24 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 atan2_16::$24 ] ) always clobbers reg byte a
|
|
Statement [56] (word) atan2_16::angle#3 ← (word) atan2_16::angle#12 - *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24) [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::xi#2 atan2_16::yi#2 atan2_16::angle#3 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::xi#2 atan2_16::yi#2 atan2_16::angle#3 ] ) always clobbers reg byte a
|
|
Statement [60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#1 ] ) always clobbers reg byte a
|
|
Statement [61] (signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#3 - (signed word) atan2_16::xd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 ] ) always clobbers reg byte a
|
|
Statement [62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 atan2_16::$23 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 atan2_16::$23 ] ) always clobbers reg byte a
|
|
Statement [63] (word) atan2_16::angle#2 ← (word) atan2_16::angle#12 + *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23) [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::yi#1 atan2_16::angle#2 atan2_16::xi#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::yi#1 atan2_16::angle#2 atan2_16::xi#1 ] ) always clobbers reg byte a
|
|
Statement [64] (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (signed byte) 2 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::yd#3 atan2_16::xd#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::yd#3 atan2_16::xd#1 ] ) always clobbers reg byte a
|
|
Statement [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::xd#1 atan2_16::yd#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::xd#1 atan2_16::yd#1 ] ) always clobbers reg byte a
|
|
Statement [67] (signed word~) atan2_16::xi#13 ← (signed word) atan2_16::x#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::xi#13 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::xi#13 ] ) always clobbers reg byte a
|
|
Statement [68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#16 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#16 ] ) always clobbers reg byte a
|
|
Statement [72] *((byte*) init_font_hex::charset#2) ← (byte) 0 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ) always clobbers reg byte a reg byte y
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Removing always clobbered register reg byte y as potential for zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
Removing always clobbered register reg byte y as potential for zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
Statement [74] (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#6 + (byte) init_font_hex::i#2) << (byte) 4 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 ] ) always clobbers reg byte a
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:28 [ init_font_hex::i#2 init_font_hex::i#1 ]
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Statement [75] (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#4 + (byte) init_font_hex::i#2) << (byte) 1 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 init_font_hex::$1 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 init_font_hex::$1 ] ) always clobbers reg byte a
|
|
Removing always clobbered register reg byte a as potential for zp ZP_BYTE:47 [ init_font_hex::$0 ]
|
|
Statement [81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::idx#2 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::idx#2 ] ) always clobbers reg byte a
|
|
Statement [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ) always clobbers reg byte a
|
|
Statement [84] (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#4 + (byte) 5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ) always clobbers reg byte a
|
|
Statement [85] (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#2 + (byte) 8 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ) always clobbers reg byte a
|
|
Statement [88] (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#6 + (byte) 5 [ init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::proto_hi#1 ] ( main:2::init_font_hex:5 [ init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::proto_hi#1 ] ) always clobbers reg byte a
|
|
Statement [7] *((const byte*) D018#0) ← (const byte) main::toD0181_return#0 [ ] ( main:2 [ ] ) always clobbers reg byte a
|
|
Statement [10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0 [ main::y#4 main::x#2 main::screen#2 main::xw#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::xw#0 ] ) always clobbers reg byte a reg byte y
|
|
Statement [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 [ main::y#4 main::x#2 main::screen#2 main::xw#0 main::yw#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::xw#0 main::yw#0 ] ) always clobbers reg byte a reg byte y
|
|
Statement [12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0 [ main::y#4 main::x#2 main::screen#2 main::yw#0 atan2_16::x#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::yw#0 atan2_16::x#0 ] ) always clobbers reg byte a
|
|
Statement [13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 ] ) always clobbers reg byte a
|
|
Statement [15] (word) atan2_16::return#2 ← (word) atan2_16::return#0 [ main::y#4 main::x#2 main::screen#2 atan2_16::return#2 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 atan2_16::return#2 ] ) always clobbers reg byte a
|
|
Statement [16] (word) main::angle_w#0 ← (word) atan2_16::return#2 [ main::y#4 main::x#2 main::screen#2 main::angle_w#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::angle_w#0 ] ) always clobbers reg byte a
|
|
Statement [17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80 [ main::y#4 main::x#2 main::screen#2 main::$11 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::$11 ] ) always clobbers reg byte a
|
|
Statement [18] (byte) main::ang_w#0 ← > (word~) main::$11 [ main::y#4 main::x#2 main::screen#2 main::ang_w#0 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 main::ang_w#0 ] ) always clobbers reg byte a
|
|
Statement [19] *((byte*) main::screen#2) ← (byte) main::ang_w#0 [ main::y#4 main::x#2 main::screen#2 ] ( main:2 [ main::y#4 main::x#2 main::screen#2 ] ) always clobbers reg byte y
|
|
Statement [25] *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) ← ++ *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) [ ] ( main:2 [ ] ) always clobbers reg byte a
|
|
Statement [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 [ atan2_16::x#0 atan2_16::y#0 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 ] ) always clobbers reg byte a
|
|
Statement [27] (signed word~) atan2_16::$2 ← - (signed word) atan2_16::y#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::$2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::$2 ] ) always clobbers reg byte a
|
|
Statement [29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 ] ) always clobbers reg byte a
|
|
Statement [30] (signed word~) atan2_16::$7 ← - (signed word) atan2_16::x#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::$7 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::$7 ] ) always clobbers reg byte a
|
|
Statement [33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 ] ) always clobbers reg byte a
|
|
Statement [35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::angle#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::angle#1 ] ) always clobbers reg byte a
|
|
Statement [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 [ atan2_16::y#0 atan2_16::angle#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::y#0 atan2_16::angle#1 ] ) always clobbers reg byte a
|
|
Statement [37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1 [ atan2_16::y#0 atan2_16::angle#4 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::y#0 atan2_16::angle#4 ] ) always clobbers reg byte a
|
|
Statement [39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8 [ atan2_16::angle#11 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::angle#11 ] ) always clobbers reg byte a
|
|
Statement [40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11 [ atan2_16::angle#5 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::angle#5 ] ) always clobbers reg byte a
|
|
Statement [44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 ] ) always clobbers reg byte a
|
|
Statement [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 atan2_16::yd#10 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#5 atan2_16::xd#10 atan2_16::yd#10 ] ) always clobbers reg byte a
|
|
Statement [49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#3 atan2_16::xd#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#3 atan2_16::xd#2 ] ) always clobbers reg byte a
|
|
Statement [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#2 atan2_16::yd#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#2 atan2_16::yd#2 ] ) always clobbers reg byte a
|
|
Statement [52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#5 atan2_16::xd#5 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::yd#5 atan2_16::xd#5 ] ) always clobbers reg byte a
|
|
Statement [53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#2 ] ) always clobbers reg byte a
|
|
Statement [54] (signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#3 + (signed word) atan2_16::xd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 ] ) always clobbers reg byte a
|
|
Statement [55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 atan2_16::$24 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::xi#2 atan2_16::yi#2 atan2_16::$24 ] ) always clobbers reg byte a
|
|
Statement [56] (word) atan2_16::angle#3 ← (word) atan2_16::angle#12 - *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24) [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::xi#2 atan2_16::yi#2 atan2_16::angle#3 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::xi#2 atan2_16::yi#2 atan2_16::angle#3 ] ) always clobbers reg byte a
|
|
Statement [60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::xd#5 atan2_16::xi#1 ] ) always clobbers reg byte a
|
|
Statement [61] (signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#3 - (signed word) atan2_16::xd#5 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 ] ) always clobbers reg byte a
|
|
Statement [62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1 [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 atan2_16::$23 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::angle#12 atan2_16::yi#1 atan2_16::xi#1 atan2_16::$23 ] ) always clobbers reg byte a
|
|
Statement [63] (word) atan2_16::angle#2 ← (word) atan2_16::angle#12 + *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23) [ atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::yi#1 atan2_16::angle#2 atan2_16::xi#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::i#2 atan2_16::yi#1 atan2_16::angle#2 atan2_16::xi#1 ] ) always clobbers reg byte a
|
|
Statement [64] (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (signed byte) 2 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::yd#3 atan2_16::xd#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::yd#3 atan2_16::xd#1 ] ) always clobbers reg byte a
|
|
Statement [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::xd#1 atan2_16::yd#1 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#3 atan2_16::xi#3 atan2_16::i#2 atan2_16::angle#12 atan2_16::shift#2 atan2_16::xd#1 atan2_16::yd#1 ] ) always clobbers reg byte a
|
|
Statement [67] (signed word~) atan2_16::xi#13 ← (signed word) atan2_16::x#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::xi#13 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#0 atan2_16::xi#13 ] ) always clobbers reg byte a
|
|
Statement [68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0 [ atan2_16::x#0 atan2_16::y#0 atan2_16::yi#16 ] ( main:2::atan2_16:14 [ main::y#4 main::x#2 main::screen#2 atan2_16::x#0 atan2_16::y#0 atan2_16::yi#16 ] ) always clobbers reg byte a
|
|
Statement [72] *((byte*) init_font_hex::charset#2) ← (byte) 0 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ) always clobbers reg byte a reg byte y
|
|
Statement [74] (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#6 + (byte) init_font_hex::i#2) << (byte) 4 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 ] ) always clobbers reg byte a
|
|
Statement [75] (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#4 + (byte) init_font_hex::i#2) << (byte) 1 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 init_font_hex::$1 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::i#2 init_font_hex::idx#5 init_font_hex::$0 init_font_hex::$1 ] ) always clobbers reg byte a
|
|
Statement [81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::idx#2 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 init_font_hex::idx#2 ] ) always clobbers reg byte a
|
|
Statement [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::proto_lo#4 init_font_hex::c1#4 ] ) always clobbers reg byte a
|
|
Statement [84] (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#4 + (byte) 5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#2 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ) always clobbers reg byte a
|
|
Statement [85] (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#2 + (byte) 8 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ( main:2::init_font_hex:5 [ init_font_hex::proto_hi#6 init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::c1#4 init_font_hex::proto_lo#1 ] ) always clobbers reg byte a
|
|
Statement [88] (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#6 + (byte) 5 [ init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::proto_hi#1 ] ( main:2::init_font_hex:5 [ init_font_hex::c#6 init_font_hex::charset#0 init_font_hex::proto_hi#1 ] ) always clobbers reg byte a
|
|
Potential registers zp ZP_BYTE:2 [ main::y#4 main::y#1 ] : zp ZP_BYTE:2 , reg byte x ,
|
|
Potential registers zp ZP_BYTE:3 [ main::x#2 main::x#1 ] : zp ZP_BYTE:3 , reg byte x ,
|
|
Potential registers zp ZP_WORD:4 [ main::screen#2 main::screen#4 main::screen#1 ] : zp ZP_WORD:4 ,
|
|
Potential registers zp ZP_WORD:6 [ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ] : zp ZP_WORD:6 ,
|
|
Potential registers zp ZP_WORD:8 [ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ] : zp ZP_WORD:8 ,
|
|
Potential registers zp ZP_BYTE:10 [ atan2_16::i#2 atan2_16::i#1 ] : zp ZP_BYTE:10 , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ] : zp ZP_WORD:11 ,
|
|
Potential registers zp ZP_WORD:13 [ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ] : zp ZP_WORD:13 ,
|
|
Potential registers zp ZP_BYTE:15 [ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ] : zp ZP_BYTE:15 , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_WORD:16 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ] : zp ZP_WORD:16 ,
|
|
Potential registers zp ZP_WORD:18 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ] : zp ZP_WORD:18 ,
|
|
Potential registers zp ZP_WORD:20 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ] : zp ZP_WORD:20 ,
|
|
Potential registers zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ] : zp ZP_BYTE:22 , reg byte x ,
|
|
Potential registers zp ZP_WORD:23 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ] : zp ZP_WORD:23 ,
|
|
Potential registers zp ZP_WORD:25 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ] : zp ZP_WORD:25 ,
|
|
Potential registers zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ] : zp ZP_BYTE:27 , reg byte x ,
|
|
Potential registers zp ZP_BYTE:28 [ init_font_hex::i#2 init_font_hex::i#1 ] : zp ZP_BYTE:28 , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ] : zp ZP_BYTE:29 , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_WORD:30 [ main::xw#0 ] : zp ZP_WORD:30 ,
|
|
Potential registers zp ZP_WORD:32 [ main::yw#0 ] : zp ZP_WORD:32 ,
|
|
Potential registers zp ZP_WORD:34 [ atan2_16::x#0 ] : zp ZP_WORD:34 ,
|
|
Potential registers zp ZP_WORD:36 [ atan2_16::y#0 ] : zp ZP_WORD:36 ,
|
|
Potential registers zp ZP_WORD:38 [ atan2_16::return#2 ] : zp ZP_WORD:38 ,
|
|
Potential registers zp ZP_WORD:40 [ main::angle_w#0 ] : zp ZP_WORD:40 ,
|
|
Potential registers zp ZP_WORD:42 [ main::$11 ] : zp ZP_WORD:42 ,
|
|
Potential registers zp ZP_BYTE:44 [ main::ang_w#0 ] : zp ZP_BYTE:44 , reg byte a , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:45 [ atan2_16::$24 ] : zp ZP_BYTE:45 , reg byte a , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:46 [ atan2_16::$23 ] : zp ZP_BYTE:46 , reg byte a , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:47 [ init_font_hex::$0 ] : zp ZP_BYTE:47 , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:48 [ init_font_hex::$1 ] : zp ZP_BYTE:48 , reg byte a , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:49 [ init_font_hex::$2 ] : zp ZP_BYTE:49 , reg byte a , reg byte x , reg byte y ,
|
|
Potential registers zp ZP_BYTE:50 [ init_font_hex::idx#3 ] : zp ZP_BYTE:50 , reg byte a , reg byte x , reg byte y ,
|
|
|
|
REGISTER UPLIFT SCOPES
|
|
Uplift Scope [atan2_16] 28,670.58: zp ZP_BYTE:15 [ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ] 20,608: zp ZP_WORD:16 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ] 17,338.67: zp ZP_WORD:18 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ] 7,533.33: zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ] 2,698.28: zp ZP_WORD:6 [ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ] 2,283.07: zp ZP_WORD:8 [ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ] 2,002: zp ZP_BYTE:45 [ atan2_16::$24 ] 2,002: zp ZP_BYTE:46 [ atan2_16::$23 ] 1,710.04: zp ZP_BYTE:10 [ atan2_16::i#2 atan2_16::i#1 ] 202: zp ZP_WORD:38 [ atan2_16::return#2 ] 50: zp ZP_WORD:13 [ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ] 2.87: zp ZP_WORD:34 [ atan2_16::x#0 ] 2.72: zp ZP_WORD:36 [ atan2_16::y#0 ]
|
|
Uplift Scope [init_font_hex] 2,168.83: zp ZP_BYTE:28 [ init_font_hex::i#2 init_font_hex::i#1 ] 2,002: zp ZP_BYTE:48 [ init_font_hex::$1 ] 2,002: zp ZP_BYTE:49 [ init_font_hex::$2 ] 1,151.6: zp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ] 1,001: zp ZP_BYTE:47 [ init_font_hex::$0 ] 202: zp ZP_BYTE:50 [ init_font_hex::idx#3 ] 165.86: zp ZP_WORD:23 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ] 164.97: zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ] 143.04: zp ZP_WORD:25 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ] 64.17: zp ZP_WORD:20 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ] 17.66: zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Uplift Scope [main] 202: zp ZP_WORD:40 [ main::angle_w#0 ] 202: zp ZP_WORD:42 [ main::$11 ] 202: zp ZP_BYTE:44 [ main::ang_w#0 ] 168.33: zp ZP_BYTE:3 [ main::x#2 main::x#1 ] 93.15: zp ZP_WORD:4 [ main::screen#2 main::screen#4 main::screen#1 ] 50.5: zp ZP_WORD:30 [ main::xw#0 ] 50.5: zp ZP_WORD:32 [ main::yw#0 ] 17.97: zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Uplift Scope []
|
|
|
|
Uplifting [atan2_16] best 1149869 combination reg byte y [ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ] zp ZP_WORD:16 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ] zp ZP_WORD:18 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ] zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ] zp ZP_WORD:6 [ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ] zp ZP_WORD:8 [ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ] reg byte a [ atan2_16::$24 ] reg byte a [ atan2_16::$23 ] reg byte x [ atan2_16::i#2 atan2_16::i#1 ] zp ZP_WORD:38 [ atan2_16::return#2 ] zp ZP_WORD:13 [ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ] zp ZP_WORD:34 [ atan2_16::x#0 ] zp ZP_WORD:36 [ atan2_16::y#0 ]
|
|
Limited combination testing to 100 combinations of 144 possible.
|
|
Uplifting [init_font_hex] best 1130869 combination reg byte x [ init_font_hex::i#2 init_font_hex::i#1 ] reg byte a [ init_font_hex::$1 ] reg byte a [ init_font_hex::$2 ] zp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ] zp ZP_BYTE:47 [ init_font_hex::$0 ] zp ZP_BYTE:50 [ init_font_hex::idx#3 ] zp ZP_WORD:23 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ] zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ] zp ZP_WORD:25 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ] zp ZP_WORD:20 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ] zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Limited combination testing to 100 combinations of 6912 possible.
|
|
Uplifting [main] best 1130269 combination zp ZP_WORD:40 [ main::angle_w#0 ] zp ZP_WORD:42 [ main::$11 ] reg byte a [ main::ang_w#0 ] zp ZP_BYTE:3 [ main::x#2 main::x#1 ] zp ZP_WORD:4 [ main::screen#2 main::screen#4 main::screen#1 ] zp ZP_WORD:30 [ main::xw#0 ] zp ZP_WORD:32 [ main::yw#0 ] zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Uplifting [] best 1130269 combination
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Uplifting [init_font_hex] best 1130269 combination zp ZP_BYTE:29 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:47 [ init_font_hex::$0 ]
|
|
Uplifting [init_font_hex] best 1130269 combination zp ZP_BYTE:47 [ init_font_hex::$0 ]
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:50 [ init_font_hex::idx#3 ]
|
|
Uplifting [init_font_hex] best 1129669 combination reg byte y [ init_font_hex::idx#3 ]
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:3 [ main::x#2 main::x#1 ]
|
|
Uplifting [main] best 1129669 combination zp ZP_BYTE:3 [ main::x#2 main::x#1 ]
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
Uplifting [init_font_hex] best 1129669 combination zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Uplifting [main] best 1129669 combination zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
Attempting to uplift remaining variables inzp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Uplifting [init_font_hex] best 1129669 combination zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Coalescing zero page register [ zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 ] ] with [ zp ZP_WORD:13 [ atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ] ] - score: 1
|
|
Coalescing zero page register [ zp ZP_WORD:30 [ main::xw#0 ] ] with [ zp ZP_WORD:34 [ atan2_16::x#0 ] ] - score: 1
|
|
Coalescing zero page register [ zp ZP_WORD:32 [ main::yw#0 ] ] with [ zp ZP_WORD:36 [ atan2_16::y#0 ] ] - score: 1
|
|
Coalescing zero page register [ zp ZP_WORD:38 [ atan2_16::return#2 ] ] with [ zp ZP_WORD:40 [ main::angle_w#0 ] ] - score: 1
|
|
Coalescing zero page register [ zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 ] ] with [ zp ZP_WORD:38 [ atan2_16::return#2 main::angle_w#0 ] ] - score: 1
|
|
Coalescing zero page register [ zp ZP_WORD:11 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 atan2_16::return#2 main::angle_w#0 ] ] with [ zp ZP_WORD:42 [ main::$11 ] ] - score: 1
|
|
Coalescing zero page register [ zp ZP_WORD:20 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ] ] with [ zp ZP_WORD:4 [ main::screen#2 main::screen#4 main::screen#1 ] ]
|
|
Coalescing zero page register [ zp ZP_BYTE:22 [ init_font_hex::c#6 init_font_hex::c#1 ] ] with [ zp ZP_BYTE:2 [ main::y#4 main::y#1 ] ]
|
|
Coalescing zero page register [ zp ZP_WORD:23 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ] ] with [ zp ZP_WORD:6 [ atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ] ]
|
|
Coalescing zero page register [ zp ZP_WORD:25 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ] ] with [ zp ZP_WORD:8 [ atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ] ]
|
|
Coalescing zero page register [ zp ZP_BYTE:27 [ init_font_hex::c1#4 init_font_hex::c1#1 ] ] with [ zp ZP_BYTE:3 [ main::x#2 main::x#1 ] ]
|
|
Allocated (was zp ZP_WORD:11) zp ZP_WORD:2 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 atan2_16::return#2 main::angle_w#0 main::$11 ]
|
|
Allocated (was zp ZP_WORD:16) zp ZP_WORD:4 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ]
|
|
Allocated (was zp ZP_WORD:18) zp ZP_WORD:6 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ]
|
|
Allocated (was zp ZP_WORD:20) zp ZP_WORD:8 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 main::screen#2 main::screen#4 main::screen#1 ]
|
|
Allocated (was zp ZP_BYTE:22) zp ZP_BYTE:10 [ init_font_hex::c#6 init_font_hex::c#1 main::y#4 main::y#1 ]
|
|
Allocated (was zp ZP_WORD:23) zp ZP_WORD:11 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ]
|
|
Allocated (was zp ZP_WORD:25) zp ZP_WORD:13 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ]
|
|
Allocated (was zp ZP_BYTE:27) zp ZP_BYTE:15 [ init_font_hex::c1#4 init_font_hex::c1#1 main::x#2 main::x#1 ]
|
|
Allocated (was zp ZP_BYTE:29) zp ZP_BYTE:16 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Allocated (was zp ZP_WORD:30) zp ZP_WORD:17 [ main::xw#0 atan2_16::x#0 ]
|
|
Allocated (was zp ZP_WORD:32) zp ZP_WORD:19 [ main::yw#0 atan2_16::y#0 ]
|
|
Allocated (was zp ZP_BYTE:47) zp ZP_BYTE:21 [ init_font_hex::$0 ]
|
|
|
|
ASSEMBLER BEFORE OPTIMIZATION
|
|
// File Comments
|
|
// Find atan2(x, y) using the CORDIC method
|
|
// See http://bsvi.ru/uploads/CORDIC--_10EBA/cordic.pdf
|
|
// Upstart
|
|
.pc = $801 "Basic"
|
|
:BasicUpstart(bbegin)
|
|
.pc = $80d "Program"
|
|
// Global Constants & labels
|
|
// The number of iterations performed during 16-bit CORDIC atan2 calculation
|
|
.const CORDIC_ITERATIONS_16 = $f
|
|
.label D018 = $d018
|
|
// Color Ram
|
|
.label COLS = $d800
|
|
.label CHARSET = $2000
|
|
.label SCREEN = $2800
|
|
// @begin
|
|
bbegin:
|
|
// [1] phi from @begin to @1 [phi:@begin->@1]
|
|
b1_from_bbegin:
|
|
jmp b1
|
|
// @1
|
|
b1:
|
|
// [2] call main
|
|
// [4] phi from @1 to main [phi:@1->main]
|
|
main_from_b1:
|
|
jsr main
|
|
// [3] phi from @1 to @end [phi:@1->@end]
|
|
bend_from_b1:
|
|
jmp bend
|
|
// @end
|
|
bend:
|
|
// main
|
|
main: {
|
|
.const toD0181_return = (>(SCREEN&$3fff)*4)|(>CHARSET)/4&$f
|
|
.label _11 = 2
|
|
.label xw = $11
|
|
.label yw = $13
|
|
.label angle_w = 2
|
|
.label screen = 8
|
|
.label x = $f
|
|
.label y = $a
|
|
// [5] call init_font_hex
|
|
// [69] phi from main to init_font_hex [phi:main->init_font_hex]
|
|
init_font_hex_from_main:
|
|
jsr init_font_hex
|
|
// [6] phi from main to main::toD0181 [phi:main->main::toD0181]
|
|
toD0181_from_main:
|
|
jmp toD0181
|
|
// main::toD0181
|
|
toD0181:
|
|
jmp b5
|
|
// main::@5
|
|
b5:
|
|
// [7] *((const byte*) D018#0) ← (const byte) main::toD0181_return#0 -- _deref_pbuc1=vbuc2
|
|
lda #toD0181_return
|
|
sta D018
|
|
// [8] phi from main::@5 to main::@1 [phi:main::@5->main::@1]
|
|
b1_from_b5:
|
|
// [8] phi (byte*) main::screen#4 = (const byte*) SCREEN#0 [phi:main::@5->main::@1#0] -- pbuz1=pbuc1
|
|
lda #<SCREEN
|
|
sta.z screen
|
|
lda #>SCREEN
|
|
sta.z screen+1
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) -$c [phi:main::@5->main::@1#1] -- vbsz1=vbsc1
|
|
lda #-$c
|
|
sta.z y
|
|
jmp b1
|
|
// [8] phi from main::@3 to main::@1 [phi:main::@3->main::@1]
|
|
b1_from_b3:
|
|
// [8] phi (byte*) main::screen#4 = (byte*) main::screen#1 [phi:main::@3->main::@1#0] -- register_copy
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) main::y#1 [phi:main::@3->main::@1#1] -- register_copy
|
|
jmp b1
|
|
// main::@1
|
|
b1:
|
|
// [9] phi from main::@1 to main::@2 [phi:main::@1->main::@2]
|
|
b2_from_b1:
|
|
// [9] phi (byte*) main::screen#2 = (byte*) main::screen#4 [phi:main::@1->main::@2#0] -- register_copy
|
|
// [9] phi (signed byte) main::x#2 = (signed byte) -$13 [phi:main::@1->main::@2#1] -- vbsz1=vbsc1
|
|
lda #-$13
|
|
sta.z x
|
|
jmp b2
|
|
// [9] phi from main::@6 to main::@2 [phi:main::@6->main::@2]
|
|
b2_from_b6:
|
|
// [9] phi (byte*) main::screen#2 = (byte*) main::screen#1 [phi:main::@6->main::@2#0] -- register_copy
|
|
// [9] phi (signed byte) main::x#2 = (signed byte) main::x#1 [phi:main::@6->main::@2#1] -- register_copy
|
|
jmp b2
|
|
// main::@2
|
|
b2:
|
|
// [10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda.z x
|
|
ldy #0
|
|
sta.z xw+1
|
|
sty.z xw
|
|
// [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda.z y
|
|
ldy #0
|
|
sta.z yw+1
|
|
sty.z yw
|
|
// [12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0
|
|
// [13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0
|
|
// [14] call atan2_16
|
|
jsr atan2_16
|
|
// [15] (word) atan2_16::return#2 ← (word) atan2_16::return#0
|
|
jmp b6
|
|
// main::@6
|
|
b6:
|
|
// [16] (word) main::angle_w#0 ← (word) atan2_16::return#2
|
|
// [17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80 -- vwuz1=vwuz1_plus_vbuc1
|
|
lda #$80
|
|
clc
|
|
adc.z _11
|
|
sta.z _11
|
|
bcc !+
|
|
inc.z _11+1
|
|
!:
|
|
// [18] (byte) main::ang_w#0 ← > (word~) main::$11 -- vbuaa=_hi_vwuz1
|
|
lda.z _11+1
|
|
// [19] *((byte*) main::screen#2) ← (byte) main::ang_w#0 -- _deref_pbuz1=vbuaa
|
|
ldy #0
|
|
sta (screen),y
|
|
// [20] (byte*) main::screen#1 ← ++ (byte*) main::screen#2 -- pbuz1=_inc_pbuz1
|
|
inc.z screen
|
|
bne !+
|
|
inc.z screen+1
|
|
!:
|
|
// [21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2 -- vbsz1=_inc_vbsz1
|
|
inc.z x
|
|
// [22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$15
|
|
cmp.z x
|
|
bne b2_from_b6
|
|
jmp b3
|
|
// main::@3
|
|
b3:
|
|
// [23] (signed byte) main::y#1 ← ++ (signed byte) main::y#4 -- vbsz1=_inc_vbsz1
|
|
inc.z y
|
|
// [24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$d
|
|
cmp.z y
|
|
bne b1_from_b3
|
|
jmp b4
|
|
// main::@4
|
|
b4:
|
|
// [25] *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) ← ++ *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) -- _deref_pbuc1=_inc__deref_pbuc2
|
|
lda COLS+$c*$28+$13
|
|
clc
|
|
adc #1
|
|
sta COLS+$c*$28+$13
|
|
jmp b4
|
|
}
|
|
// atan2_16
|
|
// Find the atan2(x, y) - which is the angle of the line from (0,0) to (x,y)
|
|
// Finding the angle requires a binary search using CORDIC_ITERATIONS_16
|
|
// Returns the angle in hex-degrees (0=0, 0x8000=PI, 0x10000=2*PI)
|
|
// atan2_16(signed word zeropage($11) x, signed word zeropage($13) y)
|
|
atan2_16: {
|
|
.label _2 = $b
|
|
.label _7 = $d
|
|
.label yi = $b
|
|
.label xi = $d
|
|
.label angle = 2
|
|
.label xd = 6
|
|
.label yd = 4
|
|
.label return = 2
|
|
.label x = $11
|
|
.label y = $13
|
|
// [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 -- vwsz1_ge_0_then_la1
|
|
lda.z y+1
|
|
bpl b1
|
|
jmp b2
|
|
// atan2_16::@2
|
|
b2:
|
|
// [27] (signed word~) atan2_16::$2 ← - (signed word) atan2_16::y#0 -- vwsz1=_neg_vwsz2
|
|
sec
|
|
lda #0
|
|
sbc.z y
|
|
sta.z _2
|
|
lda #0
|
|
sbc.z y+1
|
|
sta.z _2+1
|
|
// [28] phi from atan2_16::@1 atan2_16::@2 to atan2_16::@3 [phi:atan2_16::@1/atan2_16::@2->atan2_16::@3]
|
|
b3_from_b1:
|
|
b3_from_b2:
|
|
// [28] phi (signed word) atan2_16::yi#0 = (signed word~) atan2_16::yi#16 [phi:atan2_16::@1/atan2_16::@2->atan2_16::@3#0] -- register_copy
|
|
jmp b3
|
|
// atan2_16::@3
|
|
b3:
|
|
// [29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4 -- vwsz1_ge_0_then_la1
|
|
lda.z x+1
|
|
bpl b4
|
|
jmp b5
|
|
// atan2_16::@5
|
|
b5:
|
|
// [30] (signed word~) atan2_16::$7 ← - (signed word) atan2_16::x#0 -- vwsz1=_neg_vwsz2
|
|
sec
|
|
lda #0
|
|
sbc.z x
|
|
sta.z _7
|
|
lda #0
|
|
sbc.z x+1
|
|
sta.z _7+1
|
|
// [31] phi from atan2_16::@4 atan2_16::@5 to atan2_16::@6 [phi:atan2_16::@4/atan2_16::@5->atan2_16::@6]
|
|
b6_from_b4:
|
|
b6_from_b5:
|
|
// [31] phi (signed word) atan2_16::xi#0 = (signed word~) atan2_16::xi#13 [phi:atan2_16::@4/atan2_16::@5->atan2_16::@6#0] -- register_copy
|
|
jmp b6
|
|
// atan2_16::@6
|
|
b6:
|
|
// [32] phi from atan2_16::@6 to atan2_16::@10 [phi:atan2_16::@6->atan2_16::@10]
|
|
b10_from_b6:
|
|
// [32] phi (word) atan2_16::angle#12 = (byte) 0 [phi:atan2_16::@6->atan2_16::@10#0] -- vwuz1=vbuc1
|
|
lda #<0
|
|
sta.z angle
|
|
lda #>0
|
|
sta.z angle+1
|
|
// [32] phi (byte) atan2_16::i#2 = (byte) 0 [phi:atan2_16::@6->atan2_16::@10#1] -- vbuxx=vbuc1
|
|
ldx #0
|
|
// [32] phi (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#0 [phi:atan2_16::@6->atan2_16::@10#2] -- register_copy
|
|
// [32] phi (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#0 [phi:atan2_16::@6->atan2_16::@10#3] -- register_copy
|
|
jmp b10
|
|
// atan2_16::@10
|
|
b10:
|
|
// [33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11 -- vwsz1_neq_0_then_la1
|
|
lda.z yi+1
|
|
bne b11
|
|
lda.z yi
|
|
bne b11
|
|
// [34] phi from atan2_16::@10 atan2_16::@19 to atan2_16::@12 [phi:atan2_16::@10/atan2_16::@19->atan2_16::@12]
|
|
b12_from_b10:
|
|
b12_from_b19:
|
|
// [34] phi (word) atan2_16::angle#6 = (word) atan2_16::angle#12 [phi:atan2_16::@10/atan2_16::@19->atan2_16::@12#0] -- register_copy
|
|
jmp b12
|
|
// atan2_16::@12
|
|
b12:
|
|
// [35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1 -- vwuz1=vwuz1_ror_1
|
|
lsr.z angle+1
|
|
ror.z angle
|
|
// [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 -- vwsz1_ge_0_then_la1
|
|
lda.z x+1
|
|
bpl b7_from_b12
|
|
jmp b21
|
|
// atan2_16::@21
|
|
b21:
|
|
// [37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1 -- vwuz1=vwuc1_minus_vwuz1
|
|
sec
|
|
lda #<$8000
|
|
sbc.z angle
|
|
sta.z angle
|
|
lda #>$8000
|
|
sbc.z angle+1
|
|
sta.z angle+1
|
|
// [38] phi from atan2_16::@12 atan2_16::@21 to atan2_16::@7 [phi:atan2_16::@12/atan2_16::@21->atan2_16::@7]
|
|
b7_from_b12:
|
|
b7_from_b21:
|
|
// [38] phi (word) atan2_16::angle#11 = (word) atan2_16::angle#1 [phi:atan2_16::@12/atan2_16::@21->atan2_16::@7#0] -- register_copy
|
|
jmp b7
|
|
// atan2_16::@7
|
|
b7:
|
|
// [39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8 -- vwsz1_ge_0_then_la1
|
|
lda.z y+1
|
|
bpl b8_from_b7
|
|
jmp b9
|
|
// atan2_16::@9
|
|
b9:
|
|
// [40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11 -- vwuz1=_neg_vwuz1
|
|
sec
|
|
lda #0
|
|
sbc.z angle
|
|
sta.z angle
|
|
lda #0
|
|
sbc.z angle+1
|
|
sta.z angle+1
|
|
// [41] phi from atan2_16::@7 atan2_16::@9 to atan2_16::@8 [phi:atan2_16::@7/atan2_16::@9->atan2_16::@8]
|
|
b8_from_b7:
|
|
b8_from_b9:
|
|
// [41] phi (word) atan2_16::return#0 = (word) atan2_16::angle#11 [phi:atan2_16::@7/atan2_16::@9->atan2_16::@8#0] -- register_copy
|
|
jmp b8
|
|
// atan2_16::@8
|
|
b8:
|
|
jmp breturn
|
|
// atan2_16::@return
|
|
breturn:
|
|
// [42] return
|
|
rts
|
|
// atan2_16::@11
|
|
b11:
|
|
// [43] (byte~) atan2_16::shift#5 ← (byte) atan2_16::i#2 -- vbuyy=vbuxx
|
|
txa
|
|
tay
|
|
// [44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3 -- vwsz1=vwsz2
|
|
lda.z xi
|
|
sta.z xd
|
|
lda.z xi+1
|
|
sta.z xd+1
|
|
// [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 -- vwsz1=vwsz2
|
|
lda.z yi
|
|
sta.z yd
|
|
lda.z yi+1
|
|
sta.z yd+1
|
|
// [46] phi from atan2_16::@11 atan2_16::@14 to atan2_16::@13 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13]
|
|
b13_from_b11:
|
|
b13_from_b14:
|
|
// [46] phi (signed word) atan2_16::yd#3 = (signed word~) atan2_16::yd#10 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#0] -- register_copy
|
|
// [46] phi (signed word) atan2_16::xd#3 = (signed word~) atan2_16::xd#10 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#1] -- register_copy
|
|
// [46] phi (byte) atan2_16::shift#2 = (byte~) atan2_16::shift#5 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#2] -- register_copy
|
|
jmp b13
|
|
// atan2_16::@13
|
|
b13:
|
|
// [47] if((byte) atan2_16::shift#2>=(byte) 2) goto atan2_16::@14 -- vbuyy_ge_vbuc1_then_la1
|
|
cpy #2
|
|
bcs b14
|
|
jmp b15
|
|
// atan2_16::@15
|
|
b15:
|
|
// [48] if((byte) 0==(byte) atan2_16::shift#2) goto atan2_16::@17 -- vbuc1_eq_vbuyy_then_la1
|
|
cpy #0
|
|
beq b17_from_b15
|
|
jmp b16
|
|
// atan2_16::@16
|
|
b16:
|
|
// [49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
// [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
// [51] phi from atan2_16::@15 atan2_16::@16 to atan2_16::@17 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17]
|
|
b17_from_b15:
|
|
b17_from_b16:
|
|
// [51] phi (signed word) atan2_16::xd#5 = (signed word) atan2_16::xd#3 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17#0] -- register_copy
|
|
// [51] phi (signed word) atan2_16::yd#5 = (signed word) atan2_16::yd#3 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17#1] -- register_copy
|
|
jmp b17
|
|
// atan2_16::@17
|
|
b17:
|
|
// [52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18 -- vwsz1_ge_0_then_la1
|
|
lda.z yi+1
|
|
bpl b18
|
|
jmp b20
|
|
// atan2_16::@20
|
|
b20:
|
|
// [53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda.z xi
|
|
sec
|
|
sbc.z yd
|
|
sta.z xi
|
|
lda.z xi+1
|
|
sbc.z yd+1
|
|
sta.z xi+1
|
|
// [54] (signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#3 + (signed word) atan2_16::xd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda.z yi
|
|
clc
|
|
adc.z xd
|
|
sta.z yi
|
|
lda.z yi+1
|
|
adc.z xd+1
|
|
sta.z yi+1
|
|
// [55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuaa=vbuxx_rol_1
|
|
txa
|
|
asl
|
|
// [56] (word) atan2_16::angle#3 ← (word) atan2_16::angle#12 - *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24) -- vwuz1=vwuz1_minus_pwuc1_derefidx_vbuaa
|
|
tay
|
|
sec
|
|
lda.z angle
|
|
sbc CORDIC_ATAN2_ANGLES_16,y
|
|
sta.z angle
|
|
lda.z angle+1
|
|
sbc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta.z angle+1
|
|
// [57] phi from atan2_16::@18 atan2_16::@20 to atan2_16::@19 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19]
|
|
b19_from_b18:
|
|
b19_from_b20:
|
|
// [57] phi (signed word) atan2_16::xi#8 = (signed word) atan2_16::xi#1 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#0] -- register_copy
|
|
// [57] phi (word) atan2_16::angle#13 = (word) atan2_16::angle#2 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#1] -- register_copy
|
|
// [57] phi (signed word) atan2_16::yi#8 = (signed word) atan2_16::yi#1 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#2] -- register_copy
|
|
jmp b19
|
|
// atan2_16::@19
|
|
b19:
|
|
// [58] (byte) atan2_16::i#1 ← ++ (byte) atan2_16::i#2 -- vbuxx=_inc_vbuxx
|
|
inx
|
|
// [59] if((byte) atan2_16::i#1==(const byte) CORDIC_ITERATIONS_16#0-(byte) 1+(byte) 1) goto atan2_16::@12 -- vbuxx_eq_vbuc1_then_la1
|
|
cpx #CORDIC_ITERATIONS_16-1+1
|
|
beq b12_from_b19
|
|
// [32] phi from atan2_16::@19 to atan2_16::@10 [phi:atan2_16::@19->atan2_16::@10]
|
|
b10_from_b19:
|
|
// [32] phi (word) atan2_16::angle#12 = (word) atan2_16::angle#13 [phi:atan2_16::@19->atan2_16::@10#0] -- register_copy
|
|
// [32] phi (byte) atan2_16::i#2 = (byte) atan2_16::i#1 [phi:atan2_16::@19->atan2_16::@10#1] -- register_copy
|
|
// [32] phi (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#8 [phi:atan2_16::@19->atan2_16::@10#2] -- register_copy
|
|
// [32] phi (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#8 [phi:atan2_16::@19->atan2_16::@10#3] -- register_copy
|
|
jmp b10
|
|
// atan2_16::@18
|
|
b18:
|
|
// [60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda.z xi
|
|
clc
|
|
adc.z yd
|
|
sta.z xi
|
|
lda.z xi+1
|
|
adc.z yd+1
|
|
sta.z xi+1
|
|
// [61] (signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#3 - (signed word) atan2_16::xd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda.z yi
|
|
sec
|
|
sbc.z xd
|
|
sta.z yi
|
|
lda.z yi+1
|
|
sbc.z xd+1
|
|
sta.z yi+1
|
|
// [62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuaa=vbuxx_rol_1
|
|
txa
|
|
asl
|
|
// [63] (word) atan2_16::angle#2 ← (word) atan2_16::angle#12 + *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23) -- vwuz1=vwuz1_plus_pwuc1_derefidx_vbuaa
|
|
tay
|
|
clc
|
|
lda.z angle
|
|
adc CORDIC_ATAN2_ANGLES_16,y
|
|
sta.z angle
|
|
lda.z angle+1
|
|
adc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta.z angle+1
|
|
jmp b19_from_b18
|
|
// atan2_16::@14
|
|
b14:
|
|
// [64] (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
// [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
// [66] (byte) atan2_16::shift#1 ← (byte) atan2_16::shift#2 - (byte) 2 -- vbuyy=vbuyy_minus_2
|
|
dey
|
|
dey
|
|
jmp b13_from_b14
|
|
// atan2_16::@4
|
|
b4:
|
|
// [67] (signed word~) atan2_16::xi#13 ← (signed word) atan2_16::x#0 -- vwsz1=vwsz2
|
|
lda.z x
|
|
sta.z xi
|
|
lda.z x+1
|
|
sta.z xi+1
|
|
jmp b6_from_b4
|
|
// atan2_16::@1
|
|
b1:
|
|
// [68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0 -- vwsz1=vwsz2
|
|
lda.z y
|
|
sta.z yi
|
|
lda.z y+1
|
|
sta.z yi+1
|
|
jmp b3_from_b1
|
|
}
|
|
// init_font_hex
|
|
// Make charset from proto chars
|
|
// init_font_hex(byte* zeropage($b) charset)
|
|
init_font_hex: {
|
|
.label _0 = $15
|
|
.label idx = $10
|
|
.label proto_lo = $d
|
|
.label charset = $b
|
|
.label c1 = $f
|
|
.label proto_hi = 8
|
|
.label c = $a
|
|
// [70] phi from init_font_hex to init_font_hex::@1 [phi:init_font_hex->init_font_hex::@1]
|
|
b1_from_init_font_hex:
|
|
// [70] phi (byte) init_font_hex::c#6 = (byte) 0 [phi:init_font_hex->init_font_hex::@1#0] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z c
|
|
// [70] phi (byte*) init_font_hex::proto_hi#6 = (const byte[]) FONT_HEX_PROTO#0 [phi:init_font_hex->init_font_hex::@1#1] -- pbuz1=pbuc1
|
|
lda #<FONT_HEX_PROTO
|
|
sta.z proto_hi
|
|
lda #>FONT_HEX_PROTO
|
|
sta.z proto_hi+1
|
|
// [70] phi (byte*) init_font_hex::charset#5 = (const byte*) CHARSET#0 [phi:init_font_hex->init_font_hex::@1#2] -- pbuz1=pbuc1
|
|
lda #<CHARSET
|
|
sta.z charset
|
|
lda #>CHARSET
|
|
sta.z charset+1
|
|
jmp b1
|
|
// [70] phi from init_font_hex::@5 to init_font_hex::@1 [phi:init_font_hex::@5->init_font_hex::@1]
|
|
b1_from_b5:
|
|
// [70] phi (byte) init_font_hex::c#6 = (byte) init_font_hex::c#1 [phi:init_font_hex::@5->init_font_hex::@1#0] -- register_copy
|
|
// [70] phi (byte*) init_font_hex::proto_hi#6 = (byte*) init_font_hex::proto_hi#1 [phi:init_font_hex::@5->init_font_hex::@1#1] -- register_copy
|
|
// [70] phi (byte*) init_font_hex::charset#5 = (byte*) init_font_hex::charset#0 [phi:init_font_hex::@5->init_font_hex::@1#2] -- register_copy
|
|
jmp b1
|
|
// init_font_hex::@1
|
|
b1:
|
|
// [71] phi from init_font_hex::@1 to init_font_hex::@2 [phi:init_font_hex::@1->init_font_hex::@2]
|
|
b2_from_b1:
|
|
// [71] phi (byte) init_font_hex::c1#4 = (byte) 0 [phi:init_font_hex::@1->init_font_hex::@2#0] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z c1
|
|
// [71] phi (byte*) init_font_hex::proto_lo#4 = (const byte[]) FONT_HEX_PROTO#0 [phi:init_font_hex::@1->init_font_hex::@2#1] -- pbuz1=pbuc1
|
|
lda #<FONT_HEX_PROTO
|
|
sta.z proto_lo
|
|
lda #>FONT_HEX_PROTO
|
|
sta.z proto_lo+1
|
|
// [71] phi (byte*) init_font_hex::charset#2 = (byte*) init_font_hex::charset#5 [phi:init_font_hex::@1->init_font_hex::@2#2] -- register_copy
|
|
jmp b2
|
|
// [71] phi from init_font_hex::@4 to init_font_hex::@2 [phi:init_font_hex::@4->init_font_hex::@2]
|
|
b2_from_b4:
|
|
// [71] phi (byte) init_font_hex::c1#4 = (byte) init_font_hex::c1#1 [phi:init_font_hex::@4->init_font_hex::@2#0] -- register_copy
|
|
// [71] phi (byte*) init_font_hex::proto_lo#4 = (byte*) init_font_hex::proto_lo#1 [phi:init_font_hex::@4->init_font_hex::@2#1] -- register_copy
|
|
// [71] phi (byte*) init_font_hex::charset#2 = (byte*) init_font_hex::charset#0 [phi:init_font_hex::@4->init_font_hex::@2#2] -- register_copy
|
|
jmp b2
|
|
// init_font_hex::@2
|
|
b2:
|
|
// [72] *((byte*) init_font_hex::charset#2) ← (byte) 0 -- _deref_pbuz1=vbuc1
|
|
lda #0
|
|
ldy #0
|
|
sta (charset),y
|
|
// [73] phi from init_font_hex::@2 to init_font_hex::@3 [phi:init_font_hex::@2->init_font_hex::@3]
|
|
b3_from_b2:
|
|
// [73] phi (byte) init_font_hex::idx#5 = (byte) 1 [phi:init_font_hex::@2->init_font_hex::@3#0] -- vbuz1=vbuc1
|
|
lda #1
|
|
sta.z idx
|
|
// [73] phi (byte) init_font_hex::i#2 = (byte) 0 [phi:init_font_hex::@2->init_font_hex::@3#1] -- vbuxx=vbuc1
|
|
ldx #0
|
|
jmp b3
|
|
// [73] phi from init_font_hex::@3 to init_font_hex::@3 [phi:init_font_hex::@3->init_font_hex::@3]
|
|
b3_from_b3:
|
|
// [73] phi (byte) init_font_hex::idx#5 = (byte) init_font_hex::idx#2 [phi:init_font_hex::@3->init_font_hex::@3#0] -- register_copy
|
|
// [73] phi (byte) init_font_hex::i#2 = (byte) init_font_hex::i#1 [phi:init_font_hex::@3->init_font_hex::@3#1] -- register_copy
|
|
jmp b3
|
|
// init_font_hex::@3
|
|
b3:
|
|
// [74] (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#6 + (byte) init_font_hex::i#2) << (byte) 4 -- vbuz1=pbuz2_derefidx_vbuxx_rol_4
|
|
txa
|
|
tay
|
|
lda (proto_hi),y
|
|
asl
|
|
asl
|
|
asl
|
|
asl
|
|
sta.z _0
|
|
// [75] (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#4 + (byte) init_font_hex::i#2) << (byte) 1 -- vbuaa=pbuz1_derefidx_vbuxx_rol_1
|
|
txa
|
|
tay
|
|
lda (proto_lo),y
|
|
asl
|
|
// [76] (byte~) init_font_hex::$2 ← (byte~) init_font_hex::$0 | (byte~) init_font_hex::$1 -- vbuaa=vbuz1_bor_vbuaa
|
|
ora.z _0
|
|
// [77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2 -- pbuz1_derefidx_vbuz2=vbuaa
|
|
ldy.z idx
|
|
sta (charset),y
|
|
// [78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5 -- vbuz1=_inc_vbuz1
|
|
inc.z idx
|
|
// [79] (byte) init_font_hex::i#1 ← ++ (byte) init_font_hex::i#2 -- vbuxx=_inc_vbuxx
|
|
inx
|
|
// [80] if((byte) init_font_hex::i#1!=(byte) 5) goto init_font_hex::@3 -- vbuxx_neq_vbuc1_then_la1
|
|
cpx #5
|
|
bne b3_from_b3
|
|
jmp b4
|
|
// init_font_hex::@4
|
|
b4:
|
|
// [81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0 -- pbuz1_derefidx_vbuz2=vbuc1
|
|
lda #0
|
|
ldy.z idx
|
|
sta (charset),y
|
|
// [82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2 -- vbuyy=_inc_vbuz1
|
|
ldy.z idx
|
|
iny
|
|
// [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 -- pbuz1_derefidx_vbuyy=vbuc1
|
|
lda #0
|
|
sta (charset),y
|
|
// [84] (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#4 + (byte) 5 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #5
|
|
clc
|
|
adc.z proto_lo
|
|
sta.z proto_lo
|
|
bcc !+
|
|
inc.z proto_lo+1
|
|
!:
|
|
// [85] (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#2 + (byte) 8 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #8
|
|
clc
|
|
adc.z charset
|
|
sta.z charset
|
|
bcc !+
|
|
inc.z charset+1
|
|
!:
|
|
// [86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4 -- vbuz1=_inc_vbuz1
|
|
inc.z c1
|
|
// [87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp.z c1
|
|
bne b2_from_b4
|
|
jmp b5
|
|
// init_font_hex::@5
|
|
b5:
|
|
// [88] (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#6 + (byte) 5 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #5
|
|
clc
|
|
adc.z proto_hi
|
|
sta.z proto_hi
|
|
bcc !+
|
|
inc.z proto_hi+1
|
|
!:
|
|
// [89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6 -- vbuz1=_inc_vbuz1
|
|
inc.z c
|
|
// [90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp.z c
|
|
bne b1_from_b5
|
|
jmp breturn
|
|
// init_font_hex::@return
|
|
breturn:
|
|
// [91] return
|
|
rts
|
|
}
|
|
// File Data
|
|
// Bit patterns for symbols 0-f (3x5 pixels) used in font hex
|
|
FONT_HEX_PROTO: .byte 2, 5, 5, 5, 2, 6, 2, 2, 2, 7, 6, 1, 2, 4, 7, 6, 1, 2, 1, 6, 5, 5, 7, 1, 1, 7, 4, 6, 1, 6, 3, 4, 6, 5, 2, 7, 1, 1, 1, 1, 2, 5, 2, 5, 2, 2, 5, 3, 1, 1, 2, 5, 7, 5, 5, 6, 5, 6, 5, 6, 2, 5, 4, 5, 2, 6, 5, 5, 5, 6, 7, 4, 6, 4, 7, 7, 4, 6, 4, 4
|
|
// Angles representing ATAN(0.5), ATAN(0.25), ATAN(0.125), ...
|
|
CORDIC_ATAN2_ANGLES_16:
|
|
.for (var i=0; i<CORDIC_ITERATIONS_16; i++)
|
|
.word 256*2*256*atan(1/pow(2,i))/PI/2
|
|
|
|
|
|
ASSEMBLER OPTIMIZATIONS
|
|
Removing instruction jmp b1
|
|
Removing instruction jmp bend
|
|
Removing instruction jmp toD0181
|
|
Removing instruction jmp b5
|
|
Removing instruction jmp b1
|
|
Removing instruction jmp b2
|
|
Removing instruction jmp b6
|
|
Removing instruction jmp b3
|
|
Removing instruction jmp b4
|
|
Removing instruction jmp b2
|
|
Removing instruction jmp b3
|
|
Removing instruction jmp b5
|
|
Removing instruction jmp b6
|
|
Removing instruction jmp b10
|
|
Removing instruction jmp b12
|
|
Removing instruction jmp b21
|
|
Removing instruction jmp b7
|
|
Removing instruction jmp b9
|
|
Removing instruction jmp b8
|
|
Removing instruction jmp breturn
|
|
Removing instruction jmp b13
|
|
Removing instruction jmp b15
|
|
Removing instruction jmp b16
|
|
Removing instruction jmp b17
|
|
Removing instruction jmp b20
|
|
Removing instruction jmp b19
|
|
Removing instruction jmp b1
|
|
Removing instruction jmp b2
|
|
Removing instruction jmp b3
|
|
Removing instruction jmp b4
|
|
Removing instruction jmp b5
|
|
Removing instruction jmp breturn
|
|
Succesful ASM optimization Pass5NextJumpElimination
|
|
Removing instruction ldy #0
|
|
Removing instruction lda #>0
|
|
Replacing instruction ldx #0 with TAX
|
|
Replacing instruction ldy #0 with TAY
|
|
Removing instruction ldy.z idx
|
|
Removing instruction lda #0
|
|
Succesful ASM optimization Pass5UnnecesaryLoadElimination
|
|
Replacing label b2_from_b6 with b2
|
|
Replacing label b1_from_b3 with b1
|
|
Replacing label b7_from_b12 with b7
|
|
Replacing label b8_from_b7 with b8
|
|
Replacing label b17_from_b15 with b17
|
|
Replacing label b12_from_b19 with b12
|
|
Replacing label b19_from_b18 with b19
|
|
Replacing label b13_from_b14 with b13
|
|
Replacing label b6_from_b4 with b6
|
|
Replacing label b3_from_b1 with b3
|
|
Replacing label b3_from_b3 with b3
|
|
Replacing label b2_from_b4 with b2
|
|
Replacing label b1_from_b5 with b1
|
|
Removing instruction b1_from_bbegin:
|
|
Removing instruction b1:
|
|
Removing instruction main_from_b1:
|
|
Removing instruction bend_from_b1:
|
|
Removing instruction toD0181_from_main:
|
|
Removing instruction toD0181:
|
|
Removing instruction b1_from_b3:
|
|
Removing instruction b2_from_b1:
|
|
Removing instruction b2_from_b6:
|
|
Removing instruction b3_from_b1:
|
|
Removing instruction b3_from_b2:
|
|
Removing instruction b6_from_b4:
|
|
Removing instruction b6_from_b5:
|
|
Removing instruction b10_from_b6:
|
|
Removing instruction b12_from_b10:
|
|
Removing instruction b12_from_b19:
|
|
Removing instruction b7_from_b12:
|
|
Removing instruction b7_from_b21:
|
|
Removing instruction b8_from_b7:
|
|
Removing instruction b8_from_b9:
|
|
Removing instruction breturn:
|
|
Removing instruction b13_from_b11:
|
|
Removing instruction b13_from_b14:
|
|
Removing instruction b17_from_b15:
|
|
Removing instruction b17_from_b16:
|
|
Removing instruction b19_from_b18:
|
|
Removing instruction b19_from_b20:
|
|
Removing instruction b1_from_b5:
|
|
Removing instruction b2_from_b1:
|
|
Removing instruction b2_from_b4:
|
|
Removing instruction b3_from_b3:
|
|
Succesful ASM optimization Pass5RedundantLabelElimination
|
|
Removing instruction bend:
|
|
Removing instruction init_font_hex_from_main:
|
|
Removing instruction b5:
|
|
Removing instruction b1_from_b5:
|
|
Removing instruction b6:
|
|
Removing instruction b3:
|
|
Removing instruction b2:
|
|
Removing instruction b5:
|
|
Removing instruction b21:
|
|
Removing instruction b9:
|
|
Removing instruction b15:
|
|
Removing instruction b16:
|
|
Removing instruction b20:
|
|
Removing instruction b10_from_b19:
|
|
Removing instruction b1_from_init_font_hex:
|
|
Removing instruction b3_from_b2:
|
|
Removing instruction b4:
|
|
Removing instruction b5:
|
|
Removing instruction breturn:
|
|
Succesful ASM optimization Pass5UnusedLabelElimination
|
|
Updating BasicUpstart to call main directly
|
|
Removing instruction jsr main
|
|
Succesful ASM optimization Pass5SkipBegin
|
|
Removing instruction jmp b1
|
|
Removing instruction jmp b2
|
|
Removing instruction jmp b1
|
|
Removing instruction jmp b2
|
|
Removing instruction jmp b3
|
|
Succesful ASM optimization Pass5NextJumpElimination
|
|
Removing instruction bbegin:
|
|
Succesful ASM optimization Pass5UnusedLabelElimination
|
|
Fixing long branch [193] beq b12 to bne
|
|
Fixing long branch [87] bpl b1 to bmi
|
|
Fixing long branch [99] bpl b4 to bmi
|
|
|
|
FINAL SYMBOL TABLE
|
|
(label) @1
|
|
(label) @begin
|
|
(label) @end
|
|
(byte*) CHARSET
|
|
(const byte*) CHARSET#0 CHARSET = (byte*) 8192
|
|
(byte*) COLS
|
|
(const byte*) COLS#0 COLS = (byte*) 55296
|
|
(word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16
|
|
(const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 CORDIC_ATAN2_ANGLES_16 = kickasm {{ .for (var i=0; i<CORDIC_ITERATIONS_16; i++)
|
|
.word 256*2*256*atan(1/pow(2,i))/PI/2
|
|
}}
|
|
(byte) CORDIC_ITERATIONS_16
|
|
(const byte) CORDIC_ITERATIONS_16#0 CORDIC_ITERATIONS_16 = (byte) $f
|
|
(byte*) D018
|
|
(const byte*) D018#0 D018 = (byte*) 53272
|
|
(byte[]) FONT_HEX_PROTO
|
|
(const byte[]) FONT_HEX_PROTO#0 FONT_HEX_PROTO = { (byte) 2, (byte) 5, (byte) 5, (byte) 5, (byte) 2, (byte) 6, (byte) 2, (byte) 2, (byte) 2, (byte) 7, (byte) 6, (byte) 1, (byte) 2, (byte) 4, (byte) 7, (byte) 6, (byte) 1, (byte) 2, (byte) 1, (byte) 6, (byte) 5, (byte) 5, (byte) 7, (byte) 1, (byte) 1, (byte) 7, (byte) 4, (byte) 6, (byte) 1, (byte) 6, (byte) 3, (byte) 4, (byte) 6, (byte) 5, (byte) 2, (byte) 7, (byte) 1, (byte) 1, (byte) 1, (byte) 1, (byte) 2, (byte) 5, (byte) 2, (byte) 5, (byte) 2, (byte) 2, (byte) 5, (byte) 3, (byte) 1, (byte) 1, (byte) 2, (byte) 5, (byte) 7, (byte) 5, (byte) 5, (byte) 6, (byte) 5, (byte) 6, (byte) 5, (byte) 6, (byte) 2, (byte) 5, (byte) 4, (byte) 5, (byte) 2, (byte) 6, (byte) 5, (byte) 5, (byte) 5, (byte) 6, (byte) 7, (byte) 4, (byte) 6, (byte) 4, (byte) 7, (byte) 7, (byte) 4, (byte) 6, (byte) 4, (byte) 4 }
|
|
(byte*) SCREEN
|
|
(const byte*) SCREEN#0 SCREEN = (byte*) 10240
|
|
(word()) atan2_16((signed word) atan2_16::x , (signed word) atan2_16::y)
|
|
(signed word~) atan2_16::$2 $2 zp ZP_WORD:11 4.0
|
|
(byte~) atan2_16::$23 reg byte a 2002.0
|
|
(byte~) atan2_16::$24 reg byte a 2002.0
|
|
(signed word~) atan2_16::$7 $7 zp ZP_WORD:13 4.0
|
|
(label) atan2_16::@1
|
|
(label) atan2_16::@10
|
|
(label) atan2_16::@11
|
|
(label) atan2_16::@12
|
|
(label) atan2_16::@13
|
|
(label) atan2_16::@14
|
|
(label) atan2_16::@15
|
|
(label) atan2_16::@16
|
|
(label) atan2_16::@17
|
|
(label) atan2_16::@18
|
|
(label) atan2_16::@19
|
|
(label) atan2_16::@2
|
|
(label) atan2_16::@20
|
|
(label) atan2_16::@21
|
|
(label) atan2_16::@3
|
|
(label) atan2_16::@4
|
|
(label) atan2_16::@5
|
|
(label) atan2_16::@6
|
|
(label) atan2_16::@7
|
|
(label) atan2_16::@8
|
|
(label) atan2_16::@9
|
|
(label) atan2_16::@return
|
|
(word) atan2_16::angle
|
|
(word) atan2_16::angle#1 angle zp ZP_WORD:2 3.0
|
|
(word) atan2_16::angle#11 angle zp ZP_WORD:2 4.0
|
|
(word) atan2_16::angle#12 angle zp ZP_WORD:2 190.66666666666666
|
|
(word) atan2_16::angle#13 angle zp ZP_WORD:2 1334.6666666666667
|
|
(word) atan2_16::angle#2 angle zp ZP_WORD:2 2002.0
|
|
(word) atan2_16::angle#3 angle zp ZP_WORD:2 2002.0
|
|
(word) atan2_16::angle#4 angle zp ZP_WORD:2 4.0
|
|
(word) atan2_16::angle#5 angle zp ZP_WORD:2 4.0
|
|
(word) atan2_16::angle#6 angle zp ZP_WORD:2 2004.0
|
|
(byte) atan2_16::i
|
|
(byte) atan2_16::i#1 reg byte x 1501.5
|
|
(byte) atan2_16::i#2 reg byte x 208.54166666666669
|
|
(word) atan2_16::return
|
|
(word) atan2_16::return#0 return zp ZP_WORD:2 34.99999999999999
|
|
(word) atan2_16::return#2 return zp ZP_WORD:2 202.0
|
|
(byte) atan2_16::shift
|
|
(byte) atan2_16::shift#1 reg byte y 20002.0
|
|
(byte) atan2_16::shift#2 reg byte y 8001.25
|
|
(byte~) atan2_16::shift#5 reg byte y 667.3333333333334
|
|
(signed word) atan2_16::x
|
|
(signed word) atan2_16::x#0 x zp ZP_WORD:17 2.8684210526315796
|
|
(signed word) atan2_16::xd
|
|
(signed word) atan2_16::xd#1 xd zp ZP_WORD:6 6667.333333333333
|
|
(signed word~) atan2_16::xd#10 xd zp ZP_WORD:6 1001.0
|
|
(signed word) atan2_16::xd#2 xd zp ZP_WORD:6 1001.0
|
|
(signed word) atan2_16::xd#3 xd zp ZP_WORD:6 7668.333333333332
|
|
(signed word) atan2_16::xd#5 xd zp ZP_WORD:6 1001.0
|
|
(signed word) atan2_16::xi
|
|
(signed word) atan2_16::xi#0 xi zp ZP_WORD:13 6.0
|
|
(signed word) atan2_16::xi#1 xi zp ZP_WORD:13 500.5
|
|
(signed word~) atan2_16::xi#13 xi zp ZP_WORD:13 4.0
|
|
(signed word) atan2_16::xi#2 xi zp ZP_WORD:13 500.5
|
|
(signed word) atan2_16::xi#3 xi zp ZP_WORD:13 267.0666666666667
|
|
(signed word) atan2_16::xi#8 xi zp ZP_WORD:13 1001.0
|
|
(signed word) atan2_16::y
|
|
(signed word) atan2_16::y#0 y zp ZP_WORD:19 2.724999999999999
|
|
(signed word) atan2_16::yd
|
|
(signed word) atan2_16::yd#1 yd zp ZP_WORD:4 10001.0
|
|
(signed word~) atan2_16::yd#10 yd zp ZP_WORD:4 2002.0
|
|
(signed word) atan2_16::yd#2 yd zp ZP_WORD:4 2002.0
|
|
(signed word) atan2_16::yd#3 yd zp ZP_WORD:4 4601.0
|
|
(signed word) atan2_16::yd#5 yd zp ZP_WORD:4 2002.0
|
|
(signed word) atan2_16::yi
|
|
(signed word) atan2_16::yi#0 yi zp ZP_WORD:11 1.2000000000000002
|
|
(signed word) atan2_16::yi#1 yi zp ZP_WORD:11 667.3333333333334
|
|
(signed word~) atan2_16::yi#16 yi zp ZP_WORD:11 4.0
|
|
(signed word) atan2_16::yi#2 yi zp ZP_WORD:11 667.3333333333334
|
|
(signed word) atan2_16::yi#3 yi zp ZP_WORD:11 353.4117647058823
|
|
(signed word) atan2_16::yi#8 yi zp ZP_WORD:11 1001.0
|
|
(void()) init_font_hex((byte*) init_font_hex::charset)
|
|
(byte~) init_font_hex::$0 $0 zp ZP_BYTE:21 1001.0
|
|
(byte~) init_font_hex::$1 reg byte a 2002.0
|
|
(byte~) init_font_hex::$2 reg byte a 2002.0
|
|
(label) init_font_hex::@1
|
|
(label) init_font_hex::@2
|
|
(label) init_font_hex::@3
|
|
(label) init_font_hex::@4
|
|
(label) init_font_hex::@5
|
|
(label) init_font_hex::@return
|
|
(byte) init_font_hex::c
|
|
(byte) init_font_hex::c#1 c zp ZP_BYTE:10 16.5
|
|
(byte) init_font_hex::c#6 c zp ZP_BYTE:10 1.1578947368421053
|
|
(byte) init_font_hex::c1
|
|
(byte) init_font_hex::c1#1 c1 zp ZP_BYTE:15 151.5
|
|
(byte) init_font_hex::c1#4 c1 zp ZP_BYTE:15 13.466666666666667
|
|
(byte*) init_font_hex::charset
|
|
(byte*) init_font_hex::charset#0 charset zp ZP_WORD:11 35.5
|
|
(byte*) init_font_hex::charset#2 charset zp ZP_WORD:11 108.35714285714285
|
|
(byte*) init_font_hex::charset#5 charset zp ZP_WORD:11 22.0
|
|
(byte) init_font_hex::i
|
|
(byte) init_font_hex::i#1 reg byte x 1501.5
|
|
(byte) init_font_hex::i#2 reg byte x 667.3333333333334
|
|
(byte) init_font_hex::idx
|
|
(byte) init_font_hex::idx#2 idx zp ZP_BYTE:16 551.0
|
|
(byte) init_font_hex::idx#3 reg byte y 202.0
|
|
(byte) init_font_hex::idx#5 idx zp ZP_BYTE:16 600.5999999999999
|
|
(byte*) init_font_hex::proto_hi
|
|
(byte*) init_font_hex::proto_hi#1 proto_hi zp ZP_WORD:8 7.333333333333333
|
|
(byte*) init_font_hex::proto_hi#6 proto_hi zp ZP_WORD:8 56.83333333333334
|
|
(byte*) init_font_hex::proto_lo
|
|
(byte*) init_font_hex::proto_lo#1 proto_lo zp ZP_WORD:13 50.5
|
|
(byte*) init_font_hex::proto_lo#4 proto_lo zp ZP_WORD:13 92.53846153846155
|
|
(void()) main()
|
|
(word~) main::$11 $11 zp ZP_WORD:2 202.0
|
|
(label) main::@1
|
|
(label) main::@2
|
|
(label) main::@3
|
|
(label) main::@4
|
|
(label) main::@5
|
|
(label) main::@6
|
|
(byte) main::ang_w
|
|
(byte) main::ang_w#0 reg byte a 202.0
|
|
(word) main::angle_w
|
|
(word) main::angle_w#0 angle_w zp ZP_WORD:2 202.0
|
|
(byte*) main::col00
|
|
(byte*) main::screen
|
|
(byte*) main::screen#1 screen zp ZP_WORD:8 42.599999999999994
|
|
(byte*) main::screen#2 screen zp ZP_WORD:8 28.545454545454547
|
|
(byte*) main::screen#4 screen zp ZP_WORD:8 22.0
|
|
(label) main::toD0181
|
|
(word~) main::toD0181_$0
|
|
(number~) main::toD0181_$1
|
|
(number~) main::toD0181_$2
|
|
(number~) main::toD0181_$3
|
|
(word~) main::toD0181_$4
|
|
(byte~) main::toD0181_$5
|
|
(number~) main::toD0181_$6
|
|
(number~) main::toD0181_$7
|
|
(number~) main::toD0181_$8
|
|
(byte*) main::toD0181_gfx
|
|
(byte) main::toD0181_return
|
|
(const byte) main::toD0181_return#0 toD0181_return = >(word)(const byte*) SCREEN#0&(word) $3fff*(byte) 4|>(word)(const byte*) CHARSET#0/(byte) 4&(byte) $f
|
|
(byte*) main::toD0181_screen
|
|
(signed byte) main::x
|
|
(signed byte) main::x#1 x zp ZP_BYTE:15 151.5
|
|
(signed byte) main::x#2 x zp ZP_BYTE:15 16.833333333333332
|
|
(signed word) main::xw
|
|
(word) main::xw#0 xw zp ZP_WORD:17 50.5
|
|
(signed byte) main::y
|
|
(signed byte) main::y#1 y zp ZP_BYTE:10 16.5
|
|
(signed byte) main::y#4 y zp ZP_BYTE:10 1.4666666666666666
|
|
(signed word) main::yw
|
|
(word) main::yw#0 yw zp ZP_WORD:19 50.5
|
|
|
|
reg byte x [ atan2_16::i#2 atan2_16::i#1 ]
|
|
zp ZP_WORD:2 [ atan2_16::angle#6 atan2_16::angle#12 atan2_16::angle#13 atan2_16::angle#2 atan2_16::angle#3 atan2_16::return#0 atan2_16::angle#5 atan2_16::angle#11 atan2_16::angle#1 atan2_16::angle#4 atan2_16::return#2 main::angle_w#0 main::$11 ]
|
|
reg byte y [ atan2_16::shift#2 atan2_16::shift#5 atan2_16::shift#1 ]
|
|
zp ZP_WORD:4 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ]
|
|
zp ZP_WORD:6 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ]
|
|
zp ZP_WORD:8 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 main::screen#2 main::screen#4 main::screen#1 ]
|
|
zp ZP_BYTE:10 [ init_font_hex::c#6 init_font_hex::c#1 main::y#4 main::y#1 ]
|
|
zp ZP_WORD:11 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 atan2_16::yi#3 atan2_16::yi#8 atan2_16::yi#0 atan2_16::yi#16 atan2_16::$2 atan2_16::yi#1 atan2_16::yi#2 ]
|
|
zp ZP_WORD:13 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 atan2_16::xi#3 atan2_16::xi#8 atan2_16::xi#0 atan2_16::xi#13 atan2_16::$7 atan2_16::xi#1 atan2_16::xi#2 ]
|
|
zp ZP_BYTE:15 [ init_font_hex::c1#4 init_font_hex::c1#1 main::x#2 main::x#1 ]
|
|
reg byte x [ init_font_hex::i#2 init_font_hex::i#1 ]
|
|
zp ZP_BYTE:16 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
zp ZP_WORD:17 [ main::xw#0 atan2_16::x#0 ]
|
|
zp ZP_WORD:19 [ main::yw#0 atan2_16::y#0 ]
|
|
reg byte a [ main::ang_w#0 ]
|
|
reg byte a [ atan2_16::$24 ]
|
|
reg byte a [ atan2_16::$23 ]
|
|
zp ZP_BYTE:21 [ init_font_hex::$0 ]
|
|
reg byte a [ init_font_hex::$1 ]
|
|
reg byte a [ init_font_hex::$2 ]
|
|
reg byte y [ init_font_hex::idx#3 ]
|
|
|
|
|
|
FINAL ASSEMBLER
|
|
Score: 1038737
|
|
|
|
// File Comments
|
|
// Find atan2(x, y) using the CORDIC method
|
|
// See http://bsvi.ru/uploads/CORDIC--_10EBA/cordic.pdf
|
|
// Upstart
|
|
.pc = $801 "Basic"
|
|
:BasicUpstart(main)
|
|
.pc = $80d "Program"
|
|
// Global Constants & labels
|
|
// The number of iterations performed during 16-bit CORDIC atan2 calculation
|
|
.const CORDIC_ITERATIONS_16 = $f
|
|
.label D018 = $d018
|
|
// Color Ram
|
|
.label COLS = $d800
|
|
.label CHARSET = $2000
|
|
.label SCREEN = $2800
|
|
// @begin
|
|
// [1] phi from @begin to @1 [phi:@begin->@1]
|
|
// @1
|
|
// [2] call main
|
|
// [4] phi from @1 to main [phi:@1->main]
|
|
// [3] phi from @1 to @end [phi:@1->@end]
|
|
// @end
|
|
// main
|
|
main: {
|
|
.const toD0181_return = (>(SCREEN&$3fff)*4)|(>CHARSET)/4&$f
|
|
.label _11 = 2
|
|
.label xw = $11
|
|
.label yw = $13
|
|
.label angle_w = 2
|
|
.label screen = 8
|
|
.label x = $f
|
|
.label y = $a
|
|
// init_font_hex(CHARSET)
|
|
// [5] call init_font_hex
|
|
// [69] phi from main to init_font_hex [phi:main->init_font_hex]
|
|
jsr init_font_hex
|
|
// [6] phi from main to main::toD0181 [phi:main->main::toD0181]
|
|
// main::toD0181
|
|
// main::@5
|
|
// *D018 = toD018(SCREEN, CHARSET)
|
|
// [7] *((const byte*) D018#0) ← (const byte) main::toD0181_return#0 -- _deref_pbuc1=vbuc2
|
|
lda #toD0181_return
|
|
sta D018
|
|
// [8] phi from main::@5 to main::@1 [phi:main::@5->main::@1]
|
|
// [8] phi (byte*) main::screen#4 = (const byte*) SCREEN#0 [phi:main::@5->main::@1#0] -- pbuz1=pbuc1
|
|
lda #<SCREEN
|
|
sta.z screen
|
|
lda #>SCREEN
|
|
sta.z screen+1
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) -$c [phi:main::@5->main::@1#1] -- vbsz1=vbsc1
|
|
lda #-$c
|
|
sta.z y
|
|
// [8] phi from main::@3 to main::@1 [phi:main::@3->main::@1]
|
|
// [8] phi (byte*) main::screen#4 = (byte*) main::screen#1 [phi:main::@3->main::@1#0] -- register_copy
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) main::y#1 [phi:main::@3->main::@1#1] -- register_copy
|
|
// main::@1
|
|
b1:
|
|
// [9] phi from main::@1 to main::@2 [phi:main::@1->main::@2]
|
|
// [9] phi (byte*) main::screen#2 = (byte*) main::screen#4 [phi:main::@1->main::@2#0] -- register_copy
|
|
// [9] phi (signed byte) main::x#2 = (signed byte) -$13 [phi:main::@1->main::@2#1] -- vbsz1=vbsc1
|
|
lda #-$13
|
|
sta.z x
|
|
// [9] phi from main::@6 to main::@2 [phi:main::@6->main::@2]
|
|
// [9] phi (byte*) main::screen#2 = (byte*) main::screen#1 [phi:main::@6->main::@2#0] -- register_copy
|
|
// [9] phi (signed byte) main::x#2 = (signed byte) main::x#1 [phi:main::@6->main::@2#1] -- register_copy
|
|
// main::@2
|
|
b2:
|
|
// (word){ (byte)x, 0 }
|
|
// [10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda.z x
|
|
ldy #0
|
|
sta.z xw+1
|
|
sty.z xw
|
|
// (word){ (byte)y, 0 }
|
|
// [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda.z y
|
|
sta.z yw+1
|
|
sty.z yw
|
|
// atan2_16(xw, yw)
|
|
// [12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0
|
|
// [13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0
|
|
// [14] call atan2_16
|
|
jsr atan2_16
|
|
// [15] (word) atan2_16::return#2 ← (word) atan2_16::return#0
|
|
// main::@6
|
|
// angle_w = atan2_16(xw, yw)
|
|
// [16] (word) main::angle_w#0 ← (word) atan2_16::return#2
|
|
// angle_w+0x0080
|
|
// [17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80 -- vwuz1=vwuz1_plus_vbuc1
|
|
lda #$80
|
|
clc
|
|
adc.z _11
|
|
sta.z _11
|
|
bcc !+
|
|
inc.z _11+1
|
|
!:
|
|
// ang_w = >(angle_w+0x0080)
|
|
// [18] (byte) main::ang_w#0 ← > (word~) main::$11 -- vbuaa=_hi_vwuz1
|
|
lda.z _11+1
|
|
// *screen++ = ang_w
|
|
// [19] *((byte*) main::screen#2) ← (byte) main::ang_w#0 -- _deref_pbuz1=vbuaa
|
|
ldy #0
|
|
sta (screen),y
|
|
// *screen++ = ang_w;
|
|
// [20] (byte*) main::screen#1 ← ++ (byte*) main::screen#2 -- pbuz1=_inc_pbuz1
|
|
inc.z screen
|
|
bne !+
|
|
inc.z screen+1
|
|
!:
|
|
// for(signed byte x: -19..20)
|
|
// [21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2 -- vbsz1=_inc_vbsz1
|
|
inc.z x
|
|
// [22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$15
|
|
cmp.z x
|
|
bne b2
|
|
// main::@3
|
|
// for(signed byte y: -12..12)
|
|
// [23] (signed byte) main::y#1 ← ++ (signed byte) main::y#4 -- vbsz1=_inc_vbsz1
|
|
inc.z y
|
|
// [24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$d
|
|
cmp.z y
|
|
bne b1
|
|
// main::@4
|
|
b4:
|
|
// (*col00)++;
|
|
// [25] *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) ← ++ *((const byte*) COLS#0+(word)(number) $c*(number) $28+(byte) $13) -- _deref_pbuc1=_inc__deref_pbuc2
|
|
lda COLS+$c*$28+$13
|
|
clc
|
|
adc #1
|
|
sta COLS+$c*$28+$13
|
|
jmp b4
|
|
}
|
|
// atan2_16
|
|
// Find the atan2(x, y) - which is the angle of the line from (0,0) to (x,y)
|
|
// Finding the angle requires a binary search using CORDIC_ITERATIONS_16
|
|
// Returns the angle in hex-degrees (0=0, 0x8000=PI, 0x10000=2*PI)
|
|
// atan2_16(signed word zeropage($11) x, signed word zeropage($13) y)
|
|
atan2_16: {
|
|
.label _2 = $b
|
|
.label _7 = $d
|
|
.label yi = $b
|
|
.label xi = $d
|
|
.label angle = 2
|
|
.label xd = 6
|
|
.label yd = 4
|
|
.label return = 2
|
|
.label x = $11
|
|
.label y = $13
|
|
// (y>=0)?y:-y
|
|
// [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 -- vwsz1_ge_0_then_la1
|
|
lda.z y+1
|
|
bmi !b1+
|
|
jmp b1
|
|
!b1:
|
|
// atan2_16::@2
|
|
// [27] (signed word~) atan2_16::$2 ← - (signed word) atan2_16::y#0 -- vwsz1=_neg_vwsz2
|
|
sec
|
|
lda #0
|
|
sbc.z y
|
|
sta.z _2
|
|
lda #0
|
|
sbc.z y+1
|
|
sta.z _2+1
|
|
// [28] phi from atan2_16::@1 atan2_16::@2 to atan2_16::@3 [phi:atan2_16::@1/atan2_16::@2->atan2_16::@3]
|
|
// [28] phi (signed word) atan2_16::yi#0 = (signed word~) atan2_16::yi#16 [phi:atan2_16::@1/atan2_16::@2->atan2_16::@3#0] -- register_copy
|
|
// atan2_16::@3
|
|
b3:
|
|
// (x>=0)?x:-x
|
|
// [29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4 -- vwsz1_ge_0_then_la1
|
|
lda.z x+1
|
|
bmi !b4+
|
|
jmp b4
|
|
!b4:
|
|
// atan2_16::@5
|
|
// [30] (signed word~) atan2_16::$7 ← - (signed word) atan2_16::x#0 -- vwsz1=_neg_vwsz2
|
|
sec
|
|
lda #0
|
|
sbc.z x
|
|
sta.z _7
|
|
lda #0
|
|
sbc.z x+1
|
|
sta.z _7+1
|
|
// [31] phi from atan2_16::@4 atan2_16::@5 to atan2_16::@6 [phi:atan2_16::@4/atan2_16::@5->atan2_16::@6]
|
|
// [31] phi (signed word) atan2_16::xi#0 = (signed word~) atan2_16::xi#13 [phi:atan2_16::@4/atan2_16::@5->atan2_16::@6#0] -- register_copy
|
|
// atan2_16::@6
|
|
b6:
|
|
// [32] phi from atan2_16::@6 to atan2_16::@10 [phi:atan2_16::@6->atan2_16::@10]
|
|
// [32] phi (word) atan2_16::angle#12 = (byte) 0 [phi:atan2_16::@6->atan2_16::@10#0] -- vwuz1=vbuc1
|
|
lda #<0
|
|
sta.z angle
|
|
sta.z angle+1
|
|
// [32] phi (byte) atan2_16::i#2 = (byte) 0 [phi:atan2_16::@6->atan2_16::@10#1] -- vbuxx=vbuc1
|
|
tax
|
|
// [32] phi (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#0 [phi:atan2_16::@6->atan2_16::@10#2] -- register_copy
|
|
// [32] phi (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#0 [phi:atan2_16::@6->atan2_16::@10#3] -- register_copy
|
|
// atan2_16::@10
|
|
b10:
|
|
// if(yi==0)
|
|
// [33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11 -- vwsz1_neq_0_then_la1
|
|
lda.z yi+1
|
|
bne b11
|
|
lda.z yi
|
|
bne b11
|
|
// [34] phi from atan2_16::@10 atan2_16::@19 to atan2_16::@12 [phi:atan2_16::@10/atan2_16::@19->atan2_16::@12]
|
|
// [34] phi (word) atan2_16::angle#6 = (word) atan2_16::angle#12 [phi:atan2_16::@10/atan2_16::@19->atan2_16::@12#0] -- register_copy
|
|
// atan2_16::@12
|
|
b12:
|
|
// angle /=2
|
|
// [35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1 -- vwuz1=vwuz1_ror_1
|
|
lsr.z angle+1
|
|
ror.z angle
|
|
// if(x<0)
|
|
// [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 -- vwsz1_ge_0_then_la1
|
|
lda.z x+1
|
|
bpl b7
|
|
// atan2_16::@21
|
|
// angle = 0x8000-angle
|
|
// [37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1 -- vwuz1=vwuc1_minus_vwuz1
|
|
sec
|
|
lda #<$8000
|
|
sbc.z angle
|
|
sta.z angle
|
|
lda #>$8000
|
|
sbc.z angle+1
|
|
sta.z angle+1
|
|
// [38] phi from atan2_16::@12 atan2_16::@21 to atan2_16::@7 [phi:atan2_16::@12/atan2_16::@21->atan2_16::@7]
|
|
// [38] phi (word) atan2_16::angle#11 = (word) atan2_16::angle#1 [phi:atan2_16::@12/atan2_16::@21->atan2_16::@7#0] -- register_copy
|
|
// atan2_16::@7
|
|
b7:
|
|
// if(y<0)
|
|
// [39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8 -- vwsz1_ge_0_then_la1
|
|
lda.z y+1
|
|
bpl b8
|
|
// atan2_16::@9
|
|
// angle = -angle
|
|
// [40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11 -- vwuz1=_neg_vwuz1
|
|
sec
|
|
lda #0
|
|
sbc.z angle
|
|
sta.z angle
|
|
lda #0
|
|
sbc.z angle+1
|
|
sta.z angle+1
|
|
// [41] phi from atan2_16::@7 atan2_16::@9 to atan2_16::@8 [phi:atan2_16::@7/atan2_16::@9->atan2_16::@8]
|
|
// [41] phi (word) atan2_16::return#0 = (word) atan2_16::angle#11 [phi:atan2_16::@7/atan2_16::@9->atan2_16::@8#0] -- register_copy
|
|
// atan2_16::@8
|
|
b8:
|
|
// atan2_16::@return
|
|
// }
|
|
// [42] return
|
|
rts
|
|
// atan2_16::@11
|
|
b11:
|
|
// [43] (byte~) atan2_16::shift#5 ← (byte) atan2_16::i#2 -- vbuyy=vbuxx
|
|
txa
|
|
tay
|
|
// [44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3 -- vwsz1=vwsz2
|
|
lda.z xi
|
|
sta.z xd
|
|
lda.z xi+1
|
|
sta.z xd+1
|
|
// [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 -- vwsz1=vwsz2
|
|
lda.z yi
|
|
sta.z yd
|
|
lda.z yi+1
|
|
sta.z yd+1
|
|
// [46] phi from atan2_16::@11 atan2_16::@14 to atan2_16::@13 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13]
|
|
// [46] phi (signed word) atan2_16::yd#3 = (signed word~) atan2_16::yd#10 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#0] -- register_copy
|
|
// [46] phi (signed word) atan2_16::xd#3 = (signed word~) atan2_16::xd#10 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#1] -- register_copy
|
|
// [46] phi (byte) atan2_16::shift#2 = (byte~) atan2_16::shift#5 [phi:atan2_16::@11/atan2_16::@14->atan2_16::@13#2] -- register_copy
|
|
// atan2_16::@13
|
|
b13:
|
|
// while(shift>=2)
|
|
// [47] if((byte) atan2_16::shift#2>=(byte) 2) goto atan2_16::@14 -- vbuyy_ge_vbuc1_then_la1
|
|
cpy #2
|
|
bcs b14
|
|
// atan2_16::@15
|
|
// if(shift)
|
|
// [48] if((byte) 0==(byte) atan2_16::shift#2) goto atan2_16::@17 -- vbuc1_eq_vbuyy_then_la1
|
|
cpy #0
|
|
beq b17
|
|
// atan2_16::@16
|
|
// xd >>= 1
|
|
// [49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
// yd >>= 1
|
|
// [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
// [51] phi from atan2_16::@15 atan2_16::@16 to atan2_16::@17 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17]
|
|
// [51] phi (signed word) atan2_16::xd#5 = (signed word) atan2_16::xd#3 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17#0] -- register_copy
|
|
// [51] phi (signed word) atan2_16::yd#5 = (signed word) atan2_16::yd#3 [phi:atan2_16::@15/atan2_16::@16->atan2_16::@17#1] -- register_copy
|
|
// atan2_16::@17
|
|
b17:
|
|
// if(yi>=0)
|
|
// [52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18 -- vwsz1_ge_0_then_la1
|
|
lda.z yi+1
|
|
bpl b18
|
|
// atan2_16::@20
|
|
// xi -= yd
|
|
// [53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda.z xi
|
|
sec
|
|
sbc.z yd
|
|
sta.z xi
|
|
lda.z xi+1
|
|
sbc.z yd+1
|
|
sta.z xi+1
|
|
// yi += xd
|
|
// [54] (signed word) atan2_16::yi#2 ← (signed word) atan2_16::yi#3 + (signed word) atan2_16::xd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda.z yi
|
|
clc
|
|
adc.z xd
|
|
sta.z yi
|
|
lda.z yi+1
|
|
adc.z xd+1
|
|
sta.z yi+1
|
|
// angle -= CORDIC_ATAN2_ANGLES_16[i]
|
|
// [55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuaa=vbuxx_rol_1
|
|
txa
|
|
asl
|
|
// [56] (word) atan2_16::angle#3 ← (word) atan2_16::angle#12 - *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$24) -- vwuz1=vwuz1_minus_pwuc1_derefidx_vbuaa
|
|
tay
|
|
sec
|
|
lda.z angle
|
|
sbc CORDIC_ATAN2_ANGLES_16,y
|
|
sta.z angle
|
|
lda.z angle+1
|
|
sbc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta.z angle+1
|
|
// [57] phi from atan2_16::@18 atan2_16::@20 to atan2_16::@19 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19]
|
|
// [57] phi (signed word) atan2_16::xi#8 = (signed word) atan2_16::xi#1 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#0] -- register_copy
|
|
// [57] phi (word) atan2_16::angle#13 = (word) atan2_16::angle#2 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#1] -- register_copy
|
|
// [57] phi (signed word) atan2_16::yi#8 = (signed word) atan2_16::yi#1 [phi:atan2_16::@18/atan2_16::@20->atan2_16::@19#2] -- register_copy
|
|
// atan2_16::@19
|
|
b19:
|
|
// for( byte i: 0..CORDIC_ITERATIONS_16-1)
|
|
// [58] (byte) atan2_16::i#1 ← ++ (byte) atan2_16::i#2 -- vbuxx=_inc_vbuxx
|
|
inx
|
|
// [59] if((byte) atan2_16::i#1==(const byte) CORDIC_ITERATIONS_16#0-(byte) 1+(byte) 1) goto atan2_16::@12 -- vbuxx_eq_vbuc1_then_la1
|
|
cpx #CORDIC_ITERATIONS_16-1+1
|
|
bne !b12+
|
|
jmp b12
|
|
!b12:
|
|
// [32] phi from atan2_16::@19 to atan2_16::@10 [phi:atan2_16::@19->atan2_16::@10]
|
|
// [32] phi (word) atan2_16::angle#12 = (word) atan2_16::angle#13 [phi:atan2_16::@19->atan2_16::@10#0] -- register_copy
|
|
// [32] phi (byte) atan2_16::i#2 = (byte) atan2_16::i#1 [phi:atan2_16::@19->atan2_16::@10#1] -- register_copy
|
|
// [32] phi (signed word) atan2_16::xi#3 = (signed word) atan2_16::xi#8 [phi:atan2_16::@19->atan2_16::@10#2] -- register_copy
|
|
// [32] phi (signed word) atan2_16::yi#3 = (signed word) atan2_16::yi#8 [phi:atan2_16::@19->atan2_16::@10#3] -- register_copy
|
|
jmp b10
|
|
// atan2_16::@18
|
|
b18:
|
|
// xi += yd
|
|
// [60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda.z xi
|
|
clc
|
|
adc.z yd
|
|
sta.z xi
|
|
lda.z xi+1
|
|
adc.z yd+1
|
|
sta.z xi+1
|
|
// yi -= xd
|
|
// [61] (signed word) atan2_16::yi#1 ← (signed word) atan2_16::yi#3 - (signed word) atan2_16::xd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda.z yi
|
|
sec
|
|
sbc.z xd
|
|
sta.z yi
|
|
lda.z yi+1
|
|
sbc.z xd+1
|
|
sta.z yi+1
|
|
// angle += CORDIC_ATAN2_ANGLES_16[i]
|
|
// [62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuaa=vbuxx_rol_1
|
|
txa
|
|
asl
|
|
// [63] (word) atan2_16::angle#2 ← (word) atan2_16::angle#12 + *((const word[CORDIC_ITERATIONS_16#0]) CORDIC_ATAN2_ANGLES_16#0 + (byte~) atan2_16::$23) -- vwuz1=vwuz1_plus_pwuc1_derefidx_vbuaa
|
|
tay
|
|
clc
|
|
lda.z angle
|
|
adc CORDIC_ATAN2_ANGLES_16,y
|
|
sta.z angle
|
|
lda.z angle+1
|
|
adc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta.z angle+1
|
|
jmp b19
|
|
// atan2_16::@14
|
|
b14:
|
|
// xd >>= 2
|
|
// [64] (signed word) atan2_16::xd#1 ← (signed word) atan2_16::xd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
lda.z xd+1
|
|
cmp #$80
|
|
ror.z xd+1
|
|
ror.z xd
|
|
// yd >>= 2
|
|
// [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
lda.z yd+1
|
|
cmp #$80
|
|
ror.z yd+1
|
|
ror.z yd
|
|
// shift -=2
|
|
// [66] (byte) atan2_16::shift#1 ← (byte) atan2_16::shift#2 - (byte) 2 -- vbuyy=vbuyy_minus_2
|
|
dey
|
|
dey
|
|
jmp b13
|
|
// atan2_16::@4
|
|
b4:
|
|
// [67] (signed word~) atan2_16::xi#13 ← (signed word) atan2_16::x#0 -- vwsz1=vwsz2
|
|
lda.z x
|
|
sta.z xi
|
|
lda.z x+1
|
|
sta.z xi+1
|
|
jmp b6
|
|
// atan2_16::@1
|
|
b1:
|
|
// [68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0 -- vwsz1=vwsz2
|
|
lda.z y
|
|
sta.z yi
|
|
lda.z y+1
|
|
sta.z yi+1
|
|
jmp b3
|
|
}
|
|
// init_font_hex
|
|
// Make charset from proto chars
|
|
// init_font_hex(byte* zeropage($b) charset)
|
|
init_font_hex: {
|
|
.label _0 = $15
|
|
.label idx = $10
|
|
.label proto_lo = $d
|
|
.label charset = $b
|
|
.label c1 = $f
|
|
.label proto_hi = 8
|
|
.label c = $a
|
|
// [70] phi from init_font_hex to init_font_hex::@1 [phi:init_font_hex->init_font_hex::@1]
|
|
// [70] phi (byte) init_font_hex::c#6 = (byte) 0 [phi:init_font_hex->init_font_hex::@1#0] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z c
|
|
// [70] phi (byte*) init_font_hex::proto_hi#6 = (const byte[]) FONT_HEX_PROTO#0 [phi:init_font_hex->init_font_hex::@1#1] -- pbuz1=pbuc1
|
|
lda #<FONT_HEX_PROTO
|
|
sta.z proto_hi
|
|
lda #>FONT_HEX_PROTO
|
|
sta.z proto_hi+1
|
|
// [70] phi (byte*) init_font_hex::charset#5 = (const byte*) CHARSET#0 [phi:init_font_hex->init_font_hex::@1#2] -- pbuz1=pbuc1
|
|
lda #<CHARSET
|
|
sta.z charset
|
|
lda #>CHARSET
|
|
sta.z charset+1
|
|
// [70] phi from init_font_hex::@5 to init_font_hex::@1 [phi:init_font_hex::@5->init_font_hex::@1]
|
|
// [70] phi (byte) init_font_hex::c#6 = (byte) init_font_hex::c#1 [phi:init_font_hex::@5->init_font_hex::@1#0] -- register_copy
|
|
// [70] phi (byte*) init_font_hex::proto_hi#6 = (byte*) init_font_hex::proto_hi#1 [phi:init_font_hex::@5->init_font_hex::@1#1] -- register_copy
|
|
// [70] phi (byte*) init_font_hex::charset#5 = (byte*) init_font_hex::charset#0 [phi:init_font_hex::@5->init_font_hex::@1#2] -- register_copy
|
|
// init_font_hex::@1
|
|
b1:
|
|
// [71] phi from init_font_hex::@1 to init_font_hex::@2 [phi:init_font_hex::@1->init_font_hex::@2]
|
|
// [71] phi (byte) init_font_hex::c1#4 = (byte) 0 [phi:init_font_hex::@1->init_font_hex::@2#0] -- vbuz1=vbuc1
|
|
lda #0
|
|
sta.z c1
|
|
// [71] phi (byte*) init_font_hex::proto_lo#4 = (const byte[]) FONT_HEX_PROTO#0 [phi:init_font_hex::@1->init_font_hex::@2#1] -- pbuz1=pbuc1
|
|
lda #<FONT_HEX_PROTO
|
|
sta.z proto_lo
|
|
lda #>FONT_HEX_PROTO
|
|
sta.z proto_lo+1
|
|
// [71] phi (byte*) init_font_hex::charset#2 = (byte*) init_font_hex::charset#5 [phi:init_font_hex::@1->init_font_hex::@2#2] -- register_copy
|
|
// [71] phi from init_font_hex::@4 to init_font_hex::@2 [phi:init_font_hex::@4->init_font_hex::@2]
|
|
// [71] phi (byte) init_font_hex::c1#4 = (byte) init_font_hex::c1#1 [phi:init_font_hex::@4->init_font_hex::@2#0] -- register_copy
|
|
// [71] phi (byte*) init_font_hex::proto_lo#4 = (byte*) init_font_hex::proto_lo#1 [phi:init_font_hex::@4->init_font_hex::@2#1] -- register_copy
|
|
// [71] phi (byte*) init_font_hex::charset#2 = (byte*) init_font_hex::charset#0 [phi:init_font_hex::@4->init_font_hex::@2#2] -- register_copy
|
|
// init_font_hex::@2
|
|
b2:
|
|
// charset[idx++] = 0
|
|
// [72] *((byte*) init_font_hex::charset#2) ← (byte) 0 -- _deref_pbuz1=vbuc1
|
|
lda #0
|
|
tay
|
|
sta (charset),y
|
|
// [73] phi from init_font_hex::@2 to init_font_hex::@3 [phi:init_font_hex::@2->init_font_hex::@3]
|
|
// [73] phi (byte) init_font_hex::idx#5 = (byte) 1 [phi:init_font_hex::@2->init_font_hex::@3#0] -- vbuz1=vbuc1
|
|
lda #1
|
|
sta.z idx
|
|
// [73] phi (byte) init_font_hex::i#2 = (byte) 0 [phi:init_font_hex::@2->init_font_hex::@3#1] -- vbuxx=vbuc1
|
|
ldx #0
|
|
// [73] phi from init_font_hex::@3 to init_font_hex::@3 [phi:init_font_hex::@3->init_font_hex::@3]
|
|
// [73] phi (byte) init_font_hex::idx#5 = (byte) init_font_hex::idx#2 [phi:init_font_hex::@3->init_font_hex::@3#0] -- register_copy
|
|
// [73] phi (byte) init_font_hex::i#2 = (byte) init_font_hex::i#1 [phi:init_font_hex::@3->init_font_hex::@3#1] -- register_copy
|
|
// init_font_hex::@3
|
|
b3:
|
|
// proto_hi[i]<<4
|
|
// [74] (byte~) init_font_hex::$0 ← *((byte*) init_font_hex::proto_hi#6 + (byte) init_font_hex::i#2) << (byte) 4 -- vbuz1=pbuz2_derefidx_vbuxx_rol_4
|
|
txa
|
|
tay
|
|
lda (proto_hi),y
|
|
asl
|
|
asl
|
|
asl
|
|
asl
|
|
sta.z _0
|
|
// proto_lo[i]<<1
|
|
// [75] (byte~) init_font_hex::$1 ← *((byte*) init_font_hex::proto_lo#4 + (byte) init_font_hex::i#2) << (byte) 1 -- vbuaa=pbuz1_derefidx_vbuxx_rol_1
|
|
txa
|
|
tay
|
|
lda (proto_lo),y
|
|
asl
|
|
// proto_hi[i]<<4 | proto_lo[i]<<1
|
|
// [76] (byte~) init_font_hex::$2 ← (byte~) init_font_hex::$0 | (byte~) init_font_hex::$1 -- vbuaa=vbuz1_bor_vbuaa
|
|
ora.z _0
|
|
// charset[idx++] = proto_hi[i]<<4 | proto_lo[i]<<1
|
|
// [77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2 -- pbuz1_derefidx_vbuz2=vbuaa
|
|
ldy.z idx
|
|
sta (charset),y
|
|
// charset[idx++] = proto_hi[i]<<4 | proto_lo[i]<<1;
|
|
// [78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5 -- vbuz1=_inc_vbuz1
|
|
inc.z idx
|
|
// for( byte i: 0..4)
|
|
// [79] (byte) init_font_hex::i#1 ← ++ (byte) init_font_hex::i#2 -- vbuxx=_inc_vbuxx
|
|
inx
|
|
// [80] if((byte) init_font_hex::i#1!=(byte) 5) goto init_font_hex::@3 -- vbuxx_neq_vbuc1_then_la1
|
|
cpx #5
|
|
bne b3
|
|
// init_font_hex::@4
|
|
// charset[idx++] = 0
|
|
// [81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0 -- pbuz1_derefidx_vbuz2=vbuc1
|
|
lda #0
|
|
ldy.z idx
|
|
sta (charset),y
|
|
// charset[idx++] = 0;
|
|
// [82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2 -- vbuyy=_inc_vbuz1
|
|
iny
|
|
// charset[idx++] = 0
|
|
// [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 -- pbuz1_derefidx_vbuyy=vbuc1
|
|
sta (charset),y
|
|
// proto_lo += 5
|
|
// [84] (byte*) init_font_hex::proto_lo#1 ← (byte*) init_font_hex::proto_lo#4 + (byte) 5 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #5
|
|
clc
|
|
adc.z proto_lo
|
|
sta.z proto_lo
|
|
bcc !+
|
|
inc.z proto_lo+1
|
|
!:
|
|
// charset += 8
|
|
// [85] (byte*) init_font_hex::charset#0 ← (byte*) init_font_hex::charset#2 + (byte) 8 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #8
|
|
clc
|
|
adc.z charset
|
|
sta.z charset
|
|
bcc !+
|
|
inc.z charset+1
|
|
!:
|
|
// for( byte c: 0..15 )
|
|
// [86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4 -- vbuz1=_inc_vbuz1
|
|
inc.z c1
|
|
// [87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp.z c1
|
|
bne b2
|
|
// init_font_hex::@5
|
|
// proto_hi += 5
|
|
// [88] (byte*) init_font_hex::proto_hi#1 ← (byte*) init_font_hex::proto_hi#6 + (byte) 5 -- pbuz1=pbuz1_plus_vbuc1
|
|
lda #5
|
|
clc
|
|
adc.z proto_hi
|
|
sta.z proto_hi
|
|
bcc !+
|
|
inc.z proto_hi+1
|
|
!:
|
|
// for( byte c: 0..15 )
|
|
// [89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6 -- vbuz1=_inc_vbuz1
|
|
inc.z c
|
|
// [90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp.z c
|
|
bne b1
|
|
// init_font_hex::@return
|
|
// }
|
|
// [91] return
|
|
rts
|
|
}
|
|
// File Data
|
|
// Bit patterns for symbols 0-f (3x5 pixels) used in font hex
|
|
FONT_HEX_PROTO: .byte 2, 5, 5, 5, 2, 6, 2, 2, 2, 7, 6, 1, 2, 4, 7, 6, 1, 2, 1, 6, 5, 5, 7, 1, 1, 7, 4, 6, 1, 6, 3, 4, 6, 5, 2, 7, 1, 1, 1, 1, 2, 5, 2, 5, 2, 2, 5, 3, 1, 1, 2, 5, 7, 5, 5, 6, 5, 6, 5, 6, 2, 5, 4, 5, 2, 6, 5, 5, 5, 6, 7, 4, 6, 4, 7, 7, 4, 6, 4, 4
|
|
// Angles representing ATAN(0.5), ATAN(0.25), ATAN(0.125), ...
|
|
CORDIC_ATAN2_ANGLES_16:
|
|
.for (var i=0; i<CORDIC_ITERATIONS_16; i++)
|
|
.word 256*2*256*atan(1/pow(2,i))/PI/2
|
|
|
|
|