/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / education / b / escher / !Q-10 / TileDetail

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 54 | 69 6c 65 44 65 74 61 69 |..... >T|ileDetai|
|00000010| 6c 0d 00 14 0b f4 20 20 | 51 2d 31 30 0d 00 1e 05 |l.....  |Q-10....|
|00000020| 3a 0d 00 28 0e dd 20 f2 | 64 69 61 67 72 61 6d 0d |:..(.. .|diagram.|
|00000030| 00 32 10 20 53 79 73 24 | 3d 22 51 2d 31 30 22 0d |.2. Sys$|="Q-10".|
|00000040| 00 3c 10 20 73 65 67 6d | 65 6e 74 73 25 3d 34 0d |.<. segm|ents%=4.|
|00000050| 00 46 0f 20 f2 64 69 6d | 65 6e 73 69 6f 6e 0d 00 |.F. .dim|ension..|
|00000060| 50 30 20 68 61 6e 64 25 | 28 30 29 3d 31 3a 68 61 |P0 hand%|(0)=1:ha|
|00000070| 6e 64 25 28 31 29 3d 31 | 3a 68 61 6e 64 25 28 32 |nd%(1)=1|:hand%(2|
|00000080| 29 3d 31 3a 68 61 6e 64 | 25 28 33 29 3d 31 0d 00 |)=1:hand|%(3)=1..|
|00000090| 5a 2e 20 64 69 72 25 28 | 30 29 3d 31 3a 64 69 72 |Z. dir%(|0)=1:dir|
|000000a0| 25 28 31 29 3d 2d 31 3a | 64 69 72 25 28 32 29 3d |%(1)=-1:|dir%(2)=|
|000000b0| 31 3a 64 69 72 25 28 33 | 29 3d 2d 31 0d 00 64 30 |1:dir%(3|)=-1..d0|
|000000c0| 20 63 6f 72 72 25 28 30 | 29 3d 31 3a 63 6f 72 72 | corr%(0|)=1:corr|
|000000d0| 25 28 31 29 3d 30 3a 63 | 6f 72 72 25 28 32 29 3d |%(1)=0:c|orr%(2)=|
|000000e0| 33 3a 63 6f 72 72 25 28 | 33 29 3d 32 0d 00 6e 3a |3:corr%(|3)=2..n:|
|000000f0| 20 63 6f 6c 25 28 30 29 | 3d 31 31 3a 63 6f 6c 25 | col%(0)|=11:col%|
|00000100| 28 31 29 3d 63 6f 6c 25 | 28 30 29 3a 63 6f 6c 25 |(1)=col%|(0):col%|
|00000110| 28 32 29 3d 31 33 3a 63 | 6f 6c 25 28 33 29 3d 63 |(2)=13:c|ol%(3)=c|
|00000120| 6f 6c 25 28 32 29 0d 00 | 78 1a 20 78 74 69 6c 65 |ol%(2)..|x. xtile|
|00000130| 25 3d 33 30 30 3a 79 74 | 69 6c 65 25 3d 34 35 30 |%=300:yt|ile%=450|
|00000140| 0d 00 82 14 20 e7 20 41 | 25 3d 30 20 84 20 41 25 |.... . A|%=0 . A%|
|00000150| 3d 32 20 8c 0d 00 8c 4a | 20 20 78 70 25 28 30 29 |=2 ....J|  xp%(0)|
|00000160| 3d 30 3a 79 70 25 28 30 | 29 3d 30 3a 78 70 25 28 |=0:yp%(0|)=0:xp%(|
|00000170| 31 29 3d 32 30 30 3a 79 | 70 25 28 31 29 3d 34 30 |1)=200:y|p%(1)=40|
|00000180| 30 2f 28 32 2a b6 28 33 | 29 29 3a 78 70 25 28 32 |0/(2*.(3|)):xp%(2|
|00000190| 29 3d 34 30 30 3a 79 70 | 25 28 32 29 3d 30 0d 00 |)=400:yp|%(2)=0..|
|000001a0| 96 25 20 20 78 70 25 28 | 33 29 3d 32 30 30 3a 79 |.%  xp%(|3)=200:y|
|000001b0| 70 25 28 33 29 3d 2d 34 | 30 30 2f 28 32 2a b6 28 |p%(3)=-4|00/(2*.(|
|000001c0| 33 29 29 0d 00 a0 0e 20 | 20 f2 72 68 6f 6d 62 75 |3)).... | .rhombu|
|000001d0| 73 0d 00 aa 14 20 20 ef | 20 32 39 2c 31 30 32 30 |s....  .| 29,1020|
|000001e0| 3b 35 35 30 3b 0d 00 b4 | 1a 20 20 e3 20 6e 25 3d |;550;...|.  . n%=|
|000001f0| 30 20 b8 20 73 65 67 6d | 65 6e 74 73 25 2d 31 0d |0 . segm|ents%-1.|
|00000200| 00 be 19 20 20 20 f2 61 | 72 72 6f 77 6c 69 6e 65 |...   .a|rrowline|
|00000210| 28 6e 25 2c 30 2e 36 29 | 0d 00 c8 07 20 20 ed 0d |(n%,0.6)|....  ..|
|00000220| 00 d2 06 20 cd 0d 00 dc | 05 e1 0d 00 e6 05 3a 0d |... ....|......:.|
|00000230| 00 f0 0e dd 20 f2 72 68 | 6f 6d 62 75 73 0d 00 fa |.... .rh|ombus...|
|00000240| 18 20 ef 20 32 39 2c 78 | 74 69 6c 65 25 3b 79 74 |. . 29,x|tile%;yt|
|00000250| 69 6c 65 25 3b 0d 01 04 | 0a 20 fb 20 31 34 30 0d |ile%;...|. . 140.|
|00000260| 01 0e 0b 20 e6 20 33 2c | 31 31 0d 01 18 22 20 86 |... . 3,|11..." .|
|00000270| 20 78 70 25 28 30 29 2c | 79 70 25 28 30 29 2c 78 | xp%(0),|yp%(0),x|
|00000280| 70 25 28 31 29 2c 79 70 | 25 28 31 29 0d 01 22 22 |p%(1),yp|%(1)..""|
|00000290| 20 86 20 78 70 25 28 31 | 29 2c 79 70 25 28 31 29 | . xp%(1|),yp%(1)|
|000002a0| 2c 78 70 25 28 32 29 2c | 79 70 25 28 32 29 0d 01 |,xp%(2),|yp%(2)..|
|000002b0| 2c 22 20 86 20 78 70 25 | 28 32 29 2c 79 70 25 28 |," . xp%|(2),yp%(|
|000002c0| 32 29 2c 78 70 25 28 33 | 29 2c 79 70 25 28 33 29 |2),xp%(3|),yp%(3)|
|000002d0| 0d 01 36 22 20 86 20 78 | 70 25 28 33 29 2c 79 70 |..6" . x|p%(3),yp|
|000002e0| 25 28 33 29 2c 78 70 25 | 28 30 29 2c 79 70 25 28 |%(3),xp%|(0),yp%(|
|000002f0| 30 29 0d 01 40 4c 20 72 | 65 64 25 3d b6 28 28 78 |0)..@L r|ed%=.((x|
|00000300| 70 25 28 30 29 2d 78 70 | 25 28 31 29 29 2a 28 78 |p%(0)-xp|%(1))*(x|
|00000310| 70 25 28 30 29 2d 78 70 | 25 28 31 29 29 2b 28 79 |p%(0)-xp|%(1))+(y|
|00000320| 70 25 28 30 29 2d 79 70 | 25 28 31 29 29 2a 28 79 |p%(0)-yp|%(1))*(y|
|00000330| 70 25 28 30 29 2d 79 70 | 25 28 31 29 29 29 0d 01 |p%(0)-yp|%(1)))..|
|00000340| 4a 0b 20 e6 20 33 2c 31 | 34 0d 01 54 21 20 c8 93 |J. . 3,1|4..T! ..|
|00000350| 20 c8 90 20 78 70 25 28 | 30 29 2d 32 30 2c 79 70 | .. xp%(|0)-20,yp|
|00000360| 25 28 30 29 2d 32 30 2c | 34 30 0d 01 5e 21 20 c8 |%(0)-20,|40..^! .|
|00000370| 93 20 c8 90 20 78 70 25 | 28 32 29 2d 32 30 2c 79 |. .. xp%|(2)-20,y|
|00000380| 70 25 28 32 29 2d 32 30 | 2c 34 30 0d 01 68 22 20 |p%(2)-20|,40..h" |
|00000390| f2 77 72 69 74 65 28 31 | 31 30 34 2c 39 30 30 2c |.write(1|104,900,|
|000003a0| 53 79 73 24 2c 22 62 6c | 61 63 6b 22 29 0d 01 72 |Sys$,"bl|ack")..r|
|000003b0| 31 20 f2 77 72 69 74 65 | 28 31 30 30 38 2c 38 33 |1 .write|(1008,83|
|000003c0| 32 2c 22 41 6e 79 20 36 | 30 2c 31 32 30 20 64 65 |2,"Any 6|0,120 de|
|000003d0| 67 72 65 65 22 2c 22 62 | 6c 61 63 6b 22 29 0d 01 |gree","b|lack")..|
|000003e0| 7c 2e 20 f2 77 72 69 74 | 65 28 31 30 30 38 2c 38 ||. .writ|e(1008,8|
|000003f0| 30 30 2c 22 20 20 20 20 | 20 20 20 72 68 6f 6d 62 |00,"    |   rhomb|
|00000400| 75 73 22 2c 22 62 6c 61 | 63 6b 22 29 0d 01 86 2f |us","bla|ck").../|
|00000410| 20 f2 77 72 69 74 65 28 | 31 30 33 30 2c 33 32 30 | .write(|1030,320|
|00000420| 2c 22 4c 65 6e 67 74 68 | 20 6f 66 20 73 69 64 65 |,"Length| of side|
|00000430| 73 22 2c 22 62 6c 61 63 | 6b 22 29 0d 01 90 29 20 |s","blac|k")...) |
|00000440| f2 77 72 69 74 65 28 31 | 30 31 34 2c 32 35 36 2c |.write(1|014,256,|
|00000450| 22 52 65 64 20 6c 69 6e | 65 73 22 2c 22 62 6c 61 |"Red lin|es","bla|
|00000460| 63 6b 22 29 0d 01 9a 20 | 20 e6 20 31 32 3a c8 93 |ck")... | . 12:..|
|00000470| 20 c8 90 20 39 31 30 2c | 2d 32 35 38 2c 32 35 36 | .. 910,|-258,256|
|00000480| 2c 31 30 30 0d 01 a4 2a | 20 f2 77 72 69 74 65 28 |,100...*| .write(|
|00000490| 31 31 39 30 2c 32 35 36 | 2c 22 3d 20 22 2b c3 28 |1190,256|,"= "+.(|
|000004a0| 72 65 64 25 29 2c 22 62 | 6c 61 63 6b 22 29 0d 01 |red%),"b|lack")..|
|000004b0| ae 2b 20 f2 77 72 69 74 | 65 28 31 30 36 30 2c 36 |.+ .writ|e(1060,6|
|000004c0| 35 32 2c 22 42 61 73 69 | 63 20 4d 6f 74 69 66 22 |52,"Basi|c Motif"|
|000004d0| 2c 22 62 6c 61 63 6b 22 | 29 0d 01 b8 0a 20 fb 20 |,"black"|).... . |
|000004e0| 31 32 38 0d 01 c2 05 e1 | 0d 01 cc 05 3a 0d 01 d6 |128.....|....:...|
|000004f0| 17 dd 20 f2 6d 6f 74 69 | 66 70 72 6f 70 6f 72 74 |.. .moti|fproport|
|00000500| 69 6f 6e 73 0d 01 e0 18 | 20 ef 20 32 39 2c 78 74 |ions....| . 29,xt|
|00000510| 69 6c 65 25 3b 79 74 69 | 6c 65 25 3b 0d 01 ea 09 |ile%;yti|le%;....|
|00000520| 20 c8 97 20 ee 0d 01 f4 | 06 20 f5 0d 01 fe 2a 20 | .. ....|. ....* |
|00000530| 20 f5 20 c8 97 20 6d 78 | 25 2c 6d 79 25 2c 62 25 | . .. mx|%,my%,b%|
|00000540| 3a fd 20 62 25 3d 31 20 | 84 20 62 25 3d 34 20 84 |:. b%=1 |. b%=4 .|
|00000550| 20 62 25 3d 35 0d 02 08 | 0e 20 20 e7 20 62 25 3d | b%=5...|.  . b%=|
|00000560| 31 20 8c 0d 02 12 c3 20 | 20 20 e7 20 a4 70 6f 73 |1 ..... |  . .pos|
|00000570| 69 74 69 6f 6e 28 6d 78 | 25 2c 6d 79 25 2c 78 70 |ition(mx|%,my%,xp|
|00000580| 25 28 32 29 2c 79 70 25 | 28 32 29 2c 35 30 29 20 |%(2),yp%|(2),50) |
|00000590| 8c 20 f2 72 68 6f 6d 62 | 75 73 3a 78 70 25 28 32 |. .rhomb|us:xp%(2|
|000005a0| 29 3d 6d 78 25 3a 78 70 | 25 28 31 29 3d 28 78 70 |)=mx%:xp|%(1)=(xp|
|000005b0| 25 28 32 29 2b 78 70 25 | 28 30 29 29 2f 32 3a 79 |%(2)+xp%|(0))/2:y|
|000005c0| 70 25 28 31 29 3d 79 70 | 25 28 30 29 2b 28 78 70 |p%(1)=yp|%(0)+(xp|
|000005d0| 25 28 31 29 2d 78 70 25 | 28 30 29 29 2f b6 28 33 |%(1)-xp%|(0))/.(3|
|000005e0| 29 3a 78 70 25 28 33 29 | 3d 28 78 70 25 28 30 29 |):xp%(3)|=(xp%(0)|
|000005f0| 2b 78 70 25 28 32 29 29 | 2f 32 3a 79 70 25 28 33 |+xp%(2))|/2:yp%(3|
|00000600| 29 3d 79 70 25 28 30 29 | 2d 28 78 70 25 28 31 29 |)=yp%(0)|-(xp%(1)|
|00000610| 2d 78 70 25 28 30 29 29 | 2f b6 28 33 29 3a f2 72 |-xp%(0))|/.(3):.r|
|00000620| 68 6f 6d 62 75 73 0d 02 | 1c 2e 20 20 20 e7 20 a4 |hombus..|..   . .|
|00000630| 70 6f 73 69 74 69 6f 6e | 28 6d 78 25 2c 6d 79 25 |position|(mx%,my%|
|00000640| 2c 78 70 25 28 30 29 2c | 79 70 25 28 30 29 2c 35 |,xp%(0),|yp%(0),5|
|00000650| 30 29 20 8c 0d 02 26 10 | 20 20 20 20 f2 72 68 6f |0) ...&.|    .rho|
|00000660| 6d 62 75 73 0d 02 30 25 | 20 20 20 20 64 78 25 3d |mbus..0%|    dx%=|
|00000670| 6d 78 25 2d 78 70 25 28 | 30 29 3a 64 79 25 3d 6d |mx%-xp%(|0):dy%=m|
|00000680| 79 25 2d 79 70 25 28 30 | 29 0d 02 3a 1a 20 20 20 |y%-yp%(0|)..:.   |
|00000690| 20 e3 20 6e 25 3d 30 20 | b8 20 73 65 67 6d 65 6e | . n%=0 |. segmen|
|000006a0| 74 73 25 0d 02 44 30 20 | 20 20 20 20 78 70 25 28 |ts%..D0 |    xp%(|
|000006b0| 6e 25 29 3d 78 70 25 28 | 6e 25 29 2b 64 78 25 3a |n%)=xp%(|n%)+dx%:|
|000006c0| 79 70 25 28 6e 25 29 3d | 79 70 25 28 6e 25 29 2b |yp%(n%)=|yp%(n%)+|
|000006d0| 64 79 25 0d 02 4e 09 20 | 20 20 20 ed 0d 02 58 10 |dy%..N. |   ...X.|
|000006e0| 20 20 20 20 f2 72 68 6f | 6d 62 75 73 0d 02 62 08 |    .rho|mbus..b.|
|000006f0| 20 20 20 cd 0d 02 6c 07 | 20 20 cd 0d 02 76 12 20 |   ...l.|  ...v. |
|00000700| fd 20 62 25 3d 34 20 84 | 20 62 25 3d 35 0d 02 80 |. b%=4 .| b%=5...|
|00000710| 16 20 f2 74 69 6c 69 6e | 67 70 61 72 61 6d 65 74 |. .tilin|gparamet|
|00000720| 65 72 73 0d 02 8a 05 e1 | 0d 02 94 05 3a 0d 02 9e |ers.....|....:...|
|00000730| 17 dd 20 f2 74 69 6c 69 | 6e 67 70 61 72 61 6d 65 |.. .tili|ngparame|
|00000740| 74 65 72 73 0d 02 a8 56 | 20 78 72 65 70 25 3d 78 |ters...V| xrep%=x|
|00000750| 70 25 28 32 29 2d 78 70 | 25 28 30 29 3a 79 72 65 |p%(2)-xp|%(0):yre|
|00000760| 70 25 3d 28 78 70 25 28 | 32 29 2d 78 70 25 28 30 |p%=(xp%(|2)-xp%(0|
|00000770| 29 29 2a 30 2e 38 36 36 | 3a 78 6f 66 66 73 65 74 |))*0.866|:xoffset|
|00000780| 25 3d 78 70 25 28 33 29 | 2d 78 70 25 28 30 29 3a |%=xp%(3)|-xp%(0):|
|00000790| 79 6f 66 66 73 65 74 25 | 3d 30 0d 02 b2 05 e1 0d |yoffset%|=0......|
|000007a0| 02 bc 05 3a 0d 02 c6 14 | dd 20 f2 63 6c 75 73 74 |...:....|. .clust|
|000007b0| 65 72 64 65 74 61 69 6c | 0d 02 d0 27 20 20 78 6f |erdetail|...'  xo|
|000007c0| 72 69 67 25 3d 34 30 30 | 3a 79 6f 72 69 67 25 3d |rig%=400|:yorig%=|
|000007d0| 34 30 30 3a f2 64 72 61 | 77 63 75 72 76 65 73 0d |400:.dra|wcurves.|
|000007e0| 02 da 17 20 20 f2 74 68 | 69 72 64 70 69 3a f2 74 |...  .th|irdpi:.t|
|000007f0| 68 69 72 64 70 69 0d 02 | e4 42 20 20 58 70 25 28 |hirdpi..|.B  Xp%(|
|00000800| 30 29 3d 2d 28 78 70 25 | 28 30 29 2b b6 28 33 29 |0)=-(xp%|(0)+.(3)|
|00000810| 2a 79 70 25 28 30 29 29 | 2f 32 3a 59 70 25 28 30 |*yp%(0))|/2:Yp%(0|
|00000820| 29 3d 28 b6 28 33 29 2a | 78 70 25 28 30 29 2d 79 |)=(.(3)*|xp%(0)-y|
|00000830| 70 25 28 30 29 29 2f 32 | 0d 02 ee 5d 20 20 78 6f |p%(0))/2|...]  xo|
|00000840| 72 69 67 25 3d 34 30 30 | 2b 28 78 70 25 28 30 29 |rig%=400|+(xp%(0)|
|00000850| 2d 58 70 25 28 30 29 29 | 2f 32 2b 28 78 70 25 28 |-Xp%(0))|/2+(xp%(|
|00000860| 32 29 2d 78 70 25 28 30 | 29 29 2f 32 3a 79 6f 72 |2)-xp%(0|))/2:yor|
|00000870| 69 67 25 3d 34 30 30 2b | 28 79 70 25 28 30 29 2d |ig%=400+|(yp%(0)-|
|00000880| 59 70 25 28 30 29 29 2f | 32 3a f2 64 72 61 77 63 |Yp%(0))/|2:.drawc|
|00000890| 75 72 76 65 73 0d 02 f8 | 17 20 20 f2 74 68 69 72 |urves...|.  .thir|
|000008a0| 64 70 69 3a f2 74 68 69 | 72 64 70 69 0d 03 02 43 |dpi:.thi|rdpi...C|
|000008b0| 20 20 58 70 25 28 30 29 | 3d 2d 28 78 70 25 28 30 |  Xp%(0)|=-(xp%(0|
|000008c0| 29 2d b6 28 33 29 2a 79 | 70 25 28 30 29 29 2f 32 |)-.(3)*y|p%(0))/2|
|000008d0| 3a 59 70 25 28 30 29 3d | 2d 28 b6 28 33 29 2a 78 |:Yp%(0)=|-(.(3)*x|
|000008e0| 70 25 28 30 29 2b 79 70 | 25 28 30 29 29 2f 32 0d |p%(0)+yp|%(0))/2.|
|000008f0| 03 0c 34 20 20 78 6f 72 | 69 67 25 3d 34 30 30 2b |..4  xor|ig%=400+|
|00000900| 28 78 70 25 28 30 29 2d | 58 70 25 28 30 29 29 2f |(xp%(0)-|Xp%(0))/|
|00000910| 32 2b 28 78 70 25 28 31 | 29 2d 78 70 25 28 30 29 |2+(xp%(1|)-xp%(0)|
|00000920| 29 2f 32 0d 03 16 42 20 | 20 79 6f 72 69 67 25 3d |)/2...B | yorig%=|
|00000930| 34 30 30 2b 28 79 70 25 | 28 30 29 2d 59 70 25 28 |400+(yp%|(0)-Yp%(|
|00000940| 30 29 29 2f 32 2b 33 2a | 28 79 70 25 28 31 29 2d |0))/2+3*|(yp%(1)-|
|00000950| 79 70 25 28 30 29 29 2f | 32 3a f2 64 72 61 77 63 |yp%(0))/|2:.drawc|
|00000960| 75 72 76 65 73 0d 03 20 | 05 e1 0d ff             |urves.. |....    |
+--------+-------------------------+-------------------------+--------+--------+