/ APDL Public Domain 1 / APDL_PD1A.iso / fractal / basicprogs / ShadeIco

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0e f4 3e 53 68 | 61 64 65 49 63 6f 0d 00 |.....>Sh|adeIco..|
|00000010| 14 28 f4 20 20 43 72 79 | 73 74 61 6c 3a 20 57 72 |.(.  Cry|stal: Wr|
|00000020| 69 74 74 65 6e 20 27 39 | 31 20 62 79 20 4d 2e 4b |itten '9|1 by M.K|
|00000030| 69 72 63 68 65 72 0d 00 | 1e 0b eb 20 31 32 38 2b |ircher..|... 128+|
|00000040| 39 0d 00 28 28 e3 20 74 | 25 3d 30 20 b8 20 31 35 |9..((. t|%=0 . 15|
|00000050| 3a fb 20 74 25 2c 74 25 | 2a 31 37 2c 74 25 2a 31 |:. t%,t%|*17,t%*1|
|00000060| 37 2c 74 25 2a 31 37 3a | ed 0d 00 32 10 c8 91 20 |7,t%*17:|...2... |
|00000070| 36 34 30 2c 35 31 32 3a | 87 0d 00 3c 2c de 20 78 |640,512:|...<,. x|
|00000080| 28 31 31 29 2c 79 28 31 | 31 29 2c 7a 28 31 31 29 |(11),y(1|1),z(11)|
|00000090| 2c 78 25 28 31 31 29 2c | 79 25 28 31 31 29 2c 7a |,x%(11),|y%(11),z|
|000000a0| 25 28 31 31 29 0d 00 46 | 1a de 20 75 25 28 31 39 |%(11)..F|.. u%(19|
|000000b0| 29 2c 76 25 28 31 39 29 | 2c 77 25 28 31 39 29 0d |),v%(19)|,w%(19).|
|000000c0| 00 50 11 de 20 64 32 20 | 37 39 2c 6e 32 20 37 39 |.P.. d2 |79,n2 79|
|000000d0| 0d 00 5a 25 e3 20 74 25 | 3d 30 20 b8 20 31 31 3a |..Z%. t%|=0 . 11:|
|000000e0| f3 20 78 28 74 25 29 2c | 79 28 74 25 29 2c 7a 28 |. x(t%),|y(t%),z(|
|000000f0| 74 25 29 3a ed 0d 00 64 | 28 e3 20 74 25 3d 30 20 |t%):...d|(. t%=0 |
|00000100| b8 20 31 39 3a f3 20 75 | 25 28 74 25 29 2c 76 25 |. 19:. u|%(t%),v%|
|00000110| 28 74 25 29 2c 77 25 28 | 74 25 29 3a ed 0d 00 6e |(t%),w%(|t%):...n|
|00000120| 0e 73 65 65 64 3d b3 28 | 2d 91 29 0d 00 78 3f 61 |.seed=.(|-.)..x?a|
|00000130| 3d 30 3a 62 3d 30 3a 63 | 3d 30 3a 64 61 3d 2e 31 |=0:b=0:c|=0:da=.1|
|00000140| 32 2a b3 28 31 29 2d 2e | 30 36 3a 64 62 3d 2e 31 |2*.(1)-.|06:db=.1|
|00000150| 32 2a b3 28 31 29 2d 2e | 30 36 3a 64 63 3d 2e 31 |2*.(1)-.|06:dc=.1|
|00000160| 32 2a b3 28 31 29 2d 2e | 30 36 0d 00 82 20 70 25 |2*.(1)-.|06... p%|
|00000170| 3d 31 3a 70 3d 32 2a af | 3a c8 99 22 4f 53 5f 42 |=1:p=2*.|:.."OS_B|
|00000180| 79 74 65 22 2c 31 31 33 | 2c 31 0d 00 8c 05 f5 0d |yte",113|,1......|
|00000190| 00 96 20 70 25 3d 33 2d | 70 25 3a c8 99 22 4f 53 |.. p%=3-|p%:.."OS|
|000001a0| 5f 42 79 74 65 22 2c 31 | 31 32 2c 70 25 3a db 0d |_Byte",1|12,p%:..|
|000001b0| 00 a0 25 61 2b 3d 64 61 | 3a e7 20 61 3e 70 20 8c |..%a+=da|:. a>p .|
|000001c0| 20 61 2d 3d 70 20 8b 20 | e7 20 61 3c 30 20 8c 20 | a-=p . |. a<0 . |
|000001d0| 61 2b 3d 70 0d 00 aa 25 | 62 2b 3d 64 62 3a e7 20 |a+=p...%|b+=db:. |
|000001e0| 62 3e 70 20 8c 20 62 2d | 3d 70 20 8b 20 e7 20 62 |b>p . b-|=p . . b|
|000001f0| 3c 30 20 8c 20 62 2b 3d | 70 0d 00 b4 25 63 2b 3d |<0 . b+=|p...%c+=|
|00000200| 64 63 3a e7 20 63 3e 70 | 20 8c 20 63 2d 3d 70 20 |dc:. c>p| . c-=p |
|00000210| 8b 20 e7 20 63 3c 30 20 | 8c 20 63 2b 3d 70 0d 00 |. . c<0 |. c+=p..|
|00000220| be 27 73 61 3d b5 61 3a | 63 61 3d 9b 61 3a 73 62 |.'sa=.a:|ca=.a:sb|
|00000230| 3d b5 62 3a 63 62 3d 9b | 62 3a 73 63 3d b5 63 3a |=.b:cb=.|b:sc=.c:|
|00000240| 63 63 3d 9b 63 0d 00 c8 | 0f e3 20 74 25 3d 30 20 |cc=.c...|.. t%=0 |
|00000250| b8 20 31 31 0d 00 d2 2c | 78 31 3d 78 28 74 25 29 |. 11...,|x1=x(t%)|
|00000260| 2a 63 61 2d 79 28 74 25 | 29 2a 73 61 3a 79 3d 78 |*ca-y(t%|)*sa:y=x|
|00000270| 28 74 25 29 2a 73 61 2b | 79 28 74 25 29 2a 63 61 |(t%)*sa+|y(t%)*ca|
|00000280| 0d 00 dc 3d 7a 3d 7a 28 | 74 25 29 2a 63 62 2d 79 |...=z=z(|t%)*cb-y|
|00000290| 2a 73 62 3a 79 3d 7a 28 | 74 25 29 2a 73 62 2b 79 |*sb:y=z(|t%)*sb+y|
|000002a0| 2a 63 62 3a 78 3d 78 31 | 2a 63 63 2d 7a 2a 73 63 |*cb:x=x1|*cc-z*sc|
|000002b0| 3a 7a 3d 78 31 2a 73 63 | 2b 7a 2a 63 63 0d 00 e6 |:z=x1*sc|+z*cc...|
|000002c0| 31 78 25 28 74 25 29 3d | 31 38 30 30 2a 78 2f 28 |1x%(t%)=|1800*x/(|
|000002d0| 7a 2b 34 29 2b 2e 35 3a | 79 25 28 74 25 29 3d 31 |z+4)+.5:|y%(t%)=1|
|000002e0| 38 30 30 2a 79 2f 28 7a | 2b 34 29 2b 2e 35 0d 00 |800*y/(z|+4)+.5..|
|000002f0| f0 11 7a 25 28 74 25 29 | 3d 31 38 30 30 2a 7a 0d |..z%(t%)|=1800*z.|
|00000300| 00 fa 05 ed 0d 01 04 66 | e3 20 74 25 3d 30 20 b8 |.......f|. t%=0 .|
|00000310| 20 31 39 3a 73 25 3d 74 | 25 3c 3c 32 3a 6e 32 21 | 19:s%=t|%<<2:n2!|
|00000320| 73 25 3d 73 25 2b 64 32 | 3a 64 32 21 73 25 3d 2d |s%=s%+d2|:d2!s%=-|
|00000330| 7a 25 28 75 25 28 74 25 | 29 29 2d 7a 25 28 76 25 |z%(u%(t%|))-z%(v%|
|00000340| 28 74 25 29 29 2d 7a 25 | 28 77 25 28 74 25 29 29 |(t%))-z%|(w%(t%))|
|00000350| 3a ed 3a c8 99 22 4f 53 | 5f 48 65 61 70 53 6f 72 |:.:.."OS|_HeapSor|
|00000360| 74 22 2c 32 30 2c 6e 32 | 2c 33 0d 01 0e 7f e3 20 |t",20,n2|,3..... |
|00000370| 74 25 3d 31 30 20 b8 20 | 31 39 3a 73 25 3d 28 6e |t%=10 . |19:s%=(n|
|00000380| 32 21 28 74 25 3c 3c 32 | 29 2d 64 32 29 3e 3e 32 |2!(t%<<2|)-d2)>>2|
|00000390| 3a 75 25 3d 75 25 28 73 | 25 29 3a 76 25 3d 76 25 |:u%=u%(s|%):v%=v%|
|000003a0| 28 73 25 29 3a 77 25 3d | 77 25 28 73 25 29 3a e6 |(s%):w%=|w%(s%):.|
|000003b0| 20 74 25 2d 34 3a 86 20 | 78 25 28 75 25 29 2c 79 | t%-4:. |x%(u%),y|
|000003c0| 25 28 75 25 29 2c 78 25 | 28 76 25 29 2c 79 25 28 |%(u%),x%|(v%),y%(|
|000003d0| 76 25 29 3a f0 20 26 35 | 35 2c 78 25 28 77 25 29 |v%):. &5|5,x%(w%)|
|000003e0| 2c 79 25 28 77 25 29 3a | ed 0d 01 18 19 c8 96 3a |,y%(w%):|.......:|
|000003f0| c8 99 22 4f 53 5f 42 79 | 74 65 22 2c 31 31 33 2c |.."OS_By|te",113,|
|00000400| 70 25 0d 01 22 0c fd 20 | a6 28 2d 39 39 29 0d 01 |p%..".. |.(-99)..|
|00000410| 2c 05 f9 0d 01 36 31 dc | 20 30 2e 33 30 38 33 32 |,....61.| 0.30832|
|00000420| 39 30 30 36 20 20 20 2c | 20 30 2e 37 32 33 30 34 |9006   ,| 0.72304|
|00000430| 31 34 30 31 20 20 20 2c | 20 30 2e 36 31 38 31 37 |1401   ,| 0.61817|
|00000440| 38 32 35 36 0d 01 40 31 | dc 20 2d 30 2e 32 34 39 |8256..@1|. -0.249|
|00000450| 39 33 34 34 31 35 20 20 | 2c 20 2d 30 2e 38 37 31 |934415  |, -0.871|
|00000460| 39 32 32 35 33 35 20 20 | 2c 20 30 2e 34 32 31 30 |922535  |, 0.4210|
|00000470| 35 30 39 32 34 0d 01 4a | 32 dc 20 2d 30 2e 33 30 |50924..J|2. -0.30|
|00000480| 38 33 32 39 30 30 36 20 | 20 2c 20 2d 30 2e 37 32 |8329006 | , -0.72|
|00000490| 33 30 34 31 34 30 31 20 | 20 2c 20 2d 30 2e 36 31 |3041401 | , -0.61|
|000004a0| 38 31 37 38 32 35 36 0d | 01 54 32 dc 20 30 2e 36 |8178256.|.T2. 0.6|
|000004b0| 32 39 36 34 36 39 38 37 | 20 20 20 2c 20 2d 30 2e |29646987|   , -0.|
|000004c0| 37 36 33 32 38 31 32 37 | 39 20 20 2c 20 2d 30 2e |76328127|9  , -0.|
|000004d0| 31 34 34 37 32 38 35 37 | 37 0d 01 5e 31 dc 20 2d |14472857|7..^1. -|
|000004e0| 30 2e 34 34 38 35 31 39 | 38 34 38 20 20 2c 20 30 |0.448519|848  , 0|
|000004f0| 2e 30 34 36 36 37 35 33 | 39 39 37 20 20 2c 20 30 |.0466753|997  , 0|
|00000500| 2e 38 39 32 35 35 33 32 | 37 37 0d 01 68 31 dc 20 |.8925532|77..h1. |
|00000510| 2d 30 2e 36 32 39 36 34 | 36 39 38 37 20 20 2c 20 |-0.62964|6987  , |
|00000520| 30 2e 37 36 33 32 38 31 | 32 37 39 20 20 20 2c 20 |0.763281|279   , |
|00000530| 30 2e 31 34 34 37 32 38 | 35 37 37 0d 01 72 32 dc |0.144728|577..r2.|
|00000540| 20 2d 30 2e 35 34 33 30 | 30 34 32 38 32 20 20 2c | -0.5430|04282  ,|
|00000550| 20 30 2e 32 38 37 35 37 | 30 31 33 34 20 20 20 2c | 0.28757|0134   ,|
|00000560| 20 2d 30 2e 37 38 38 39 | 35 34 38 35 38 0d 01 7c | -0.7889|54858..||
|00000570| 32 dc 20 30 2e 39 37 34 | 36 37 32 37 35 35 20 20 |2. 0.974|672755  |
|00000580| 20 2c 20 30 2e 32 32 32 | 34 36 30 36 34 35 20 20 | , 0.222|460645  |
|00000590| 20 2c 20 2d 30 2e 30 32 | 32 38 39 37 31 38 36 0d | , -0.02|2897186.|
|000005a0| 01 86 32 dc 20 30 2e 32 | 34 39 39 33 34 34 31 35 |..2. 0.2|49934415|
|000005b0| 20 20 20 2c 20 30 2e 38 | 37 31 39 32 32 35 33 35 |   , 0.8|71922535|
|000005c0| 20 20 20 2c 20 2d 30 2e | 34 32 31 30 35 30 39 32 |   , -0.|42105092|
|000005d0| 34 0d 01 90 32 dc 20 2d | 30 2e 39 37 34 36 37 32 |4...2. -|0.974672|
|000005e0| 37 35 36 20 20 2c 20 2d | 30 2e 32 32 32 34 36 30 |756  , -|0.222460|
|000005f0| 36 34 35 20 20 2c 20 30 | 2e 30 32 32 38 39 37 31 |645  , 0|.0228971|
|00000600| 38 36 31 0d 01 9a 32 dc | 20 30 2e 34 34 38 35 31 |861...2.| 0.44851|
|00000610| 39 38 34 39 20 20 20 2c | 20 2d 30 2e 30 34 36 36 |9849   ,| -0.0466|
|00000620| 37 35 33 39 39 38 20 2c | 20 2d 30 2e 38 39 32 35 |753998 ,| -0.8925|
|00000630| 35 33 32 37 37 0d 01 a4 | 31 dc 20 30 2e 35 34 33 |53277...|1. 0.543|
|00000640| 30 30 34 32 38 32 20 20 | 20 2c 20 2d 30 2e 32 38 |004282  | , -0.28|
|00000650| 37 35 37 30 31 33 35 20 | 20 2c 20 30 2e 37 38 38 |7570135 | , 0.788|
|00000660| 39 35 34 38 35 38 0d 01 | ae 05 3a 0d 01 b8 29 dc |954858..|..:...).|
|00000670| 20 30 2c 34 2c 35 2c 20 | 30 2c 35 2c 38 2c 20 30 | 0,4,5, |0,5,8, 0|
|00000680| 2c 38 2c 37 2c 20 30 2c | 37 2c 31 31 2c 20 30 2c |,8,7, 0,|7,11, 0,|
|00000690| 31 31 2c 34 0d 01 c2 2a | dc 20 34 2c 35 2c 39 2c |11,4...*|. 4,5,9,|
|000006a0| 20 35 2c 38 2c 36 2c 20 | 38 2c 37 2c 31 30 2c 20 | 5,8,6, |8,7,10, |
|000006b0| 37 2c 31 31 2c 33 2c 20 | 31 31 2c 34 2c 31 0d 01 |7,11,3, |11,4,1..|
|000006c0| cc 2a dc 20 39 2c 36 2c | 35 2c 20 36 2c 31 30 2c |.*. 9,6,|5, 6,10,|
|000006d0| 38 2c 20 31 30 2c 33 2c | 37 2c 20 33 2c 31 2c 31 |8, 10,3,|7, 3,1,1|
|000006e0| 31 2c 20 31 2c 39 2c 34 | 0d 01 d6 29 dc 20 39 2c |1, 1,9,4|...). 9,|
|000006f0| 36 2c 32 2c 20 36 2c 31 | 30 2c 32 2c 20 31 30 2c |6,2, 6,1|0,2, 10,|
|00000700| 33 2c 32 2c 20 33 2c 31 | 2c 32 2c 20 31 2c 39 2c |3,2, 3,1|,2, 1,9,|
|00000710| 32 0d ff                |                         |2..     |        |
+--------+-------------------------+-------------------------+--------+--------+