10A0
------------------
Set Var( 0x0 ,  0x2000 )
Set Var( 0x1 ,  0x2001 )
Set Var( 0x2 ,  0x2002 )
Set Var( 0x3 ,  0x2003 )
Set Var( 0x4 ,  0x2004 )
Set Var( 0x5 ,  0x2005 )
Set Var( 0x6 ,  0x2006 )
02( 0x7 ,  0x1009 )
15( 0x9 )
If( 0xd )
Divide( 0x9 ,  0x2007 )
Else( )
Multiply( 0x9 ,  0x2008 )
End If( )
0E( 0x9 ,  0x1011 ,  0x2009 )
22( 0x200a )
Set Var( 0xa ,  0x200b )
03( )
If( 0x1007 ,  0x1006 ,  0x6 )
&& Req( 0x1005 )
Set Var( 0xb ,  0x1011 )
0E( 0xb ,  0x200c )
If( 0x1008 ,  0x100e ,  0xb )
22( 0x200d )
05( 0x0 )
If( 0x1004 )
14( )
End If( )
Goto?( )
End If( )
End If( )
05( 0x1 )
14( )
Goto?( )
03( 0x0 )
If( 0x1003 )
|| Req( 0x1004 )
22( 0x200a )
05( )
14( )
End If( )
Goto?( )
03( 0x1 )
If NOT( 0x1 )
Return( )
End If( )
If( 0x100d )
If( 0x1007 ,  0x100f ,  0x200e )
Call AI( 0x2010 )
Else( )
Call AI( 0x2040 )
End If( )
End If( )
If( 0x1004 )
Set Var( 0xc ,  0x200f )
Else( )
Set Var( 0xc ,  0x2010 )
End If( )
Set Var( 0xb ,  0x1002 )
0E( 0xb ,  0x1003 )
If( 0x1008 ,  0xb ,  0x2011 )
Set Var( 0xb ,  0x1003 )
0E( 0xb ,  0x200e )
1F( 0xb )
Goto?( )
Else( )
If( 0x1007 ,  0x1006 ,  0xc )
If( 0x1007 ,  0x1006 ,  0x200f )
1F( 0x1003 )
Else( )
Set Var( 0xb ,  0x1003 )
0E( 0xb ,  0x200e )
1F( 0xb )
End If( )
Goto?( )
Else( )
Set Var( 0xb ,  0x100c )
Divide( 0xb ,  0x100b )
If( 0x1004 )
&& Req( 0x1008 ,  0xb ,  0x2012 )
&& Req( 0x1007 ,  0xb ,  0x2011 )
&& Req( 0x1000 ,  0x4 ,  0x5 )
Set Var( 0xb ,  0x2013 )
0E( 0xb ,  0x1011 )
If( 0x1008 ,  0x100e ,  0xb )
If( 0x1004 )
1F( 0x1003 )
End If( )
Call AI( 0x1140 )
Return( )
End If( )
End If( )
Set Var( 0xd ,  0x2011 )
05( )
End If( )
Goto?( )
03( 0x2 )
If NOT( 0x1 )
Return( )
End If( )
21( )
05( )
Goto?( )
03( )
If NOT( 0x1 )
Return( )
End If( )
If( 0x1001 ,  0x2014 )
Call AI( 0x601b )
End If( )
If( 0x1003 )
If( 0x1007 ,  0x1006 ,  0x200d )
Set Var( 0xb ,  0x200e )
0E( 0xb ,  0x1003 )
1F( 0xb )
Else( )
If( 0x1008 ,  0x1006 ,  0x2015 )
Set Var( 0xb ,  0x2016 )
0E( 0xb ,  0x1003 )
1F( 0xb )
Else( )
Set Var( 0xb ,  0x1003 )
0E( 0xb ,  0x1002 )
If( 0x1008 ,  0xb ,  0x2011 )
Set Var( 0xb ,  0x200e )
0E( 0xb ,  0x1003 )
1F( 0xb )
End If( )
End If( )
End If( )
If( 0x1008 ,  0x9 ,  0x200e )
&& Req( 0x1000 ,  0x2012 ,  0x2017 )
&& Req( 0x1004 )
Set Var( 0xb ,  0x101d )
Divide( 0xb ,  0x101b )
If( 0x1008 ,  0xb ,  0x2014 )
Add( 0x2011 ,  0x200b )
Subtract( 0x2 )
05( 0x3 )
Goto?( )
End If( )
End If( )
Set Var( 0xe ,  0x1003 )
0E( 0xe ,  0x2010 )
Multiply( 0xe ,  0x1004 )
24( 0xf ,  0xe )
If( 0x1008 ,  0xf ,  0x2011 )
Set Var( 0xf ,  0x2018 )
End If( )
If( 0x1008 ,  0xf ,  0x0 )
Multiply( 0xd ,  0x2019 )
Else( )
Set Var( 0xd ,  0x2011 )
If( 0x1007 ,  0x1011 ,  0x201a )
&& Req( 0x1008 ,  0x1006 ,  0x201b )
&& Req( 0x1007 ,  0x1006 ,  0x201c )
&& Req( 0x1b )
If( 0x1007 ,  0xf ,  0x2012 )
If( 0x1008 ,  0xa ,  0x200e )
2E( 0x7 ,  0x8 ,  0x200e )
If( 0x1008 ,  0x8 ,  0x201d )
If( 0x1012 )
Subtract( 0x2 )
Set Var( 0xa ,  0x201e )
End If( )
Else( )
If( 0x1008 ,  0x8 ,  0x200d )
If( 0x1003 )
Set Var( 0xb ,  0x1008 )
1E( 0xb )
If( 0x1008 ,  0xb ,  0x2009 )
Subtract( 0x8 )
Set Var( 0xa ,  0x201e )
End If( )
Else( )
If( 0x1012 )
Subtract( 0x2 )
Set Var( 0xa ,  0x201e )
End If( )
End If( )
Else( )
Divide( 0xa ,  0x2019 )
End If( )
End If( )
End If( )
End If( )
If( 0x1008 ,  0x1026 ,  0x200e )
&& Req( 0x1008 ,  0x1006 ,  0x201f )
&& Req( 0x1007 ,  0x1011 ,  0x2020 )
29( 0xb ,  0x2021 )
Divide( 0xb ,  0x100b )
If( 0x1008 ,  0xb ,  0x2022 )
If( 0x101f ,  0x4 )
|| Req( 0x101f ,  0xa )
|| Req( 0x101f ,  0x1a )
|| Req( 0x101f ,  0x25 )
|| Req( 0x101f ,  0x18 )
|| Req( 0x101f ,  0x19 )
|| Req( 0x101f ,  0x1f )
|| Req( 0x101f ,  0x1b )
Set Var( 0xb ,  0x1011 )
0E( 0xb ,  0x2023 )
If( 0x1008 ,  0x100e ,  0xb )
05( 0x4 )
Goto?( )
End If( )
End If( )
End If( )
End If( )
If( 0x1007 ,  0xd ,  0x2024 )
&& Req( 0x1003 )
29( 0x11 ,  0xf )
Divide( 0x11 ,  0x100b )
If( 0x1007 ,  0x11 ,  0x2025 )
Add( 0x2026 )
05( 0x5 )
Else( )
If( 0x1007 ,  0x11 ,  0x200d )
05( 0x6 )
Else( )
If( 0x1007 ,  0x11 ,  0x2011 )
05( 0x7 )
Else( )
Set Var( 0xb ,  0x1016 )
1E( 0xb )
If( 0x1008 ,  0xb ,  0x200e )
|| Req( 0x1007 ,  0x1010 ,  0x2021 )
05( 0x7 )
Else( )
If( 0x1008 ,  0x1011 ,  0x201a )
Call AI( 0x1050 )
Else( )
If( 0x1018 )
&& Req( 0x1008 ,  0x100e ,  0x2027 )
22( 0x2014 )
1F( 0x1003 )
05( 0x8 )
Else( )
05( 0x7 )
End If( )
End If( )
End If( )
Goto?( )
03( 0x5 )
Add( 0x2011 ,  0x2019 )
If( 0x1002 ,  0x200d )
05( )
End If( )
Goto?( )
03( )
If NOT( 0x1005 )
|| Req( 0x1008 ,  0x100f ,  0x200e )
Return( )
End If( )
If( 0x1001 ,  0x2025 )
Call AI( 0x1080 )
Return( )
End If( )
If NOT( 0x1002 ,  0x2015 )
Add( 0x2011 ,  0x2019 )
End If( )
If( 0x1008 ,  0x100d ,  0x2011 )
Set Var( 0x12 ,  0x100c )
Divide( 0x12 ,  0x100b )
If( 0x1007 ,  0x12 ,  0x200d )
1A( 0x2011 )
End If( )
End If( )
Goto?( )
03( 0x6 )
If NOT( 0x1 )
Return( )
End If( )
If( 0x1000 ,  0x1 )
Call AI( 0x1140 )
Return( )
End If( )
Goto?( )
03( 0x7 )
2A( 0x601b )
2F( 0x13 ,  0x2 )
Set Var( 0xb ,  0x3 )
0E( 0xb ,  0x100e )
Multiply( 0x13 ,  0xb )
05( )
14( )
Goto?( )
03( )
If NOT( 0x1 )
Return( )
End If( )
Set Var( 0xb ,  0x1002 )
0E( 0xb ,  0x1003 )
If( 0x1008 ,  0xb ,  0x2011 )
Set Var( 0xb ,  0x1003 )
0E( 0xb ,  0x2028 )
1F( 0xb )
Goto?( )
End If( )
If( 0x1000 ,  0x13 )
Set Var( 0xb ,  0x100c )
Divide( 0xb ,  0x101b )
If( 0x1007 ,  0xb ,  0x2029 )
Call AI( 0x54 )
Else( )
If( 0x1007 ,  0xb ,  0x202a )
Call AI( 0x6016 )
Else( )
Call AI( )
End If( )
End If( )
Goto?( )
03( )
If( 0x1002 ,  0x202b )
1F( 0x1003 )
Subtract( 0x2 )
Return( )
End If( )
Goto?( )
03( 0x8 )
If NOT( 0x1 )
|| Req( 0x1002 ,  0x2012 )
Return( )
End If( )
Add( 0x2019 )
If( 0x1005 )
05( )
End If( )
Goto?( )
03( )
If NOT( 0x1 )
Return( )
End If( )
If( 0x1002 ,  0x201e )
Add( 0x200b )
If( 0x1002 ,  0x202c )
Return( )
End If( )
Else( )
1F( 0x1003 )
End If( )
Goto?( )
03( 0x3 )
If( 0x1002 ,  0x2010 )
Add( 0x2019 ,  0x2011 )
Else( )
Set Var( 0xb ,  0x101d )
Divide( 0xb ,  0x101b )
If( 0x1007 ,  0xb ,  0x202b )
Add( 0x2019 ,  0x2019 )
Else( )
If( 0x1008 ,  0xb ,  0x201d )
Add( 0x2019 ,  0x200b )
End If( )
End If( )
If( 0x1002 ,  0x2014 )
Set Var( 0x9 ,  0x2019 )
05( 0x2 )
End If( )
Goto?( )
03( 0x4 )
If NOT( 0x1 )
Return( )
End If( )
Set Var( 0xb ,  0x100c )
Divide( 0xb ,  0x100b )
If( 0x1007 ,  0xb ,  0x2019 )
Return( )
End If( )
Set Var( 0xb ,  0x1003 )
0E( 0xb ,  0x1002 )
If( 0x1008 ,  0xb ,  0x2011 )
Set Var( 0xb ,  0x200e )
0E( 0xb ,  0x1003 )
1F( 0xb )
Goto?( )
End If( )
Set Var( 0xb ,  0x1008 )
1E( 0xb )
If( 0x1008 ,  0xb ,  0x2009 )
If( 0x1007 ,  0xa ,  0x2011 )
Divide( 0xa ,  0x2019 )
Else( )
If( 0x1003 )
|| Req( 0x1012 )
If( 0x1008 ,  0x100e ,  0x202d )
&& Req( 0x1003 )
Subtract( 0x8 )
Else( )
Subtract( 0x2 )
End If( )
Set Var( 0xa ,  0x2017 )
Divide( 0xa ,  0x1011 )
0E( 0xa ,  0x100e ,  0x200e )
Multiply( 0xa ,  0x202e )
End If( )
End If( )
Goto?( )
Goto?( )