/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / OTL-BBU3.DMS / in.adf / EXAMPLES / harmonogram8.bb

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 80 c3 00 80 04 20 73 2e | 6c 28 32 30 39 36 29 2c |..... s.|l(2096),|
|00000010| 63 2e 6c 28 32 30 39 36 | 29 00 00 80 16 20 69 3d |c.l(2096|).... i=|
|00000020| 30 20 80 18 20 32 30 39 | 36 00 20 20 63 28 69 29 |0 .. 209|6.  c(i)|
|00000030| 3d bc 02 28 31 30 32 33 | 2a 28 e0 05 28 28 32 2a |=..(1023|*(..((2*|
|00000040| 80 ba 2a 69 29 2f 31 30 | 32 34 29 29 29 00 20 20 |..*i)/10|24))).  |
|00000050| 73 28 69 29 3d bc 02 28 | 31 30 32 33 2a 28 e0 0a |s(i)=..(|1023*(..|
|00000060| 28 28 32 2a 80 ba 2a 69 | 29 2f 31 30 32 34 29 29 |((2*..*i|)/1024))|
|00000070| 29 00 80 17 00 00 80 16 | 20 69 3d 30 20 80 18 20 |).......| i=0 .. |
|00000080| 31 35 3a d0 01 20 69 2c | 33 32 30 2c 32 35 36 2c |15:.. i,|320,256,|
|00000090| 32 3a 80 17 00 80 34 00 | c8 01 20 30 2c 34 34 2c |2:....4.|.. 0,44,|
|000000a0| 33 32 30 2c 32 35 36 2c | 24 66 66 66 38 2c 32 2c |320,256,|$fff8,2,|
|000000b0| 38 2c 34 2c 33 32 30 2c | 33 32 30 00 80 bb 00 20 |8,4,320,|320.... |
|000000c0| 20 c8 0b 00 20 20 ce 05 | 20 31 2c bc 07 28 31 36 | ...  ..| 1,..(16|
|000000d0| 29 2c bc 07 28 31 36 29 | 2c bc 07 28 31 36 29 00 |),..(16)|,..(16).|
|000000e0| 20 20 ce 05 20 32 2c bc | 07 28 31 36 29 2c bc 07 |  .. 2,.|.(16),..|
|000000f0| 28 31 36 29 2c bc 07 28 | 31 36 29 00 20 20 ce 05 |(16),..(|16).  ..|
|00000100| 20 33 2c bc 07 28 31 36 | 29 2c bc 07 28 31 36 29 | 3,..(16|),..(16)|
|00000110| 2c bc 07 28 31 36 29 00 | 20 20 72 76 3d bc 07 2a |,..(16).|  rv=..*|
|00000120| 30 2e 33 2b 30 2e 30 35 | 00 20 20 67 76 3d bc 07 |0.3+0.05|.  gv=..|
|00000130| 2a 30 2e 33 2b 30 2e 30 | 35 00 20 20 62 76 3d bc |*0.3+0.0|5.  bv=.|
|00000140| 07 2a 30 2e 33 2b 30 2e | 30 35 00 20 20 72 63 3d |.*0.3+0.|05.  rc=|
|00000150| 38 3a 67 63 3d 38 3a 62 | 63 3d 38 3a 63 63 3d 31 |8:gc=8:b|c=8:cc=1|
|00000160| 3a 63 63 63 3d 31 00 20 | 20 69 62 78 61 72 67 31 |:ccc=1. | ibxarg1|
|00000170| 3d bc 02 28 bc 07 28 31 | 30 32 33 29 29 3a 69 62 |=..(..(1|023)):ib|
|00000180| 78 61 72 67 32 3d bc 02 | 28 bc 07 28 31 30 32 33 |xarg2=..|(..(1023|
|00000190| 29 29 3a 69 62 79 61 72 | 67 31 3d bc 02 28 bc 07 |)):ibyar|g1=..(..|
|000001a0| 28 31 30 32 33 29 29 3a | 69 62 79 61 72 67 32 3d |(1023)):|ibyarg2=|
|000001b0| bc 02 28 bc 07 28 31 30 | 32 33 29 29 00 20 20 78 |..(..(10|23)).  x|
|000001c0| 72 31 3d bc 02 28 bc 07 | 28 34 30 29 2d 32 30 29 |r1=..(..|(40)-20)|
|000001d0| 3a 78 72 32 3d bc 02 28 | bc 07 28 34 30 29 2d 32 |:xr2=..(|..(40)-2|
|000001e0| 30 29 3a 79 72 31 3d bc | 02 28 bc 07 28 34 30 29 |0):yr1=.|.(..(40)|
|000001f0| 2d 32 30 29 3a 79 72 32 | 3d bc 02 28 bc 07 28 34 |-20):yr2|=..(..(4|
|00000200| 30 29 2d 32 30 29 00 20 | 20 78 69 6e 63 31 3d 32 |0)-20). | xinc1=2|
|00000210| 35 2d bc 07 28 35 30 29 | 3a 78 69 6e 63 32 3d 32 |5-..(50)|:xinc2=2|
|00000220| 35 2d bc 07 28 35 30 29 | 00 20 20 79 69 6e 63 31 |5-..(50)|.  yinc1|
|00000230| 3d 32 35 2d bc 07 28 35 | 30 29 3a 79 69 6e 63 32 |=25-..(5|0):yinc2|
|00000240| 3d 32 35 2d bc 07 28 35 | 30 29 00 20 20 61 72 67 |=25-..(5|0).  arg|
|00000250| 69 6e 63 31 3d 28 bc 07 | 28 39 29 2d 34 29 2a 38 |inc1=(..|(9)-4)*8|
|00000260| 00 20 20 61 72 67 69 6e | 63 32 3d 28 bc 07 28 39 |.  argin|c2=(..(9|
|00000270| 29 2d 34 29 2a 38 00 20 | 20 61 72 67 69 6e 63 33 |)-4)*8. | arginc3|
|00000280| 3d 28 bc 07 28 39 29 2d | 34 29 2a 38 00 20 20 61 |=(..(9)-|4)*8.  a|
|00000290| 72 67 69 6e 63 34 3d 28 | bc 07 28 39 29 2d 34 29 |rginc4=(|..(9)-4)|
|000002a0| 2a 38 00 20 20 c8 0c 00 | 20 20 80 16 20 6a 3d 30 |*8.  ...|  .. j=0|
|000002b0| 20 80 18 20 31 34 00 20 | 20 63 63 3d 30 3a 63 63 | .. 14. | cc=0:cc|
|000002c0| 63 3d 31 00 20 20 69 62 | 78 61 72 67 31 3d bc 06 |c=1.  ib|xarg1=..|
|000002d0| 28 69 62 78 61 72 67 31 | 2b 78 69 6e 63 31 2c 30 |(ibxarg1|+xinc1,0|
|000002e0| 2c 31 30 32 34 29 00 20 | 20 69 62 78 61 72 67 32 |,1024). | ibxarg2|
|000002f0| 3d bc 06 28 69 62 78 61 | 72 67 32 2b 78 69 6e 63 |=..(ibxa|rg2+xinc|
|00000300| 32 2c 30 2c 31 30 32 34 | 29 00 20 20 69 62 79 61 |2,0,1024|).  ibya|
|00000310| 72 67 31 3d bc 06 28 69 | 62 78 61 72 67 31 2b 79 |rg1=..(i|bxarg1+y|
|00000320| 69 6e 63 31 2c 30 2c 31 | 30 32 34 29 00 20 20 69 |inc1,0,1|024).  i|
|00000330| 62 79 61 72 67 32 3d bc | 06 28 69 62 78 61 72 67 |byarg2=.|.(ibxarg|
|00000340| 32 2b 79 69 6e 63 32 2c | 30 2c 31 30 32 34 29 00 |2+yinc2,|0,1024).|
|00000350| 20 20 62 78 61 72 67 31 | 3d 69 62 78 61 72 67 31 |  bxarg1|=ibxarg1|
|00000360| 3a 62 78 61 72 67 32 3d | 69 62 78 61 72 67 32 3a |:bxarg2=|ibxarg2:|
|00000370| 62 79 61 72 67 31 3d 69 | 62 78 61 72 67 31 3a 62 |byarg1=i|bxarg1:b|
|00000380| 79 61 72 67 32 3d 69 62 | 79 61 72 67 32 00 20 20 |yarg2=ib|yarg2.  |
|00000390| 80 2c 20 d0 01 20 6a 3a | 80 37 3a c8 04 20 6a 00 |., .. j:|.7:.. j.|
|000003a0| 20 20 20 20 b2 05 20 30 | 00 20 20 20 20 80 16 20 |    .. 0|.    .. |
|000003b0| 72 3d 31 30 32 34 20 80 | 18 20 31 39 32 20 80 19 |r=1024 .|. 192 ..|
|000003c0| 20 2d 33 32 00 20 20 20 | 20 20 20 63 63 3d bc 06 | -32.   |   cc=..|
|000003d0| 28 63 63 2b 31 2c 30 2c | 34 29 00 20 20 20 20 20 |(cc+1,0,|4).     |
|000003e0| 20 80 0b 20 63 63 3d 30 | 3a 63 63 63 3d bc 06 28 | .. cc=0|:ccc=..(|
|000003f0| 63 63 63 2b 31 2c 31 2c | 34 29 3a 80 c0 00 20 20 |ccc+1,1,|4):...  |
|00000400| 20 20 20 20 62 78 61 72 | 67 31 2b 78 72 31 3a 62 |    bxar|g1+xr1:b|
|00000410| 78 61 72 67 32 2b 78 72 | 32 3a 62 79 61 72 67 31 |xarg2+xr|2:byarg1|
|00000420| 2b 79 72 31 3a 62 79 61 | 72 67 32 2b 79 72 32 00 |+yr1:bya|rg2+yr2.|
|00000430| 20 20 20 20 20 20 78 61 | 72 67 31 3d 62 78 61 72 |      xa|rg1=bxar|
|00000440| 67 31 3a 78 61 72 67 32 | 3d 62 78 61 72 67 32 3a |g1:xarg2|=bxarg2:|
|00000450| 79 61 72 67 31 3d 62 79 | 61 72 67 31 3a 79 61 72 |yarg1=by|arg1:yar|
|00000460| 67 32 3d 62 79 61 72 67 | 32 00 20 20 20 20 20 20 |g2=byarg|2.      |
|00000470| 80 16 20 69 3d 30 20 80 | 18 20 31 30 33 32 20 80 |.. i=0 .|. 1032 .|
|00000480| 19 20 38 00 20 20 20 20 | 20 20 20 20 78 61 72 67 |. 8.    |    xarg|
|00000490| 31 2b 61 72 67 69 6e 63 | 31 3a 78 61 72 67 32 2b |1+arginc|1:xarg2+|
|000004a0| 61 72 67 69 6e 63 32 3a | 79 61 72 67 31 2b 61 72 |arginc2:|yarg1+ar|
|000004b0| 67 69 6e 63 33 3a 79 61 | 72 67 32 2b 61 72 67 69 |ginc3:ya|rg2+argi|
|000004c0| 6e 63 34 00 20 20 20 20 | 20 20 20 20 80 06 20 63 |nc4.    |    .. c|
|000004d0| 61 6c 63 00 20 20 20 20 | 20 20 20 20 b2 03 20 78 |alc.    |    .. x|
|000004e0| 2e 6c 2c 79 2e 6c 2c 63 | 63 63 00 20 20 20 20 20 |.l,y.l,c|cc.     |
|000004f0| 20 20 20 6c 61 73 74 78 | 3d 78 3a 6c 61 73 74 79 |   lastx|=x:lasty|
|00000500| 3d 79 00 20 20 20 20 20 | 20 80 17 00 20 20 20 20 |=y.     | ...    |
|00000510| 80 17 00 20 20 80 17 00 | 20 20 80 bb 00 20 20 20 |...  ...|  ...   |
|00000520| 20 80 16 20 73 69 3d 30 | 20 80 18 20 31 35 00 20 | .. si=0| .. 15. |
|00000530| 20 20 20 20 20 20 20 80 | 0b 20 df 04 28 30 29 3e |       .|. ..(0)>|
|00000540| 30 00 20 20 20 20 20 20 | 20 20 20 20 80 0b 20 df |0.      |    .. .|
|00000550| 04 28 30 29 3d 31 3a 80 | be 20 80 16 3a 80 be 20 |.(0)=1:.|. ..:.. |
|00000560| 80 bb 3a 80 05 20 6c 31 | 3a 80 c0 00 20 20 20 20 |..:.. l1|:...    |
|00000570| 20 20 20 20 20 20 80 0b | 20 df 04 28 30 29 3d 3e |      ..| ..(0)=>|
|00000580| 31 3a 80 be 20 80 16 3a | 80 be 20 80 bb 3a 80 05 |1:.. ..:|.. ..:..|
|00000590| 20 6c 32 3a 80 c0 00 20 | 20 20 20 20 20 20 20 80 | l2:... |       .|
|000005a0| c0 00 20 20 20 20 20 20 | 20 20 69 62 78 61 72 67 |..      |  ibxarg|
|000005b0| 31 3d bc 06 28 69 62 78 | 61 72 67 31 2b 78 69 6e |1=..(ibx|arg1+xin|
|000005c0| 63 31 2c 30 2c 31 30 32 | 34 29 00 20 20 20 20 20 |c1,0,102|4).     |
|000005d0| 20 20 20 69 62 78 61 72 | 67 32 3d bc 06 28 69 62 |   ibxar|g2=..(ib|
|000005e0| 78 61 72 67 32 2b 78 69 | 6e 63 32 2c 30 2c 31 30 |xarg2+xi|nc2,0,10|
|000005f0| 32 34 29 00 20 20 20 20 | 20 20 20 20 69 62 79 61 |24).    |    ibya|
|00000600| 72 67 31 3d bc 06 28 69 | 62 78 61 72 67 31 2b 79 |rg1=..(i|bxarg1+y|
|00000610| 69 6e 63 31 2c 30 2c 31 | 30 32 34 29 00 20 20 20 |inc1,0,1|024).   |
|00000620| 20 20 20 20 20 69 62 79 | 61 72 67 32 3d bc 06 28 |     iby|arg2=..(|
|00000630| 69 62 78 61 72 67 32 2b | 79 69 6e 63 32 2c 30 2c |ibxarg2+|yinc2,0,|
|00000640| 31 30 32 34 29 00 20 20 | 20 20 20 20 20 20 62 78 |1024).  |      bx|
|00000650| 61 72 67 31 3d 69 62 78 | 61 72 67 31 3a 62 78 61 |arg1=ibx|arg1:bxa|
|00000660| 72 67 32 3d 69 62 78 61 | 72 67 32 3a 62 79 61 72 |rg2=ibxa|rg2:byar|
|00000670| 67 31 3d 69 62 78 61 72 | 67 31 3a 62 79 61 72 67 |g1=ibxar|g1:byarg|
|00000680| 32 3d 69 62 79 61 72 67 | 32 00 20 20 20 20 20 20 |2=ibyarg|2.      |
|00000690| 80 2c 20 d0 01 20 28 73 | 69 2b 31 35 29 20 80 b9 |., .. (s|i+15) ..|
|000006a0| 20 31 36 3a b2 05 20 30 | 00 20 20 20 20 20 20 62 | 16:.. 0|.      b|
|000006b0| 69 3d 73 69 3a 72 3d 31 | 30 35 36 3a 63 63 3d 30 |i=si:r=1|056:cc=0|
|000006c0| 3a 63 63 63 3d 31 00 20 | 20 20 20 20 20 80 16 20 |:ccc=1. |     .. |
|000006d0| 6b 6b 3d 30 20 80 18 20 | 31 34 00 20 20 20 20 20 |kk=0 .. |14.     |
|000006e0| 20 20 20 63 63 3d bc 06 | 28 63 63 2b 31 2c 30 2c |   cc=..|(cc+1,0,|
|000006f0| 34 29 00 20 20 20 20 20 | 20 20 20 80 0b 20 63 63 |4).     |   .. cc|
|00000700| 3d 30 3a 63 63 63 3d bc | 06 28 63 63 63 2b 31 2c |=0:ccc=.|.(ccc+1,|
|00000710| 31 2c 34 29 3a 80 c0 00 | 20 20 20 20 20 20 20 20 |1,4):...|        |
|00000720| 72 2d 33 32 00 20 20 20 | 20 20 20 20 20 62 78 61 |r-32.   |     bxa|
|00000730| 72 67 31 2b 78 72 31 3a | 62 78 61 72 67 32 2b 78 |rg1+xr1:|bxarg2+x|
|00000740| 72 32 3a 62 79 61 72 67 | 31 2b 79 72 31 3a 62 79 |r2:byarg|1+yr1:by|
|00000750| 61 72 67 32 2b 79 72 32 | 00 20 20 20 20 20 20 20 |arg2+yr2|.       |
|00000760| 20 78 61 72 67 31 3d 62 | 78 61 72 67 31 3a 78 61 | xarg1=b|xarg1:xa|
|00000770| 72 67 32 3d 62 78 61 72 | 67 32 3a 79 61 72 67 31 |rg2=bxar|g2:yarg1|
|00000780| 3d 62 79 61 72 67 31 3a | 79 61 72 67 32 3d 62 79 |=byarg1:|yarg2=by|
|00000790| 61 72 67 32 00 20 20 20 | 20 20 20 20 20 80 16 20 |arg2.   |     .. |
|000007a0| 69 3d 30 20 80 18 20 31 | 30 33 32 20 80 19 20 38 |i=0 .. 1|032 .. 8|
|000007b0| 00 20 20 20 20 20 20 20 | 20 20 20 78 61 72 67 31 |.       |   xarg1|
|000007c0| 2b 61 72 67 69 6e 63 31 | 3a 78 61 72 67 32 2b 61 |+arginc1|:xarg2+a|
|000007d0| 72 67 69 6e 63 32 3a 79 | 61 72 67 31 2b 61 72 67 |rginc2:y|arg1+arg|
|000007e0| 69 6e 63 33 3a 79 61 72 | 67 32 2b 61 72 67 69 6e |inc3:yar|g2+argin|
|000007f0| 63 34 00 20 20 20 20 20 | 20 20 20 20 20 80 06 20 |c4.     |     .. |
|00000800| 63 61 6c 63 00 20 20 20 | 20 20 20 20 20 20 20 b2 |calc.   |       .|
|00000810| 03 20 78 2e 6c 2c 79 2e | 6c 2c 63 63 63 00 20 20 |. x.l,y.|l,ccc.  |
|00000820| 20 20 20 20 20 20 20 20 | 6c 61 73 74 78 3d 78 3a |        |lastx=x:|
|00000830| 6c 61 73 74 79 3d 79 00 | 20 20 20 20 20 20 20 20 |lasty=y.|        |
|00000840| 80 17 00 20 20 20 20 20 | 20 20 20 80 37 00 20 20 |...     |   .7.  |
|00000850| 20 20 20 20 20 20 c8 04 | 20 62 69 00 20 20 20 20 |      ..| bi.    |
|00000860| 20 20 20 20 62 69 3d bc | 06 28 62 69 2b 31 2c 30 |    bi=.|.(bi+1,0|
|00000870| 2c 31 36 29 00 20 20 20 | 20 20 20 80 17 00 20 20 |,16).   |   ...  |
|00000880| 20 20 20 20 62 69 3d 28 | 73 69 2b 31 33 29 20 80 |    bi=(|si+13) .|
|00000890| b9 20 31 36 00 20 20 20 | 20 20 20 80 16 20 6b 6b |. 16.   |   .. kk|
|000008a0| 3d 30 20 80 18 20 31 31 | 00 20 20 20 20 20 20 20 |=0 .. 11|.       |
|000008b0| 20 63 63 3d bc 06 28 63 | 63 2b 31 2c 30 2c 34 29 | cc=..(c|c+1,0,4)|
|000008c0| 00 20 20 20 20 20 20 20 | 20 80 0b 20 63 63 3d 30 |.       | .. cc=0|
|000008d0| 3a 63 63 63 3d bc 06 28 | 63 63 63 2b 31 2c 31 2c |:ccc=..(|ccc+1,1,|
|000008e0| 34 29 3a 80 c0 00 20 20 | 20 20 20 20 20 20 72 2d |4):...  |      r-|
|000008f0| 33 32 00 20 20 20 20 20 | 20 20 20 62 78 61 72 67 |32.     |   bxarg|
|00000900| 31 2b 78 72 31 3a 62 78 | 61 72 67 32 2b 78 72 32 |1+xr1:bx|arg2+xr2|
|00000910| 3a 62 79 61 72 67 31 2b | 79 72 31 3a 62 79 61 72 |:byarg1+|yr1:byar|
|00000920| 67 32 2b 79 72 32 00 20 | 20 20 20 20 20 20 20 78 |g2+yr2. |       x|
|00000930| 61 72 67 31 3d 62 78 61 | 72 67 31 3a 78 61 72 67 |arg1=bxa|rg1:xarg|
|00000940| 32 3d 62 78 61 72 67 32 | 3a 79 61 72 67 31 3d 62 |2=bxarg2|:yarg1=b|
|00000950| 79 61 72 67 31 3a 79 61 | 72 67 32 3d 62 79 61 72 |yarg1:ya|rg2=byar|
|00000960| 67 32 00 20 20 20 20 20 | 20 20 20 80 16 20 69 3d |g2.     |   .. i=|
|00000970| 30 20 80 18 20 31 30 33 | 32 20 80 19 20 38 00 20 |0 .. 103|2 .. 8. |
|00000980| 20 20 20 20 20 20 20 20 | 20 78 61 72 67 31 2b 61 |        | xarg1+a|
|00000990| 72 67 69 6e 63 31 3a 78 | 61 72 67 32 2b 61 72 67 |rginc1:x|arg2+arg|
|000009a0| 69 6e 63 32 3a 79 61 72 | 67 31 2b 61 72 67 69 6e |inc2:yar|g1+argin|
|000009b0| 63 33 3a 79 61 72 67 32 | 2b 61 72 67 69 6e 63 34 |c3:yarg2|+arginc4|
|000009c0| 00 20 20 20 20 20 20 20 | 20 20 20 80 06 20 63 61 |.       |   .. ca|
|000009d0| 6c 63 00 20 20 20 20 20 | 20 20 20 20 20 b2 03 20 |lc.     |     .. |
|000009e0| 78 2c 79 2c 63 63 63 00 | 20 20 20 20 20 20 20 20 |x,y,ccc.|        |
|000009f0| 20 20 6c 61 73 74 78 3d | 78 3a 6c 61 73 74 79 3d |  lastx=|x:lasty=|
|00000a00| 79 00 20 20 20 20 20 20 | 20 20 80 17 00 20 20 20 |y.      |  ...   |
|00000a10| 20 20 20 20 20 80 37 00 | 20 20 20 20 20 20 20 20 |     .7.|        |
|00000a20| c8 04 20 62 69 00 20 20 | 20 20 20 20 20 20 62 69 |.. bi.  |      bi|
|00000a30| 3d bc 06 28 62 69 2b 31 | 35 2c 30 2c 31 36 29 00 |=..(bi+1|5,0,16).|
|00000a40| 20 20 20 20 20 20 80 17 | 00 20 20 20 20 80 17 00 |      ..|.    ...|
|00000a50| 20 20 80 c7 00 6c 31 3a | 80 c7 00 6c 32 3a 80 35 |  ...l1:|...l2:.5|
|00000a60| 3a 80 37 20 35 30 00 80 | 02 00 00 63 61 6c 63 3a |:.7 50..|...calc:|
|00000a70| 00 20 20 78 61 72 67 31 | 3d bc 06 28 78 61 72 67 |.  xarg1|=..(xarg|
|00000a80| 31 2c 30 2c 31 30 32 34 | 29 00 20 20 78 61 72 67 |1,0,1024|).  xarg|
|00000a90| 32 3d bc 06 28 78 61 72 | 67 32 2c 30 2c 31 30 32 |2=..(xar|g2,0,102|
|00000aa0| 34 29 00 20 20 79 61 72 | 67 31 3d bc 06 28 79 61 |4).  yar|g1=..(ya|
|00000ab0| 72 67 31 2c 30 2c 31 30 | 32 34 29 00 20 20 79 61 |rg1,0,10|24).  ya|
|00000ac0| 72 67 32 3d bc 06 28 79 | 61 72 67 32 2c 30 2c 31 |rg2=..(y|arg2,0,1|
|00000ad0| 30 32 34 29 00 20 20 78 | 31 2e 6c 3d 31 35 39 2a |024).  x|1.l=159*|
|00000ae0| 63 28 78 61 72 67 31 29 | 3a 78 31 3d 28 78 31 20 |c(xarg1)|:x1=(x1 |
|00000af0| 80 45 20 31 30 29 00 20 | 20 78 32 2e 6c 3d 31 35 |.E 10). | x2.l=15|
|00000b00| 39 2a 63 28 78 61 72 67 | 32 29 3a 78 32 3d 28 78 |9*c(xarg|2):x2=(x|
|00000b10| 32 20 80 45 20 31 30 29 | 00 20 20 79 31 2e 6c 3d |2 .E 10)|.  y1.l=|
|00000b20| 36 33 2a 73 28 79 61 72 | 67 31 29 3a 79 31 3d 28 |63*s(yar|g1):y1=(|
|00000b30| 79 31 20 80 45 20 31 30 | 29 00 20 20 79 32 2e 6c |y1 .E 10|).  y2.l|
|00000b40| 3d 36 33 2a 73 28 79 61 | 72 67 32 29 3a 79 32 3d |=63*s(ya|rg2):y2=|
|00000b50| 28 79 32 20 80 45 20 31 | 30 29 00 20 20 78 2e 6c |(y2 .E 1|0).  x.l|
|00000b60| 3d 78 31 2b 78 32 3a 78 | 2a 72 3a 78 3d 78 20 80 |=x1+x2:x|*r:x=x .|
|00000b70| 45 20 31 31 3a 78 2b 31 | 36 30 00 20 20 79 2e 6c |E 11:x+1|60.  y.l|
|00000b80| 3d 79 31 2b 79 32 3a 79 | 2a 72 3a 79 3d 79 20 80 |=y1+y2:y|*r:y=y .|
|00000b90| 45 20 31 30 3a 79 2b 31 | 32 38 00 80 07 00 00 00 |E 10:y+1|28......|
+--------+-------------------------+-------------------------+--------+--------+