mirror of
https://gitlab.com/camelot/kickc.git
synced 2024-10-21 02:24:34 +00:00
4234 lines
226 KiB
Plaintext
4234 lines
226 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::$15 ← (byte)main::$4 w= (byte)0
|
|
Fixing inline constructor with main::$16 ← (byte)main::$7 w= (byte)0
|
|
Successful SSA optimization Pass2FixInlineConstructorsNew
|
|
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
|
|
Adding number conversion cast (byte) to elements in (byte[]) FONT_HEX_PROTO#0 ← { (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 PassNAddArrayNumberTypeConversions
|
|
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::$15
|
|
Alias (signed word) main::xw#0 = (signed word~) main::$6
|
|
Alias (word~) main::$8 = (word~) main::$16
|
|
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
|
|
Self Phi Eliminated (byte*) init_font_hex::proto_hi#2
|
|
Self Phi Eliminated (byte*) init_font_hex::proto_lo#2
|
|
Self Phi Eliminated (byte*) init_font_hex::charset#3
|
|
Self Phi Eliminated (byte) init_font_hex::c1#2
|
|
Self Phi Eliminated (byte) init_font_hex::c#2
|
|
Self Phi Eliminated (signed word) atan2_16::yi#10
|
|
Self Phi Eliminated (signed word) atan2_16::xi#10
|
|
Self Phi Eliminated (byte) atan2_16::i#10
|
|
Self Phi Eliminated (word) atan2_16::angle#14
|
|
Self Phi Eliminated (signed word) atan2_16::x#11
|
|
Self Phi Eliminated (signed word) atan2_16::y#10
|
|
Self Phi Eliminated (signed byte) main::y#2
|
|
Self Phi Eliminated (byte*) main::col00#1
|
|
Successful SSA optimization Pass2SelfPhiElimination
|
|
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 (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#17>=(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#19>=(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
|
|
Constant right-side identified [36] (byte[]) FONT_HEX_PROTO#0 ← { (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 Pass2ConstantRValueConsolidation
|
|
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#5 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
|
|
Self Phi Eliminated (byte*) init_font_hex::proto_hi#4
|
|
Self Phi Eliminated (byte) init_font_hex::c#5
|
|
Self Phi Eliminated (signed word) atan2_16::x#17
|
|
Self Phi Eliminated (signed word) atan2_16::y#19
|
|
Successful SSA optimization Pass2SelfPhiElimination
|
|
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
|
|
Successful SSA optimization Pass2IdenticalPhiElimination
|
|
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
|
|
// File Comments
|
|
// Find atan2(x, y) using the CORDIC method
|
|
// See http://bsvi.ru/uploads/CORDIC--_10EBA/cordic.pdf
|
|
// Basic 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 screen
|
|
lda #>SCREEN
|
|
sta screen+1
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) -$c [phi:main::@5->main::@1#1] -- vbsz1=vbsc1
|
|
lda #-$c
|
|
sta 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 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 x
|
|
ldy #0
|
|
sta xw+1
|
|
sty xw
|
|
// [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda y
|
|
ldy #0
|
|
sta yw+1
|
|
sty yw
|
|
// [12] (signed word) atan2_16::x#0 ← (signed word)(word) main::xw#0 -- vwsz1=vwsz2
|
|
lda xw
|
|
sta atan2_16.x
|
|
lda xw+1
|
|
sta atan2_16.x+1
|
|
// [13] (signed word) atan2_16::y#0 ← (signed word)(word) main::yw#0 -- vwsz1=vwsz2
|
|
lda yw
|
|
sta atan2_16.y
|
|
lda yw+1
|
|
sta 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 atan2_16.return
|
|
sta atan2_16.return_2
|
|
lda atan2_16.return+1
|
|
sta atan2_16.return_2+1
|
|
jmp b6
|
|
// main::@6
|
|
b6:
|
|
// [16] (word) main::angle_w#0 ← (word) atan2_16::return#2 -- vwuz1=vwuz2
|
|
lda atan2_16.return_2
|
|
sta angle_w
|
|
lda atan2_16.return_2+1
|
|
sta angle_w+1
|
|
// [17] (word~) main::$11 ← (word) main::angle_w#0 + (byte) $80 -- vwuz1=vwuz2_plus_vbuc1
|
|
lda #$80
|
|
clc
|
|
adc angle_w
|
|
sta _11
|
|
lda #0
|
|
adc angle_w+1
|
|
sta _11+1
|
|
// [18] (byte) main::ang_w#0 ← > (word~) main::$11 -- vbuz1=_hi_vwuz2
|
|
lda _11+1
|
|
sta ang_w
|
|
// [19] *((byte*) main::screen#2) ← (byte) main::ang_w#0 -- _deref_pbuz1=vbuz2
|
|
lda ang_w
|
|
ldy #0
|
|
sta (screen),y
|
|
// [20] (byte*) main::screen#1 ← ++ (byte*) main::screen#2 -- pbuz1=_inc_pbuz1
|
|
inc screen
|
|
bne !+
|
|
inc screen+1
|
|
!:
|
|
// [21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2 -- vbsz1=_inc_vbsz1
|
|
inc x
|
|
// [22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$15
|
|
cmp 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 y
|
|
// [24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$d
|
|
cmp 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 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 y
|
|
sta _2
|
|
lda #0
|
|
sbc y+1
|
|
sta _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 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 x
|
|
sta _7
|
|
lda #0
|
|
sbc x+1
|
|
sta _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 angle_12
|
|
lda #0
|
|
sta 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 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 yi+1
|
|
bne b11
|
|
lda 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 angle_6+1
|
|
lsr
|
|
sta angle+1
|
|
lda angle_6
|
|
ror
|
|
sta angle
|
|
// [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 -- vwsz1_ge_0_then_la1
|
|
lda 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 angle
|
|
sta angle
|
|
lda #>$8000
|
|
sbc angle+1
|
|
sta 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 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 angle
|
|
sta angle
|
|
lda #0
|
|
sbc angle+1
|
|
sta 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 i
|
|
sta shift
|
|
// [44] (signed word~) atan2_16::xd#10 ← (signed word) atan2_16::xi#3 -- vwsz1=vwsz2
|
|
lda xi
|
|
sta xd
|
|
lda xi+1
|
|
sta xd+1
|
|
// [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 -- vwsz1=vwsz2
|
|
lda yi
|
|
sta yd
|
|
lda yi+1
|
|
sta 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 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 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 xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
// [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror 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 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 xi
|
|
sec
|
|
sbc yd
|
|
sta xi
|
|
lda xi+1
|
|
sbc yd+1
|
|
sta 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 yi
|
|
clc
|
|
adc xd
|
|
sta yi
|
|
lda yi+1
|
|
adc xd+1
|
|
sta yi+1
|
|
// [55] (byte~) atan2_16::$24 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuz1=vbuz2_rol_1
|
|
lda i
|
|
asl
|
|
sta _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 _24
|
|
sec
|
|
lda angle_3
|
|
sbc CORDIC_ATAN2_ANGLES_16,y
|
|
sta angle_3
|
|
lda angle_3+1
|
|
sbc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta 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 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 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 xi
|
|
clc
|
|
adc yd
|
|
sta xi
|
|
lda xi+1
|
|
adc yd+1
|
|
sta 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 yi
|
|
sec
|
|
sbc xd
|
|
sta yi
|
|
lda yi+1
|
|
sbc xd+1
|
|
sta yi+1
|
|
// [62] (byte~) atan2_16::$23 ← (byte) atan2_16::i#2 << (byte) 1 -- vbuz1=vbuz2_rol_1
|
|
lda i
|
|
asl
|
|
sta _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 _23
|
|
clc
|
|
lda angle_2
|
|
adc CORDIC_ATAN2_ANGLES_16,y
|
|
sta angle_2
|
|
lda angle_2+1
|
|
adc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta 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 xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
lda xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
// [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror yd
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror yd
|
|
// [66] (byte) atan2_16::shift#1 ← (byte) atan2_16::shift#2 - (byte) 2 -- vbuz1=vbuz1_minus_2
|
|
dec shift
|
|
dec 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 x
|
|
sta xi
|
|
lda x+1
|
|
sta 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 y
|
|
sta yi
|
|
lda y+1
|
|
sta 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 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 proto_hi
|
|
lda #>FONT_HEX_PROTO
|
|
sta 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 charset
|
|
lda #>CHARSET
|
|
sta 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 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 proto_lo
|
|
lda #>FONT_HEX_PROTO
|
|
sta 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 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 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 i
|
|
lda (proto_hi),y
|
|
asl
|
|
asl
|
|
asl
|
|
asl
|
|
sta _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 i
|
|
lda (proto_lo),y
|
|
asl
|
|
sta _1
|
|
// [76] (byte~) init_font_hex::$2 ← (byte~) init_font_hex::$0 | (byte~) init_font_hex::$1 -- vbuz1=vbuz2_bor_vbuz3
|
|
lda _0
|
|
ora _1
|
|
sta _2
|
|
// [77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2 -- pbuz1_derefidx_vbuz2=vbuz3
|
|
lda _2
|
|
ldy idx
|
|
sta (charset),y
|
|
// [78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5 -- vbuz1=_inc_vbuz1
|
|
inc idx
|
|
// [79] (byte) init_font_hex::i#1 ← ++ (byte) init_font_hex::i#2 -- vbuz1=_inc_vbuz1
|
|
inc i
|
|
// [80] if((byte) init_font_hex::i#1!=(byte) 5) goto init_font_hex::@3 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #5
|
|
cmp 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 idx
|
|
sta (charset),y
|
|
// [82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2 -- vbuz1=_inc_vbuz2
|
|
ldy idx
|
|
iny
|
|
sty idx_3
|
|
// [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 -- pbuz1_derefidx_vbuz2=vbuc1
|
|
lda #0
|
|
ldy 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 proto_lo
|
|
sta proto_lo
|
|
bcc !+
|
|
inc 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 charset
|
|
sta charset
|
|
bcc !+
|
|
inc charset+1
|
|
!:
|
|
// [86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4 -- vbuz1=_inc_vbuz1
|
|
inc c1
|
|
// [87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp 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 proto_hi
|
|
sta proto_hi
|
|
bcc !+
|
|
inc proto_hi+1
|
|
!:
|
|
// [89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6 -- vbuz1=_inc_vbuz1
|
|
inc c
|
|
// [90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp 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 with common assignment [ 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 with common assignment [ zp ZP_WORD:30 [ main::xw#0 ] ] with [ zp ZP_WORD:34 [ atan2_16::x#0 ] ] - score: 1
|
|
Coalescing zero page register with common assignment [ zp ZP_WORD:32 [ main::yw#0 ] ] with [ zp ZP_WORD:36 [ atan2_16::y#0 ] ] - score: 1
|
|
Coalescing zero page register with common assignment [ zp ZP_WORD:38 [ atan2_16::return#2 ] ] with [ zp ZP_WORD:40 [ main::angle_w#0 ] ] - score: 1
|
|
Coalescing zero page register with common assignment [ 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 with common assignment [ 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
|
|
Allocated (was zp ZP_WORD:11) zp ZP_WORD:10 [ 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:12 [ 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:14 [ 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:16 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ]
|
|
Allocated (was zp ZP_BYTE:22) zp ZP_BYTE:18 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
Allocated (was zp ZP_WORD:23) zp ZP_WORD:19 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ]
|
|
Allocated (was zp ZP_WORD:25) zp ZP_WORD:21 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ]
|
|
Allocated (was zp ZP_BYTE:27) zp ZP_BYTE:23 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
Allocated (was zp ZP_BYTE:29) zp ZP_BYTE:24 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
Allocated (was zp ZP_WORD:30) zp ZP_WORD:25 [ main::xw#0 atan2_16::x#0 ]
|
|
Allocated (was zp ZP_WORD:32) zp ZP_WORD:27 [ main::yw#0 atan2_16::y#0 ]
|
|
Allocated (was zp ZP_BYTE:47) zp ZP_BYTE:29 [ 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
|
|
// Basic 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 = $a
|
|
.label xw = $19
|
|
.label yw = $1b
|
|
.label angle_w = $a
|
|
.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 screen
|
|
lda #>SCREEN
|
|
sta screen+1
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) -$c [phi:main::@5->main::@1#1] -- vbsz1=vbsc1
|
|
lda #-$c
|
|
sta 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 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 x
|
|
ldy #0
|
|
sta xw+1
|
|
sty xw
|
|
// [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda y
|
|
ldy #0
|
|
sta yw+1
|
|
sty 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 _11
|
|
sta _11
|
|
bcc !+
|
|
inc _11+1
|
|
!:
|
|
// [18] (byte) main::ang_w#0 ← > (word~) main::$11 -- vbuaa=_hi_vwuz1
|
|
lda _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 screen
|
|
bne !+
|
|
inc screen+1
|
|
!:
|
|
// [21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2 -- vbsz1=_inc_vbsz1
|
|
inc x
|
|
// [22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$15
|
|
cmp 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 y
|
|
// [24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$d
|
|
cmp 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($19) x, signed word zeropage($1b) y)
|
|
atan2_16: {
|
|
.label _2 = 6
|
|
.label _7 = 8
|
|
.label yi = 6
|
|
.label xi = 8
|
|
.label angle = $a
|
|
.label xd = $e
|
|
.label yd = $c
|
|
.label return = $a
|
|
.label x = $19
|
|
.label y = $1b
|
|
// [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 -- vwsz1_ge_0_then_la1
|
|
lda 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 y
|
|
sta _2
|
|
lda #0
|
|
sbc y+1
|
|
sta _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 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 x
|
|
sta _7
|
|
lda #0
|
|
sbc x+1
|
|
sta _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 angle
|
|
lda #0
|
|
sta 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 yi+1
|
|
bne b11
|
|
lda 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 angle+1
|
|
ror angle
|
|
// [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 -- vwsz1_ge_0_then_la1
|
|
lda 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 angle
|
|
sta angle
|
|
lda #>$8000
|
|
sbc angle+1
|
|
sta 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 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 angle
|
|
sta angle
|
|
lda #0
|
|
sbc angle+1
|
|
sta 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 xi
|
|
sta xd
|
|
lda xi+1
|
|
sta xd+1
|
|
// [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 -- vwsz1=vwsz2
|
|
lda yi
|
|
sta yd
|
|
lda yi+1
|
|
sta 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 xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
// [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror 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 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 xi
|
|
sec
|
|
sbc yd
|
|
sta xi
|
|
lda xi+1
|
|
sbc yd+1
|
|
sta 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 yi
|
|
clc
|
|
adc xd
|
|
sta yi
|
|
lda yi+1
|
|
adc xd+1
|
|
sta 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 angle
|
|
sbc CORDIC_ATAN2_ANGLES_16,y
|
|
sta angle
|
|
lda angle+1
|
|
sbc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta 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 xi
|
|
clc
|
|
adc yd
|
|
sta xi
|
|
lda xi+1
|
|
adc yd+1
|
|
sta 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 yi
|
|
sec
|
|
sbc xd
|
|
sta yi
|
|
lda yi+1
|
|
sbc xd+1
|
|
sta 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 angle
|
|
adc CORDIC_ATAN2_ANGLES_16,y
|
|
sta angle
|
|
lda angle+1
|
|
adc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta 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 xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
lda xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
// [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror yd
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror 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 x
|
|
sta xi
|
|
lda x+1
|
|
sta 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 y
|
|
sta yi
|
|
lda y+1
|
|
sta yi+1
|
|
jmp b3_from_b1
|
|
}
|
|
// init_font_hex
|
|
// Make charset from proto chars
|
|
// init_font_hex(byte* zeropage($13) charset)
|
|
init_font_hex: {
|
|
.label _0 = $1d
|
|
.label idx = $18
|
|
.label proto_lo = $15
|
|
.label charset = $13
|
|
.label c1 = $17
|
|
.label proto_hi = $10
|
|
.label c = $12
|
|
// [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 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 proto_hi
|
|
lda #>FONT_HEX_PROTO
|
|
sta 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 charset
|
|
lda #>CHARSET
|
|
sta 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 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 proto_lo
|
|
lda #>FONT_HEX_PROTO
|
|
sta 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 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 _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 _0
|
|
// [77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2 -- pbuz1_derefidx_vbuz2=vbuaa
|
|
ldy idx
|
|
sta (charset),y
|
|
// [78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5 -- vbuz1=_inc_vbuz1
|
|
inc 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 idx
|
|
sta (charset),y
|
|
// [82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2 -- vbuyy=_inc_vbuz1
|
|
ldy 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 proto_lo
|
|
sta proto_lo
|
|
bcc !+
|
|
inc 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 charset
|
|
sta charset
|
|
bcc !+
|
|
inc charset+1
|
|
!:
|
|
// [86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4 -- vbuz1=_inc_vbuz1
|
|
inc c1
|
|
// [87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp 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 proto_hi
|
|
sta proto_hi
|
|
bcc !+
|
|
inc proto_hi+1
|
|
!:
|
|
// [89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6 -- vbuz1=_inc_vbuz1
|
|
inc c
|
|
// [90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp 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 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:6 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:8 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:10 3.0
|
|
(word) atan2_16::angle#11 angle zp ZP_WORD:10 4.0
|
|
(word) atan2_16::angle#12 angle zp ZP_WORD:10 190.66666666666666
|
|
(word) atan2_16::angle#13 angle zp ZP_WORD:10 1334.6666666666667
|
|
(word) atan2_16::angle#2 angle zp ZP_WORD:10 2002.0
|
|
(word) atan2_16::angle#3 angle zp ZP_WORD:10 2002.0
|
|
(word) atan2_16::angle#4 angle zp ZP_WORD:10 4.0
|
|
(word) atan2_16::angle#5 angle zp ZP_WORD:10 4.0
|
|
(word) atan2_16::angle#6 angle zp ZP_WORD:10 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:10 34.99999999999999
|
|
(word) atan2_16::return#2 return zp ZP_WORD:10 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:25 2.8684210526315796
|
|
(signed word) atan2_16::xd
|
|
(signed word) atan2_16::xd#1 xd zp ZP_WORD:14 6667.333333333333
|
|
(signed word~) atan2_16::xd#10 xd zp ZP_WORD:14 1001.0
|
|
(signed word) atan2_16::xd#2 xd zp ZP_WORD:14 1001.0
|
|
(signed word) atan2_16::xd#3 xd zp ZP_WORD:14 7668.333333333332
|
|
(signed word) atan2_16::xd#5 xd zp ZP_WORD:14 1001.0
|
|
(signed word) atan2_16::xi
|
|
(signed word) atan2_16::xi#0 xi zp ZP_WORD:8 6.0
|
|
(signed word) atan2_16::xi#1 xi zp ZP_WORD:8 500.5
|
|
(signed word~) atan2_16::xi#13 xi zp ZP_WORD:8 4.0
|
|
(signed word) atan2_16::xi#2 xi zp ZP_WORD:8 500.5
|
|
(signed word) atan2_16::xi#3 xi zp ZP_WORD:8 267.0666666666667
|
|
(signed word) atan2_16::xi#8 xi zp ZP_WORD:8 1001.0
|
|
(signed word) atan2_16::y
|
|
(signed word) atan2_16::y#0 y zp ZP_WORD:27 2.724999999999999
|
|
(signed word) atan2_16::yd
|
|
(signed word) atan2_16::yd#1 yd zp ZP_WORD:12 10001.0
|
|
(signed word~) atan2_16::yd#10 yd zp ZP_WORD:12 2002.0
|
|
(signed word) atan2_16::yd#2 yd zp ZP_WORD:12 2002.0
|
|
(signed word) atan2_16::yd#3 yd zp ZP_WORD:12 4601.0
|
|
(signed word) atan2_16::yd#5 yd zp ZP_WORD:12 2002.0
|
|
(signed word) atan2_16::yi
|
|
(signed word) atan2_16::yi#0 yi zp ZP_WORD:6 1.2000000000000002
|
|
(signed word) atan2_16::yi#1 yi zp ZP_WORD:6 667.3333333333334
|
|
(signed word~) atan2_16::yi#16 yi zp ZP_WORD:6 4.0
|
|
(signed word) atan2_16::yi#2 yi zp ZP_WORD:6 667.3333333333334
|
|
(signed word) atan2_16::yi#3 yi zp ZP_WORD:6 353.4117647058823
|
|
(signed word) atan2_16::yi#8 yi zp ZP_WORD:6 1001.0
|
|
(void()) init_font_hex((byte*) init_font_hex::charset)
|
|
(byte~) init_font_hex::$0 $0 zp ZP_BYTE:29 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:18 16.5
|
|
(byte) init_font_hex::c#6 c zp ZP_BYTE:18 1.1578947368421053
|
|
(byte) init_font_hex::c1
|
|
(byte) init_font_hex::c1#1 c1 zp ZP_BYTE:23 151.5
|
|
(byte) init_font_hex::c1#4 c1 zp ZP_BYTE:23 13.466666666666667
|
|
(byte*) init_font_hex::charset
|
|
(byte*) init_font_hex::charset#0 charset zp ZP_WORD:19 35.5
|
|
(byte*) init_font_hex::charset#2 charset zp ZP_WORD:19 108.35714285714285
|
|
(byte*) init_font_hex::charset#5 charset zp ZP_WORD:19 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:24 551.0
|
|
(byte) init_font_hex::idx#3 reg byte y 202.0
|
|
(byte) init_font_hex::idx#5 idx zp ZP_BYTE:24 600.5999999999999
|
|
(byte*) init_font_hex::proto_hi
|
|
(byte*) init_font_hex::proto_hi#1 proto_hi zp ZP_WORD:16 7.333333333333333
|
|
(byte*) init_font_hex::proto_hi#6 proto_hi zp ZP_WORD:16 56.83333333333334
|
|
(byte*) init_font_hex::proto_lo
|
|
(byte*) init_font_hex::proto_lo#1 proto_lo zp ZP_WORD:21 50.5
|
|
(byte*) init_font_hex::proto_lo#4 proto_lo zp ZP_WORD:21 92.53846153846155
|
|
(void()) main()
|
|
(word~) main::$11 $11 zp ZP_WORD:10 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:10 202.0
|
|
(byte*) main::col00
|
|
(byte*) main::screen
|
|
(byte*) main::screen#1 screen zp ZP_WORD:4 42.599999999999994
|
|
(byte*) main::screen#2 screen zp ZP_WORD:4 28.545454545454547
|
|
(byte*) main::screen#4 screen zp ZP_WORD:4 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:3 151.5
|
|
(signed byte) main::x#2 x zp ZP_BYTE:3 16.833333333333332
|
|
(signed word) main::xw
|
|
(word) main::xw#0 xw zp ZP_WORD:25 50.5
|
|
(signed byte) main::y
|
|
(signed byte) main::y#1 y zp ZP_BYTE:2 16.5
|
|
(signed byte) main::y#4 y zp ZP_BYTE:2 1.4666666666666666
|
|
(signed word) main::yw
|
|
(word) main::yw#0 yw zp ZP_WORD:27 50.5
|
|
|
|
zp ZP_BYTE:2 [ main::y#4 main::y#1 ]
|
|
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: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 x [ atan2_16::i#2 atan2_16::i#1 ]
|
|
zp ZP_WORD:10 [ 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:12 [ atan2_16::yd#5 atan2_16::yd#3 atan2_16::yd#10 atan2_16::yd#1 atan2_16::yd#2 ]
|
|
zp ZP_WORD:14 [ atan2_16::xd#5 atan2_16::xd#3 atan2_16::xd#10 atan2_16::xd#1 atan2_16::xd#2 ]
|
|
zp ZP_WORD:16 [ init_font_hex::proto_hi#6 init_font_hex::proto_hi#1 ]
|
|
zp ZP_BYTE:18 [ init_font_hex::c#6 init_font_hex::c#1 ]
|
|
zp ZP_WORD:19 [ init_font_hex::charset#2 init_font_hex::charset#5 init_font_hex::charset#0 ]
|
|
zp ZP_WORD:21 [ init_font_hex::proto_lo#4 init_font_hex::proto_lo#1 ]
|
|
zp ZP_BYTE:23 [ init_font_hex::c1#4 init_font_hex::c1#1 ]
|
|
reg byte x [ init_font_hex::i#2 init_font_hex::i#1 ]
|
|
zp ZP_BYTE:24 [ init_font_hex::idx#5 init_font_hex::idx#2 ]
|
|
zp ZP_WORD:25 [ main::xw#0 atan2_16::x#0 ]
|
|
zp ZP_WORD:27 [ 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:29 [ 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
|
|
// Basic 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 = $a
|
|
.label xw = $19
|
|
.label yw = $1b
|
|
.label angle_w = $a
|
|
.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]
|
|
jsr init_font_hex
|
|
// [6] phi from main to main::toD0181 [phi:main->main::toD0181]
|
|
// main::toD0181
|
|
// main::@5
|
|
// [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 screen
|
|
lda #>SCREEN
|
|
sta screen+1
|
|
// [8] phi (signed byte) main::y#4 = (signed byte) -$c [phi:main::@5->main::@1#1] -- vbsz1=vbsc1
|
|
lda #-$c
|
|
sta 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 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:
|
|
// [10] (word) main::xw#0 ← (byte)(signed byte) main::x#2 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda x
|
|
ldy #0
|
|
sta xw+1
|
|
sty xw
|
|
// [11] (word) main::yw#0 ← (byte)(signed byte) main::y#4 w= (byte) 0 -- vwuz1=vbuz2_word_vbuc1
|
|
lda y
|
|
sta yw+1
|
|
sty 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
|
|
// [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 _11
|
|
sta _11
|
|
bcc !+
|
|
inc _11+1
|
|
!:
|
|
// [18] (byte) main::ang_w#0 ← > (word~) main::$11 -- vbuaa=_hi_vwuz1
|
|
lda _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 screen
|
|
bne !+
|
|
inc screen+1
|
|
!:
|
|
// [21] (signed byte) main::x#1 ← ++ (signed byte) main::x#2 -- vbsz1=_inc_vbsz1
|
|
inc x
|
|
// [22] if((signed byte) main::x#1!=(signed byte) $15) goto main::@2 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$15
|
|
cmp x
|
|
bne b2
|
|
// main::@3
|
|
// [23] (signed byte) main::y#1 ← ++ (signed byte) main::y#4 -- vbsz1=_inc_vbsz1
|
|
inc y
|
|
// [24] if((signed byte) main::y#1!=(signed byte) $d) goto main::@1 -- vbsz1_neq_vbsc1_then_la1
|
|
lda #$d
|
|
cmp y
|
|
bne b1
|
|
// 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($19) x, signed word zeropage($1b) y)
|
|
atan2_16: {
|
|
.label _2 = 6
|
|
.label _7 = 8
|
|
.label yi = 6
|
|
.label xi = 8
|
|
.label angle = $a
|
|
.label xd = $e
|
|
.label yd = $c
|
|
.label return = $a
|
|
.label x = $19
|
|
.label y = $1b
|
|
// [26] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@1 -- vwsz1_ge_0_then_la1
|
|
lda 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 y
|
|
sta _2
|
|
lda #0
|
|
sbc y+1
|
|
sta _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:
|
|
// [29] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@4 -- vwsz1_ge_0_then_la1
|
|
lda 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 x
|
|
sta _7
|
|
lda #0
|
|
sbc x+1
|
|
sta _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 angle
|
|
sta 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:
|
|
// [33] if((signed word) atan2_16::yi#3!=(signed byte) 0) goto atan2_16::@11 -- vwsz1_neq_0_then_la1
|
|
lda yi+1
|
|
bne b11
|
|
lda 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:
|
|
// [35] (word) atan2_16::angle#1 ← (word) atan2_16::angle#6 >> (byte) 1 -- vwuz1=vwuz1_ror_1
|
|
lsr angle+1
|
|
ror angle
|
|
// [36] if((signed word) atan2_16::x#0>=(signed byte) 0) goto atan2_16::@7 -- vwsz1_ge_0_then_la1
|
|
lda x+1
|
|
bpl b7
|
|
// atan2_16::@21
|
|
// [37] (word) atan2_16::angle#4 ← (word) $8000 - (word) atan2_16::angle#1 -- vwuz1=vwuc1_minus_vwuz1
|
|
sec
|
|
lda #<$8000
|
|
sbc angle
|
|
sta angle
|
|
lda #>$8000
|
|
sbc angle+1
|
|
sta 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:
|
|
// [39] if((signed word) atan2_16::y#0>=(signed byte) 0) goto atan2_16::@8 -- vwsz1_ge_0_then_la1
|
|
lda y+1
|
|
bpl b8
|
|
// atan2_16::@9
|
|
// [40] (word) atan2_16::angle#5 ← - (word) atan2_16::angle#11 -- vwuz1=_neg_vwuz1
|
|
sec
|
|
lda #0
|
|
sbc angle
|
|
sta angle
|
|
lda #0
|
|
sbc angle+1
|
|
sta 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 xi
|
|
sta xd
|
|
lda xi+1
|
|
sta xd+1
|
|
// [45] (signed word~) atan2_16::yd#10 ← (signed word) atan2_16::yi#3 -- vwsz1=vwsz2
|
|
lda yi
|
|
sta yd
|
|
lda yi+1
|
|
sta 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:
|
|
// [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
|
|
// [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
|
|
// [49] (signed word) atan2_16::xd#2 ← (signed word) atan2_16::xd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
// [50] (signed word) atan2_16::yd#2 ← (signed word) atan2_16::yd#3 >> (signed byte) 1 -- vwsz1=vwsz1_ror_1
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror 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:
|
|
// [52] if((signed word) atan2_16::yi#3>=(signed byte) 0) goto atan2_16::@18 -- vwsz1_ge_0_then_la1
|
|
lda yi+1
|
|
bpl b18
|
|
// atan2_16::@20
|
|
// [53] (signed word) atan2_16::xi#2 ← (signed word) atan2_16::xi#3 - (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_minus_vwsz2
|
|
lda xi
|
|
sec
|
|
sbc yd
|
|
sta xi
|
|
lda xi+1
|
|
sbc yd+1
|
|
sta 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 yi
|
|
clc
|
|
adc xd
|
|
sta yi
|
|
lda yi+1
|
|
adc xd+1
|
|
sta 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 angle
|
|
sbc CORDIC_ATAN2_ANGLES_16,y
|
|
sta angle
|
|
lda angle+1
|
|
sbc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta 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:
|
|
// [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:
|
|
// [60] (signed word) atan2_16::xi#1 ← (signed word) atan2_16::xi#3 + (signed word) atan2_16::yd#5 -- vwsz1=vwsz1_plus_vwsz2
|
|
lda xi
|
|
clc
|
|
adc yd
|
|
sta xi
|
|
lda xi+1
|
|
adc yd+1
|
|
sta 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 yi
|
|
sec
|
|
sbc xd
|
|
sta yi
|
|
lda yi+1
|
|
sbc xd+1
|
|
sta 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 angle
|
|
adc CORDIC_ATAN2_ANGLES_16,y
|
|
sta angle
|
|
lda angle+1
|
|
adc CORDIC_ATAN2_ANGLES_16+1,y
|
|
sta angle+1
|
|
jmp b19
|
|
// 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 xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
lda xd+1
|
|
cmp #$80
|
|
ror xd+1
|
|
ror xd
|
|
// [65] (signed word) atan2_16::yd#1 ← (signed word) atan2_16::yd#3 >> (signed byte) 2 -- vwsz1=vwsz1_ror_2
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror yd
|
|
lda yd+1
|
|
cmp #$80
|
|
ror yd+1
|
|
ror yd
|
|
// [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 x
|
|
sta xi
|
|
lda x+1
|
|
sta xi+1
|
|
jmp b6
|
|
// atan2_16::@1
|
|
b1:
|
|
// [68] (signed word~) atan2_16::yi#16 ← (signed word) atan2_16::y#0 -- vwsz1=vwsz2
|
|
lda y
|
|
sta yi
|
|
lda y+1
|
|
sta yi+1
|
|
jmp b3
|
|
}
|
|
// init_font_hex
|
|
// Make charset from proto chars
|
|
// init_font_hex(byte* zeropage($13) charset)
|
|
init_font_hex: {
|
|
.label _0 = $1d
|
|
.label idx = $18
|
|
.label proto_lo = $15
|
|
.label charset = $13
|
|
.label c1 = $17
|
|
.label proto_hi = $10
|
|
.label c = $12
|
|
// [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 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 proto_hi
|
|
lda #>FONT_HEX_PROTO
|
|
sta 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 charset
|
|
lda #>CHARSET
|
|
sta 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 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 proto_lo
|
|
lda #>FONT_HEX_PROTO
|
|
sta 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:
|
|
// [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 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:
|
|
// [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 _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 _0
|
|
// [77] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#5) ← (byte~) init_font_hex::$2 -- pbuz1_derefidx_vbuz2=vbuaa
|
|
ldy idx
|
|
sta (charset),y
|
|
// [78] (byte) init_font_hex::idx#2 ← ++ (byte) init_font_hex::idx#5 -- vbuz1=_inc_vbuz1
|
|
inc 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
|
|
// init_font_hex::@4
|
|
// [81] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#2) ← (byte) 0 -- pbuz1_derefidx_vbuz2=vbuc1
|
|
lda #0
|
|
ldy idx
|
|
sta (charset),y
|
|
// [82] (byte) init_font_hex::idx#3 ← ++ (byte) init_font_hex::idx#2 -- vbuyy=_inc_vbuz1
|
|
iny
|
|
// [83] *((byte*) init_font_hex::charset#2 + (byte) init_font_hex::idx#3) ← (byte) 0 -- pbuz1_derefidx_vbuyy=vbuc1
|
|
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 proto_lo
|
|
sta proto_lo
|
|
bcc !+
|
|
inc 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 charset
|
|
sta charset
|
|
bcc !+
|
|
inc charset+1
|
|
!:
|
|
// [86] (byte) init_font_hex::c1#1 ← ++ (byte) init_font_hex::c1#4 -- vbuz1=_inc_vbuz1
|
|
inc c1
|
|
// [87] if((byte) init_font_hex::c1#1!=(byte) $10) goto init_font_hex::@2 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp c1
|
|
bne b2
|
|
// init_font_hex::@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 proto_hi
|
|
sta proto_hi
|
|
bcc !+
|
|
inc proto_hi+1
|
|
!:
|
|
// [89] (byte) init_font_hex::c#1 ← ++ (byte) init_font_hex::c#6 -- vbuz1=_inc_vbuz1
|
|
inc c
|
|
// [90] if((byte) init_font_hex::c#1!=(byte) $10) goto init_font_hex::@1 -- vbuz1_neq_vbuc1_then_la1
|
|
lda #$10
|
|
cmp 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
|
|
|
|
|