00000000
00000018
00000030
00000048
00000060
00000078
00000090
000000A8
000000C0
000000D8
000000F0
00000108
00000120
00000138
00000150
00000168
00000180
00000198
000001B0
000001C8
000001E0
000001F8
00000210
00000228
00000240
00000258
00000270
00000288
000002A0
000002B8
000002D0
000002E8
00000300
00000318
00000330
00000348
00000360
00000378
00000390
000003A8
000003C0
000003D8
000003F0
00000408
00000420
00000438
00000450
00000468
00000480
00000498
000004B0
000004C8
000004E0
000004F8
00000510
00000528
00000540
00000558
00000570
00000588
000005A0
000005B8
000005D0
000005E8
00000600
00000618
00000630
00000648
00000660
00000678
00000690
000006A8
000006C0
000006D8
000006F0
00000708
00000720
00000738
00000750
00000768
00000780
00000798
000007B0
000007C8
000007E0
000007F8
00000810
00000828
00000840
00000858
00000870
00000888
000008A0
000008B8
000008D0
000008E8
00000900
00000918
00000930
00000948
00000960
00000978
00000990
000009A8
000009C0
000009D8
000009F0
00000A08
00000A20
00000A38
00000A50
00000A68
00000A80
00000A98
00000AB0
00000AC8
00000AE0
00000AF8
00000B10
00000B28
00000B40
00000B58
00000B70
00000B88
00000BA0
00000BB8
00000BD0
00000BE8
00000C00
00000C18
00000C30
00000C48
00000C60
00000C78
00000C90
00000CA8
00000CC0
00000CD8
00000CF0
00000D08
00000D20
00000D38
00000D50
00000D68
00000D80
00000D98
00000DB0
00000DC8
00000DE0
00000DF8
00000E10
00000E28
00000E40
00000E58
00000E70
00000E88
00000EA0
00000EB8
00000ED0
00000EE8
00000F00
00000F18
00000F30
00000F48
00000F60
00000F78
00000F90
00000FA8
00000FC0
00000FD8
00000FF0
00001008
00001020
00001038
00001050
00001068
00001080
00001098
000010B0
000010C8
000010E0
000010F8
00001110
00001128
00001140
00001158
00001170
00001188
000011A0
000011B8
000011D0
000011E8
00001200
00001218
00001230
00001248
00001260
00001278
00001290
000012A8
000012C0
000012D8
000012F0
00001308
00001320
00001338
00001350
00001368
00001380
00001398
000013B0
000013C8
000013E0
000013F8
00001410
00001428
00001440
00001458
00001470
00001488
000014A0
000014B8
000014D0
000014E8
00001500
00001518
00001530
00001548
00001560
00001578
00001590
000015A8
000015C0
000015D8
000015F0
00001608
00001620
00001638
00001650
00001668
00001680
00001698
000016B0
000016C8
000016E0
000016F8
00001710
00001728
00001740
00001758
00001770
00001788
000017A0
000017B8
000017D0
000017E8
| 23 21 2F 62 69 6E 2F 73 68 0A 0A 69 66 20 5B 20 24 23 20 2D 6E 65 20 31
20 5D 3B 20 74 68 65 6E 0A 20 20 65 63 68 6F 20 22 75 73 61 67 65 3A 20
24 30 20 66 6F 6E 74 2D 6E 61 6D 65 20 7C 20 67 73 6E 64 20 2D 20 3E 66
6F 6E 74 2D 6E 61 6D 65 2E 61 66 6D 22 20 3E 26 32 0A 20 20 65 78 69 74
20 31 0A 66 69 0A 0A 63 61 74 20 3C 3C 20 45 4F 46 0A 25 21 0A 25 20 70
72 6F 64 75 63 65 20 2E 61 66 6D 20 66 6F 72 20 24 31 0A 25 20 28 63 29
20 31 39 39 33 20 62 79 20 52 6F 62 65 72 74 20 4A 6F 6F 70 20 3C 72 6A
40 72 61 69 6E 62 6F 77 2E 69 6E 2D 62 65 72 6C 69 6E 2E 64 65 3E 0A 25
20 69 6E 73 70 69 72 65 64 20 62 79 20 74 77 6F 20 6F 74 68 65 72 20 76
65 72 73 69 6F 6E 73 20 6F 66 20 74 68 69 73 20 74 68 65 6D 65 20 77 68
69 63 68 20 61 72 65 0A 25 09 67 65 74 61 66 6D 20 31 2E 30 30 20 28 63
29 20 41 4A 43 44 0A 25 20 61 6E 64 20 67 65 74 61 66 6D 2E 70 73 20 62
79 20 61 6E 20 75 6E 6B 6E 6F 77 6E 20 61 75 74 68 6F 72 2C 0A 25 09 6D
6F 64 69 66 69 65 64 20 62 79 20 4A 2E 20 44 61 6E 69 65 6C 20 53 6D 69
74 68 20 3C 64 73 6D 69 74 68 40 6D 61 69 6C 68 6F 73 74 2E 61 61 2E 63
61 64 2E 73 6C 62 2E 63 6F 6D 3E 0A 0A 25 20 4D 65 74 72 69 63 73 20 64
69 63 74 69 6F 6E 61 72 79 20 63 6F 64 65 20 61 64 64 65 64 20 62 79 20
41 4A 43 44 2C 20 37 2F 36 2F 39 33 0A 0A 2F 67 65 74 61 66 6D 64 69 63
74 20 31 30 30 20 64 69 63 74 20 64 75 70 20 62 65 67 69 6E 0A 0A 20 20
2F 62 75 66 20 32 35 36 20 73 74 72 69 6E 67 20 64 65 66 0A 20 20 2F 62
75 66 32 20 31 36 20 73 74 72 69 6E 67 20 64 65 66 0A 0A 20 20 2F 70 72
61 6E 79 09 25 20 64 69 63 74 20 64 69 63 74 6E 61 6D 65 20 70 72 69 6E
74 6E 61 6D 65 20 2D 3E 20 64 69 63 74 0A 20 20 7B 0A 20 20 20 20 32 20
69 6E 64 65 78 20 32 20 69 6E 64 65 78 20 63 76 6E 20 6B 6E 6F 77 6E 0A
20 20 20 20 7B 0A 20 20 20 20 20 20 70 72 69 6E 74 20 25 20 70 72 69 6E
74 6E 61 6D 65 0A 20 20 20 20 20 20 28 20 29 20 70 72 69 6E 74 0A 20 20
20 20 20 20 31 20 69 6E 64 65 78 20 65 78 63 68 20 63 76 6E 20 67 65 74
20 3D 0A 20 20 20 20 7D 0A 20 20 20 20 7B 0A 20 20 20 20 20 20 28 43 6F
6D 6D 65 6E 74 20 2F 46 6F 6E 74 49 6E 66 6F 20 63 6F 6E 74 61 69 6E 73
20 6E 6F 20 2F 29 20 70 72 69 6E 74 0A 20 20 20 20 20 20 32 20 63 6F 70
79 20 65 71 0A 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20 20 20 3D 20 25
20 70 72 69 6E 74 6E 61 6D 65 0A 09 70 6F 70 20 25 20 64 69 63 74 6E 61
6D 65 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 7B 0A 09 65 78 63 68
0A 09 70 72 69 6E 74 20 25 20 64 69 63 74 6E 61 6D 65 0A 09 28 2C 20 74
68 65 72 65 66 6F 72 65 20 6E 6F 20 29 20 70 72 69 6E 74 0A 09 3D 20 25
20 70 72 69 6E 74 6E 61 6D 65 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20
20 69 66 65 6C 73 65 0A 20 20 20 20 7D 0A 20 20 20 20 69 66 65 6C 73 65
0A 20 20 7D 0A 20 20 62 69 6E 64 20 64 65 66 0A 0A 20 20 2F 70 72 69 6E
74 66 6F 6E 74 6E 61 6D 65 0A 20 20 7B 0A 20 20 20 20 28 46 6F 6E 74 4E
61 6D 65 29 64 75 70 20 70 72 61 6E 79 0A 20 20 7D 0A 20 20 62 69 6E 64
20 64 65 66 0A 0A 20 20 2F 70 72 69 6E 74 66 6F 6E 74 69 6E 66 6F 0A 20
20 7B 0A 20 20 20 20 64 75 70 20 2F 46 6F 6E 74 49 6E 66 6F 20 6B 6E 6F
77 6E 0A 20 20 20 20 7B 0A 20 20 20 20 20 20 64 75 70 20 2F 46 6F 6E 74
49 6E 66 6F 20 67 65 74 0A 09 28 46 75 6C 6C 4E 61 6D 65 29 64 75 70 20
70 72 61 6E 79 0A 09 28 46 61 6D 69 6C 79 4E 61 6D 65 29 64 75 70 20 70
72 61 6E 79 0A 09 28 57 65 69 67 68 74 29 64 75 70 20 70 72 61 6E 79 0A
09 28 49 74 61 6C 69 63 41 6E 67 6C 65 29 64 75 70 20 70 72 61 6E 79 0A
09 28 69 73 46 69 78 65 64 50 69 74 63 68 29 28 49 73 46 69 78 65 64 50
69 74 63 68 29 20 70 72 61 6E 79 0A 09 28 55 6E 64 65 72 6C 69 6E 65 50
6F 73 69 74 69 6F 6E 29 64 75 70 20 70 72 61 6E 79 0A 09 28 55 6E 64 65
72 6C 69 6E 65 54 68 69 63 6B 6E 65 73 73 29 64 75 70 20 70 72 61 6E 79
0A 09 28 56 65 72 73 69 6F 6E 29 28 76 65 72 73 69 6F 6E 29 20 70 72 61
6E 79 0A 09 28 4E 6F 74 69 63 65 29 64 75 70 20 70 72 61 6E 79 0A 20 20
20 20 20 20 70 6F 70 0A 20 20 20 20 7D 0A 20 20 20 20 7B 0A 20 20 20 20
20 20 28 43 6F 6D 6D 65 6E 74 20 46 6F 6E 74 20 6C 61 63 6B 73 20 61 20
2F 46 6F 6E 74 49 6E 66 6F 21 29 3D 0A 20 20 20 20 7D 0A 20 20 20 20 69
66 65 6C 73 65 0A 20 20 7D 0A 20 20 62 69 6E 64 20 64 65 66 0A 0A 20 20
2F 70 72 62 62 6F 78 20 25 20 6C 6C 78 20 6C 6C 79 20 75 72 78 20 75 72
79 20 2D 3E 20 2D 0A 20 20 7B 0A 20 20 20 20 34 20 31 20 72 6F 6C 6C 20
33 20 31 20 72 6F 6C 6C 20 65 78 63 68 20 25 20 73 77 61 70 20 74 6F 70
20 34 20 65 6C 65 6D 65 6E 74 73 0A 20 20 20 20 34 20 7B 20 28 20 29 20
70 72 69 6E 74 20 62 75 66 20 63 76 73 20 70 72 69 6E 74 20 7D 20 72 65
70 65 61 74 0A 20 20 7D 0A 20 20 62 69 6E 64 20 64 65 66 0A 0A 20 20 2F
67 65 74 62 62 6F 78 20 25 20 66 6F 6E 74 64 69 63 74 20 63 68 61 72 64
69 63 74 20 63 68 61 72 61 63 74 65 72 20 2D 3E 20 66 6F 6E 74 64 69 63
74 20 63 68 61 72 64 69 63 74 20 6C 6C 78 20 6C 6C 79 20 75 72 78 20 75
72 79 0A 20 20 7B 0A 20 20 20 20 67 73 61 76 65 0A 20 20 20 20 20 20 32
20 69 6E 64 65 78 20 73 65 74 66 6F 6E 74 20 30 20 30 20 6D 6F 76 65 74
6F 0A 20 20 20 20 20 20 66 61 6C 73 65 20 63 68 61 72 70 61 74 68 20 66
6C 61 74 74 65 6E 70 61 74 68 20 70 61 74 68 62 62 6F 78 0A 20 20 20 20
67 72 65 73 74 6F 72 65 0A 20 20 7D 0A 20 20 62 69 6E 64 20 64 65 66 0A
0A 20 20 2F 70 72 69 6E 74 6D 69 73 63 69 6E 66 6F 0A 20 20 7B 0A 20 20
20 20 64 75 70 20 2F 46 6F 6E 74 42 42 6F 78 20 6B 6E 6F 77 6E 0A 20 20
20 20 7B 0A 20 20 20 20 20 20 28 46 6F 6E 74 42 42 6F 78 29 20 70 72 69
6E 74 0A 20 20 20 20 20 20 64 75 70 20 2F 46 6F 6E 74 42 42 6F 78 20 67
65 74 20 61 6C 6F 61 64 20 70 6F 70 20 70 72 62 62 6F 78 20 28 29 3D 0A
20 20 20 20 7D 0A 20 20 20 20 7B 0A 20 20 20 20 20 20 28 43 6F 6D 6D 65
6E 74 20 6D 69 73 73 69 6E 67 20 72 65 71 75 69 72 65 64 20 2F 46 6F 6E
74 42 42 6F 78 29 3D 0A 20 20 20 20 20 20 71 75 69 74 0A 20 20 20 20 7D
0A 20 20 20 20 69 66 65 6C 73 65 0A 20 20 20 20 32 20 63 6F 70 79 20 65
78 63 68 20 67 65 74 0A 20 20 20 20 20 20 64 75 70 20 2F 48 20 6B 6E 6F
77 6E 0A 20 20 20 20 20 20 31 20 69 6E 64 65 78 20 2F 78 20 6B 6E 6F 77
6E 20 61 6E 64 0A 20 20 20 20 20 20 31 20 69 6E 64 65 78 20 2F 64 20 6B
6E 6F 77 6E 20 61 6E 64 0A 20 20 20 20 20 20 31 20 69 6E 64 65 78 20 2F
70 20 6B 6E 6F 77 6E 20 61 6E 64 0A 20 20 20 20 20 20 64 75 70 20 2F 6C
6F 6F 6B 73 52 6F 6D 61 6E 20 65 78 63 68 20 64 65 66 0A 20 20 20 20 20
20 7B 0A 09 28 43 61 70 48 65 69 67 68 74 20 29 20 70 72 69 6E 74 0A 09
28 48 29 20 67 65 74 62 62 6F 78 0A 09 63 65 69 6C 69 6E 67 20 63 76 69
20 3D 20 70 6F 70 20 70 6F 70 20 70 6F 70 0A 09 28 58 48 65 69 67 68 74
20 29 20 70 72 69 6E 74 0A 09 28 78 29 20 67 65 74 62 62 6F 78 0A 09 63
65 69 6C 69 6E 67 20 63 76 69 20 3D 20 70 6F 70 20 70 6F 70 20 70 6F 70
0A 09 28 41 73 63 65 6E 64 65 72 20 29 20 70 72 69 6E 74 0A 09 28 64 29
20 67 65 74 62 62 6F 78 0A 09 63 65 69 6C 69 6E 67 20 63 76 69 20 3D 20
70 6F 70 20 70 6F 70 20 70 6F 70 0A 09 28 44 65 73 63 65 6E 64 65 72 20
29 20 70 72 69 6E 74 0A 09 28 70 29 20 67 65 74 62 62 6F 78 0A 09 70 6F
70 20 70 6F 70 20 66 6C 6F 6F 72 20 63 76 69 20 3D 20 70 6F 70 0A 20 20
20 20 20 20 7D 0A 20 20 20 20 20 20 7B 0A 09 28 43 6F 6D 6D 65 6E 74 20
66 6F 6E 74 20 64 6F 65 73 6E 27 74 20 63 6F 6E 74 61 69 6E 20 48 2C 20
78 2C 20 64 20 61 6E 64 20 70 3B 20 74 68 65 72 65 66 6F 72 65 20 6E 6F
20 43 61 70 48 65 69 67 68 74 2C 20 58 48 65 69 67 68 74 2C 20 41 73 63
65 6E 64 65 72 20 61 6E 64 20 44 65 73 63 65 6E 64 65 72 29 3D 0A 20 20
20 20 20 20 7D 0A 20 20 20 20 20 20 69 66 65 6C 73 65 0A 20 20 20 20 70
6F 70 0A 20 20 20 20 64 75 70 20 2F 45 6E 63 6F 64 69 6E 67 20 67 65 74
0A 20 20 20 20 20 20 5B 0A 09 5B 20 28 49 53 4F 4C 61 74 69 6E 31 45 6E
63 6F 64 69 6E 67 29 20 2F 49 53 4F 4C 61 74 69 6E 31 45 6E 63 6F 64 69
6E 67 20 5D 0A 09 5B 20 28 41 64 6F 62 65 53 74 61 6E 64 61 72 64 45 6E
63 6F 64 69 6E 67 29 20 2F 53 74 61 6E 64 61 72 64 45 6E 63 6F 64 69 6E
67 20 5D 0A 20 20 20 20 20 20 5D 0A 20 20 20 20 20 20 7B 0A 09 61 6C 6F
61 64 20 70 6F 70 20 64 75 70 20 77 68 65 72 65 0A 09 7B 0A 09 20 20 65
78 63 68 20 67 65 74 20 32 20 69 6E 64 65 78 20 65 71 0A 09 20 20 7B 0A
09 20 20 20 20 28 45 6E 63 6F 64 69 6E 67 53 63 68 65 6D 65 20 29 20 70
72 69 6E 74 0A 09 20 20 20 20 62 75 66 20 63 76 73 20 3D 0A 09 20 20 7D
0A 09 20 20 7B 0A 09 20 20 20 20 70 6F 70 0A 09 20 20 7D 0A 09 20 20 69
66 65 6C 73 65 0A 09 7D 0A 09 7B 0A 09 20 20 70 6F 70 20 70 6F 70 0A 09
7D 0A 09 69 66 65 6C 73 65 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20
66 6F 72 61 6C 6C 0A 20 20 20 20 70 6F 70 0A 20 20 7D 0A 20 20 62 69 6E
64 20 64 65 66 0A 0A 20 20 2F 70 72 69 6E 74 63 68 61 72 6D 65 74 72 69
63 0A 20 20 7B 0A 20 20 20 20 25 20 63 68 61 72 64 69 63 74 6E 61 6D 65
20 66 6F 6E 74 64 69 63 74 20 63 68 61 72 6E 61 6D 65 64 69 63 74 20 65
6E 63 6F 64 69 6E 67 20 63 68 61 72 69 6E 64 65 78 20 63 68 61 72 6E 61
6D 65 0A 0A 20 20 20 20 34 20 69 6E 64 65 78 20 64 75 70 20 6C 65 6E 67
74 68 20 64 69 63 74 20 64 75 70 20 62 65 67 69 6E 20 65 78 63 68 0A 20
20 20 20 20 20 7B 0A 09 31 20 69 6E 64 65 78 20 2F 46 49 44 20 6E 65 0A
09 32 20 69 6E 64 65 78 20 2F 55 6E 69 71 75 65 49 44 20 6E 65 0A 09 61
6E 64 0A 09 7B 0A 09 20 20 31 20 69 6E 64 65 78 20 2F 45 6E 63 6F 64 69
6E 67 20 65 71 20 7B 20 32 35 36 20 61 72 72 61 79 20 63 6F 70 79 20 7D
20 69 66 0A 09 20 20 64 65 66 0A 09 7D 0A 09 7B 20 70 6F 70 20 70 6F 70
20 7D 0A 09 69 66 65 6C 73 65 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20
20 66 6F 72 61 6C 6C 0A 20 20 20 20 65 6E 64 0A 20 20 20 20 64 75 70 20
2F 45 6E 63 6F 64 69 6E 67 20 67 65 74 20 33 32 20 33 20 69 6E 64 65 78
20 70 75 74 0A 20 20 20 20 2F 66 32 20 65 78 63 68 20 64 65 66 69 6E 65
66 6F 6E 74 0A 20 20 20 20 73 65 74 66 6F 6E 74 0A 0A 20 20 20 20 28 43
20 29 20 70 72 69 6E 74 0A 20 20 20 20 31 20 69 6E 64 65 78 20 62 75 66
20 63 76 73 20 70 72 69 6E 74 0A 0A 20 20 20 20 28 20 3B 20 57 58 20 29
20 70 72 69 6E 74 0A 25 20 4D 65 74 72 69 63 73 20 65 6E 74 72 69 65 73
20 61 72 65 3A 0A 25 20 20 20 20 20 20 20 31 20 6E 75 6D 62 65 72 3A 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 69 63 68 20 69 73 20 74
68 65 20 63 68 61 72 61 63 74 65 72 20 77 69 64 74 68 0A 25 20 20 20 20
20 20 20 61 6E 20 61 72 72 61 79 20 6F 66 20 32 20 6E 75 6D 62 65 72 73
3A 20 20 77 68 69 63 68 20 61 72 65 20 74 68 65 20 6C 65 66 74 20 73 69
64 65 62 65 61 72 69 6E 67 20 61 6E 64 20 77 69 64 74 68 0A 25 20 20 20
20 20 20 20 61 6E 20 61 72 72 61 79 20 6F 66 20 34 20 6E 75 6D 62 65 72
73 3A 20 20 78 20 26 20 79 20 6C 65 66 74 20 73 69 64 65 62 65 61 72 69
6E 67 2C 20 77 69 64 74 68 20 61 6E 64 20 68 65 69 67 68 74 0A 20 20 20
20 64 75 70 20 35 20 69 6E 64 65 78 20 20 20 20 20 20 20 20 20 25 20 2F
63 68 61 72 6E 61 6D 65 20 66 6F 6E 74 64 69 63 74 0A 20 20 20 20 64 75
70 20 2F 4D 65 74 72 69 63 73 20 6B 6E 6F 77 6E 20 7B 0A 20 20 20 20 20
20 20 2F 4D 65 74 72 69 63 73 20 67 65 74 20 65 78 63 68 20 32 20 63 6F
70 79 20 6B 6E 6F 77 6E 20 7B 0A 20 20 20 20 20 20 20 20 20 20 67 65 74
20 64 75 70 20 74 79 70 65 20 2F 61 72 72 61 79 74 79 70 65 20 65 71 20
7B 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 64 75 70 20 6C 65 6E 67 74
68 20 32 20 65 71 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 7B 31 20 67
65 74 7D 20 7B 32 20 67 65 74 7D 20 69 66 65 6C 73 65 0A 20 20 20 20 20
20 20 20 20 20 7D 20 69 66 0A 20 20 20 20 20 20 20 20 20 20 72 6F 75 6E
64 20 63 76 69 20 62 75 66 20 63 76 73 20 70 72 69 6E 74 0A 20 20 20 20
20 20 20 7D 20 7B 0A 20 20 20 20 20 20 20 20 20 20 70 6F 70 20 70 6F 70
20 28 20 29 20 73 74 72 69 6E 67 77 69 64 74 68 20 70 6F 70 20 72 6F 75
6E 64 20 63 76 69 20 62 75 66 20 63 76 73 20 70 72 69 6E 74 0A 20 20 20
20 20 20 20 7D 20 69 66 65 6C 73 65 0A 20 20 20 20 7D 20 7B 0A 20 20 20
20 20 20 20 70 6F 70 20 70 6F 70 20 28 20 29 20 73 74 72 69 6E 67 77 69
64 74 68 20 70 6F 70 20 72 6F 75 6E 64 20 63 76 69 20 62 75 66 20 63 76
73 20 70 72 69 6E 74 0A 20 20 20 20 7D 20 69 66 65 6C 73 65 0A 0A 20 20
20 20 28 20 3B 20 4E 20 29 20 70 72 69 6E 74 0A 20 20 20 20 64 75 70 20
62 75 66 20 63 76 73 20 70 72 69 6E 74 0A 0A 20 20 20 20 28 20 3B 20 42
29 20 70 72 69 6E 74 0A 20 20 20 20 67 73 61 76 65 0A 20 20 20 20 20 20
6E 65 77 70 61 74 68 20 30 20 30 20 6D 6F 76 65 74 6F 0A 20 20 20 20 20
20 28 20 29 20 74 72 75 65 20 63 68 61 72 70 61 74 68 20 66 6C 61 74 74
65 6E 70 61 74 68 20 70 61 74 68 62 62 6F 78 0A 20 20 20 20 67 72 65 73
74 6F 72 65 0A 20 20 20 20 32 20 7B 20 63 65 69 6C 69 6E 67 20 63 76 69
20 34 20 31 20 72 6F 6C 6C 20 7D 20 72 65 70 65 61 74 0A 20 20 20 20 32
20 7B 20 66 6C 6F 6F 72 20 63 76 69 20 34 20 31 20 72 6F 6C 6C 20 7D 20
72 65 70 65 61 74 0A 20 20 20 20 70 72 62 62 6F 78 0A 0A 20 20 20 20 6C
6F 6F 6B 73 52 6F 6D 61 6E 0A 20 20 20 20 7B 0A 20 20 20 20 20 20 5B 0A
09 5B 20 2F 66 20 5B 20 2F 69 20 2F 66 20 2F 6C 20 5D 20 5D 0A 09 5B 20
2F 66 66 20 5B 20 2F 69 20 2F 6C 20 5D 20 5D 0A 20 20 20 20 20 20 5D 0A
20 20 20 20 20 20 7B 0A 09 61 6C 6F 61 64 20 70 6F 70 20 31 20 69 6E 64
65 78 20 33 20 69 6E 64 65 78 20 65 71 0A 09 7B 0A 09 20 20 7B 20 0A 09
20 20 20 20 31 20 69 6E 64 65 78 20 62 75 66 20 63 76 73 0A 09 20 20 20
20 6C 65 6E 67 74 68 0A 09 20 20 20 20 31 20 69 6E 64 65 78 20 62 75 66
32 20 63 76 73 20 64 75 70 20 6C 65 6E 67 74 68 0A 09 20 20 20 20 32 20
69 6E 64 65 78 20 61 64 64 0A 09 20 20 20 20 62 75 66 0A 09 20 20 20 20
34 20 32 20 72 6F 6C 6C 20 70 75 74 69 6E 74 65 72 76 61 6C 0A 09 20 20
20 20 62 75 66 20 30 0A 09 20 20 20 20 33 20 2D 31 20 72 6F 6C 6C 20 67
65 74 69 6E 74 65 72 76 61 6C 0A 09 20 20 20 20 64 75 70 20 63 76 6E 0A
09 20 20 20 20 37 20 69 6E 64 65 78 0A 09 20 20 20 20 65 78 63 68 20 6B
6E 6F 77 6E 0A 09 20 20 20 20 7B 0A 09 20 20 20 20 20 20 65 78 63 68 0A
09 20 20 20 20 20 20 28 20 3B 20 4C 20 29 20 70 72 69 6E 74 0A 09 20 20
20 20 20 20 62 75 66 32 20 63 76 73 20 70 72 69 6E 74 0A 09 20 20 20 20
20 20 28 20 29 20 70 72 69 6E 74 0A 09 20 20 20 20 20 20 70 72 69 6E 74
0A 09 20 20 20 20 7D 0A 09 20 20 20 20 7B 0A 09 20 20 20 20 20 20 70 6F
70 20 70 6F 70 0A 09 20 20 20 20 7D 0A 09 20 20 20 20 69 66 65 6C 73 65
0A 09 20 20 7D 0A 09 20 20 66 6F 72 61 6C 6C 0A 09 20 20 70 6F 70 20 0A
09 7D 0A 09 7B 0A 09 20 20 70 6F 70 20 70 6F 70 0A 09 7D 0A 09 69 66 65
6C 73 65 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 66 6F 72 61 6C 6C
0A 20 20 20 20 7D 0A 20 20 20 20 69 66 0A 20 20 20 20 70 6F 70 0A 0A 20
20 20 20 28 20 3B 29 3D 0A 20 20 7D 0A 20 20 62 69 6E 64 20 64 65 66 0A
0A 20 20 2F 70 72 69 6E 74 63 68 61 72 6D 65 74 72 69 63 73 0A 20 20 7B
0A 20 20 20 20 28 53 74 61 72 74 43 68 61 72 4D 65 74 72 69 63 73 20 29
20 70 72 69 6E 74 0A 20 20 20 20 32 20 63 6F 70 79 20 65 78 63 68 20 67
65 74 20 6C 65 6E 67 74 68 20 31 20 73 75 62 20 62 75 66 20 63 76 73 20
3D 0A 0A 20 20 20 20 32 35 36 20 64 69 63 74 20 64 75 70 20 62 65 67 69
6E 0A 20 20 20 20 20 20 31 20 69 6E 64 65 78 20 2F 45 6E 63 6F 64 69 6E
67 20 67 65 74 0A 20 20 20 20 20 20 7B 20 6E 75 6C 6C 20 64 65 66 20 7D
0A 20 20 20 20 20 20 66 6F 72 61 6C 6C 0A 20 20 20 20 65 6E 64 0A 20 20
20 20 25 20 63 68 61 72 64 69 63 74 6E 61 6D 65 20 66 6F 6E 74 64 69 63
74 20 63 68 61 72 6E 61 6D 65 64 69 63 74 0A 20 20 20 20 31 20 69 6E 64
65 78 20 2F 45 6E 63 6F 64 69 6E 67 20 67 65 74 0A 20 20 20 20 30 20 31
20 32 35 35 0A 20 20 20 20 7B 0A 20 20 20 20 20 20 25 20 65 6E 63 6F 64
69 6E 67 20 69 6E 64 65 78 0A 20 20 20 20 20 20 32 20 63 6F 70 79 20 67
65 74 0A 20 20 20 20 20 20 64 75 70 20 2F 2E 6E 6F 74 64 65 66 20 65 71
20 7B 20 70 6F 70 20 7D 20 7B 20 70 72 69 6E 74 63 68 61 72 6D 65 74 72
69 63 20 7D 20 69 66 65 6C 73 65 0A 20 20 20 20 20 20 70 6F 70 20 25 20
69 6E 64 65 78 0A 20 20 20 20 7D 20 66 6F 72 0A 0A 20 20 20 20 2D 31 0A
20 20 20 20 33 20 69 6E 64 65 78 20 35 20 69 6E 64 65 78 20 67 65 74 0A
20 20 20 20 7B 0A 20 20 20 20 20 20 70 6F 70 0A 20 20 20 20 20 20 64 75
70 20 2F 2E 6E 6F 74 64 65 66 20 65 71 0A 20 20 20 20 20 20 7B 20 70 6F
70 20 7D 0A 20 20 20 20 20 20 7B 0A 09 25 20 63 68 61 72 64 69 63 74 6E
61 6D 65 20 66 6F 6E 74 64 69 63 74 20 63 68 61 72 6E 61 6D 65 64 69 63
74 20 65 6E 63 6F 64 69 6E 67 20 63 68 61 72 69 6E 64 65 78 20 63 68 61
72 6E 61 6D 65 0A 09 64 75 70 20 34 20 69 6E 64 65 78 20 65 78 63 68 20
6B 6E 6F 77 6E 0A 09 7B 20 70 6F 70 20 7D 0A 09 7B 20 70 72 69 6E 74 63
68 61 72 6D 65 74 72 69 63 20 7D 0A 09 69 66 65 6C 73 65 0A 20 20 20 20
20 20 7D 0A 20 20 20 20 20 20 69 66 65 6C 73 65 0A 20 20 20 20 7D 0A 20
20 20 20 66 6F 72 61 6C 6C 0A 20 20 20 20 25 20 63 68 61 72 6E 61 6D 65
64 69 63 74 20 65 6E 63 6F 64 69 6E 67 20 69 6E 64 65 78 0A 20 20 20 20
70 6F 70 20 70 6F 70 20 70 6F 70 0A 0A 20 20 20 20 28 45 6E 64 43 68 61
72 4D 65 74 72 69 63 73 29 3D 0A 20 20 7D 0A 20 20 62 69 6E 64 20 64 65
66 0A 0A 20 20 2F 70 72 69 6E 74 66 6F 6E 74 6D 65 74 72 69 63 73 0A 20
20 7B 0A 20 20 20 20 28 53 74 61 72 74 46 6F 6E 74 4D 65 74 72 69 63 73
20 33 2E 30 29 3D 0A 20 20 20 20 28 43 6F 6D 6D 65 6E 74 20 50 72 6F 64
75 63 65 64 20 62 79 20 67 65 74 61 66 6D 20 33 2E 30 20 28 77 68 69 63
68 20 69 73 20 62 79 20 72 6A 40 72 61 69 6E 62 6F 77 2E 69 6E 2D 62 65
72 6C 69 6E 2E 64 65 29 29 3D 0A 0A 20 20 20 20 70 72 69 6E 74 66 6F 6E
74 6E 61 6D 65 0A 20 20 20 20 70 72 69 6E 74 66 6F 6E 74 69 6E 66 6F 0A
20 20 20 20 70 72 69 6E 74 6D 69 73 63 69 6E 66 6F 0A 20 20 20 20 70 72
69 6E 74 63 68 61 72 6D 65 74 72 69 63 73 0A 0A 20 20 20 20 28 45 6E 64
46 6F 6E 74 4D 65 74 72 69 63 73 29 3D 0A 20 20 7D 0A 20 20 62 69 6E 64
20 64 65 66 0A 0A 65 6E 64 20 64 65 66 0A 0A 2F 67 65 74 61 66 6D 0A 7B
0A 20 20 67 65 74 61 66 6D 64 69 63 74 20 62 65 67 69 6E 0A 20 20 20 20
73 61 76 65 20 65 78 63 68 0A 20 20 20 20 20 20 66 69 6E 64 66 6F 6E 74
20 31 30 30 30 20 73 63 61 6C 65 66 6F 6E 74 20 0A 0A 20 20 20 20 20 20
6E 75 6C 6C 0A 20 20 20 20 20 20 5B 20 2F 43 68 61 72 44 65 66 73 20 2F
43 68 61 72 44 61 74 61 20 2F 43 68 61 72 50 72 6F 63 73 20 2F 43 68 61
72 53 74 72 69 6E 67 73 20 5D 0A 20 20 20 20 20 20 7B 0A 09 32 20 69 6E
64 65 78 20 31 20 69 6E 64 65 78 20 6B 6E 6F 77 6E 20 7B 20 65 78 63 68
20 7D 20 69 66 0A 09 70 6F 70 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20
20 66 6F 72 61 6C 6C 0A 20 20 20 20 20 20 64 75 70 20 6E 75 6C 6C 20 65
71 0A 20 20 20 20 20 20 7B 0A 09 28 63 61 6E 27 74 20 66 69 6E 64 20 64
69 63 74 69 6F 6E 61 72 79 20 77 69 74 68 20 63 68 61 72 61 63 74 65 72
20 64 61 74 61 21 29 3D 0A 09 71 75 69 74 0A 20 20 20 20 20 20 7D 0A 20
20 20 20 20 20 69 66 0A 20 20 20 20 20 20 65 78 63 68 20 25 20 64 69 63
74 6E 61 6D 65 20 66 6F 6E 74 64 69 63 74 0A 0A 20 20 20 20 20 20 70 72
69 6E 74 66 6F 6E 74 6D 65 74 72 69 63 73 0A 0A 20 20 20 20 20 20 70 6F
70 20 70 6F 70 0A 20 20 20 20 72 65 73 74 6F 72 65 0A 20 20 65 6E 64 0A
7D 0A 62 69 6E 64 20 64 65 66 0A 0A 2F 24 31 20 67 65 74 61 66 6D 0A 0A
45 4F 46 0A | #!/bin/sh if [ $# -ne 1
]; then echo "usage:
$0 font-name | gsnd - >f
ont-name.afm" >&2 exit
1 fi cat << EOF %! % p
roduce .afm for $1 % (c)
1993 by Robert Joop <rj
@rainbow.in-berlin.de> %
inspired by two other v
ersions of this theme wh
ich are % getafm 1.00 (c
) AJCD % and getafm.ps b
y an unknown author, % m
odified by J. Daniel Smi
th <dsmith@mailhost.aa.c
ad.slb.com> % Metrics d
ictionary code added by
AJCD, 7/6/93 /getafmdic
t 100 dict dup begin
/buf 256 string def /b
uf2 16 string def /pr
any % dict dictname prin
tname -> dict { 2
index 2 index cvn known
{ print % prin
tname ( ) print
1 index exch cvn get
= } { (Co
mment /FontInfo contains
no /) print 2 cop
y eq { = %
printname pop % dictna
me } { exch
print % dictname (, t
herefore no ) print = %
printname }
ifelse } ifelse
} bind def /prin
tfontname { (FontN
ame)dup prany } bind
def /printfontinfo
{ dup /FontInfo kno
wn { dup /Font
Info get (FullName)dup
prany (FamilyName)dup p
rany (Weight)dup prany
(ItalicAngle)dup prany
(isFixedPitch)(IsFixedP
itch) prany (UnderlineP
osition)dup prany (Unde
rlineThickness)dup prany
(Version)(version) pra
ny (Notice)dup prany
pop } {
(Comment Font lacks a
/FontInfo!)= } i
felse } bind def
/prbbox % llx lly urx ur
y -> - { 4 1 roll
3 1 roll exch % swap top
4 elements 4 { ( )
print buf cvs print } re
peat } bind def /
getbbox % fontdict chard
ict character -> fontdic
t chardict llx lly urx u
ry { gsave 2
index setfont 0 0 movet
o false charpath f
lattenpath pathbbox
grestore } bind def
/printmiscinfo {
dup /FontBBox known
{ (FontBBox) pri
nt dup /FontBBox g
et aload pop prbbox ()=
} { (Comme
nt missing required /Fon
tBBox)= quit }
ifelse 2 copy e
xch get dup /H kno
wn 1 index /x know
n and 1 index /d k
nown and 1 index /
p known and dup /l
ooksRoman exch def
{ (CapHeight ) print
(H) getbbox ceiling cvi
= pop pop pop (XHeight
) print (x) getbbox c
eiling cvi = pop pop pop
(Ascender ) print (d)
getbbox ceiling cvi =
pop pop pop (Descender
) print (p) getbbox po
p pop floor cvi = pop
} { (Comment
font doesn't contain H,
x, d and p; therefore no
CapHeight, XHeight, Asc
ender and Descender)=
} ifelse p
op dup /Encoding get
[ [ (ISOLatin1En
coding) /ISOLatin1Encodi
ng ] [ (AdobeStandardEn
coding) /StandardEncodin
g ] ] { alo
ad pop dup where { e
xch get 2 index eq {
(EncodingScheme ) p
rint buf cvs = }
{ pop } i
felse } { pop pop
} ifelse }
forall pop } bin
d def /printcharmetri
c { % chardictname
fontdict charnamedict e
ncoding charindex charna
me 4 index dup leng
th dict dup begin exch
{ 1 index /FID ne
2 index /UniqueID ne a
nd { 1 index /Encodi
ng eq { 256 array copy }
if def } { pop pop
} ifelse }
forall end dup
/Encoding get 32 3 index
put /f2 exch define
font setfont (C
) print 1 index buf
cvs print ( ; WX )
print % Metrics entries
are: % 1 number:
which is t
he character width %
an array of 2 numbers
: which are the left si
debearing and width %
an array of 4 number
s: x & y left sidebeari
ng, width and height
dup 5 index % /
charname fontdict du
p /Metrics known {
/Metrics get exch 2 co
py known { get
dup type /arraytype eq
{ dup lengt
h 2 eq {1 g
et} {2 get} ifelse
} if roun
d cvi buf cvs print
} { pop pop
( ) stringwidth pop rou
nd cvi buf cvs print
} ifelse } {
pop pop ( ) stringwi
dth pop round cvi buf cv
s print } ifelse
( ; N ) print dup
buf cvs print ( ; B
) print gsave
newpath 0 0 moveto
( ) true charpath flatt
enpath pathbbox gres
tore 2 { ceiling cvi
4 1 roll } repeat 2
{ floor cvi 4 1 roll }
repeat prbbox l
ooksRoman { [
[ /f [ /i /f /l ] ] [
/ff [ /i /l ] ] ]
{ aload pop 1 ind
ex 3 index eq { {
1 index buf cvs
length 1 index buf
2 cvs dup length 2
index add buf
4 2 roll putinterval
buf 0 3 -1 roll g
etinterval dup cvn
7 index exch k
nown { exch
( ; L ) print
buf2 cvs print
( ) print print
} { po
p pop } ifelse
} forall pop
} { pop pop } ife
lse } forall
} if pop
( ;)= } bind def
/printcharmetrics {
(StartCharMetrics )
print 2 copy exch g
et length 1 sub buf cvs
= 256 dict dup begi
n 1 index /Encodin
g get { null def }
forall end
% chardictname fontdic
t charnamedict 1 ind
ex /Encoding get 0 1
255 { % encod
ing index 2 copy g
et dup /.notdef eq
{ pop } { printcharmetr
ic } ifelse pop %
index } for -1
3 index 5 index get
{ pop du
p /.notdef eq { po
p } { % chardictn
ame fontdict charnamedic
t encoding charindex cha
rname dup 4 index exch
known { pop } { printc
harmetric } ifelse
} ifelse }
forall % charname
dict encoding index
pop pop pop (EndCha
rMetrics)= } bind de
f /printfontmetrics
{ (StartFontMetrics
3.0)= (Comment Prod
uced by getafm 3.0 (whic
h is by rj@rainbow.in-be
rlin.de))= printfon
tname printfontinfo
printmiscinfo pr
intcharmetrics (End
FontMetrics)= } bind
def end def /getafm {
getafmdict begin
save exch findfont
1000 scalefont
null [ /CharDefs /
CharData /CharProcs /Cha
rStrings ] { 2 in
dex 1 index known { exch
} if pop }
forall dup null e
q { (can't find d
ictionary with character
data!)= quit }
if exch % dic
tname fontdict pr
intfontmetrics po
p pop restore end
} bind def /$1 getafm
EOF |