!c99Shell v. 1.0 pre-release build #16!

Software: Apache/2.2.3 (CentOS). PHP/5.1.6 

uname -a: Linux mx-ll-110-164-51-230.static.3bb.co.th 2.6.18-194.el5PAE #1 SMP Fri Apr 2 15:37:44
EDT 2010 i686 

uid=48(apache) gid=48(apache) groups=48(apache) 

Safe-mode: OFF (not secure)

/usr/bin/   drwxr-xr-x
Free 52.23 GB of 127.8 GB (40.87%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     enc2xs (37.18 KB)      -rwxr-xr-x
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
Information:
Path /usr/bin/enc2xs
Size 37.18 KB
MD5 2148f6528726e793098d34093721348e
Owner/Group root/root
Perms-rwxr-xr-x
Create time 25/04/2011 18:08:42
Access time 31/07/2024 15:42:35
MODIFY time 03/09/2009 21:29:51

FULL HEXDUMP
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
00001800
00001818
00001830
00001848
00001860
00001878
00001890
000018A8
000018C0
000018D8
000018F0
00001908
00001920
00001938
00001950
00001968
00001980
00001998
000019B0
000019C8
000019E0
000019F8
00001A10
00001A28
00001A40
00001A58
00001A70
00001A88
00001AA0
00001AB8
00001AD0
00001AE8
00001B00
00001B18
00001B30
00001B48
00001B60
00001B78
00001B90
00001BA8
00001BC0
00001BD8
00001BF0
00001C08
00001C20
00001C38
00001C50
00001C68
00001C80
00001C98
00001CB0
00001CC8
00001CE0
00001CF8
00001D10
00001D28
00001D40
00001D58
00001D70
00001D88
00001DA0
00001DB8
00001DD0
00001DE8
00001E00
00001E18
00001E30
00001E48
00001E60
00001E78
00001E90
00001EA8
00001EC0
00001ED8
00001EF0
00001F08
00001F20
00001F38
00001F50
00001F68
00001F80
00001F98
00001FB0
00001FC8
00001FE0
00001FF8
00002010
00002028
00002040
00002058
00002070
00002088
000020A0
000020B8
000020D0
000020E8
00002100
00002118
00002130
00002148
00002160
00002178
00002190
000021A8
000021C0
000021D8
000021F0
00002208
00002220
00002238
00002250
00002268
00002280
00002298
000022B0
000022C8
000022E0
000022F8
00002310
00002328
00002340
00002358
00002370
00002388
000023A0
000023B8
000023D0
000023E8
00002400
00002418
00002430
00002448
00002460
00002478
00002490
000024A8
000024C0
000024D8
000024F0
00002508
00002520
00002538
00002550
00002568
00002580
00002598
000025B0
000025C8
000025E0
000025F8
00002610
00002628
00002640
00002658
00002670
00002688
000026A0
000026B8
000026D0
000026E8
00002700
00002718
00002730
00002748
00002760
00002778
00002790
000027A8
000027C0
000027D8
000027F0
00002808
00002820
00002838
00002850
00002868
00002880
00002898
000028B0
000028C8
000028E0
000028F8
00002910
00002928
00002940
00002958
00002970
00002988
000029A0
000029B8
000029D0
000029E8
00002A00
00002A18
00002A30
00002A48
00002A60
00002A78
00002A90
00002AA8
00002AC0
00002AD8
00002AF0
00002B08
00002B20
00002B38
00002B50
00002B68
00002B80
00002B98
00002BB0
00002BC8
00002BE0
00002BF8
00002C10
00002C28
00002C40
00002C58
00002C70
00002C88
00002CA0
00002CB8
00002CD0
00002CE8
00002D00
00002D18
00002D30
00002D48
00002D60
00002D78
00002D90
00002DA8
00002DC0
00002DD8
00002DF0
00002E08
00002E20
00002E38
00002E50
00002E68
00002E80
00002E98
00002EB0
00002EC8
00002EE0
00002EF8
00002F10
00002F28
00002F40
00002F58
00002F70
00002F88
00002FA0
00002FB8
00002FD0
00002FE8
00003000
00003018
00003030
00003048
00003060
00003078
00003090
000030A8
000030C0
000030D8
000030F0
00003108
00003120
00003138
00003150
00003168
00003180
00003198
000031B0
000031C8
000031E0
000031F8
00003210
00003228
00003240
00003258
00003270
00003288
000032A0
000032B8
000032D0
000032E8
00003300
00003318
00003330
00003348
00003360
00003378
00003390
000033A8
000033C0
000033D8
000033F0
00003408
00003420
00003438
00003450
00003468
00003480
00003498
000034B0
000034C8
000034E0
000034F8
00003510
00003528
00003540
00003558
00003570
00003588
000035A0
000035B8
000035D0
000035E8
00003600
00003618
00003630
00003648
00003660
00003678
00003690
000036A8
000036C0
000036D8
000036F0
00003708
00003720
00003738
00003750
00003768
00003780
00003798
000037B0
000037C8
000037E0
000037F8
00003810
00003828
00003840
00003858
00003870
00003888
000038A0
000038B8
000038D0
000038E8
00003900
00003918
00003930
00003948
00003960
00003978
00003990
000039A8
000039C0
000039D8
000039F0
00003A08
00003A20
00003A38
00003A50
00003A68
00003A80
00003A98
00003AB0
00003AC8
00003AE0
00003AF8
00003B10
00003B28
00003B40
00003B58
00003B70
00003B88
00003BA0
00003BB8
00003BD0
00003BE8
00003C00
00003C18
00003C30
00003C48
00003C60
00003C78
00003C90
00003CA8
00003CC0
00003CD8
00003CF0
00003D08
00003D20
00003D38
00003D50
00003D68
00003D80
00003D98
00003DB0
00003DC8
00003DE0
00003DF8
00003E10
00003E28
00003E40
00003E58
00003E70
00003E88
00003EA0
00003EB8
00003ED0
00003EE8
00003F00
00003F18
00003F30
00003F48
00003F60
00003F78
00003F90
00003FA8
00003FC0
00003FD8
00003FF0
00004008
00004020
00004038
00004050
00004068
00004080
00004098
000040B0
000040C8
000040E0
000040F8
00004110
00004128
00004140
00004158
00004170
00004188
000041A0
000041B8
000041D0
000041E8
00004200
00004218
00004230
00004248
00004260
00004278
00004290
000042A8
000042C0
000042D8
000042F0
00004308
00004320
00004338
00004350
00004368
00004380
00004398
000043B0
000043C8
000043E0
000043F8
00004410
00004428
00004440
00004458
00004470
00004488
000044A0
000044B8
000044D0
000044E8
00004500
00004518
00004530
00004548
00004560
00004578
00004590
000045A8
000045C0
000045D8
000045F0
00004608
00004620
00004638
00004650
00004668
00004680
00004698
000046B0
000046C8
000046E0
000046F8
00004710
00004728
00004740
00004758
00004770
00004788
000047A0
000047B8
000047D0
000047E8
00004800
00004818
00004830
00004848
00004860
00004878
00004890
000048A8
000048C0
000048D8
000048F0
00004908
00004920
00004938
00004950
00004968
00004980
00004998
000049B0
000049C8
000049E0
000049F8
00004A10
00004A28
00004A40
00004A58
00004A70
00004A88
00004AA0
00004AB8
00004AD0
00004AE8
00004B00
00004B18
00004B30
00004B48
00004B60
00004B78
00004B90
00004BA8
00004BC0
00004BD8
00004BF0
00004C08
00004C20
00004C38
00004C50
00004C68
00004C80
00004C98
00004CB0
00004CC8
00004CE0
00004CF8
00004D10
00004D28
00004D40
00004D58
00004D70
00004D88
00004DA0
00004DB8
00004DD0
00004DE8
00004E00
00004E18
00004E30
00004E48
00004E60
00004E78
00004E90
00004EA8
00004EC0
00004ED8
00004EF0
00004F08
00004F20
00004F38
00004F50
00004F68
00004F80
00004F98
00004FB0
00004FC8
00004FE0
00004FF8
00005010
00005028
00005040
00005058
00005070
00005088
000050A0
000050B8
000050D0
000050E8
00005100
00005118
00005130
00005148
00005160
00005178
00005190
000051A8
000051C0
000051D8
000051F0
00005208
00005220
00005238
00005250
00005268
00005280
00005298
000052B0
000052C8
000052E0
000052F8
00005310
00005328
00005340
00005358
00005370
00005388
000053A0
000053B8
000053D0
000053E8
00005400
00005418
00005430
00005448
00005460
00005478
00005490
000054A8
000054C0
000054D8
000054F0
00005508
00005520
00005538
00005550
00005568
00005580
00005598
000055B0
000055C8
000055E0
000055F8
00005610
00005628
00005640
00005658
00005670
00005688
000056A0
000056B8
000056D0
000056E8
00005700
00005718
00005730
00005748
00005760
00005778
00005790
000057A8
000057C0
000057D8
000057F0
00005808
00005820
00005838
00005850
00005868
00005880
00005898
000058B0
000058C8
000058E0
000058F8
00005910
00005928
00005940
00005958
00005970
00005988
000059A0
000059B8
000059D0
000059E8
00005A00
00005A18
00005A30
00005A48
00005A60
00005A78
00005A90
00005AA8
00005AC0
00005AD8
00005AF0
00005B08
00005B20
00005B38
00005B50
00005B68
00005B80
00005B98
00005BB0
00005BC8
00005BE0
00005BF8
00005C10
00005C28
00005C40
00005C58
00005C70
00005C88
00005CA0
00005CB8
00005CD0
00005CE8
00005D00
00005D18
00005D30
00005D48
00005D60
00005D78
00005D90
00005DA8
00005DC0
00005DD8
00005DF0
00005E08
00005E20
00005E38
00005E50
00005E68
00005E80
00005E98
00005EB0
00005EC8
00005EE0
00005EF8
00005F10
00005F28
00005F40
00005F58
00005F70
00005F88
00005FA0
00005FB8
00005FD0
00005FE8
00006000
00006018
00006030
00006048
00006060
00006078
00006090
000060A8
000060C0
000060D8
000060F0
00006108
00006120
00006138
00006150
00006168
00006180
00006198
000061B0
000061C8
000061E0
000061F8
00006210
00006228
00006240
00006258
00006270
00006288
000062A0
000062B8
000062D0
000062E8
00006300
00006318
00006330
00006348
00006360
00006378
00006390
000063A8
000063C0
000063D8
000063F0
00006408
00006420
00006438
00006450
00006468
00006480
00006498
000064B0
000064C8
000064E0
000064F8
00006510
00006528
00006540
00006558
00006570
00006588
000065A0
000065B8
000065D0
000065E8
00006600
00006618
00006630
00006648
00006660
00006678
00006690
000066A8
000066C0
000066D8
000066F0
00006708
00006720
00006738
00006750
00006768
00006780
00006798
000067B0
000067C8
000067E0
000067F8
00006810
00006828
00006840
00006858
00006870
00006888
000068A0
000068B8
000068D0
000068E8
00006900
00006918
00006930
00006948
00006960
00006978
00006990
000069A8
000069C0
000069D8
000069F0
00006A08
00006A20
00006A38
00006A50
00006A68
00006A80
00006A98
00006AB0
00006AC8
00006AE0
00006AF8
00006B10
00006B28
00006B40
00006B58
00006B70
00006B88
00006BA0
00006BB8
00006BD0
00006BE8
00006C00
00006C18
00006C30
00006C48
00006C60
00006C78
00006C90
00006CA8
00006CC0
00006CD8
00006CF0
00006D08
00006D20
00006D38
00006D50
00006D68
00006D80
00006D98
00006DB0
00006DC8
00006DE0
00006DF8
00006E10
00006E28
00006E40
00006E58
00006E70
00006E88
00006EA0
00006EB8
00006ED0
00006EE8
00006F00
00006F18
00006F30
00006F48
00006F60
00006F78
00006F90
00006FA8
00006FC0
00006FD8
00006FF0
00007008
00007020
00007038
00007050
00007068
00007080
00007098
000070B0
000070C8
000070E0
000070F8
00007110
00007128
00007140
00007158
00007170
00007188
000071A0
000071B8
000071D0
000071E8
00007200
00007218
00007230
00007248
00007260
00007278
00007290
000072A8
000072C0
000072D8
000072F0
00007308
00007320
00007338
00007350
00007368
00007380
00007398
000073B0
000073C8
000073E0
000073F8
00007410
00007428
00007440
00007458
00007470
00007488
000074A0
000074B8
000074D0
000074E8
00007500
00007518
00007530
00007548
00007560
00007578
00007590
000075A8
000075C0
000075D8
000075F0
00007608
00007620
00007638
00007650
00007668
00007680
00007698
000076B0
000076C8
000076E0
000076F8
00007710
00007728
00007740
00007758
00007770
00007788
000077A0
000077B8
000077D0
000077E8
00007800
00007818
00007830
00007848
00007860
00007878
00007890
000078A8
000078C0
000078D8
000078F0
00007908
00007920
00007938
00007950
00007968
00007980
00007998
000079B0
000079C8
000079E0
000079F8
00007A10
00007A28
00007A40
00007A58
00007A70
00007A88
00007AA0
00007AB8
00007AD0
00007AE8
00007B00
00007B18
00007B30
00007B48
00007B60
00007B78
00007B90
00007BA8
00007BC0
00007BD8
00007BF0
00007C08
00007C20
00007C38
00007C50
00007C68
00007C80
00007C98
00007CB0
00007CC8
00007CE0
00007CF8
00007D10
00007D28
00007D40
00007D58
00007D70
00007D88
00007DA0
00007DB8
00007DD0
00007DE8
00007E00
00007E18
00007E30
00007E48
00007E60
00007E78
00007E90
00007EA8
00007EC0
00007ED8
00007EF0
00007F08
00007F20
00007F38
00007F50
00007F68
00007F80
00007F98
00007FB0
00007FC8
00007FE0
00007FF8
00008010
00008028
00008040
00008058
00008070
00008088
000080A0
000080B8
000080D0
000080E8
00008100
00008118
00008130
00008148
00008160
00008178
00008190
000081A8
000081C0
000081D8
000081F0
00008208
00008220
00008238
00008250
00008268
00008280
00008298
000082B0
000082C8
000082E0
000082F8
00008310
00008328
00008340
00008358
00008370
00008388
000083A0
000083B8
000083D0
000083E8
00008400
00008418
00008430
00008448
00008460
00008478
00008490
000084A8
000084C0
000084D8
000084F0
00008508
00008520
00008538
00008550
00008568
00008580
00008598
000085B0
000085C8
000085E0
000085F8
00008610
00008628
00008640
00008658
00008670
00008688
000086A0
000086B8
000086D0
000086E8
00008700
00008718
00008730
00008748
00008760
00008778
00008790
000087A8
000087C0
000087D8
000087F0
00008808
00008820
00008838
00008850
00008868
00008880
00008898
000088B0
000088C8
000088E0
000088F8
00008910
00008928
00008940
00008958
00008970
00008988
000089A0
000089B8
000089D0
000089E8
00008A00
00008A18
00008A30
00008A48
00008A60
00008A78
00008A90
00008AA8
00008AC0
00008AD8
00008AF0
00008B08
00008B20
00008B38
00008B50
00008B68
00008B80
00008B98
00008BB0
00008BC8
00008BE0
00008BF8
00008C10
00008C28
00008C40
00008C58
00008C70
00008C88
00008CA0
00008CB8
00008CD0
00008CE8
00008D00
00008D18
00008D30
00008D48
00008D60
00008D78
00008D90
00008DA8
00008DC0
00008DD8
00008DF0
00008E08
00008E20
00008E38
00008E50
00008E68
00008E80
00008E98
00008EB0
00008EC8
00008EE0
00008EF8
00008F10
00008F28
00008F40
00008F58
00008F70
00008F88
00008FA0
00008FB8
00008FD0
00008FE8
00009000
00009018
00009030
00009048
00009060
00009078
00009090
000090A8
000090C0
000090D8
000090F0
00009108
00009120
00009138
00009150
00009168
00009180
00009198
000091B0
000091C8
000091E0
000091F8
00009210
00009228
00009240
00009258
00009270
00009288
000092A0
000092B8
000092D0
000092E8
00009300
00009318
00009330
00009348
00009360
00009378
00009390
000093A8
000093C0
000093D8
000093F0
00009408
00009420
00009438
00009450
00009468
00009480
00009498
000094B0
23 21 2F 75 73 72 2F 62 69 6E 2F 70 65 72 6C 0A 20 20 20 20 65 76 61 6C
20 27 65 78 65 63 20 2F 75 73 72 2F 62 69 6E 2F 70 65 72 6C 20 2D 53 20
24 30 20 24 7B 31 2B 22 24 40 22 7D 27 0A 09 69 66 20 24 72 75 6E 6E 69
6E 67 5F 75 6E 64 65 72 5F 73 6F 6D 65 5F 73 68 65 6C 6C 3B 0A 23 21 2E
2F 70 65 72 6C 0A 42 45 47 49 4E 20 7B 0A 20 20 20 20 23 20 40 49 4E 43
20 70 6F 6B 69 6E 67 20 20 6E 6F 20 6C 6F 6E 67 65 72 20 6E 65 65 64 65
64 20 77 2F 20 6E 65 77 20 4D 61 6B 65 4D 61 6B 65 72 20 61 6E 64 20 4D
61 6B 65 66 69 6C 65 2E 50 4C 27 73 0A 20 20 20 20 23 20 77 69 74 68 20
24 45 4E 56 7B 50 45 52 4C 5F 43 4F 52 45 7D 20 73 65 74 0A 20 20 20 20
23 20 49 6E 20 63 61 73 65 20 77 65 20 6E 65 65 64 20 69 74 20 69 6E 20
66 75 74 75 72 65 2E 2E 2E 0A 20 20 20 20 72 65 71 75 69 72 65 20 43 6F
6E 66 69 67 3B 20 69 6D 70 6F 72 74 20 43 6F 6E 66 69 67 3B 0A 7D 0A 75
73 65 20 73 74 72 69 63 74 3B 0A 75 73 65 20 77 61 72 6E 69 6E 67 73 3B
0A 75 73 65 20 47 65 74 6F 70 74 3A 3A 53 74 64 3B 0A 6D 79 20 40 6F 72
69 67 5F 41 52 47 56 20 3D 20 40 41 52 47 56 3B 0A 6F 75 72 20 24 56 45
52 53 49 4F 4E 20 20 3D 20 64 6F 20 7B 20 6D 79 20 40 72 20 3D 20 28 71
24 52 65 76 69 73 69 6F 6E 3A 20 32 2E 31 20 24 20 3D 7E 20 2F 5C 64 2B
2F 67 29 3B 20 73 70 72 69 6E 74 66 20 22 25 64 2E 22 2E 22 25 30 32 64
22 20 78 20 24 23 72 2C 20 40 72 20 7D 3B 0A 0A 23 20 54 68 65 73 65 20
6D 61 79 20 67 65 74 20 72 65 2D 6F 72 64 65 72 65 64 2E 0A 23 20 52 41
57 20 69 73 20 61 20 64 6F 5F 6E 6F 77 20 61 73 20 69 6E 73 65 72 74 65
64 20 62 79 20 26 65 6E 74 65 72 0A 23 20 41 47 47 20 69 73 20 61 6E 20
61 67 67 72 65 61 67 61 74 65 64 20 64 6F 5F 6E 6F 77 2C 20 61 73 20 62
75 69 6C 74 20 75 70 20 62 79 20 26 70 72 6F 63 65 73 73 0A 0A 75 73 65
20 63 6F 6E 73 74 61 6E 74 20 7B 0A 20 20 52 41 57 5F 4E 45 58 54 20 3D
3E 20 30 2C 0A 20 20 52 41 57 5F 49 4E 5F 4C 45 4E 20 3D 3E 20 31 2C 0A
20 20 52 41 57 5F 4F 55 54 5F 42 59 54 45 53 20 3D 3E 20 32 2C 0A 20 20
52 41 57 5F 46 41 4C 4C 42 41 43 4B 20 3D 3E 20 33 2C 0A 0A 20 20 41 47
47 5F 4D 49 4E 5F 49 4E 20 3D 3E 20 30 2C 0A 20 20 41 47 47 5F 4D 41 58
5F 49 4E 20 3D 3E 20 31 2C 0A 20 20 41 47 47 5F 4F 55 54 5F 42 59 54 45
53 20 3D 3E 20 32 2C 0A 20 20 41 47 47 5F 4E 45 58 54 20 3D 3E 20 33 2C
0A 20 20 41 47 47 5F 49 4E 5F 4C 45 4E 20 3D 3E 20 34 2C 0A 20 20 41 47
47 5F 4F 55 54 5F 4C 45 4E 20 3D 3E 20 35 2C 0A 20 20 41 47 47 5F 46 41
4C 4C 42 41 43 4B 20 3D 3E 20 36 2C 0A 7D 3B 0A 0A 23 20 28 53 65 65 20
74 68 65 20 61 6C 67 6F 72 69 74 68 6D 20 69 6E 20 65 6E 63 65 6E 67 69
6E 65 2E 63 20 2D 20 77 65 27 72 65 20 62 75 69 6C 64 69 6E 67 20 73 74
72 75 63 74 75 72 65 73 20 66 6F 72 20 69 74 29 0A 0A 23 20 54 68 65 72
65 20 61 72 65 20 74 77 6F 20 73 6F 72 74 73 20 6F 66 20 73 74 72 75 63
74 75 72 65 73 2E 0A 23 20 22 64 6F 5F 6E 6F 77 22 20 28 61 6E 20 61 72
72 61 79 2C 20 74 77 6F 20 76 61 72 69 61 6E 74 73 20 6F 66 20 77 68 61
74 20 6E 65 65 64 73 20 73 74 6F 72 69 6E 67 29 20 69 73 20 77 68 61 74
65 76 65 72 20 77 65 20 6E 65 65 64 0A 23 20 74 6F 20 64 6F 20 6E 6F 77
20 77 65 27 76 65 20 72 65 61 64 20 61 6E 20 69 6E 70 75 74 20 62 79 74
65 2E 0A 23 20 49 74 27 73 20 68 6F 75 73 65 64 20 69 6E 20 61 20 22 64
6F 5F 6E 65 78 74 22 20 28 77 68 69 63 68 20 69 73 20 68 6F 77 20 77 65
20 67 6F 74 20 74 6F 20 69 74 29 2C 20 61 6E 64 20 69 6E 20 74 75 72 6E
20 70 6F 69 6E 74 73 0A 23 20 74 6F 20 61 20 22 64 6F 5F 6E 65 78 74 22
20 77 68 69 63 68 20 63 6F 6E 74 61 69 6E 73 20 61 6C 6C 20 74 68 65 20
22 64 6F 5F 6E 6F 77 22 73 20 66 6F 72 20 74 68 65 20 6E 65 78 74 20 69
6E 70 75 74 20 62 79 74 65 2E 0A 0A 23 20 54 68 65 72 65 20 77 69 6C 6C
20 62 65 20 61 20 22 64 6F 5F 6E 65 78 74 22 20 77 68 69 63 68 20 69 73
20 74 68 65 20 73 74 61 72 74 20 73 74 61 74 65 2E 0A 23 20 46 6F 72 20
61 20 73 69 6E 67 6C 65 20 62 79 74 65 20 65 6E 63 6F 64 69 6E 67 20 69
74 27 73 20 74 68 65 20 6F 6E 6C 79 20 22 64 6F 5F 6E 65 78 74 22 20 2D
20 65 61 63 68 20 22 64 6F 5F 6E 6F 77 22 20 70 6F 69 6E 74 73 0A 23 20
62 61 63 6B 20 74 6F 20 69 74 2C 20 61 6E 64 20 65 61 63 68 20 22 64 6F
5F 6E 6F 77 22 20 77 69 6C 6C 20 63 61 75 73 65 20 62 79 74 65 73 2E 20
54 68 65 72 65 20 69 73 20 6E 6F 20 73 74 61 74 65 2E 0A 0A 23 20 46 6F
72 20 61 20 6D 75 6C 74 69 2D 62 79 74 65 20 65 6E 63 6F 64 69 6E 67 20
77 68 65 72 65 20 61 6C 6C 20 63 68 61 72 61 63 74 65 72 73 20 69 6E 20
74 68 65 20 69 6E 70 75 74 20 61 72 65 20 74 68 65 20 73 61 6D 65 0A 23
20 6C 65 6E 67 74 68 2C 20 74 68 65 6E 20 74 68 65 72 65 20 77 69 6C 6C
20 62 65 20 61 20 74 72 65 65 20 6F 66 20 22 64 6F 5F 6E 6F 77 22 2D 3E
22 64 6F 5F 6E 65 78 74 22 2D 3E 22 64 6F 5F 6E 6F 77 22 0A 23 20 62 72
61 6E 63 68 69 6E 67 20 6F 75 74 20 66 72 6F 6D 20 74 68 65 20 73 74 61
72 74 20 73 74 61 74 65 2C 20 6F 6E 65 20 73 74 65 70 20 66 6F 72 20 65
61 63 68 20 69 6E 70 75 74 20 62 79 74 65 2E 0A 23 20 54 68 65 20 6C 65
61 66 20 22 64 6F 5F 6E 6F 77 22 73 20 77 69 6C 6C 20 61 6C 6C 20 62 65
20 61 74 20 74 68 65 20 73 61 6D 65 20 64 69 73 74 61 6E 63 65 20 66 72
6F 6D 20 74 68 65 20 73 74 61 72 74 20 73 74 61 74 65 2C 0A 23 20 6F 6E
6C 79 20 74 68 65 20 6C 65 61 66 20 22 64 6F 5F 6E 6F 77 22 73 20 63 61
75 73 65 20 6F 75 74 70 75 74 20 62 79 74 65 73 2C 20 61 6E 64 20 74 68
65 79 20 69 6E 20 74 75 72 6E 20 70 6F 69 6E 74 20 62 61 63 6B 20 74 6F
0A 23 20 74 68 65 20 73 74 61 72 74 20 73 74 61 74 65 2E 0A 0A 23 20 46
6F 72 20 61 6E 20 65 6E 63 6F 64 69 6E 67 20 77 68 65 72 65 20 74 68 65
72 65 20 61 72 65 20 76 61 72 61 69 62 6C 65 20 6C 65 6E 67 74 68 20 69
6E 70 75 74 20 62 79 74 65 20 73 65 71 75 65 6E 63 65 73 2C 20 79 6F 75
0A 23 20 77 69 6C 6C 20 65 6E 63 6F 75 6E 74 65 72 20 61 20 6C 65 61 66
20 22 64 6F 5F 6E 6F 77 22 20 73 6F 6F 6E 65 72 20 66 6F 72 20 74 68 65
20 73 68 6F 72 74 65 72 20 69 6E 70 75 74 20 73 65 71 75 65 6E 63 65 73
2C 20 62 75 74 0A 23 20 61 73 20 62 65 66 6F 72 65 20 74 68 65 20 6C 65
61 76 65 73 20 77 69 6C 6C 20 70 6F 69 6E 74 20 62 61 63 6B 20 74 6F 20
74 68 65 20 73 74 61 72 74 20 73 74 61 74 65 2E 0A 0A 23 20 54 68 65 20
73 79 73 74 65 6D 20 77 69 6C 6C 20 63 6F 70 65 20 77 69 74 68 20 65 73
63 61 70 65 20 65 6E 63 6F 64 69 6E 67 73 20 28 69 6D 61 67 69 6E 65 20
74 68 65 6D 20 61 73 20 61 20 6D 6F 73 74 6C 79 0A 23 20 73 65 6C 66 2D
63 6F 6E 74 61 69 6E 65 64 20 74 72 65 65 20 66 6F 72 20 65 61 63 68 20
65 73 63 61 70 65 20 73 74 61 74 65 2C 20 61 6E 64 20 63 72 6F 73 73 20
6C 69 6E 6B 73 20 62 65 74 77 65 65 6E 20 74 72 65 65 73 0A 23 20 61 74
20 74 68 65 20 73 74 61 74 65 2D 73 77 69 74 63 68 69 6E 67 20 63 68 61
72 61 63 74 65 72 73 29 20 62 75 74 20 73 6F 20 66 61 72 20 6E 6F 20 69
6E 70 75 74 20 66 6F 72 6D 61 74 20 64 65 66 69 6E 65 73 20 74 68 65 73
65 2E 0A 0A 23 20 54 68 65 20 73 79 73 74 65 6D 20 77 69 6C 6C 20 61 6C
73 6F 20 63 6F 70 65 20 77 69 74 68 20 68 61 76 69 6E 67 20 6F 75 74 70
75 74 20 22 6C 65 61 76 65 73 22 20 69 6E 20 74 68 65 20 6D 69 64 64 6C
65 20 6F 66 0A 23 20 74 68 65 20 62 69 66 75 72 63 61 74 69 6E 67 20 62
72 61 6E 63 68 65 73 2C 20 6E 6F 74 20 6A 75 73 74 20 61 74 20 74 68 65
20 65 78 74 72 65 6D 69 74 69 65 73 2C 20 62 75 74 20 61 67 61 69 6E 20
6E 6F 0A 23 20 69 6E 70 75 74 20 66 6F 72 6D 61 74 20 64 6F 65 73 20 74
68 69 73 20 79 65 74 2E 0A 0A 23 20 54 68 65 72 65 20 61 72 65 20 74 77
6F 20 76 61 72 69 61 6E 74 73 20 6F 66 20 74 68 65 20 22 64 6F 5F 6E 6F
77 22 20 73 74 72 75 63 74 75 72 65 2E 20 54 68 65 20 66 69 72 73 74 2C
20 73 6D 61 6C 6C 65 72 20 76 61 72 69 61 6E 74 0A 23 20 69 73 20 67 65
6E 65 72 61 74 65 64 20 62 79 20 26 65 6E 74 65 72 20 61 73 20 74 68 65
20 69 6E 70 75 74 20 66 69 6C 65 20 69 73 20 72 65 61 64 2E 20 54 68 65
72 65 20 69 73 20 6F 6E 65 20 73 74 72 75 63 74 75 72 65 0A 23 20 66 6F
72 20 65 61 63 68 20 69 6E 70 75 74 20 62 79 74 65 2E 20 53 61 79 20 77
65 20 61 72 65 20 6D 61 70 70 69 6E 67 20 61 20 73 69 6E 67 6C 65 20 62
79 74 65 20 65 6E 63 6F 64 69 6E 67 20 74 6F 20 61 0A 23 20 73 69 6E 67
6C 65 20 62 79 74 65 20 65 6E 63 6F 64 69 6E 67 2C 20 77 69 74 68 20 20
22 41 42 43 44 22 20 67 6F 69 6E 67 20 22 61 62 63 64 22 2E 20 54 68 65
72 65 20 77 69 6C 6C 20 62 65 0A 23 20 34 20 22 64 6F 5F 6E 6F 77 22 73
2C 20 7B 22 41 22 20 3D 3E 20 5B 2E 2E 2E 2C 22 61 22 2C 2E 2E 2E 5D 2C
20 22 42 22 20 3D 3E 20 5B 2E 2E 2E 2C 22 62 22 2C 2E 2E 2E 5D 2C 20 22
43 22 3D 3E 2E 2E 2E 2C 20 22 44 22 3D 3E 2E 2E 2E 7D 0A 0A 23 20 26 70
72 6F 63 65 73 73 20 74 68 65 6E 20 77 61 6C 6B 73 20 74 68 65 20 74 72
65 65 2C 20 62 75 69 6C 64 69 6E 67 20 61 67 67 72 65 67 61 74 65 20 22
64 6F 5F 6E 6F 77 22 20 73 74 72 75 63 74 72 65 73 20 66 6F 72 0A 23 20
61 64 6A 61 63 65 6E 74 20 62 79 74 65 73 20 77 68 65 72 65 20 70 6F 73
73 69 62 6C 65 2E 20 54 68 65 20 61 67 67 72 65 67 61 74 65 20 69 73 20
66 6F 72 20 61 20 63 6F 6E 74 69 67 75 6F 75 73 20 72 61 6E 67 65 20 6F
66 0A 23 20 62 79 74 65 73 20 77 68 69 63 68 20 65 61 63 68 20 70 72 6F
64 75 63 65 20 74 68 65 20 73 61 6D 65 20 6C 65 6E 67 74 68 20 6F 66 20
6F 75 74 70 75 74 2C 20 65 61 63 68 20 6D 6F 76 65 20 74 6F 20 74 68 65
0A 23 20 73 61 6D 65 20 6E 65 78 74 20 73 74 61 74 65 2C 20 61 6E 64 20
65 61 63 68 20 68 61 76 65 20 74 68 65 20 73 61 6D 65 20 66 61 6C 6C 62
61 63 6B 20 66 6C 61 67 2E 0A 23 20 53 6F 20 6F 75 72 20 34 20 52 41 57
20 22 64 6F 5F 6E 6F 77 22 73 20 61 62 6F 76 65 20 62 65 63 6F 6D 65 20
72 65 70 6C 61 63 65 64 20 62 79 20 61 20 73 69 6E 67 6C 65 20 73 74 72
75 63 74 75 72 65 0A 23 20 63 6F 6E 74 61 69 6E 69 6E 67 3A 0A 23 20 5B
22 41 22 2C 20 22 44 22 2C 20 22 61 62 63 64 22 2C 20 31 2C 20 2E 2E 2E
5D 0A 23 20 69 65 2C 20 66 6F 72 20 61 6E 20 69 6E 70 75 74 20 62 79 74
65 20 24 5F 20 69 6E 20 22 41 22 2E 2E 22 44 22 2C 20 6F 75 74 70 75 74
20 31 20 62 79 74 65 2C 20 66 6F 75 6E 64 20 61 73 0A 23 20 73 75 62 73
74 72 20 28 22 61 62 63 64 22 2C 20 28 6F 72 64 20 24 5F 20 2D 20 6F 72
64 20 22 41 22 29 20 2A 20 31 2C 20 31 29 0A 23 20 77 68 69 63 68 20 6D
61 70 73 20 76 65 72 79 20 6E 69 63 65 6C 79 20 69 6E 74 6F 20 70 6F 69
6E 74 65 72 20 61 72 69 74 68 6D 65 74 69 63 20 69 6E 20 43 20 66 6F 72
20 65 6E 63 65 6E 67 69 6E 65 2E 63 0A 0A 73 75 62 20 65 6E 63 6F 64 65
5F 55 0A 7B 0A 20 23 20 55 54 46 2D 38 20 65 6E 63 6F 64 65 20 6C 6F 6E
67 20 68 61 6E 64 20 2D 20 6F 6E 6C 79 20 63 6F 76 65 72 73 20 70 61 72
74 20 6F 66 20 70 65 72 6C 27 73 20 72 61 6E 67 65 0A 20 23 23 20 6D 79
20 24 75 76 20 3D 20 73 68 69 66 74 3B 0A 20 23 20 63 68 72 28 29 20 77
6F 72 6B 73 20 69 6E 20 6E 61 74 69 76 65 20 73 70 61 63 65 20 73 6F 20
63 6F 6E 76 65 72 74 20 76 61 6C 75 65 20 66 72 6F 6D 20 74 61 62 6C 65
0A 20 23 20 69 6E 74 6F 20 74 68 61 74 20 73 70 61 63 65 20 62 65 66 6F
72 65 20 75 73 69 6E 67 20 63 68 72 28 29 2E 0A 20 6D 79 20 24 63 68 20
3D 20 63 68 72 28 75 74 66 38 3A 3A 75 6E 69 63 6F 64 65 5F 74 6F 5F 6E
61 74 69 76 65 28 24 5F 5B 30 5D 29 29 3B 0A 20 23 20 4E 6F 77 20 67 65
74 20 63 6F 72 65 20 70 65 72 6C 20 74 6F 20 65 6E 63 6F 64 65 20 74 68
61 74 20 74 68 65 20 77 61 79 20 69 74 20 6C 69 6B 65 73 2E 0A 20 75 74
66 38 3A 3A 65 6E 63 6F 64 65 28 24 63 68 29 3B 0A 20 72 65 74 75 72 6E
20 24 63 68 3B 0A 7D 0A 0A 73 75 62 20 65 6E 63 6F 64 65 5F 53 0A 7B 0A
20 23 20 65 6E 63 6F 64 65 20 73 69 6E 67 6C 65 20 62 79 74 65 0A 20 23
23 20 6D 79 20 28 24 63 68 2C 24 70 61 67 65 29 20 3D 20 40 5F 3B 20 72
65 74 75 72 6E 20 63 68 72 28 24 63 68 29 3B 0A 20 72 65 74 75 72 6E 20
63 68 72 20 24 5F 5B 30 5D 3B 0A 7D 0A 0A 73 75 62 20 65 6E 63 6F 64 65
5F 44 0A 7B 0A 20 23 20 65 6E 63 6F 64 65 20 64 6F 75 62 6C 65 20 62 79
74 65 20 4D 53 20 62 79 74 65 20 66 69 72 73 74 0A 20 23 23 20 6D 79 20
28 24 63 68 2C 24 70 61 67 65 29 20 3D 20 40 5F 3B 20 72 65 74 75 72 6E
20 63 68 72 28 24 70 61 67 65 29 2E 63 68 72 28 24 63 68 29 3B 0A 20 72
65 74 75 72 6E 20 63 68 72 20 28 24 5F 5B 31 5D 29 20 2E 20 63 68 72 20
24 5F 5B 30 5D 3B 0A 7D 0A 0A 73 75 62 20 65 6E 63 6F 64 65 5F 4D 0A 7B
0A 20 23 20 65 6E 63 6F 64 65 20 4D 75 6C 74 69 2D 62 79 74 65 20 2D 20
73 69 6E 67 6C 65 20 66 6F 72 20 30 2E 2E 32 35 35 20 6F 74 68 65 72 77
69 73 65 20 64 6F 75 62 6C 65 0A 20 23 23 20 6D 79 20 28 24 63 68 2C 24
70 61 67 65 29 20 3D 20 40 5F 3B 0A 20 23 23 20 72 65 74 75 72 6E 20 26
65 6E 63 6F 64 65 5F 44 20 69 66 20 24 70 61 67 65 3B 0A 20 23 23 20 72
65 74 75 72 6E 20 26 65 6E 63 6F 64 65 5F 53 3B 0A 20 72 65 74 75 72 6E
20 63 68 72 20 28 24 5F 5B 31 5D 29 20 2E 20 63 68 72 20 24 5F 5B 30 5D
20 69 66 20 24 5F 5B 31 5D 3B 0A 20 72 65 74 75 72 6E 20 63 68 72 20 24
5F 5B 30 5D 3B 0A 7D 0A 0A 6D 79 20 25 65 6E 63 6F 64 65 5F 74 79 70 65
73 20 3D 20 28 55 20 3D 3E 20 5C 26 65 6E 63 6F 64 65 5F 55 2C 0A 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 20 3D 3E 20 5C
26 65 6E 63 6F 64 65 5F 53 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 44 20 3D 3E 20 5C 26 65 6E 63 6F 64 65 5F 44 2C 0A
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 20 3D 3E
20 5C 26 65 6E 63 6F 64 65 5F 4D 2C 0A 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 29 3B 0A 0A 23 20 57 69 6E 33 32 20 64 6F 65 73
20 6E 6F 74 20 65 78 70 61 6E 64 20 67 6C 6F 62 73 20 6F 6E 20 63 6F 6D
6D 61 6E 64 20 6C 69 6E 65 0A 65 76 61 6C 20 22 5C 40 41 52 47 56 20 3D
20 6D 61 70 28 67 6C 6F 62 28 5C 24 5F 29 2C 5C 40 41 52 47 56 29 22 20
69 66 20 28 24 5E 4F 20 65 71 20 27 4D 53 57 69 6E 33 32 27 29 3B 0A 0A
6D 79 20 25 6F 70 74 3B 0A 23 20 49 20 74 68 69 6E 6B 20 74 68 65 73 65
20 61 72 65 3A 0A 23 20 2D 51 20 74 6F 20 64 69 73 61 62 6C 65 20 74 68
65 20 64 75 70 6C 69 63 61 74 65 20 63 6F 64 65 70 6F 69 6E 74 20 74 65
73 74 0A 23 20 2D 53 20 6D 61 6B 65 20 6D 61 70 70 69 6E 67 20 65 72 72
6F 72 73 20 66 61 74 61 6C 0A 23 20 2D 71 20 74 6F 20 72 65 6D 6F 76 65
20 63 6F 6D 6D 65 6E 74 73 20 77 72 69 74 74 65 6E 20 74 6F 20 6F 75 74
70 75 74 20 66 69 6C 65 73 0A 23 20 2D 4F 20 74 6F 20 65 6E 61 62 6C 65
20 74 68 65 20 28 62 72 75 74 65 20 66 6F 72 63 65 29 20 73 75 62 73 74
72 69 6E 67 20 6F 70 74 69 6D 69 73 65 72 0A 23 20 2D 6F 20 3C 6F 75 74
70 75 74 3E 20 74 6F 20 73 70 65 63 69 66 79 20 74 68 65 20 6F 75 74 70
75 74 20 66 69 6C 65 20 6E 61 6D 65 20 28 65 6C 73 65 20 69 74 27 73 20
74 68 65 20 66 69 72 73 74 20 61 72 67 29 0A 23 20 2D 66 20 3C 69 6E 6C
69 73 74 3E 20 74 6F 20 67 69 76 65 20 61 20 66 69 6C 65 20 77 69 74 68
20 61 20 6C 69 73 74 20 6F 66 20 69 6E 70 75 74 20 66 69 6C 65 73 20 28
65 6C 73 65 20 75 73 65 20 74 68 65 20 61 72 67 73 29 0A 23 20 2D 6E 20
3C 6E 61 6D 65 3E 20 74 6F 20 6E 61 6D 65 20 74 68 65 20 65 6E 63 6F 64
69 6E 67 20 28 65 6C 73 65 20 75 73 65 20 74 68 65 20 62 61 73 65 6E 61
6D 65 20 6F 66 20 74 68 65 20 69 6E 70 75 74 20 66 69 6C 65 2E 0A 67 65
74 6F 70 74 73 28 27 43 4D 3A 53 51 71 4F 6F 3A 66 3A 6E 3A 27 2C 5C 25
6F 70 74 29 3B 0A 0A 24 6F 70 74 7B 4D 7D 20 61 6E 64 20 6D 61 6B 65 5F
6D 61 6B 65 66 69 6C 65 5F 70 6C 28 24 6F 70 74 7B 4D 7D 2C 20 40 41 52
47 56 29 3B 0A 24 6F 70 74 7B 43 7D 20 61 6E 64 20 6D 61 6B 65 5F 63 6F
6E 66 69 67 6C 6F 63 61 6C 5F 70 6D 28 24 6F 70 74 7B 43 7D 2C 20 40 41
52 47 56 29 3B 0A 0A 23 20 54 68 69 73 20 72 65 61 6C 6C 79 20 73 68 6F
75 6C 64 20 67 6F 20 66 69 72 73 74 2C 20 65 6C 73 65 20 74 68 65 20 64
69 65 20 68 65 72 65 20 63 61 75 73 65 73 20 65 6D 70 74 79 20 28 6E 6F
6E 2D 65 72 72 6F 6E 65 6F 75 73 29 0A 23 20 6F 75 74 70 75 74 20 66 69
6C 65 73 20 74 6F 20 62 65 20 77 72 69 74 74 65 6E 2E 0A 6D 79 20 40 65
6E 63 66 69 6C 65 73 3B 0A 69 66 20 28 65 78 69 73 74 73 20 24 6F 70 74
7B 27 66 27 7D 29 20 7B 0A 20 20 20 20 23 20 2D 46 20 69 73 20 66 6F 6C
6C 6F 77 65 64 20 62 79 20 6E 61 6D 65 20 6F 66 20 66 69 6C 65 20 63 6F
6E 74 61 69 6E 69 6E 67 20 6C 69 73 74 20 6F 66 20 66 69 6C 65 6E 61 6D
65 73 0A 20 20 20 20 6D 79 20 24 66 6C 69 73 74 20 3D 20 24 6F 70 74 7B
27 66 27 7D 3B 0A 20 20 20 20 6F 70 65 6E 28 46 4C 49 53 54 2C 24 66 6C
69 73 74 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 6E 6F 74 20 6F 70 65 6E
20 24 66 6C 69 73 74 3A 24 21 22 3B 0A 20 20 20 20 63 68 6F 6D 70 28 40
65 6E 63 66 69 6C 65 73 20 3D 20 3C 46 4C 49 53 54 3E 29 3B 0A 20 20 20
20 63 6C 6F 73 65 28 46 4C 49 53 54 29 3B 0A 7D 20 65 6C 73 65 20 7B 0A
20 20 20 20 40 65 6E 63 66 69 6C 65 73 20 3D 20 40 41 52 47 56 3B 0A 7D
0A 0A 6D 79 20 24 63 6E 61 6D 65 20 3D 20 28 65 78 69 73 74 73 20 24 6F
70 74 7B 27 6F 27 7D 29 20 3F 20 24 6F 70 74 7B 27 6F 27 7D 20 3A 20 73
68 69 66 74 28 40 41 52 47 56 29 3B 0A 63 68 6D 6F 64 28 30 36 36 36 2C
24 63 6E 61 6D 65 29 20 69 66 20 2D 66 20 24 63 6E 61 6D 65 20 26 26 20
21 2D 77 20 24 63 6E 61 6D 65 3B 0A 6F 70 65 6E 28 43 2C 22 3E 24 63 6E
61 6D 65 22 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 6E 6F 74 20 6F 70 65
6E 20 24 63 6E 61 6D 65 3A 24 21 22 3B 0A 0A 6D 79 20 24 64 6E 61 6D 65
20 3D 20 24 63 6E 61 6D 65 3B 0A 6D 79 20 24 68 6E 61 6D 65 20 3D 20 24
63 6E 61 6D 65 3B 0A 0A 6D 79 20 28 24 64 6F 43 2C 24 64 6F 45 6E 63 2C
24 64 6F 55 63 6D 2C 24 64 6F 50 65 74 29 3B 0A 0A 69 66 20 28 24 63 6E
61 6D 65 20 3D 7E 20 2F 5C 2E 28 63 7C 78 73 29 24 2F 69 29 20 23 20 56
4D 53 20 6D 61 79 20 68 61 76 65 20 75 70 63 61 73 65 64 20 66 69 6C 65
6E 61 6D 65 73 20 77 69 74 68 20 44 45 43 43 24 41 52 47 56 5F 50 41 52
53 45 5F 53 54 59 4C 45 20 64 65 66 69 6E 65 64 0A 20 7B 0A 20 20 24 64
6F 43 20 3D 20 31 3B 0A 20 20 24 64 6E 61 6D 65 20 3D 7E 20 73 2F 28 5C
2E 5B 5E 5C 2E 5D 2A 29 3F 24 2F 2E 65 78 68 2F 3B 0A 20 20 63 68 6D 6F
64 28 30 36 36 36 2C 24 64 6E 61 6D 65 29 20 69 66 20 2D 66 20 24 63 6E
61 6D 65 20 26 26 20 21 2D 77 20 24 64 6E 61 6D 65 3B 0A 20 20 6F 70 65
6E 28 44 2C 22 3E 24 64 6E 61 6D 65 22 29 20 7C 7C 20 64 69 65 20 22 43
61 6E 6E 6F 74 20 6F 70 65 6E 20 24 64 6E 61 6D 65 3A 24 21 22 3B 0A 20
20 24 68 6E 61 6D 65 20 3D 7E 20 73 2F 28 5C 2E 5B 5E 5C 2E 5D 2A 29 3F
24 2F 2E 68 2F 3B 0A 20 20 63 68 6D 6F 64 28 30 36 36 36 2C 24 68 6E 61
6D 65 29 20 69 66 20 2D 66 20 24 63 6E 61 6D 65 20 26 26 20 21 2D 77 20
24 68 6E 61 6D 65 3B 0A 20 20 6F 70 65 6E 28 48 2C 22 3E 24 68 6E 61 6D
65 22 29 20 7C 7C 20 64 69 65 20 22 43 61 6E 6E 6F 74 20 6F 70 65 6E 20
24 68 6E 61 6D 65 3A 24 21 22 3B 0A 0A 20 20 66 6F 72 65 61 63 68 20 6D
79 20 24 66 68 20 28 5C 2A 43 2C 5C 2A 44 2C 5C 2A 48 29 0A 20 20 7B 0A
20 20 20 70 72 69 6E 74 20 24 66 68 20 3C 3C 22 45 4E 44 22 20 75 6E 6C
65 73 73 20 24 6F 70 74 7B 27 71 27 7D 3B 0A 2F 2A 0A 20 21 21 21 21 21
21 21 20 20 20 44 4F 20 4E 4F 54 20 45 44 49 54 20 54 48 49 53 20 46 49
4C 45 20 20 20 21 21 21 21 21 21 21 0A 20 54 68 69 73 20 66 69 6C 65 20
77 61 73 20 61 75 74 6F 67 65 6E 65 72 61 74 65 64 20 62 79 3A 0A 20 24
5E 58 20 24 30 20 40 6F 72 69 67 5F 41 52 47 56 0A 2A 2F 0A 45 4E 44 0A
20 20 7D 0A 0A 20 20 69 66 20 28 24 63 6E 61 6D 65 20 3D 7E 20 2F 28 5C
77 2B 29 5C 2E 78 73 24 2F 29 0A 20 20 20 7B 0A 20 20 20 20 70 72 69 6E
74 20 43 20 22 23 69 6E 63 6C 75 64 65 20 3C 45 58 54 45 52 4E 2E 68 3E
5C 6E 22 3B 0A 20 20 20 20 70 72 69 6E 74 20 43 20 22 23 69 6E 63 6C 75
64 65 20 3C 70 65 72 6C 2E 68 3E 5C 6E 22 3B 0A 20 20 20 20 70 72 69 6E
74 20 43 20 22 23 69 6E 63 6C 75 64 65 20 3C 58 53 55 42 2E 68 3E 5C 6E
22 3B 0A 20 20 20 20 70 72 69 6E 74 20 43 20 22 23 64 65 66 69 6E 65 20
55 38 20 55 38 5C 6E 22 3B 0A 20 20 20 7D 0A 20 20 70 72 69 6E 74 20 43
20 22 23 69 6E 63 6C 75 64 65 20 5C 22 65 6E 63 6F 64 65 2E 68 5C 22 5C
6E 5C 6E 22 3B 0A 0A 20 7D 0A 65 6C 73 69 66 20 28 24 63 6E 61 6D 65 20
3D 7E 20 2F 5C 2E 65 6E 63 24 2F 29 0A 20 7B 0A 20 20 24 64 6F 45 6E 63
20 3D 20 31 3B 0A 20 7D 0A 65 6C 73 69 66 20 28 24 63 6E 61 6D 65 20 3D
7E 20 2F 5C 2E 75 63 6D 24 2F 29 0A 20 7B 0A 20 20 24 64 6F 55 63 6D 20
3D 20 31 3B 0A 20 7D 0A 65 6C 73 69 66 20 28 24 63 6E 61 6D 65 20 3D 7E
20 2F 5C 2E 70 65 74 24 2F 29 0A 20 7B 0A 20 20 24 64 6F 50 65 74 20 3D
20 31 3B 0A 20 7D 0A 0A 6D 79 20 25 65 6E 63 6F 64 69 6E 67 3B 0A 6D 79
20 25 73 74 72 69 6E 67 73 3B 0A 6D 79 20 24 73 74 72 69 6E 67 5F 61 63
63 3B 0A 6D 79 20 25 73 74 72 69 6E 67 73 5F 69 6E 5F 61 63 63 3B 0A 0A
6D 79 20 24 73 61 76 65 64 20 3D 20 30 3B 0A 6D 79 20 24 73 75 62 73 61
76 65 20 3D 20 30 3B 0A 6D 79 20 24 73 74 72 69 6E 67 73 20 3D 20 30 3B
0A 0A 73 75 62 20 63 6D 70 5F 6E 61 6D 65 0A 7B 0A 20 69 66 20 28 24 61
20 3D 7E 20 2F 5E 2E 2A 2D 28 5C 64 2B 29 2F 29 0A 20 20 7B 0A 20 20 20
6D 79 20 24 61 6E 20 3D 20 24 31 3B 0A 20 20 20 69 66 20 28 24 62 20 3D
7E 20 2F 5E 2E 2A 2D 28 5C 64 2B 29 2F 29 0A 20 20 20 20 7B 0A 20 20 20
20 20 6D 79 20 24 72 20 3D 20 24 61 6E 20 3C 3D 3E 20 24 31 3B 0A 20 20
20 20 20 72 65 74 75 72 6E 20 24 72 20 69 66 20 24 72 3B 0A 20 20 20 20
7D 0A 20 20 7D 0A 20 72 65 74 75 72 6E 20 24 61 20 63 6D 70 20 24 62 3B
0A 7D 0A 0A 0A 66 6F 72 65 61 63 68 20 6D 79 20 24 65 6E 63 20 28 73 6F
72 74 20 63 6D 70 5F 6E 61 6D 65 20 40 65 6E 63 66 69 6C 65 73 29 0A 20
7B 0A 20 20 6D 79 20 28 24 6E 61 6D 65 2C 24 73 66 78 29 20 3D 20 24 65
6E 63 20 3D 7E 20 2F 5E 2E 2A 3F 28 5B 5C 77 2D 5D 2B 29 5C 2E 28 65 6E
63 7C 75 63 6D 29 24 2F 3B 0A 20 20 24 6E 61 6D 65 20 3D 20 24 6F 70 74
7B 27 6E 27 7D 20 69 66 20 65 78 69 73 74 73 20 24 6F 70 74 7B 27 6E 27
7D 3B 0A 20 20 69 66 20 28 6F 70 65 6E 28 45 2C 24 65 6E 63 29 29 0A 20
20 20 7B 0A 20 20 20 20 69 66 20 28 24 73 66 78 20 65 71 20 27 65 6E 63
27 29 0A 20 20 20 20 20 7B 0A 20 20 20 20 20 20 63 6F 6D 70 69 6C 65 5F
65 6E 63 28 5C 2A 45 2C 6C 63 28 24 6E 61 6D 65 29 29 3B 0A 20 20 20 20
20 7D 0A 20 20 20 20 65 6C 73 65 0A 20 20 20 20 20 7B 0A 20 20 20 20 20
20 63 6F 6D 70 69 6C 65 5F 75 63 6D 28 5C 2A 45 2C 6C 63 28 24 6E 61 6D
65 29 29 3B 0A 20 20 20 20 20 7D 0A 20 20 20 7D 0A 20 20 65 6C 73 65 0A
20 20 20 7B 0A 20 20 20 20 77 61 72 6E 20 22 43 61 6E 6E 6F 74 20 6F 70
65 6E 20 24 65 6E 63 20 66 6F 72 20 24 6E 61 6D 65 3A 24 21 22 3B 0A 20
20 20 7D 0A 20 7D 0A 0A 69 66 20 28 24 64 6F 43 29 0A 20 7B 0A 20 20 70
72 69 6E 74 20 53 54 44 45 52 52 20 22 57 72 69 74 69 6E 67 20 63 6F 6D
70 69 6C 65 64 20 66 6F 72 6D 5C 6E 22 3B 0A 20 20 66 6F 72 65 61 63 68
20 6D 79 20 24 6E 61 6D 65 20 28 73 6F 72 74 20 63 6D 70 5F 6E 61 6D 65
20 6B 65 79 73 20 25 65 6E 63 6F 64 69 6E 67 29 0A 20 20 20 7B 0A 20 20
20 20 6D 79 20 28 24 65 32 75 2C 24 75 32 65 2C 24 65 72 65 70 2C 24 6D
69 6E 5F 65 6C 2C 24 6D 61 78 5F 65 6C 29 20 3D 20 40 7B 24 65 6E 63 6F
64 69 6E 67 7B 24 6E 61 6D 65 7D 7D 3B 0A 20 20 20 20 70 72 6F 63 65 73
73 28 24 6E 61 6D 65 2E 27 5F 75 74 66 38 27 2C 24 65 32 75 29 3B 0A 20
20 20 20 61 64 64 73 74 72 69 6E 67 73 28 5C 2A 43 2C 24 65 32 75 29 3B
0A 0A 20 20 20 20 70 72 6F 63 65 73 73 28 27 75 74 66 38 5F 27 2E 24 6E
61 6D 65 2C 24 75 32 65 29 3B 0A 20 20 20 20 61 64 64 73 74 72 69 6E 67
73 28 5C 2A 43 2C 24 75 32 65 29 3B 0A 20 20 20 7D 0A 20 20 6F 75 74 62
69 67 73 74 72 69 6E 67 28 5C 2A 43 2C 22 65 6E 63 74 61 62 6C 65 22 29
3B 0A 20 20 66 6F 72 65 61 63 68 20 6D 79 20 24 6E 61 6D 65 20 28 73 6F
72 74 20 63 6D 70 5F 6E 61 6D 65 20 6B 65 79 73 20 25 65 6E 63 6F 64 69
6E 67 29 0A 20 20 20 7B 0A 20 20 20 20 6D 79 20 28 24 65 32 75 2C 24 75
32 65 2C 24 65 72 65 70 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61 78 5F 65 6C
29 20 3D 20 40 7B 24 65 6E 63 6F 64 69 6E 67 7B 24 6E 61 6D 65 7D 7D 3B
0A 20 20 20 20 6F 75 74 74 61 62 6C 65 28 5C 2A 43 2C 24 65 32 75 2C 20
22 65 6E 63 74 61 62 6C 65 22 29 3B 0A 20 20 20 20 6F 75 74 74 61 62 6C
65 28 5C 2A 43 2C 24 75 32 65 2C 20 22 65 6E 63 74 61 62 6C 65 22 29 3B
0A 0A 20 20 20 20 23 20 70 75 73 68 28 40 7B 24 65 6E 63 6F 64 69 6E 67
7B 24 6E 61 6D 65 7D 7D 2C 6F 75 74 73 74 72 69 6E 67 28 5C 2A 43 2C 24
65 32 75 2D 3E 7B 43 6E 61 6D 65 7D 2E 27 5F 64 65 66 27 2C 24 65 72 65
70 29 29 3B 0A 20 20 20 7D 0A 20 20 66 6F 72 65 61 63 68 20 6D 79 20 24
65 6E 63 20 28 73 6F 72 74 20 63 6D 70 5F 6E 61 6D 65 20 6B 65 79 73 20
25 65 6E 63 6F 64 69 6E 67 29 0A 20 20 20 7B 0A 20 20 20 20 23 20 6D 79
20 28 24 65 32 75 2C 24 75 32 65 2C 24 72 65 70 2C 24 6D 69 6E 5F 65 6C
2C 24 6D 61 78 5F 65 6C 2C 24 72 73 79 6D 29 20 3D 20 40 7B 24 65 6E 63
6F 64 69 6E 67 7B 24 65 6E 63 7D 7D 3B 0A 20 20 20 20 6D 79 20 28 24 65
32 75 2C 24 75 32 65 2C 24 72 65 70 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61
78 5F 65 6C 29 20 3D 20 40 7B 24 65 6E 63 6F 64 69 6E 67 7B 24 65 6E 63
7D 7D 3B 0A 20 20 20 20 23 6D 79 20 40 69 6E 66 6F 20 3D 20 28 24 65 32
75 2D 3E 7B 43 6E 61 6D 65 7D 2C 24 75 32 65 2D 3E 7B 43 6E 61 6D 65 7D
2C 24 72 73 79 6D 2C 6C 65 6E 67 74 68 28 24 72 65 70 29 2C 24 6D 69 6E
5F 65 6C 2C 24 6D 61 78 5F 65 6C 29 3B 0A 20 20 20 20 6D 79 20 24 72 65
70 6C 65 6E 20 3D 20 30 3B 20 0A 20 20 20 20 24 72 65 70 6C 65 6E 2B 2B
20 77 68 69 6C 65 28 24 72 65 70 20 3D 7E 20 2F 5C 47 5C 5C 78 5B 30 2D
39 41 2D 46 61 2D 66 5D 2F 67 29 3B 0A 20 20 20 20 6D 79 20 40 69 6E 66
6F 20 3D 20 28 24 65 32 75 2D 3E 7B 43 6E 61 6D 65 7D 2C 24 75 32 65 2D
3E 7B 43 6E 61 6D 65 7D 2C 71 71 28 28 55 38 20 2A 29 22 24 72 65 70 22
29 2C 24 72 65 70 6C 65 6E 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61 78 5F 65
6C 29 3B 0A 20 20 20 20 6D 79 20 24 73 79 6D 20 3D 20 22 24 7B 65 6E 63
7D 5F 65 6E 63 6F 64 69 6E 67 22 3B 0A 20 20 20 20 24 73 79 6D 20 3D 7E
20 73 2F 5C 57 2B 2F 5F 2F 67 3B 0A 20 20 20 20 70 72 69 6E 74 20 43 20
22 65 6E 63 6F 64 65 5F 74 20 24 73 79 6D 20 3D 20 5C 6E 22 3B 0A 20 20
20 20 23 20 54 68 69 73 20 69 73 20 74 6F 20 6D 61 6B 65 20 6E 75 6C 6C
20 65 6E 63 6F 64 69 6E 67 20 77 6F 72 6B 20 2D 2D 20 64 61 6E 6B 6F 67
61 69 0A 20 20 20 20 66 6F 72 20 28 6D 79 20 24 69 20 3D 20 28 73 63 61
6C 61 72 20 40 69 6E 66 6F 29 20 2D 20 31 3B 20 20 24 69 20 3E 3D 20 30
3B 20 2D 2D 24 69 29 7B 0A 09 24 69 6E 66 6F 5B 24 69 5D 20 7C 7C 3D 20
31 3B 0A 20 20 20 20 7D 0A 20 20 20 20 23 20 65 6E 64 20 6F 66 20 6E 75
6C 6C 20 74 77 65 61 6B 20 2D 2D 20 64 61 6E 6B 6F 67 61 69 0A 20 20 20
20 70 72 69 6E 74 20 43 20 22 20 7B 22 2C 6A 6F 69 6E 28 27 2C 27 2C 40
69 6E 66 6F 2C 22 7B 5C 22 24 65 6E 63 5C 22 2C 28 63 6F 6E 73 74 20 63
68 61 72 20 2A 29 30 7D 22 29 2C 22 7D 3B 5C 6E 5C 6E 22 3B 0A 20 20 20
7D 0A 0A 20 20 66 6F 72 65 61 63 68 20 6D 79 20 24 65 6E 63 20 28 73 6F
72 74 20 63 6D 70 5F 6E 61 6D 65 20 6B 65 79 73 20 25 65 6E 63 6F 64 69
6E 67 29 0A 20 20 20 7B 0A 20 20 20 20 6D 79 20 24 73 79 6D 20 3D 20 22
24 7B 65 6E 63 7D 5F 65 6E 63 6F 64 69 6E 67 22 3B 0A 20 20 20 20 24 73
79 6D 20 3D 7E 20 73 2F 5C 57 2B 2F 5F 2F 67 3B 0A 20 20 20 20 70 72 69
6E 74 20 48 20 22 65 78 74 65 72 6E 20 65 6E 63 6F 64 65 5F 74 20 24 73
79 6D 3B 5C 6E 22 3B 0A 20 20 20 20 70 72 69 6E 74 20 44 20 22 20 45 6E
63 6F 64 65 5F 58 53 45 6E 63 6F 64 69 6E 67 28 61 54 48 58 5F 20 26 24
73 79 6D 29 3B 5C 6E 22 3B 0A 20 20 20 7D 0A 0A 20 20 69 66 20 28 24 63
6E 61 6D 65 20 3D 7E 20 2F 28 5C 77 2B 29 5C 2E 78 73 24 2F 29 0A 20 20
20 7B 0A 20 20 20 20 6D 79 20 24 6D 6F 64 20 3D 20 24 31 3B 0A 20 20 20
20 70 72 69 6E 74 20 43 20 3C 3C 27 45 4E 44 27 3B 0A 0A 73 74 61 74 69
63 20 76 6F 69 64 0A 45 6E 63 6F 64 65 5F 58 53 45 6E 63 6F 64 69 6E 67
28 70 54 48 58 5F 20 65 6E 63 6F 64 65 5F 74 20 2A 65 6E 63 29 0A 7B 0A
20 64 53 50 3B 0A 20 48 56 20 2A 73 74 61 73 68 20 3D 20 67 76 5F 73 74
61 73 68 70 76 28 22 45 6E 63 6F 64 65 3A 3A 58 53 22 2C 20 54 52 55 45
29 3B 0A 20 53 56 20 2A 73 76 20 20 20 20 3D 20 73 76 5F 62 6C 65 73 73
28 6E 65 77 52 56 5F 6E 6F 69 6E 63 28 6E 65 77 53 56 69 76 28 50 54 52
32 49 56 28 65 6E 63 29 29 29 2C 73 74 61 73 68 29 3B 0A 20 69 6E 74 20
69 20 3D 20 30 3B 0A 20 50 55 53 48 4D 41 52 4B 28 73 70 29 3B 0A 20 58
50 55 53 48 73 28 73 76 29 3B 0A 20 77 68 69 6C 65 20 28 65 6E 63 2D 3E
6E 61 6D 65 5B 69 5D 29 0A 20 20 7B 0A 20 20 20 63 6F 6E 73 74 20 63 68
61 72 20 2A 6E 61 6D 65 20 3D 20 65 6E 63 2D 3E 6E 61 6D 65 5B 69 2B 2B
5D 3B 0A 20 20 20 58 50 55 53 48 73 28 73 76 5F 32 6D 6F 72 74 61 6C 28
6E 65 77 53 56 70 76 6E 28 6E 61 6D 65 2C 73 74 72 6C 65 6E 28 6E 61 6D
65 29 29 29 29 3B 0A 20 20 7D 0A 20 50 55 54 42 41 43 4B 3B 0A 20 63 61
6C 6C 5F 70 76 28 22 45 6E 63 6F 64 65 3A 3A 64 65 66 69 6E 65 5F 65 6E
63 6F 64 69 6E 67 22 2C 47 5F 44 49 53 43 41 52 44 29 3B 0A 20 53 76 52
45 46 43 4E 54 5F 64 65 63 28 73 76 29 3B 0A 7D 0A 0A 45 4E 44 0A 0A 20
20 20 20 70 72 69 6E 74 20 43 20 22 5C 6E 4D 4F 44 55 4C 45 20 3D 20 45
6E 63 6F 64 65 3A 3A 24 6D 6F 64 5C 74 50 41 43 4B 41 47 45 20 3D 20 45
6E 63 6F 64 65 3A 3A 24 6D 6F 64 5C 6E 5C 6E 22 3B 0A 20 20 20 20 70 72
69 6E 74 20 43 20 22 42 4F 4F 54 3A 5C 6E 7B 5C 6E 22 3B 0A 20 20 20 20
70 72 69 6E 74 20 43 20 22 23 69 6E 63 6C 75 64 65 20 5C 22 24 64 6E 61
6D 65 5C 22 5C 6E 22 3B 0A 20 20 20 20 70 72 69 6E 74 20 43 20 22 7D 5C
6E 22 3B 0A 20 20 20 7D 0A 20 20 23 20 43 6C 6F 73 65 20 69 6E 20 76 6F
69 64 20 63 6F 6E 74 65 78 74 20 69 73 20 62 61 64 2C 20 6D 27 6B 61 79
0A 20 20 63 6C 6F 73 65 28 44 29 20 6F 72 20 77 61 72 6E 20 22 45 72 72
6F 72 20 63 6C 6F 73 69 6E 67 20 27 24 64 6E 61 6D 65 27 3A 20 24 21 22
3B 0A 20 20 63 6C 6F 73 65 28 48 29 20 6F 72 20 77 61 72 6E 20 22 45 72
72 6F 72 20 63 6C 6F 73 69 6E 67 20 27 24 68 6E 61 6D 65 27 3A 20 24 21
22 3B 0A 0A 20 20 6D 79 20 24 70 65 72 63 5F 73 61 76 65 64 20 20 20 20
3D 20 24 73 61 76 65 64 2F 28 24 73 74 72 69 6E 67 73 20 2B 20 24 73 61
76 65 64 29 20 2A 20 31 30 30 3B 0A 20 20 6D 79 20 24 70 65 72 63 5F 73
75 62 73 61 76 65 64 20 3D 20 24 73 75 62 73 61 76 65 2F 28 24 73 74 72
69 6E 67 73 20 2B 20 24 73 75 62 73 61 76 65 29 20 2A 20 31 30 30 3B 0A
20 20 70 72 69 6E 74 66 20 53 54 44 45 52 52 20 22 25 64 20 62 79 74 65
73 20 69 6E 20 73 74 72 69 6E 67 20 74 61 62 6C 65 73 5C 6E 22 2C 24 73
74 72 69 6E 67 73 3B 0A 20 20 70 72 69 6E 74 66 20 53 54 44 45 52 52 20
22 25 64 20 62 79 74 65 73 20 28 25 2E 33 67 25 25 29 20 73 61 76 65 64
20 73 70 6F 74 74 69 6E 67 20 64 75 70 6C 69 63 61 74 65 73 5C 6E 22 2C
0A 20 20 20 20 24 73 61 76 65 64 2C 20 24 70 65 72 63 5F 73 61 76 65 64
20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 24 73 61 76 65 64 3B
0A 20 20 70 72 69 6E 74 66 20 53 54 44 45 52 52 20 22 25 64 20 62 79 74
65 73 20 28 25 2E 33 67 25 25 29 20 73 61 76 65 64 20 75 73 69 6E 67 20
73 75 62 73 74 72 69 6E 67 73 5C 6E 22 2C 0A 20 20 20 20 24 73 75 62 73
61 76 65 2C 20 24 70 65 72 63 5F 73 75 62 73 61 76 65 64 20 20 20 20 20
20 20 20 20 69 66 20 24 73 75 62 73 61 76 65 3B 0A 20 7D 0A 65 6C 73 69
66 20 28 24 64 6F 45 6E 63 29 0A 20 7B 0A 20 20 66 6F 72 65 61 63 68 20
6D 79 20 24 6E 61 6D 65 20 28 73 6F 72 74 20 63 6D 70 5F 6E 61 6D 65 20
6B 65 79 73 20 25 65 6E 63 6F 64 69 6E 67 29 0A 20 20 20 7B 0A 20 20 20
20 6D 79 20 28 24 65 32 75 2C 24 75 32 65 2C 24 65 72 65 70 2C 24 6D 69
6E 5F 65 6C 2C 24 6D 61 78 5F 65 6C 29 20 3D 20 40 7B 24 65 6E 63 6F 64
69 6E 67 7B 24 6E 61 6D 65 7D 7D 3B 0A 20 20 20 20 6F 75 74 70 75 74 5F
65 6E 63 28 5C 2A 43 2C 24 6E 61 6D 65 2C 24 65 32 75 29 3B 0A 20 20 20
7D 0A 20 7D 0A 65 6C 73 69 66 20 28 24 64 6F 55 63 6D 29 0A 20 7B 0A 20
20 66 6F 72 65 61 63 68 20 6D 79 20 24 6E 61 6D 65 20 28 73 6F 72 74 20
63 6D 70 5F 6E 61 6D 65 20 6B 65 79 73 20 25 65 6E 63 6F 64 69 6E 67 29
0A 20 20 20 7B 0A 20 20 20 20 6D 79 20 28 24 65 32 75 2C 24 75 32 65 2C
24 65 72 65 70 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61 78 5F 65 6C 29 20 3D
20 40 7B 24 65 6E 63 6F 64 69 6E 67 7B 24 6E 61 6D 65 7D 7D 3B 0A 20 20
20 20 6F 75 74 70 75 74 5F 75 63 6D 28 5C 2A 43 2C 24 6E 61 6D 65 2C 24
75 32 65 2C 24 65 72 65 70 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61 78 5F 65
6C 29 3B 0A 20 20 20 7D 0A 20 7D 0A 0A 23 20 77 72 69 74 69 6E 67 20 68
61 6C 66 20 6D 65 67 20 66 69 6C 65 73 20 61 6E 64 20 74 68 65 6E 20 6E
6F 74 20 63 68 65 63 6B 69 6E 67 20 74 6F 20 73 65 65 20 69 66 20 79 6F
75 20 6A 75 73 74 20 66 69 6C 6C 65 64 20 74 68 65 0A 23 20 64 69 73 6B
20 69 73 20 62 61 64 2C 20 6D 27 6B 61 79 0A 63 6C 6F 73 65 28 43 29 20
6F 72 20 64 69 65 20 22 45 72 72 6F 72 20 63 6C 6F 73 69 6E 67 20 27 24
63 6E 61 6D 65 27 3A 20 24 21 22 3B 0A 0A 23 20 45 6E 64 20 6F 66 20 74
68 65 20 6D 61 69 6E 20 70 72 6F 67 72 61 6D 2E 0A 0A 73 75 62 20 63 6F
6D 70 69 6C 65 5F 75 63 6D 0A 7B 0A 20 6D 79 20 28 24 66 68 2C 24 6E 61
6D 65 29 20 3D 20 40 5F 3B 0A 20 6D 79 20 24 65 32 75 20 3D 20 7B 7D 3B
0A 20 6D 79 20 24 75 32 65 20 3D 20 7B 7D 3B 0A 20 6D 79 20 24 63 73 3B
0A 20 6D 79 20 25 61 74 74 72 3B 0A 20 77 68 69 6C 65 20 28 3C 24 66 68
3E 29 0A 20 20 7B 0A 20 20 20 73 2F 23 2E 2A 24 2F 2F 3B 0A 20 20 20 6C
61 73 74 20 69 66 20 2F 5E 5C 73 2A 43 48 41 52 4D 41 50 5C 73 2A 24 2F
69 3B 0A 20 20 20 69 66 20 28 2F 5E 5C 73 2A 3C 28 5C 77 2B 29 3E 5C 73
2B 22 3F 28 5B 5E 22 5D 2A 29 22 3F 5C 73 2A 24 2F 69 29 20 23 20 22 20
23 20 47 72 72 72 0A 20 20 20 20 7B 0A 20 20 20 20 20 24 61 74 74 72 7B
24 31 7D 20 3D 20 24 32 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 20 69 66 20
28 21 64 65 66 69 6E 65 64 28 24 63 73 20 3D 20 20 24 61 74 74 72 7B 27
63 6F 64 65 5F 73 65 74 5F 6E 61 6D 65 27 7D 29 29 0A 20 20 7B 0A 20 20
20 77 61 72 6E 20 22 4E 6F 20 3C 63 6F 64 65 5F 73 65 74 5F 6E 61 6D 65
3E 20 69 6E 20 24 6E 61 6D 65 5C 6E 22 3B 0A 20 20 7D 0A 20 65 6C 73 65
0A 20 20 7B 0A 20 20 20 24 6E 61 6D 65 20 3D 20 24 63 73 20 75 6E 6C 65
73 73 20 65 78 69 73 74 73 20 24 6F 70 74 7B 27 6E 27 7D 3B 0A 20 20 7D
0A 20 6D 79 20 24 65 72 65 70 3B 0A 20 6D 79 20 24 75 72 65 70 3B 0A 20
6D 79 20 24 6D 61 78 5F 65 6C 3B 0A 20 6D 79 20 24 6D 69 6E 5F 65 6C 3B
0A 20 69 66 20 28 65 78 69 73 74 73 20 24 61 74 74 72 7B 27 73 75 62 63
68 61 72 27 7D 29 0A 20 20 7B 0A 20 20 20 23 6D 79 20 40 62 79 74 65 3B
0A 20 20 20 23 24 61 74 74 72 7B 27 73 75 62 63 68 61 72 27 7D 20 3D 7E
20 2F 5E 5C 73 2A 2F 63 67 3B 0A 20 20 20 23 70 75 73 68 28 40 62 79 74
65 2C 24 31 29 20 77 68 69 6C 65 20 24 61 74 74 72 7B 27 73 75 62 63 68
61 72 27 7D 20 3D 7E 20 2F 5C 47 5C 5C 78 28 5B 30 2D 39 61 2D 66 5D 2B
29 2F 69 63 67 3B 0A 20 20 20 23 24 65 72 65 70 20 3D 20 6A 6F 69 6E 28
27 27 2C 6D 61 70 28 63 68 72 28 68 65 78 28 24 5F 29 29 2C 40 62 79 74
65 29 29 3B 0A 20 20 20 24 65 72 65 70 20 3D 20 24 61 74 74 72 7B 27 73
75 62 63 68 61 72 27 7D 3B 20 0A 20 20 20 24 65 72 65 70 20 3D 7E 20 73
2F 5E 5C 73 2B 2F 2F 3B 20 24 65 72 65 70 20 3D 7E 20 73 2F 5C 73 2B 24
2F 2F 3B 0A 20 20 7D 0A 20 70 72 69 6E 74 20 22 52 65 61 64 69 6E 67 20
24 6E 61 6D 65 20 28 24 63 73 29 5C 6E 22 3B 0A 20 6D 79 20 24 6E 66 62
20 3D 20 30 3B 0A 20 6D 79 20 24 68 66 62 20 3D 20 30 3B 0A 20 77 68 69
6C 65 20 28 3C 24 66 68 3E 29 0A 20 20 7B 0A 20 20 20 73 2F 23 2E 2A 24
2F 2F 3B 0A 20 20 20 6C 61 73 74 20 69 66 20 2F 5E 5C 73 2A 45 4E 44 5C
73 2B 43 48 41 52 4D 41 50 5C 73 2A 24 2F 69 3B 0A 20 20 20 6E 65 78 74
20 69 66 20 2F 5E 5C 73 2A 24 2F 3B 0A 20 20 20 6D 79 20 28 40 75 6E 69
2C 20 40 62 79 74 65 29 20 3D 20 28 29 3B 0A 20 20 20 6D 79 20 28 24 75
6E 69 2C 20 24 62 79 74 65 2C 20 24 66 62 29 20 3D 20 6D 2F 5E 28 5C 53
2B 29 5C 73 2B 28 5C 53 2B 29 5C 73 2B 28 5C 53 2B 29 5C 73 2B 2F 6F 0A
20 20 20 20 20 20 20 6F 72 20 64 69 65 20 22 42 61 64 20 6C 69 6E 65 3A
20 24 5F 22 3B 0A 20 20 20 77 68 69 6C 65 20 28 24 75 6E 69 20 3D 7E 20
20 6D 2F 5C 47 3C 28 5B 55 30 2D 39 61 2D 66 41 2D 46 5C 2B 5D 2B 29 3E
2F 67 29 7B 0A 20 20 20 20 20 20 20 70 75 73 68 20 40 75 6E 69 2C 20 6D
61 70 20 7B 20 73 75 62 73 74 72 28 24 5F 2C 20 31 29 20 7D 20 73 70 6C
69 74 28 2F 5C 2B 2F 2C 20 24 31 29 3B 0A 20 20 20 7D 0A 20 20 20 77 68
69 6C 65 20 28 24 62 79 74 65 20 3D 7E 20 6D 2F 5C 47 5C 5C 78 28 5B 30
2D 39 61 2D 66 41 2D 46 5D 2B 29 2F 67 29 7B 0A 20 20 20 20 20 20 20 70
75 73 68 20 40 62 79 74 65 2C 20 24 31 3B 0A 20 20 20 7D 0A 20 20 20 69
66 20 28 40 75 6E 69 29 0A 20 20 20 20 7B 0A 20 20 20 20 20 6D 79 20 24
75 63 68 20 3D 20 20 6A 6F 69 6E 28 27 27 2C 20 6D 61 70 20 7B 20 65 6E
63 6F 64 65 5F 55 28 68 65 78 28 24 5F 29 29 20 7D 20 40 75 6E 69 20 29
3B 0A 20 20 20 20 20 6D 79 20 24 65 63 68 20 3D 20 6A 6F 69 6E 28 27 27
2C 6D 61 70 28 63 68 72 28 68 65 78 28 24 5F 29 29 2C 40 62 79 74 65 29
29 3B 0A 20 20 20 20 20 6D 79 20 24 65 6C 20 20 3D 20 6C 65 6E 67 74 68
28 24 65 63 68 29 3B 0A 20 20 20 20 20 24 6D 61 78 5F 65 6C 20 3D 20 24
65 6C 20 69 66 20 28 21 64 65 66 69 6E 65 64 28 24 6D 61 78 5F 65 6C 29
20 7C 7C 20 24 65 6C 20 3E 20 24 6D 61 78 5F 65 6C 29 3B 0A 20 20 20 20
20 24 6D 69 6E 5F 65 6C 20 3D 20 24 65 6C 20 69 66 20 28 21 64 65 66 69
6E 65 64 28 24 6D 69 6E 5F 65 6C 29 20 7C 7C 20 24 65 6C 20 3C 20 24 6D
69 6E 5F 65 6C 29 3B 0A 20 20 20 20 20 69 66 20 28 6C 65 6E 67 74 68 28
24 66 62 29 29 0A 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20 20 24 66 62
20 3D 20 73 75 62 73 74 72 28 24 66 62 2C 31 29 3B 0A 20 20 20 20 20 20
20 24 68 66 62 2B 2B 3B 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 20 65 6C
73 65 0A 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20 20 24 6E 66 62 2B 2B
3B 0A 20 20 20 20 20 20 20 24 66 62 20 3D 20 27 30 27 3B 0A 20 20 20 20
20 20 7D 0A 20 20 20 20 20 23 20 24 66 62 20 69 73 20 66 61 6C 6C 62 61
63 6B 20 66 6C 61 67 0A 20 20 20 20 20 23 20 30 20 2D 20 72 6F 75 6E 64
20 74 72 69 70 20 73 61 66 65 0A 20 20 20 20 20 23 20 31 20 2D 20 66 61
6C 6C 62 61 63 6B 20 66 6F 72 20 75 6E 69 63 6F 64 65 20 2D 3E 20 65 6E
63 0A 20 20 20 20 20 23 20 32 20 2D 20 73 6B 69 70 20 73 75 62 2D 63 68
61 72 20 6D 61 70 70 69 6E 67 0A 20 20 20 20 20 23 20 33 20 2D 20 66 61
6C 6C 62 61 63 6B 20 65 6E 63 20 2D 3E 20 75 6E 69 63 6F 64 65 0A 20 20
20 20 20 65 6E 74 65 72 28 24 75 32 65 2C 24 75 63 68 2C 24 65 63 68 2C
24 75 32 65 2C 24 66 62 2B 30 29 20 69 66 20 28 24 66 62 20 3D 7E 20 2F
5B 30 31 5D 2F 29 3B 0A 20 20 20 20 20 65 6E 74 65 72 28 24 65 32 75 2C
24 65 63 68 2C 24 75 63 68 2C 24 65 32 75 2C 24 66 62 2B 30 29 20 69 66
20 28 24 66 62 20 3D 7E 20 2F 5B 30 33 5D 2F 29 3B 0A 20 20 20 20 7D 0A
20 20 20 65 6C 73 65 0A 20 20 20 20 7B 0A 20 20 20 20 20 77 61 72 6E 20
24 5F 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 20 69 66 20 28 24 6E 66 62 20
26 26 20 24 68 66 62 29 0A 20 20 7B 0A 20 20 20 64 69 65 20 22 24 6E 66
62 20 65 6E 74 72 69 65 73 20 77 69 74 68 6F 75 74 20 66 61 6C 6C 62 61
63 6B 2C 20 24 68 66 62 20 65 6E 74 72 69 65 73 20 77 69 74 68 5C 6E 22
3B 0A 20 20 7D 0A 20 24 65 6E 63 6F 64 69 6E 67 7B 24 6E 61 6D 65 7D 20
3D 20 5B 24 65 32 75 2C 24 75 32 65 2C 24 65 72 65 70 2C 24 6D 69 6E 5F
65 6C 2C 24 6D 61 78 5F 65 6C 5D 3B 0A 7D 0A 0A 0A 0A 73 75 62 20 63 6F
6D 70 69 6C 65 5F 65 6E 63 0A 7B 0A 20 6D 79 20 28 24 66 68 2C 24 6E 61
6D 65 29 20 3D 20 40 5F 3B 0A 20 6D 79 20 24 65 32 75 20 3D 20 7B 7D 3B
0A 20 6D 79 20 24 75 32 65 20 3D 20 7B 7D 3B 0A 0A 20 6D 79 20 24 74 79
70 65 3B 0A 20 77 68 69 6C 65 20 28 24 74 79 70 65 20 3D 20 3C 24 66 68
3E 29 0A 20 20 7B 0A 20 20 20 6C 61 73 74 20 69 66 20 24 74 79 70 65 20
21 7E 20 2F 5E 5C 73 2A 23 2F 3B 0A 20 20 7D 0A 20 63 68 6F 6D 70 28 24
74 79 70 65 29 3B 0A 20 72 65 74 75 72 6E 20 69 66 20 24 74 79 70 65 20
65 71 20 27 45 27 3B 0A 20 23 20 44 6F 20 74 68 65 20 68 61 73 68 20 6C
6F 6F 6B 75 70 20 6F 6E 63 65 2C 20 72 61 74 68 65 72 20 74 68 61 6E 20
6F 6E 63 65 20 70 65 72 20 66 75 6E 63 74 69 6F 6E 20 63 61 6C 6C 2E 20
34 25 20 73 70 65 65 64 75 70 2E 0A 20 6D 79 20 24 74 79 70 65 5F 66 75
6E 63 20 3D 20 24 65 6E 63 6F 64 65 5F 74 79 70 65 73 7B 24 74 79 70 65
7D 3B 0A 20 6D 79 20 28 24 64 65 66 2C 24 73 79 6D 2C 24 70 61 67 65 73
29 20 3D 20 73 70 6C 69 74 28 2F 5C 73 2B 2F 2C 73 63 61 6C 61 72 28 3C
24 66 68 3E 29 29 3B 0A 20 77 61 72 6E 20 22 24 74 79 70 65 20 65 6E 63
6F 64 65 64 20 24 6E 61 6D 65 5C 6E 22 3B 0A 20 6D 79 20 24 72 65 70 20
3D 20 27 27 3B 0A 20 23 20 53 61 76 65 20 61 20 64 65 66 69 6E 65 64 20
74 65 73 74 20 62 79 20 73 65 74 74 69 6E 67 20 74 68 65 73 65 20 74 6F
20 64 65 66 69 6E 65 64 20 76 61 6C 75 65 73 2E 0A 20 6D 79 20 24 6D 69
6E 5F 65 6C 20 3D 20 7E 30 3B 20 23 20 41 20 76 65 72 79 20 62 69 67 20
69 6E 74 65 67 65 72 0A 20 6D 79 20 24 6D 61 78 5F 65 6C 20 3D 20 30 3B
20 20 23 20 41 6E 79 74 68 69 6E 67 20 6D 75 73 74 20 62 65 20 6C 6F 6E
67 65 72 20 74 68 61 6E 20 30 0A 20 7B 0A 20 20 6D 79 20 24 76 20 3D 20
68 65 78 28 24 64 65 66 29 3B 0A 20 20 24 72 65 70 20 3D 20 26 24 74 79
70 65 5F 66 75 6E 63 28 24 76 20 26 20 30 78 46 46 2C 20 28 24 76 20 3E
3E 20 38 29 20 26 20 30 78 66 66 65 29 3B 0A 20 7D 0A 20 6D 79 20 24 65
72 72 6F 72 73 3B 0A 20 6D 79 20 24 73 65 65 6E 3B 0A 20 23 20 75 73 65
20 2D 51 20 74 6F 20 73 69 6C 65 6E 63 65 20 74 68 65 20 73 65 65 6E 20
74 65 73 74 2E 20 4D 61 6B 65 66 69 6C 65 2E 50 4C 20 75 73 65 73 20 74
68 69 73 20 62 79 20 64 65 66 61 75 6C 74 2E 0A 20 24 73 65 65 6E 20 3D
20 7B 7D 20 75 6E 6C 65 73 73 20 24 6F 70 74 7B 51 7D 3B 0A 20 64 6F 0A
20 20 7B 0A 20 20 20 6D 79 20 24 6C 69 6E 65 20 3D 20 3C 24 66 68 3E 3B
0A 20 20 20 63 68 6F 6D 70 28 24 6C 69 6E 65 29 3B 0A 20 20 20 6D 79 20
24 70 61 67 65 20 3D 20 68 65 78 28 24 6C 69 6E 65 29 3B 0A 20 20 20 6D
79 20 24 63 68 20 3D 20 30 3B 0A 20 20 20 6D 79 20 24 69 20 3D 20 31 36
3B 0A 20 20 20 64 6F 0A 20 20 20 20 7B 0A 20 20 20 20 20 23 20 53 6F 20
77 68 79 20 69 73 20 69 74 20 31 25 20 66 61 73 74 65 72 20 74 6F 20 6C
65 61 76 65 20 74 68 65 20 6D 79 20 68 65 72 65 3F 0A 20 20 20 20 20 6D
79 20 24 6C 69 6E 65 20 3D 20 3C 24 66 68 3E 3B 0A 20 20 20 20 20 24 6C
69 6E 65 20 3D 7E 20 73 2F 5C 72 5C 6E 24 2F 5C 6E 2F 3B 0A 20 20 20 20
20 64 69 65 20 22 24 2E 3A 24 7B 6C 69 6E 65 7D 4C 69 6E 65 20 73 68 6F
75 6C 64 20 62 65 20 65 78 61 63 74 6C 79 20 36 35 20 63 68 61 72 61 63
74 65 72 73 20 6C 6F 6E 67 20 69 6E 63 6C 75 64 69 6E 67 0A 20 20 20 20
20 6E 65 77 6C 69 6E 65 20 28 22 2E 6C 65 6E 67 74 68 28 24 6C 69 6E 65
29 2E 22 29 22 20 75 6E 6C 65 73 73 20 6C 65 6E 67 74 68 20 28 24 6C 69
6E 65 29 20 3D 3D 20 36 35 3B 0A 20 20 20 20 20 23 20 53 70 6C 69 74 20
6C 69 6E 65 20 69 6E 74 6F 20 67 72 6F 75 70 73 20 6F 66 20 34 20 68 65
78 20 64 69 67 69 74 73 2C 20 63 6F 6E 76 65 72 74 20 67 72 6F 75 70 73
20 74 6F 20 69 6E 74 73 0A 20 20 20 20 20 23 20 54 68 69 73 20 74 61 6B
65 73 20 36 35 2E 33 35 09 09 0A 20 20 20 20 20 23 20 6D 61 70 20 7B 68
65 78 20 24 5F 7D 20 24 6C 69 6E 65 20 3D 7E 20 2F 28 2E 2E 2E 2E 29 2F
67 0A 20 20 20 20 20 23 20 54 68 69 73 20 74 61 6B 65 73 20 36 33 2E 37
35 20 28 32 2E 35 25 20 6C 65 73 73 20 74 69 6D 65 29 0A 20 20 20 20 20
23 20 75 6E 70 61 63 6B 20 22 6E 2A 22 2C 20 70 61 63 6B 20 22 48 2A 22
2C 20 24 6C 69 6E 65 0A 20 20 20 20 20 23 20 54 68 65 72 65 27 73 20 61
6E 20 69 6D 70 6C 69 63 69 74 20 6C 6F 6F 70 20 69 6E 20 6D 61 70 2E 20
4C 6F 6F 70 73 20 61 72 65 20 62 61 64 2C 20 6D 27 6B 61 79 2E 20 4F 70
73 20 61 72 65 20 62 61 64 2C 20 6D 27 6B 61 79 0A 20 20 20 20 20 23 20
44 6F 69 6E 67 20 69 74 20 61 73 20 77 68 69 6C 65 20 28 24 6C 69 6E 65
20 3D 7E 20 2F 28 2E 2E 2E 2E 29 2F 67 29 20 74 6F 6F 6B 20 37 34 2E 36
33 0A 20 20 20 20 20 66 6F 72 65 61 63 68 20 6D 79 20 24 76 61 6C 20 28
75 6E 70 61 63 6B 20 22 6E 2A 22 2C 20 70 61 63 6B 20 22 48 2A 22 2C 20
24 6C 69 6E 65 29 0A 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20 20 6E 65
78 74 20 69 66 20 24 76 61 6C 20 3D 3D 20 30 78 46 46 46 44 3B 0A 20 20
20 20 20 20 20 6D 79 20 24 65 63 68 20 3D 20 26 24 74 79 70 65 5F 66 75
6E 63 28 24 63 68 2C 24 70 61 67 65 29 3B 0A 20 20 20 20 20 20 20 69 66
20 28 24 76 61 6C 20 7C 7C 20 28 21 24 63 68 20 26 26 20 21 24 70 61 67
65 29 29 0A 20 20 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20 20 20 20 6D
79 20 24 65 6C 20 20 3D 20 6C 65 6E 67 74 68 28 24 65 63 68 29 3B 0A 20
20 20 20 20 20 20 20 20 24 6D 61 78 5F 65 6C 20 3D 20 24 65 6C 20 69 66
20 24 65 6C 20 3E 20 24 6D 61 78 5F 65 6C 3B 0A 20 20 20 20 20 20 20 20
20 24 6D 69 6E 5F 65 6C 20 3D 20 24 65 6C 20 69 66 20 24 65 6C 20 3C 20
24 6D 69 6E 5F 65 6C 3B 0A 20 20 20 20 20 20 20 20 20 6D 79 20 24 75 63
68 20 3D 20 65 6E 63 6F 64 65 5F 55 28 24 76 61 6C 29 3B 0A 20 20 20 20
20 20 20 20 20 69 66 20 28 24 73 65 65 6E 29 20 7B 0A 20 20 20 20 20 20
20 20 20 20 20 23 20 57 65 27 72 65 20 64 6F 69 6E 67 20 74 68 65 20 74
65 73 74 2E 0A 20 20 20 20 20 20 20 20 20 20 20 23 20 57 65 20 64 6F 6E
27 74 20 6E 65 65 64 20 74 6F 20 72 65 61 64 20 74 68 69 73 20 71 75 69
63 6B 6C 79 2C 20 73 6F 20 73 74 6F 72 69 6E 67 20 69 74 20 61 73 20 61
20 73 63 61 6C 61 72 2C 0A 20 20 20 20 20 20 20 20 20 20 20 23 20 72 61
74 68 65 72 20 74 68 61 6E 20 33 20 28 61 6E 6F 6E 20 61 72 72 61 79 2C
20 70 6C 75 73 20 74 68 65 20 32 20 73 63 61 6C 61 72 73 20 69 74 20 68
6F 6C 64 73 29 20 73 61 76 65 73 0A 20 20 20 20 20 20 20 20 20 20 20 23
20 52 41 4D 20 61 6E 64 20 6D 61 79 20 6D 61 6B 65 20 75 73 20 66 61 73
74 65 72 20 6F 6E 20 6C 6F 77 20 52 41 4D 20 73 79 73 74 65 6D 73 2E 20
5B 73 65 65 20 5F 5F 45 4E 44 5F 5F 5D 0A 20 20 20 20 20 20 20 20 20 20
20 69 66 20 28 65 78 69 73 74 73 20 24 73 65 65 6E 2D 3E 7B 24 75 63 68
7D 29 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 77 61 72 6E 20 73 70 72 69 6E 74 66 28 22 55
25 30 34 58 20 69 73 20 25 30 32 58 25 30 32 58 20 61 6E 64 20 25 30 34
58 5C 6E 22 2C 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 24 76 61 6C 2C 24 70 61 67 65 2C 24 63 68
2C 24 73 65 65 6E 2D 3E 7B 24 75 63 68 7D 29 3B 0A 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 24 65 72 72 6F 72 73 2B 2B 3B 0A 20 20 20 20 20
20 20 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 20 20 20 20 20 65 6C 73
65 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 7B 0A 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 24 73 65 65 6E 2D 3E 7B 24 75 63 68 7D 20 3D 20
24 70 61 67 65 20 3C 3C 20 38 20 7C 20 24 63 68 3B 0A 20 20 20 20 20 20
20 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20 20 20 20 7D 0A 20 20 20 20
20 20 20 20 20 23 20 50 61 73 73 69 6E 67 20 32 20 65 78 74 72 61 20 61
72 67 73 20 65 61 63 68 20 74 69 6D 65 20 69 73 20 33 2E 36 25 20 73 6C
6F 77 65 72 21 0A 20 20 20 20 20 20 20 20 20 23 20 45 76 65 6E 20 77 69
74 68 20 68 61 76 69 6E 67 20 74 6F 20 61 64 64 20 24 66 61 6C 6C 62 61
63 6B 20 7C 7C 3D 20 30 20 6C 61 74 65 72 0A 20 20 20 20 20 20 20 20 20
65 6E 74 65 72 5F 66 62 30 28 24 65 32 75 2C 24 65 63 68 2C 24 75 63 68
29 3B 0A 20 20 20 20 20 20 20 20 20 65 6E 74 65 72 5F 66 62 30 28 24 75
32 65 2C 24 75 63 68 2C 24 65 63 68 29 3B 0A 20 20 20 20 20 20 20 20 7D
0A 20 20 20 20 20 20 20 65 6C 73 65 0A 20 20 20 20 20 20 20 20 7B 0A 20
20 20 20 20 20 20 20 20 23 20 4E 6F 20 63 68 61 72 61 63 74 65 72 20 61
74 20 74 68 69 73 20 70 6F 73 69 74 69 6F 6E 0A 20 20 20 20 20 20 20 20
20 23 20 65 6E 74 65 72 28 24 65 32 75 2C 24 65 63 68 2C 75 6E 64 65 66
2C 24 65 32 75 29 3B 0A 20 20 20 20 20 20 20 20 7D 0A 20 20 20 20 20 20
20 24 63 68 2B 2B 3B 0A 20 20 20 20 20 20 7D 0A 20 20 20 20 7D 20 77 68
69 6C 65 20 2D 2D 24 69 3B 0A 20 20 7D 20 77 68 69 6C 65 20 2D 2D 24 70
61 67 65 73 3B 0A 20 64 69 65 20 22 5C 24 6D 69 6E 5F 65 6C 3D 24 6D 69
6E 5F 65 6C 2C 20 5C 24 6D 61 78 5F 65 6C 3D 24 6D 61 78 5F 65 6C 20 2D
20 73 65 65 6D 73 20 77 65 20 72 65 61 64 20 6E 6F 20 6C 69 6E 65 73 22
0A 20 20 20 69 66 20 24 6D 69 6E 5F 65 6C 20 3E 20 24 6D 61 78 5F 65 6C
3B 0A 20 64 69 65 20 22 24 65 72 72 6F 72 73 20 6D 61 70 70 69 6E 67 20
63 6F 6E 66 6C 69 63 74 73 5C 6E 22 20 69 66 20 28 24 65 72 72 6F 72 73
20 26 26 20 24 6F 70 74 7B 27 53 27 7D 29 3B 0A 20 24 65 6E 63 6F 64 69
6E 67 7B 24 6E 61 6D 65 7D 20 3D 20 5B 24 65 32 75 2C 24 75 32 65 2C 24
72 65 70 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61 78 5F 65 6C 5D 3B 0A 7D 0A
0A 23 20 6D 79 20 28 24 61 2C 24 73 2C 24 64 2C 24 74 2C 24 66 62 29 20
3D 20 40 5F 3B 0A 73 75 62 20 65 6E 74 65 72 20 7B 0A 20 20 6D 79 20 28
24 63 75 72 72 65 6E 74 2C 24 69 6E 62 79 74 65 73 2C 24 6F 75 74 62 79
74 65 73 2C 24 6E 65 78 74 2C 24 66 61 6C 6C 62 61 63 6B 29 20 3D 20 40
5F 3B 0A 20 20 23 20 73 74 61 74 65 20 77 65 20 73 68 69 66 74 20 74 6F
20 61 66 74 65 72 20 74 68 69 73 20 28 6D 75 6C 74 69 62 79 74 65 29 20
69 6E 70 75 74 20 63 68 61 72 61 63 74 65 72 20 64 65 66 61 75 6C 74 73
20 74 6F 20 73 61 6D 65 0A 20 20 23 20 61 73 20 63 75 72 72 65 6E 74 20
73 74 61 74 65 2E 0A 20 20 24 6E 65 78 74 20 7C 7C 3D 20 24 63 75 72 72
65 6E 74 3B 0A 20 20 23 20 4D 61 6B 69 6E 67 20 73 75 72 65 20 69 74 20
69 73 20 64 65 66 69 6E 65 64 20 73 65 65 6D 73 20 74 6F 20 62 65 20 66
61 73 74 65 72 20 74 68 61 6E 20 7B 6E 6F 20 77 61 72 6E 69 6E 67 73 3B
7D 20 69 6E 0A 20 20 23 20 26 70 72 6F 63 65 73 73 2C 20 6F 72 20 70 61
73 73 69 6E 67 20 69 74 20 69 6E 20 61 73 20 30 20 65 78 70 6C 69 63 69
74 79 2E 0A 20 20 23 20 58 58 58 20 24 66 61 6C 6C 62 61 63 6B 20 7C 7C
3D 20 30 3B 0A 0A 20 20 23 20 53 74 61 72 74 20 61 74 20 74 68 65 20 62
65 67 69 6E 6E 69 6E 67 20 61 6E 64 20 77 6F 72 6B 20 66 6F 72 77 61 72
64 73 20 74 68 72 6F 75 67 68 20 74 68 65 20 73 74 72 69 6E 67 20 74 6F
20 7A 65 72 6F 2E 0A 20 20 23 20 65 66 66 65 63 74 69 76 65 6C 79 20 77
65 20 61 72 65 20 72 65 6D 6F 76 69 6E 67 20 31 20 63 68 61 72 61 63 74
65 72 20 66 72 6F 6D 20 74 68 65 20 66 72 6F 6E 74 20 65 61 63 68 20 74
69 6D 65 0A 20 20 23 20 62 75 74 20 77 65 20 64 6F 6E 27 74 20 61 63 74
75 61 6C 6C 79 20 65 64 69 74 20 74 68 65 20 73 74 72 69 6E 67 2E 20 5B
74 68 69 73 20 61 6C 6F 6E 65 20 73 65 65 6D 73 20 74 6F 20 62 65 20 31
34 25 20 73 70 65 65 64 75 70 5D 0A 20 20 23 20 48 65 6E 63 65 20 2D 24
70 6F 73 20 69 73 20 74 68 65 20 6C 65 6E 67 74 68 20 6F 66 20 74 68 65
20 72 65 6D 61 69 6E 69 6E 67 20 73 74 72 69 6E 67 2E 0A 20 20 6D 79 20
24 70 6F 73 20 3D 20 2D 6C 65 6E 67 74 68 20 24 69 6E 62 79 74 65 73 3B
0A 20 20 77 68 69 6C 65 20 28 31 29 20 7B 0A 20 20 20 20 6D 79 20 24 62
79 74 65 20 3D 20 73 75 62 73 74 72 20 24 69 6E 62 79 74 65 73 2C 20 24
70 6F 73 2C 20 31 3B 0A 20 20 20 20 23 20 20 52 41 57 5F 4E 45 58 54 20
3D 3E 20 30 2C 0A 20 20 20 20 23 20 20 52 41 57 5F 49 4E 5F 4C 45 4E 20
3D 3E 20 31 2C 0A 20 20 20 20 23 20 20 52 41 57 5F 4F 55 54 5F 42 59 54
45 53 20 3D 3E 20 32 2C 0A 20 20 20 20 23 20 20 52 41 57 5F 46 41 4C 4C
42 41 43 4B 20 3D 3E 20 33 2C 0A 20 20 20 20 23 20 74 6F 20 75 6E 69 63
6F 64 65 20 61 6E 20 61 72 72 61 79 20 77 6F 75 6C 64 20 73 65 65 6D 20
74 6F 20 62 65 20 62 65 74 74 65 72 2C 20 62 65 63 61 75 73 65 20 74 68
65 20 70 61 67 65 73 20 61 72 65 20 64 65 6E 73 65 2E 0A 20 20 20 20 23
20 66 72 6F 6D 20 75 6E 69 63 6F 64 65 20 63 61 6E 20 62 65 20 76 65 72
79 20 73 70 61 72 73 65 2C 20 66 61 76 6F 75 72 69 6E 67 20 61 20 68 61
73 68 2E 0A 20 20 20 20 23 20 68 61 73 68 20 75 73 69 6E 67 20 74 68 65
20 62 79 74 65 73 20 28 61 6C 6C 20 6C 65 6E 67 74 68 20 31 29 20 61 73
20 6B 65 79 73 20 72 61 74 68 65 72 20 74 68 61 6E 20 6F 72 64 20 76 61
6C 75 65 2C 0A 20 20 20 20 23 20 61 73 20 69 74 27 73 20 65 61 73 69 65
72 20 74 6F 20 73 6F 72 74 20 74 68 65 73 65 20 69 6E 20 26 70 72 6F 63
65 73 73 2E 0A 0A 20 20 20 20 23 20 49 74 27 73 20 66 61 73 74 65 72 20
74 6F 20 61 6C 77 61 79 73 20 61 64 64 20 24 66 61 6C 6C 62 61 63 6B 20
65 76 65 6E 20 69 66 20 69 74 27 73 20 75 6E 64 65 66 2C 20 72 61 74 68
65 72 20 74 68 61 6E 0A 20 20 20 20 23 20 63 68 6F 6F 73 69 6E 67 20 62
65 74 77 65 65 6E 20 33 20 61 6E 64 20 34 20 65 6C 65 6D 65 6E 74 20 61
72 72 61 79 2E 20 28 68 65 6E 63 65 20 77 68 79 20 77 65 20 73 65 74 20
69 74 20 64 65 66 69 6E 65 64 0A 20 20 20 20 23 20 61 62 6F 76 65 29 0A
20 20 20 20 6D 79 20 24 64 6F 5F 6E 6F 77 20 3D 20 24 63 75 72 72 65 6E
74 2D 3E 7B 52 61 77 7D 7B 24 62 79 74 65 7D 20 7C 7C 3D 20 5B 7B 7D 2C
2D 24 70 6F 73 2C 27 27 2C 24 66 61 6C 6C 62 61 63 6B 5D 3B 0A 20 20 20
20 23 20 57 68 65 6E 20 24 70 6F 73 20 77 61 73 20 2D 31 20 77 65 20 77
65 72 65 20 61 74 20 74 68 65 20 6C 61 73 74 20 69 6E 70 75 74 20 63 68
61 72 61 63 74 65 72 2E 0A 20 20 20 20 75 6E 6C 65 73 73 20 28 2B 2B 24
70 6F 73 29 20 7B 0A 20 20 20 20 20 20 24 64 6F 5F 6E 6F 77 2D 3E 5B 52
41 57 5F 4F 55 54 5F 42 59 54 45 53 5D 20 3D 20 24 6F 75 74 62 79 74 65
73 3B 0A 20 20 20 20 20 20 24 64 6F 5F 6E 6F 77 2D 3E 5B 52 41 57 5F 4E
45 58 54 5D 20 3D 20 24 6E 65 78 74 3B 0A 20 20 20 20 20 20 72 65 74 75
72 6E 3B 0A 20 20 20 20 7D 0A 20 20 20 20 23 20 54 61 69 6C 20 72 65 63
75 72 73 69 6F 6E 2E 20 54 68 65 20 69 6E 74 65 72 6D 64 69 61 74 65 20
73 74 61 74 65 20 6D 61 79 20 6E 6F 74 20 68 61 76 65 20 61 20 6E 61 6D
65 20 79 65 74 2E 0A 20 20 20 20 24 63 75 72 72 65 6E 74 20 3D 20 24 64
6F 5F 6E 6F 77 2D 3E 5B 52 41 57 5F 4E 45 58 54 5D 3B 0A 20 20 7D 0A 7D
0A 0A 23 20 54 68 69 73 20 69 73 20 70 75 72 65 6C 79 20 66 6F 72 20 6F
70 74 69 6D 69 73 74 61 74 69 6F 6E 2E 20 49 74 27 73 20 6A 75 73 74 20
26 65 6E 74 65 72 20 68 61 72 64 20 63 6F 64 65 64 20 66 6F 72 20 24 66
61 6C 6C 62 61 63 6B 0A 23 20 6F 66 20 30 2C 20 75 73 69 6E 67 20 6F 6E
6C 79 20 61 20 33 20 65 6E 74 72 79 20 61 72 72 61 79 20 72 65 66 20 74
6F 20 73 61 76 65 20 6D 65 6D 6F 72 79 20 66 6F 72 20 65 76 65 72 79 20
65 6E 74 72 79 2E 0A 73 75 62 20 65 6E 74 65 72 5F 66 62 30 20 7B 0A 20
20 6D 79 20 28 24 63 75 72 72 65 6E 74 2C 24 69 6E 62 79 74 65 73 2C 24
6F 75 74 62 79 74 65 73 2C 24 6E 65 78 74 29 20 3D 20 40 5F 3B 0A 20 20
24 6E 65 78 74 20 7C 7C 3D 20 24 63 75 72 72 65 6E 74 3B 0A 0A 20 20 6D
79 20 24 70 6F 73 20 3D 20 2D 6C 65 6E 67 74 68 20 24 69 6E 62 79 74 65
73 3B 0A 20 20 77 68 69 6C 65 20 28 31 29 20 7B 0A 20 20 20 20 6D 79 20
24 62 79 74 65 20 3D 20 73 75 62 73 74 72 20 24 69 6E 62 79 74 65 73 2C
20 24 70 6F 73 2C 20 31 3B 0A 20 20 20 20 6D 79 20 24 64 6F 5F 6E 6F 77
20 3D 20 24 63 75 72 72 65 6E 74 2D 3E 7B 52 61 77 7D 7B 24 62 79 74 65
7D 20 7C 7C 3D 20 5B 7B 7D 2C 2D 24 70 6F 73 2C 27 27 5D 3B 0A 20 20 20
20 75 6E 6C 65 73 73 20 28 2B 2B 24 70 6F 73 29 20 7B 0A 20 20 20 20 20
20 24 64 6F 5F 6E 6F 77 2D 3E 5B 52 41 57 5F 4F 55 54 5F 42 59 54 45 53
5D 20 3D 20 24 6F 75 74 62 79 74 65 73 3B 0A 20 20 20 20 20 20 24 64 6F
5F 6E 6F 77 2D 3E 5B 52 41 57 5F 4E 45 58 54 5D 20 3D 20 24 6E 65 78 74
3B 0A 20 20 20 20 20 20 72 65 74 75 72 6E 3B 0A 20 20 20 20 7D 0A 20 20
20 20 24 63 75 72 72 65 6E 74 20 3D 20 24 64 6F 5F 6E 6F 77 2D 3E 5B 52
41 57 5F 4E 45 58 54 5D 3B 0A 20 20 7D 0A 7D 0A 0A 73 75 62 20 70 72 6F
63 65 73 73 0A 7B 0A 20 20 6D 79 20 28 24 6E 61 6D 65 2C 24 61 29 20 3D
20 40 5F 3B 0A 20 20 24 6E 61 6D 65 20 3D 7E 20 73 2F 5C 57 2B 2F 5F 2F
67 3B 0A 20 20 24 61 2D 3E 7B 43 6E 61 6D 65 7D 20 3D 20 24 6E 61 6D 65
3B 0A 20 20 6D 79 20 24 72 61 77 20 3D 20 24 61 2D 3E 7B 52 61 77 7D 3B
0A 20 20 6D 79 20 28 24 6C 2C 20 24 61 67 67 5F 6D 61 78 5F 69 6E 2C 20
24 61 67 67 5F 6E 65 78 74 2C 20 24 61 67 67 5F 69 6E 5F 6C 65 6E 2C 20
24 61 67 67 5F 6F 75 74 5F 6C 65 6E 2C 20 24 61 67 67 5F 66 61 6C 6C 62
61 63 6B 29 3B 0A 20 20 6D 79 20 40 65 6E 74 3B 0A 20 20 24 61 67 67 5F
6D 61 78 5F 69 6E 20 3D 20 30 3B 0A 20 20 66 6F 72 65 61 63 68 20 6D 79
20 24 6B 65 79 20 28 73 6F 72 74 20 6B 65 79 73 20 25 24 72 61 77 29 20
7B 0A 20 20 20 20 23 20 20 52 41 57 5F 4E 45 58 54 20 3D 3E 20 30 2C 0A
20 20 20 20 23 20 20 52 41 57 5F 49 4E 5F 4C 45 4E 20 3D 3E 20 31 2C 0A
20 20 20 20 23 20 20 52 41 57 5F 4F 55 54 5F 42 59 54 45 53 20 3D 3E 20
32 2C 0A 20 20 20 20 23 20 20 52 41 57 5F 46 41 4C 4C 42 41 43 4B 20 3D
3E 20 33 2C 0A 20 20 20 20 6D 79 20 28 24 6E 65 78 74 2C 20 24 69 6E 5F
6C 65 6E 2C 20 24 6F 75 74 5F 62 79 74 65 73 2C 20 24 66 61 6C 6C 62 61
63 6B 29 20 3D 20 40 7B 24 72 61 77 2D 3E 7B 24 6B 65 79 7D 7D 3B 0A 20
20 20 20 23 20 4E 6F 77 20 77 65 20 61 72 65 20 63 6F 6E 76 65 72 74 69
6E 67 20 66 72 6F 6D 20 72 61 77 20 74 6F 20 61 67 67 72 65 67 61 74 65
2C 20 73 77 69 74 63 68 20 66 72 6F 6D 20 31 20 62 79 74 65 20 73 74 72
69 6E 67 73 0A 20 20 20 20 23 20 74 6F 20 6E 75 6D 62 65 72 73 0A 20 20
20 20 6D 79 20 24 62 20 3D 20 6F 72 64 20 24 6B 65 79 3B 0A 20 20 20 20
24 66 61 6C 6C 62 61 63 6B 20 7C 7C 3D 20 30 3B 0A 20 20 20 20 69 66 20
28 24 6C 20 26 26 0A 20 20 20 20 20 20 20 20 23 20 49 66 20 74 68 69 73
20 3D 3D 20 66 61 69 6C 73 2C 20 77 65 27 72 65 20 67 6F 69 6E 67 20 74
6F 20 72 65 73 65 74 20 24 61 67 67 5F 6D 61 78 5F 69 6E 20 62 65 6C 6F
77 20 61 6E 79 77 61 79 2E 0A 20 20 20 20 20 20 20 20 24 62 20 3D 3D 20
2B 2B 24 61 67 67 5F 6D 61 78 5F 69 6E 20 26 26 0A 20 20 20 20 20 20 20
20 23 20 52 65 66 65 72 65 6E 63 65 73 20 69 6E 20 6E 75 6D 65 72 69 63
20 63 6F 6E 74 65 78 74 20 67 69 76 65 20 74 68 65 20 70 6F 69 6E 74 65
72 20 61 73 20 61 6E 20 69 6E 74 2E 0A 20 20 20 20 20 20 20 20 24 61 67
67 5F 6E 65 78 74 20 3D 3D 20 24 6E 65 78 74 20 26 26 0A 20 20 20 20 20
20 20 20 24 61 67 67 5F 69 6E 5F 6C 65 6E 20 3D 3D 20 24 69 6E 5F 6C 65
6E 20 26 26 0A 20 20 20 20 20 20 20 20 24 61 67 67 5F 6F 75 74 5F 6C 65
6E 20 3D 3D 20 6C 65 6E 67 74 68 20 24 6F 75 74 5F 62 79 74 65 73 20 26
26 0A 20 20 20 20 20 20 20 20 24 61 67 67 5F 66 61 6C 6C 62 61 63 6B 20
3D 3D 20 24 66 61 6C 6C 62 61 63 6B 0A 20 20 20 20 20 20 20 20 23 20 26
26 20 6C 65 6E 67 74 68 28 24 6C 2D 3E 5B 41 47 47 5F 4F 55 54 5F 42 59
54 45 53 5D 29 20 3C 20 31 36 0A 20 20 20 20 20 20 20 29 20 7B 0A 20 20
20 20 20 20 23 20 20 20 20 20 6D 79 20 24 69 20 3D 20 6F 72 64 28 24 62
29 2D 6F 72 64 28 24 6C 2D 3E 5B 41 47 47 5F 4D 49 4E 5F 49 4E 5D 29 3B
0A 20 20 20 20 20 20 23 20 77 65 20 63 61 6E 20 61 67 67 72 65 67 61 74
65 20 74 68 69 73 20 62 79 74 65 20 6F 6E 74 6F 20 74 68 65 20 65 6E 64
2E 0A 20 20 20 20 20 20 24 6C 2D 3E 5B 41 47 47 5F 4D 41 58 5F 49 4E 5D
20 3D 20 24 62 3B 0A 20 20 20 20 20 20 24 6C 2D 3E 5B 41 47 47 5F 4F 55
54 5F 42 59 54 45 53 5D 20 2E 3D 20 24 6F 75 74 5F 62 79 74 65 73 3B 0A
20 20 20 20 7D 20 65 6C 73 65 20 7B 0A 20 20 20 20 20 20 23 20 41 47 47
5F 4D 49 4E 5F 49 4E 20 3D 3E 20 30 2C 0A 20 20 20 20 20 20 23 20 41 47
47 5F 4D 41 58 5F 49 4E 20 3D 3E 20 31 2C 0A 20 20 20 20 20 20 23 20 41
47 47 5F 4F 55 54 5F 42 59 54 45 53 20 3D 3E 20 32 2C 0A 20 20 20 20 20
20 23 20 41 47 47 5F 4E 45 58 54 20 3D 3E 20 33 2C 0A 20 20 20 20 20 20
23 20 41 47 47 5F 49 4E 5F 4C 45 4E 20 3D 3E 20 34 2C 0A 20 20 20 20 20
20 23 20 41 47 47 5F 4F 55 54 5F 4C 45 4E 20 3D 3E 20 35 2C 0A 20 20 20
20 20 20 23 20 41 47 47 5F 46 41 4C 4C 42 41 43 4B 20 3D 3E 20 36 2C 0A
20 20 20 20 20 20 23 20 52 65 73 65 74 20 74 68 65 20 6C 61 73 74 20 74
68 69 6E 67 20 77 65 20 73 61 77 2C 20 70 6C 75 73 20 73 65 74 20 35 20
6C 65 78 69 63 61 6C 73 20 74 6F 20 73 61 76 65 20 73 6F 6D 65 20 64 65
72 65 66 73 2E 0A 20 20 20 20 20 20 23 20 28 6F 6E 6C 79 20 67 61 69 6E
73 20 2E 36 25 20 6F 6E 20 65 75 63 2D 6A 70 20 20 2D 2D 20 69 73 20 69
74 20 77 6F 72 74 68 20 69 74 3F 29 0A 20 20 20 20 20 20 70 75 73 68 20
40 65 6E 74 2C 20 24 6C 20 3D 20 5B 24 62 2C 20 24 61 67 67 5F 6D 61 78
5F 69 6E 20 3D 20 24 62 2C 20 24 6F 75 74 5F 62 79 74 65 73 2C 20 24 61
67 67 5F 6E 65 78 74 20 3D 20 24 6E 65 78 74 2C 0A 20 20 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 61 67 67 5F 69 6E 5F
6C 65 6E 20 3D 20 24 69 6E 5F 6C 65 6E 2C 20 24 61 67 67 5F 6F 75 74 5F
6C 65 6E 20 3D 20 6C 65 6E 67 74 68 20 24 6F 75 74 5F 62 79 74 65 73 2C
0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
24 61 67 67 5F 66 61 6C 6C 62 61 63 6B 20 3D 20 24 66 61 6C 6C 62 61 63
6B 5D 3B 0A 20 20 20 20 7D 0A 20 20 20 20 69 66 20 28 65 78 69 73 74 73
20 24 6E 65 78 74 2D 3E 7B 43 6E 61 6D 65 7D 29 20 7B 0A 20 20 20 20 20
20 24 6E 65 78 74 2D 3E 7B 27 46 6F 72 77 61 72 64 27 7D 20 3D 20 31 20
69 66 20 24 6E 65 78 74 20 21 3D 20 24 61 3B 0A 20 20 20 20 7D 20 65 6C
73 65 20 7B 0A 20 20 20 20 20 20 70 72 6F 63 65 73 73 28 73 70 72 69 6E
74 66 28 22 25 73 5F 25 30 32 78 22 2C 24 6E 61 6D 65 2C 24 62 29 2C 24
6E 65 78 74 29 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 20 20 23 20 65 6E 63
65 6E 67 69 6E 65 2E 63 20 72 75 6C 65 73 20 73 61 79 20 74 68 61 74 20
6C 61 73 74 20 65 6E 74 72 79 20 6D 75 73 74 20 62 65 20 66 6F 72 20 32
35 35 0A 20 20 69 66 20 28 24 61 67 67 5F 6D 61 78 5F 69 6E 20 3C 20 32
35 35 29 20 7B 0A 20 20 20 20 70 75 73 68 20 40 65 6E 74 2C 20 5B 31 2B
24 61 67 67 5F 6D 61 78 5F 69 6E 2C 20 32 35 35 2C 75 6E 64 65 66 2C 24
61 2C 30 2C 30 5D 3B 0A 20 20 7D 0A 20 20 24 61 2D 3E 7B 27 45 6E 74 72
69 65 73 27 7D 20 3D 20 5C 40 65 6E 74 3B 0A 7D 0A 0A 0A 73 75 62 20 61
64 64 73 74 72 69 6E 67 73 0A 7B 0A 20 6D 79 20 28 24 66 68 2C 24 61 29
20 3D 20 40 5F 3B 0A 20 6D 79 20 24 6E 61 6D 65 20 3D 20 24 61 2D 3E 7B
27 43 6E 61 6D 65 27 7D 3B 0A 20 23 20 53 74 72 69 6E 67 20 74 61 62 6C
65 73 0A 20 66 6F 72 65 61 63 68 20 6D 79 20 24 62 20 28 40 7B 24 61 2D
3E 7B 27 45 6E 74 72 69 65 73 27 7D 7D 29 0A 20 20 7B 0A 20 20 20 6E 65
78 74 20 75 6E 6C 65 73 73 20 24 62 2D 3E 5B 41 47 47 5F 4F 55 54 5F 4C
45 4E 5D 3B 0A 20 20 20 24 73 74 72 69 6E 67 73 7B 24 62 2D 3E 5B 41 47
47 5F 4F 55 54 5F 42 59 54 45 53 5D 7D 20 3D 20 75 6E 64 65 66 3B 0A 20
20 7D 0A 20 69 66 20 28 24 61 2D 3E 7B 27 46 6F 72 77 61 72 64 27 7D 29
0A 20 20 7B 0A 20 20 20 6D 79 20 24 76 61 72 20 3D 20 24 5E 4F 20 65 71
20 27 4D 61 63 4F 53 27 20 3F 20 27 65 78 74 65 72 6E 27 20 3A 20 27 73
74 61 74 69 63 27 3B 0A 20 20 20 70 72 69 6E 74 20 24 66 68 20 22 24 76
61 72 20 65 6E 63 70 61 67 65 5F 74 20 24 6E 61 6D 65 5C 5B 22 2C 73 63
61 6C 61 72 28 40 7B 24 61 2D 3E 7B 27 45 6E 74 72 69 65 73 27 7D 7D 29
2C 22 5D 3B 5C 6E 22 3B 0A 20 20 7D 0A 20 24 61 2D 3E 7B 27 44 6F 6E 65
53 74 72 69 6E 67 73 27 7D 20 3D 20 31 3B 0A 20 66 6F 72 65 61 63 68 20
6D 79 20 24 62 20 28 40 7B 24 61 2D 3E 7B 27 45 6E 74 72 69 65 73 27 7D
7D 29 0A 20 20 7B 0A 20 20 20 6D 79 20 28 24 73 2C 24 65 2C 24 6F 75 74
2C 24 74 2C 24 65 6E 64 2C 24 6C 29 20 3D 20 40 24 62 3B 0A 20 20 20 61
64 64 73 74 72 69 6E 67 73 28 24 66 68 2C 24 74 29 20 75 6E 6C 65 73 73
20 24 74 2D 3E 7B 27 44 6F 6E 65 53 74 72 69 6E 67 73 27 7D 3B 0A 20 20
7D 0A 7D 0A 0A 73 75 62 20 6F 75 74 62 69 67 73 74 72 69 6E 67 0A 7B 0A
20 20 6D 79 20 28 24 66 68 2C 24 6E 61 6D 65 29 20 3D 20 40 5F 3B 0A 0A
20 20 24 73 74 72 69 6E 67 5F 61 63 63 20 3D 20 27 27 3B 0A 0A 20 20 23
20 4D 61 6B 65 20 74 68 65 20 62 69 67 20 73 74 72 69 6E 67 20 69 6E 20
74 68 65 20 73 74 72 69 6E 67 20 61 63 63 75 6D 75 6C 61 74 6F 72 2E 20
4C 6F 6E 67 65 73 74 20 66 69 72 73 74 2C 20 6F 6E 20 74 68 65 20 68 6F
70 65 0A 20 20 23 20 74 68 61 74 20 74 68 69 73 20 6D 61 6B 65 73 20 69
74 20 6D 6F 72 65 20 6C 69 6B 65 6C 79 20 74 68 61 74 20 77 65 20 66 69
6E 64 20 74 68 65 20 73 68 6F 72 74 20 73 74 72 69 6E 67 73 20 6C 61 74
65 72 20 6F 6E 2E 0A 20 20 23 20 4E 6F 74 20 73 75 72 65 20 69 66 20 69
74 20 68 65 6C 70 73 20 73 6F 72 74 69 6E 67 20 73 74 72 69 6E 67 73 20
6F 66 20 74 68 65 20 73 61 6D 65 20 6C 65 6E 67 74 68 20 6C 65 78 63 69
63 61 6C 6C 79 2E 0A 20 20 66 6F 72 65 61 63 68 20 6D 79 20 24 73 20 28
73 6F 72 74 20 7B 6C 65 6E 67 74 68 20 24 62 20 3C 3D 3E 20 6C 65 6E 67
74 68 20 24 61 20 7C 7C 20 24 61 20 63 6D 70 20 24 62 7D 20 6B 65 79 73
20 25 73 74 72 69 6E 67 73 29 20 7B 0A 20 20 20 20 6D 79 20 24 69 6E 64
65 78 20 3D 20 69 6E 64 65 78 20 24 73 74 72 69 6E 67 5F 61 63 63 2C 20
24 73 3B 0A 20 20 20 20 69 66 20 28 24 69 6E 64 65 78 20 3E 3D 20 30 29
20 7B 0A 20 20 20 20 20 20 24 73 61 76 65 64 20 2B 3D 20 6C 65 6E 67 74
68 28 24 73 29 3B 0A 20 20 20 20 20 20 24 73 74 72 69 6E 67 73 5F 69 6E
5F 61 63 63 7B 24 73 7D 20 3D 20 24 69 6E 64 65 78 3B 0A 20 20 20 20 7D
20 65 6C 73 65 20 7B 0A 20 20 20 20 4F 50 54 49 4D 49 53 45 52 3A 20 7B
0A 09 69 66 20 28 24 6F 70 74 7B 27 4F 27 7D 29 20 7B 0A 09 20 20 6D 79
20 24 73 75 62 6C 65 6E 67 74 68 20 3D 20 6C 65 6E 67 74 68 20 24 73 3B
0A 09 20 20 77 68 69 6C 65 20 28 2D 2D 24 73 75 62 6C 65 6E 67 74 68 20
3E 20 30 29 20 7B 0A 09 20 20 20 20 23 20 70 72 6F 67 72 65 73 73 69 76
65 6C 79 20 6C 6F 70 20 63 68 61 72 61 63 74 65 72 73 20 6F 66 66 20 74
68 65 20 65 6E 64 2C 20 74 6F 20 73 65 65 20 69 66 20 74 68 65 20 73 74
61 72 74 20 6F 66 0A 09 20 20 20 20 23 20 74 68 65 20 6E 65 77 20 73 74
72 69 6E 67 20 6F 76 65 72 6C 61 70 73 20 74 68 65 20 65 6E 64 20 6F 66
20 74 68 65 20 61 63 63 75 6D 75 6C 61 74 6F 72 2E 0A 09 20 20 20 20 69
66 20 28 73 75 62 73 74 72 20 28 24 73 74 72 69 6E 67 5F 61 63 63 2C 20
2D 24 73 75 62 6C 65 6E 67 74 68 29 0A 09 09 65 71 20 73 75 62 73 74 72
20 28 24 73 2C 20 30 2C 20 24 73 75 62 6C 65 6E 67 74 68 29 29 20 7B 0A
09 20 20 20 20 20 20 24 73 75 62 73 61 76 65 20 2B 3D 20 24 73 75 62 6C
65 6E 67 74 68 3B 0A 09 20 20 20 20 20 20 24 73 74 72 69 6E 67 73 5F 69
6E 5F 61 63 63 7B 24 73 7D 20 3D 20 6C 65 6E 67 74 68 20 28 24 73 74 72
69 6E 67 5F 61 63 63 29 20 2D 20 24 73 75 62 6C 65 6E 67 74 68 3B 0A 09
20 20 20 20 20 20 23 20 61 70 70 65 6E 64 20 74 68 65 20 6C 61 73 74 20
62 69 74 20 6F 6E 20 74 68 65 20 65 6E 64 2E 0A 09 20 20 20 20 20 20 24
73 74 72 69 6E 67 5F 61 63 63 20 2E 3D 20 73 75 62 73 74 72 20 28 24 73
2C 20 24 73 75 62 6C 65 6E 67 74 68 29 3B 0A 09 20 20 20 20 20 20 6C 61
73 74 20 4F 50 54 49 4D 49 53 45 52 3B 0A 09 20 20 20 20 7D 0A 09 20 20
20 20 23 20 6F 72 20 69 66 20 74 68 65 20 65 6E 64 20 6F 66 20 74 68 65
20 6E 65 77 20 73 74 72 69 6E 67 20 6F 76 65 72 6C 61 70 73 20 74 68 65
20 73 74 61 72 74 20 6F 66 20 74 68 65 0A 09 20 20 20 20 23 20 61 63 63
75 6D 75 6C 61 74 6F 72 0A 09 20 20 20 20 6E 65 78 74 20 75 6E 6C 65 73
73 20 73 75 62 73 74 72 20 28 24 73 74 72 69 6E 67 5F 61 63 63 2C 20 30
2C 20 24 73 75 62 6C 65 6E 67 74 68 29 0A 09 20 20 20 20 20 20 65 71 20
73 75 62 73 74 72 20 28 24 73 2C 20 2D 24 73 75 62 6C 65 6E 67 74 68 29
3B 0A 09 20 20 20 20 23 20 77 65 6C 6C 2C 20 74 68 65 20 6C 61 73 74 20
24 73 75 62 6C 65 6E 67 74 68 20 63 68 61 72 61 63 74 65 72 73 20 6F 66
20 74 68 65 20 61 63 63 75 6D 75 6C 61 74 6F 72 20 6D 61 74 63 68 2E 0A
09 20 20 20 20 23 20 73 6F 20 61 73 20 77 65 27 72 65 20 70 72 65 70 65
6E 64 69 6E 67 20 74 6F 20 74 68 65 20 61 63 63 75 6D 75 6C 61 74 6F 72
2C 20 6E 65 65 64 20 74 6F 20 73 68 69 66 74 20 61 6C 6C 20 6F 75 72 0A
09 20 20 20 20 23 20 65 78 69 73 74 69 6E 67 20 6F 66 66 73 65 74 73 20
66 6F 72 77 61 72 64 73 0A 09 20 20 20 20 24 5F 20 2B 3D 20 24 73 75 62
6C 65 6E 67 74 68 20 66 6F 72 65 61 63 68 20 76 61 6C 75 65 73 20 25 73
74 72 69 6E 67 73 5F 69 6E 5F 61 63 63 3B 0A 09 20 20 20 20 24 73 75 62
73 61 76 65 20 2B 3D 20 24 73 75 62 6C 65 6E 67 74 68 3B 0A 09 20 20 20
20 24 73 74 72 69 6E 67 73 5F 69 6E 5F 61 63 63 7B 24 73 7D 20 3D 20 30
3B 0A 09 20 20 20 20 23 20 61 70 70 65 6E 64 20 74 68 65 20 66 69 72 73
74 20 62 69 74 20 6F 6E 20 74 68 65 20 73 74 61 72 74 2E 0A 09 20 20 20
20 24 73 74 72 69 6E 67 5F 61 63 63 20 3D 20 73 75 62 73 74 72 20 28 24
73 2C 20 30 2C 20 2D 24 73 75 62 6C 65 6E 67 74 68 29 20 2E 20 24 73 74
72 69 6E 67 5F 61 63 63 3B 0A 09 20 20 20 20 6C 61 73 74 20 4F 50 54 49
4D 49 53 45 52 3B 0A 09 20 20 7D 0A 09 7D 0A 09 23 20 4F 70 74 69 6D 69
73 65 72 20 28 69 66 20 69 74 20 72 61 6E 29 20 66 6F 75 6E 64 20 6E 6F
74 68 69 6E 67 2C 20 73 6F 20 6A 75 73 74 20 67 6F 69 6E 67 20 68 61 76
65 20 74 6F 20 74 61 63 6B 20 74 68 65 0A 09 23 20 77 68 6F 6C 65 20 74
68 69 6E 67 20 6F 6E 20 74 68 65 20 65 6E 64 2E 0A 09 24 73 74 72 69 6E
67 73 5F 69 6E 5F 61 63 63 7B 24 73 7D 20 3D 20 6C 65 6E 67 74 68 20 24
73 74 72 69 6E 67 5F 61 63 63 3B 0A 09 24 73 74 72 69 6E 67 5F 61 63 63
20 2E 3D 20 24 73 3B 0A 20 20 20 20 20 20 7D 3B 0A 20 20 20 20 7D 0A 20
20 7D 0A 0A 20 20 24 73 74 72 69 6E 67 73 20 3D 20 6C 65 6E 67 74 68 20
24 73 74 72 69 6E 67 5F 61 63 63 3B 0A 20 20 6D 79 20 24 64 65 66 69 6E
69 74 69 6F 6E 20 3D 20 22 5C 6E 73 74 61 74 69 63 20 63 6F 6E 73 74 20
55 38 20 24 6E 61 6D 65 5C 5B 24 73 74 72 69 6E 67 73 5D 20 3D 20 7B 20
22 20 2E 0A 20 20 20 20 6A 6F 69 6E 28 27 2C 27 2C 75 6E 70 61 63 6B 20
22 43 2A 22 2C 24 73 74 72 69 6E 67 5F 61 63 63 29 3B 0A 20 20 23 20 57
65 20 68 61 76 65 20 61 20 73 69 6E 67 6C 65 20 6C 6F 6E 67 20 6C 69 6E
65 2E 20 53 70 6C 69 74 20 69 74 20 61 74 20 63 6F 6E 76 65 6E 69 65 6E
74 20 63 6F 6D 6D 61 73 2E 0A 20 20 70 72 69 6E 74 20 24 66 68 20 24 31
2C 20 22 5C 6E 22 20 77 68 69 6C 65 20 24 64 65 66 69 6E 69 74 69 6F 6E
20 3D 7E 20 2F 5C 47 28 2E 7B 37 34 2C 37 37 7D 2C 29 2F 67 63 73 3B 0A
20 20 70 72 69 6E 74 20 24 66 68 20 73 75 62 73 74 72 20 28 24 64 65 66
69 6E 69 74 69 6F 6E 2C 20 70 6F 73 20 24 64 65 66 69 6E 69 74 69 6F 6E
29 2C 20 22 20 7D 3B 5C 6E 22 3B 0A 7D 0A 0A 73 75 62 20 66 69 6E 64 73
74 72 69 6E 67 20 7B 0A 20 20 6D 79 20 28 24 6E 61 6D 65 2C 24 73 29 20
3D 20 40 5F 3B 0A 20 20 6D 79 20 24 6F 66 66 73 65 74 20 3D 20 24 73 74
72 69 6E 67 73 5F 69 6E 5F 61 63 63 7B 24 73 7D 3B 0A 20 20 64 69 65 20
22 43 61 6E 27 74 20 66 69 6E 64 20 73 74 72 69 6E 67 20 22 20 2E 20 6A
6F 69 6E 20 28 27 2C 27 2C 75 6E 70 61 63 6B 20 22 43 2A 22 2C 24 73 29
20 2E 20 22 20 69 6E 20 61 63 63 75 6D 75 6C 61 74 6F 72 22 0A 20 20 20
20 75 6E 6C 65 73 73 20 64 65 66 69 6E 65 64 20 24 6F 66 66 73 65 74 3B
0A 20 20 22 24 6E 61 6D 65 20 2B 20 24 6F 66 66 73 65 74 22 3B 0A 7D 0A
0A 73 75 62 20 6F 75 74 74 61 62 6C 65 0A 7B 0A 20 6D 79 20 28 24 66 68
2C 24 61 2C 24 62 69 67 6E 61 6D 65 29 20 3D 20 40 5F 3B 0A 20 6D 79 20
24 6E 61 6D 65 20 3D 20 24 61 2D 3E 7B 27 43 6E 61 6D 65 27 7D 3B 0A 20
24 61 2D 3E 7B 27 44 6F 6E 65 27 7D 20 3D 20 31 3B 0A 20 66 6F 72 65 61
63 68 20 6D 79 20 24 62 20 28 40 7B 24 61 2D 3E 7B 27 45 6E 74 72 69 65
73 27 7D 7D 29 0A 20 20 7B 0A 20 20 20 6D 79 20 28 24 73 2C 24 65 2C 24
6F 75 74 2C 24 74 2C 24 65 6E 64 2C 24 6C 29 20 3D 20 40 24 62 3B 0A 20
20 20 6F 75 74 74 61 62 6C 65 28 24 66 68 2C 24 74 2C 24 62 69 67 6E 61
6D 65 29 20 75 6E 6C 65 73 73 20 24 74 2D 3E 7B 27 44 6F 6E 65 27 7D 3B
0A 20 20 7D 0A 20 70 72 69 6E 74 20 24 66 68 20 22 5C 6E 73 74 61 74 69
63 20 65 6E 63 70 61 67 65 5F 74 20 24 6E 61 6D 65 5C 5B 22 2C 73 63 61
6C 61 72 28 40 7B 24 61 2D 3E 7B 27 45 6E 74 72 69 65 73 27 7D 7D 29 2C
22 5D 20 3D 20 7B 5C 6E 22 3B 0A 20 66 6F 72 65 61 63 68 20 6D 79 20 24
62 20 28 40 7B 24 61 2D 3E 7B 27 45 6E 74 72 69 65 73 27 7D 7D 29 0A 20
20 7B 0A 20 20 20 6D 79 20 28 24 73 63 2C 24 65 63 2C 24 6F 75 74 2C 24
74 2C 24 65 6E 64 2C 24 6C 2C 24 66 62 29 20 3D 20 40 24 62 3B 0A 20 20
20 23 20 24 65 6E 64 20 7C 3D 20 30 78 38 30 20 69 66 20 24 66 62 3B 20
23 20 77 68 61 74 20 74 68 65 20 68 65 63 6B 20 77 61 73 20 6F 6E 20 79
6F 75 72 20 6D 69 6E 64 2C 20 4E 69 63 6B 3F 20 20 2D 2D 20 44 61 6E 0A
20 20 20 70 72 69 6E 74 20 20 24 66 68 20 22 7B 22 3B 0A 20 20 20 69 66
20 28 24 6C 29 0A 20 20 20 20 7B 0A 20 20 20 20 20 70 72 69 6E 74 66 20
24 66 68 20 66 69 6E 64 73 74 72 69 6E 67 28 24 62 69 67 6E 61 6D 65 2C
24 6F 75 74 29 3B 0A 20 20 20 20 7D 0A 20 20 20 65 6C 73 65 0A 20 20 20
20 7B 0A 20 20 20 20 20 70 72 69 6E 74 20 20 24 66 68 20 22 30 22 3B 0A
20 20 20 20 7D 0A 20 20 20 70 72 69 6E 74 20 20 24 66 68 20 22 2C 22 2C
24 74 2D 3E 7B 43 6E 61 6D 65 7D 3B 0A 20 20 20 70 72 69 6E 74 66 20 24
66 68 20 22 2C 30 78 25 30 32 78 2C 30 78 25 30 32 78 2C 24 6C 2C 24 65
6E 64 7D 2C 5C 6E 22 2C 24 73 63 2C 24 65 63 3B 0A 20 20 7D 0A 20 70 72
69 6E 74 20 24 66 68 20 22 7D 3B 5C 6E 22 3B 0A 7D 0A 0A 73 75 62 20 6F
75 74 70 75 74 5F 65 6E 63 0A 7B 0A 20 6D 79 20 28 24 66 68 2C 24 6E 61
6D 65 2C 24 61 29 20 3D 20 40 5F 3B 0A 20 64 69 65 20 22 43 68 61 6E 67
65 64 20 2D 20 66 69 78 20 6D 65 20 66 6F 72 20 6E 65 77 20 73 74 72 75
63 74 75 72 65 22 3B 0A 20 66 6F 72 65 61 63 68 20 6D 79 20 24 62 20 28
73 6F 72 74 20 6B 65 79 73 20 25 24 61 29 0A 20 20 7B 0A 20 20 20 6D 79
20 28 24 73 2C 24 65 2C 24 6F 75 74 2C 24 74 2C 24 65 6E 64 2C 24 6C 2C
24 66 62 29 20 3D 20 40 7B 24 61 2D 3E 7B 24 62 7D 7D 3B 0A 20 20 7D 0A
7D 0A 0A 73 75 62 20 64 65 63 6F 64 65 5F 55 0A 7B 0A 20 6D 79 20 24 73
20 3D 20 73 68 69 66 74 3B 0A 7D 0A 0A 6D 79 20 40 75 6E 61 6D 65 3B 0A
73 75 62 20 63 68 61 72 5F 6E 61 6D 65 73 0A 7B 0A 20 6D 79 20 24 73 20
3D 20 64 6F 20 22 75 6E 69 63 6F 72 65 2F 4E 61 6D 65 2E 70 6C 22 3B 0A
20 64 69 65 20 22 63 68 61 72 5F 6E 61 6D 65 73 3A 20 75 6E 69 63 6F 72
65 2F 4E 61 6D 65 2E 70 6C 3A 20 24 21 5C 6E 22 20 75 6E 6C 65 73 73 20
64 65 66 69 6E 65 64 20 24 73 3B 0A 20 70 6F 73 28 24 73 29 20 3D 20 30
3B 0A 20 77 68 69 6C 65 20 28 24 73 20 3D 7E 20 2F 5C 47 28 5B 30 2D 39
61 2D 66 5D 2B 29 5C 74 28 5B 30 2D 39 61 2D 66 5D 2A 29 5C 74 28 2E 2A
3F 29 5C 73 2A 5C 6E 2F 69 67 63 29 0A 20 20 7B 0A 20 20 20 6D 79 20 24
6E 61 6D 65 20 3D 20 24 33 3B 0A 20 20 20 6D 79 20 24 73 20 3D 20 68 65
78 28 24 31 29 3B 0A 20 20 20 6C 61 73 74 20 69 66 20 24 73 20 3E 3D 20
30 78 31 30 30 30 30 3B 0A 20 20 20 6D 79 20 24 65 20 3D 20 6C 65 6E 67
74 68 28 24 32 29 20 3F 20 68 65 78 28 24 32 29 20 3A 20 24 73 3B 0A 20
20 20 66 6F 72 20 28 6D 79 20 24 69 20 3D 20 24 73 3B 20 24 69 20 3C 3D
20 24 65 3B 20 24 69 2B 2B 29 0A 20 20 20 20 7B 0A 20 20 20 20 20 24 75
6E 61 6D 65 5B 24 69 5D 20 3D 20 24 6E 61 6D 65 3B 0A 23 20 20 20 20 70
72 69 6E 74 20 73 70 72 69 6E 74 66 28 22 55 25 30 34 58 20 24 6E 61 6D
65 5C 6E 22 2C 24 69 29 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 7D 0A 0A 73
75 62 20 6F 75 74 70 75 74 5F 75 63 6D 5F 70 61 67 65 0A 7B 0A 20 20 6D
79 20 28 24 63 6D 61 70 2C 24 61 2C 24 74 2C 24 70 72 65 29 20 3D 20 40
5F 3B 0A 20 20 23 20 77 61 72 6E 20 73 70 72 69 6E 74 66 28 22 50 61 67
65 20 25 78 5C 6E 22 2C 24 70 72 65 29 3B 0A 20 20 6D 79 20 24 72 61 77
20 3D 20 24 74 2D 3E 7B 52 61 77 7D 3B 0A 20 20 66 6F 72 65 61 63 68 20
6D 79 20 24 6B 65 79 20 28 73 6F 72 74 20 6B 65 79 73 20 25 24 72 61 77
29 20 7B 0A 20 20 20 20 23 20 20 52 41 57 5F 4E 45 58 54 20 3D 3E 20 30
2C 0A 20 20 20 20 23 20 20 52 41 57 5F 49 4E 5F 4C 45 4E 20 3D 3E 20 31
2C 0A 20 20 20 20 23 20 20 52 41 57 5F 4F 55 54 5F 42 59 54 45 53 20 3D
3E 20 32 2C 0A 20 20 20 20 23 20 20 52 41 57 5F 46 41 4C 4C 42 41 43 4B
20 3D 3E 20 33 2C 0A 20 20 20 20 6D 79 20 28 24 6E 65 78 74 2C 20 24 69
6E 5F 6C 65 6E 2C 20 24 6F 75 74 5F 62 79 74 65 73 2C 20 24 66 61 6C 6C
62 61 63 6B 29 20 3D 20 40 7B 24 72 61 77 2D 3E 7B 24 6B 65 79 7D 7D 3B
0A 20 20 20 20 6D 79 20 24 75 20 3D 20 6F 72 64 20 24 6B 65 79 3B 0A 20
20 20 20 24 66 61 6C 6C 62 61 63 6B 20 7C 7C 3D 20 30 3B 0A 0A 20 20 20
20 69 66 20 28 24 6E 65 78 74 20 21 3D 20 24 61 20 26 26 20 24 6E 65 78
74 20 21 3D 20 24 74 29 20 7B 0A 20 20 20 20 20 20 6F 75 74 70 75 74 5F
75 63 6D 5F 70 61 67 65 28 24 63 6D 61 70 2C 24 61 2C 24 6E 65 78 74 2C
28 28 24 70 72 65 7C 28 24 75 20 26 30 78 33 46 29 29 20 3C 3C 20 36 29
26 30 78 46 46 46 46 29 3B 0A 20 20 20 20 7D 20 65 6C 73 69 66 20 28 6C
65 6E 67 74 68 20 24 6F 75 74 5F 62 79 74 65 73 29 20 7B 0A 20 20 20 20
20 20 69 66 20 28 24 70 72 65 29 20 7B 0A 20 20 20 20 20 20 20 20 24 75
20 3D 20 24 70 72 65 7C 28 24 75 20 26 30 78 33 66 29 3B 0A 20 20 20 20
20 20 7D 0A 20 20 20 20 20 20 6D 79 20 24 73 20 3D 20 73 70 72 69 6E 74
66 20 22 3C 55 25 30 34 58 3E 20 22 2C 24 75 3B 0A 20 20 20 20 20 20 23
66 6F 72 65 61 63 68 20 6D 79 20 24 63 20 28 73 70 6C 69 74 28 2F 2F 2C
24 6F 75 74 5F 62 79 74 65 73 29 29 20 7B 0A 20 20 20 20 20 20 23 20 20
24 73 20 2E 3D 20 73 70 72 69 6E 74 66 20 22 5C 5C 78 25 30 32 58 22 2C
6F 72 64 28 24 63 29 3B 0A 20 20 20 20 20 20 23 7D 0A 20 20 20 20 20 20
23 20 39 2E 35 25 20 66 61 73 74 65 72 20 63 68 61 6E 67 69 6E 67 20 74
68 61 74 20 6C 6F 6F 70 20 74 6F 20 74 68 69 73 3A 0A 20 20 20 20 20 20
24 73 20 2E 3D 20 73 70 72 69 6E 74 66 20 2B 28 22 5C 5C 78 25 30 32 58
22 20 78 20 6C 65 6E 67 74 68 20 24 6F 75 74 5F 62 79 74 65 73 29 2C 20
75 6E 70 61 63 6B 20 22 43 2A 22 2C 20 24 6F 75 74 5F 62 79 74 65 73 3B
0A 20 20 20 20 20 20 24 73 20 2E 3D 20 73 70 72 69 6E 74 66 20 22 20 7C
25 64 20 23 20 25 73 5C 6E 22 2C 28 24 66 61 6C 6C 62 61 63 6B 20 3F 20
31 20 3A 20 30 29 2C 24 75 6E 61 6D 65 5B 24 75 5D 3B 0A 20 20 20 20 20
20 70 75 73 68 28 40 24 63 6D 61 70 2C 24 73 29 3B 0A 20 20 20 20 7D 20
65 6C 73 65 20 7B 0A 20 20 20 20 20 20 77 61 72 6E 20 6A 6F 69 6E 28 27
2C 27 2C 24 75 2C 20 40 7B 24 72 61 77 2D 3E 7B 24 6B 65 79 7D 7D 2C 24
61 2C 24 74 29 3B 0A 20 20 20 20 7D 0A 20 20 7D 0A 7D 0A 0A 73 75 62 20
6F 75 74 70 75 74 5F 75 63 6D 0A 7B 0A 20 6D 79 20 28 24 66 68 2C 24 6E
61 6D 65 2C 24 68 2C 24 72 65 70 2C 24 6D 69 6E 5F 65 6C 2C 24 6D 61 78
5F 65 6C 29 20 3D 20 40 5F 3B 0A 20 70 72 69 6E 74 20 24 66 68 20 22 23
20 24 30 20 40 6F 72 69 67 5F 41 52 47 56 5C 6E 22 20 75 6E 6C 65 73 73
20 24 6F 70 74 7B 27 71 27 7D 3B 0A 20 70 72 69 6E 74 20 24 66 68 20 22
3C 63 6F 64 65 5F 73 65 74 5F 6E 61 6D 65 3E 20 5C 22 24 6E 61 6D 65 5C
22 5C 6E 22 3B 0A 20 63 68 61 72 5F 6E 61 6D 65 73 28 29 3B 0A 20 69 66
20 28 64 65 66 69 6E 65 64 20 24 6D 69 6E 5F 65 6C 29 0A 20 20 7B 0A 20
20 20 70 72 69 6E 74 20 24 66 68 20 22 3C 6D 62 5F 63 75 72 5F 6D 69 6E
3E 20 24 6D 69 6E 5F 65 6C 5C 6E 22 3B 0A 20 20 7D 0A 20 69 66 20 28 64
65 66 69 6E 65 64 20 24 6D 61 78 5F 65 6C 29 0A 20 20 7B 0A 20 20 20 70
72 69 6E 74 20 24 66 68 20 22 3C 6D 62 5F 63 75 72 5F 6D 61 78 3E 20 24
6D 61 78 5F 65 6C 5C 6E 22 3B 0A 20 20 7D 0A 20 69 66 20 28 64 65 66 69
6E 65 64 20 24 72 65 70 29 0A 20 20 7B 0A 20 20 20 70 72 69 6E 74 20 24
66 68 20 22 3C 73 75 62 63 68 61 72 3E 20 22 3B 0A 20 20 20 66 6F 72 65
61 63 68 20 6D 79 20 24 63 20 28 73 70 6C 69 74 28 2F 2F 2C 24 72 65 70
29 29 0A 20 20 20 20 7B 0A 20 20 20 20 20 70 72 69 6E 74 66 20 24 66 68
20 22 5C 5C 78 25 30 32 58 22 2C 6F 72 64 28 24 63 29 3B 0A 20 20 20 20
7D 0A 20 20 20 70 72 69 6E 74 20 24 66 68 20 22 5C 6E 22 3B 0A 20 20 7D
0A 20 6D 79 20 40 63 6D 61 70 3B 0A 20 6F 75 74 70 75 74 5F 75 63 6D 5F
70 61 67 65 28 5C 40 63 6D 61 70 2C 24 68 2C 24 68 2C 30 29 3B 0A 20 70
72 69 6E 74 20 24 66 68 20 22 23 5C 6E 43 48 41 52 4D 41 50 5C 6E 22 3B
0A 20 66 6F 72 65 61 63 68 20 6D 79 20 24 6C 69 6E 65 20 28 73 6F 72 74
20 7B 20 73 75 62 73 74 72 28 24 61 2C 38 29 20 63 6D 70 20 73 75 62 73
74 72 28 24 62 2C 38 29 20 7D 20 40 63 6D 61 70 29 0A 20 20 7B 0A 20 20
20 70 72 69 6E 74 20 24 66 68 20 24 6C 69 6E 65 3B 0A 20 20 7D 0A 20 70
72 69 6E 74 20 24 66 68 20 22 45 4E 44 20 43 48 41 52 4D 41 50 5C 6E 22
3B 0A 7D 0A 0A 75 73 65 20 76 61 72 73 20 71 77 28 0A 20 20 20 20 24 5F
45 6E 63 32 78 73 0A 20 20 20 20 24 5F 56 65 72 73 69 6F 6E 0A 20 20 20
20 24 5F 49 6E 63 0A 20 20 20 20 24 5F 45 32 58 20 0A 20 20 20 20 24 5F
4E 61 6D 65 0A 20 20 20 20 24 5F 54 61 62 6C 65 46 69 6C 65 73 0A 20 20
20 20 24 5F 4E 6F 77 0A 29 3B 0A 0A 73 75 62 20 66 69 6E 64 5F 65 32 78
7B 0A 20 20 20 20 65 76 61 6C 20 7B 20 72 65 71 75 69 72 65 20 46 69 6C
65 3A 3A 46 69 6E 64 3B 20 7D 3B 0A 20 20 20 20 6D 79 20 28 40 69 6E 63
2C 20 25 65 32 78 5F 64 69 72 29 3B 0A 20 20 20 20 66 6F 72 20 6D 79 20
24 69 6E 63 20 28 40 49 4E 43 29 7B 0A 09 70 75 73 68 20 40 69 6E 63 2C
20 24 69 6E 63 20 75 6E 6C 65 73 73 20 24 69 6E 63 20 65 71 20 27 2E 27
3B 20 23 73 6B 69 70 20 63 75 72 72 65 6E 74 20 64 69 72 0A 20 20 20 20
7D 0A 20 20 20 20 46 69 6C 65 3A 3A 46 69 6E 64 3A 3A 66 69 6E 64 28 0A
09 20 20 20 20 20 73 75 62 20 7B 0A 09 09 20 6D 79 20 28 24 64 65 76 2C
24 69 6E 6F 2C 24 6D 6F 64 65 2C 24 6E 6C 69 6E 6B 2C 24 75 69 64 2C 24
67 69 64 2C 24 72 64 65 76 2C 24 73 69 7A 65 2C 0A 09 09 20 20 20 20 20
24 61 74 69 6D 65 2C 24 6D 74 69 6D 65 2C 24 63 74 69 6D 65 2C 24 62 6C
6B 73 69 7A 65 2C 24 62 6C 6F 63 6B 73 29 0A 09 09 20 20 20 20 20 3D 20
6C 73 74 61 74 28 24 5F 29 20 6F 72 20 72 65 74 75 72 6E 3B 0A 09 09 20
2D 66 20 5F 20 6F 72 20 72 65 74 75 72 6E 3B 0A 09 09 20 69 66 20 28 2F
5E 2E 2A 5C 2E 65 32 78 24 2F 6F 29 7B 0A 09 09 20 20 20 20 20 6E 6F 20
77 61 72 6E 69 6E 67 73 20 27 6F 6E 63 65 27 3B 0A 09 09 20 20 20 20 20
24 65 32 78 5F 64 69 72 7B 24 46 69 6C 65 3A 3A 46 69 6E 64 3A 3A 64 69
72 7D 20 7C 7C 3D 20 24 6D 74 69 6D 65 3B 0A 09 09 20 7D 0A 09 09 20 72
65 74 75 72 6E 3B 0A 09 20 20 20 20 20 7D 2C 20 40 69 6E 63 29 3B 0A 20
20 20 20 77 61 72 6E 20 6A 6F 69 6E 28 22 5C 6E 22 2C 20 6B 65 79 73 20
25 65 32 78 5F 64 69 72 29 2C 20 22 5C 6E 22 3B 0A 20 20 20 20 66 6F 72
20 6D 79 20 24 64 20 28 73 6F 72 74 20 7B 24 65 32 78 5F 64 69 72 7B 24
61 7D 20 3C 3D 3E 20 24 65 32 78 5F 64 69 72 7B 24 62 7D 7D 20 6B 65 79
73 20 25 65 32 78 5F 64 69 72 29 7B 0A 09 24 5F 45 32 58 20 3D 20 24 64
3B 0A 09 23 20 77 61 72 6E 20 22 24 5F 45 32 58 20 3D 3E 20 22 2C 20 73
63 61 6C 61 72 20 6C 6F 63 61 6C 74 69 6D 65 28 24 65 32 78 5F 64 69 72
7B 24 64 7D 29 3B 0A 09 72 65 74 75 72 6E 20 24 5F 45 32 58 3B 0A 20 20
20 20 7D 0A 7D 0A 0A 73 75 62 20 6D 61 6B 65 5F 6D 61 6B 65 66 69 6C 65
5F 70 6C 0A 7B 0A 20 20 20 20 65 76 61 6C 20 7B 20 72 65 71 75 69 72 65
20 45 6E 63 6F 64 65 3B 20 7D 3B 0A 20 20 20 20 24 40 20 61 6E 64 20 64
69 65 20 22 59 6F 75 20 6E 65 65 64 20 74 6F 20 69 6E 73 74 61 6C 6C 20
45 6E 63 6F 64 65 20 74 6F 20 75 73 65 20 65 6E 63 32 78 73 20 2D 4D 5C
6E 65 72 72 6F 72 3A 20 24 40 5C 6E 22 3B 0A 20 20 20 20 23 20 6F 75 72
20 75 73 65 64 20 66 6F 72 20 76 61 72 69 61 62 6C 65 20 65 78 70 61 6E
73 74 69 6F 6E 0A 20 20 20 20 24 5F 45 6E 63 32 78 73 20 3D 20 24 30 3B
0A 20 20 20 20 24 5F 56 65 72 73 69 6F 6E 20 3D 20 24 56 45 52 53 49 4F
4E 3B 0A 20 20 20 20 24 5F 45 32 58 20 3D 20 66 69 6E 64 5F 65 32 78 28
29 3B 0A 20 20 20 20 24 5F 4E 61 6D 65 20 3D 20 73 68 69 66 74 3B 0A 20
20 20 20 24 5F 54 61 62 6C 65 46 69 6C 65 73 20 3D 20 6A 6F 69 6E 28 22
2C 22 2C 20 6D 61 70 20 7B 71 71 28 27 24 5F 27 29 7D 20 40 5F 29 3B 0A
20 20 20 20 24 5F 4E 6F 77 20 3D 20 73 63 61 6C 61 72 20 6C 6F 63 61 6C
74 69 6D 65 28 29 3B 0A 0A 20 20 20 20 65 76 61 6C 20 7B 20 72 65 71 75
69 72 65 20 46 69 6C 65 3A 3A 53 70 65 63 3B 20 7D 3B 0A 20 20 20 20 5F
70 72 69 6E 74 5F 65 78 70 61 6E 64 28 46 69 6C 65 3A 3A 53 70 65 63 2D
3E 63 61 74 66 69 6C 65 28 24 5F 45 32 58 2C 22 4D 61 6B 65 66 69 6C 65
5F 50 4C 2E 65 32 78 22 29 2C 22 4D 61 6B 65 66 69 6C 65 2E 50 4C 22 29
3B 0A 20 20 20 20 5F 70 72 69 6E 74 5F 65 78 70 61 6E 64 28 46 69 6C 65
3A 3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28 24 5F 45 32 58 2C 22 5F
50 4D 2E 65 32 78 22 29 2C 20 20 20 20 20 20 20 20 22 24 5F 4E 61 6D 65
2E 70 6D 22 29 3B 0A 20 20 20 20 5F 70 72 69 6E 74 5F 65 78 70 61 6E 64
28 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28 24 5F 45
32 58 2C 22 5F 54 2E 65 32 78 22 29 2C 20 20 20 20 20 20 20 20 20 22 74
2F 24 5F 4E 61 6D 65 2E 74 22 29 3B 0A 20 20 20 20 5F 70 72 69 6E 74 5F
65 78 70 61 6E 64 28 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74 66 69
6C 65 28 24 5F 45 32 58 2C 22 52 45 41 44 4D 45 2E 65 32 78 22 29 2C 20
20 20 20 20 22 52 45 41 44 4D 45 22 29 3B 0A 20 20 20 20 5F 70 72 69 6E
74 5F 65 78 70 61 6E 64 28 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74
66 69 6C 65 28 24 5F 45 32 58 2C 22 43 68 61 6E 67 65 73 2E 65 32 78 22
29 2C 20 20 20 20 22 43 68 61 6E 67 65 73 22 29 3B 0A 20 20 20 20 65 78
69 74 3B 0A 7D 0A 0A 75 73 65 20 76 61 72 73 20 71 77 28 0A 09 20 20 20
20 24 5F 4D 6F 64 4C 69 6E 65 73 0A 09 20 20 20 20 24 5F 4C 6F 63 61 6C
56 65 72 0A 09 20 20 20 20 29 3B 0A 0A 73 75 62 20 6D 61 6B 65 5F 63 6F
6E 66 69 67 6C 6F 63 61 6C 5F 70 6D 0A 7B 0A 20 20 20 20 65 76 61 6C 20
7B 20 72 65 71 75 69 72 65 20 45 6E 63 6F 64 65 3B 20 7D 3B 0A 20 20 20
20 24 40 20 61 6E 64 20 64 69 65 20 22 55 6E 61 62 6C 65 20 74 6F 20 72
65 71 75 69 72 65 20 45 6E 63 6F 64 65 3A 20 24 40 5C 6E 22 3B 0A 20 20
20 20 65 76 61 6C 20 7B 20 72 65 71 75 69 72 65 20 46 69 6C 65 3A 3A 53
70 65 63 3B 20 7D 3B 0A 20 20 20 20 23 20 6F 75 72 20 75 73 65 64 20 66
6F 72 20 76 61 72 69 61 62 6C 65 20 65 78 70 61 6E 73 74 69 6F 6E 0A 20
20 20 20 6D 79 20 25 69 6E 5F 63 6F 72 65 20 3D 20 6D 61 70 20 7B 24 5F
3D 3E 31 7D 28 27 61 73 63 69 69 27 2C 27 69 73 6F 2D 38 38 35 39 2D 31
27 2C 27 75 74 66 38 27 29 3B 0A 20 20 20 20 6D 79 20 25 4C 6F 63 61 6C
4D 6F 64 20 3D 20 28 29 3B 0A 20 20 20 20 66 6F 72 20 6D 79 20 24 64 20
28 40 49 4E 43 29 7B 0A 09 6D 79 20 24 69 6E 63 20 3D 20 46 69 6C 65 3A
3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28 24 64 2C 20 22 45 6E 63 6F
64 65 22 29 3B 0A 09 2D 64 20 24 69 6E 63 20 6F 72 20 6E 65 78 74 3B 0A
09 6F 70 65 6E 64 69 72 20 6D 79 20 24 64 68 2C 20 24 69 6E 63 20 6F 72
20 64 69 65 20 22 24 69 6E 63 3A 24 21 22 3B 0A 09 77 61 72 6E 20 22 43
68 65 63 6B 69 6E 67 20 24 69 6E 63 2E 2E 2E 5C 6E 22 3B 0A 09 66 6F 72
20 6D 79 20 24 66 20 28 67 72 65 70 20 2F 5C 2E 70 6D 24 2F 6F 2C 20 72
65 61 64 64 69 72 28 24 64 68 29 29 7B 0A 09 20 20 20 20 2D 66 20 46 69
6C 65 3A 3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28 24 69 6E 63 2C 20
22 24 66 22 29 20 6F 72 20 6E 65 78 74 3B 0A 09 20 20 20 20 24 49 4E 43
7B 22 45 6E 63 6F 64 65 2F 24 66 22 7D 20 61 6E 64 20 6E 65 78 74 3B 0A
09 20 20 20 20 77 61 72 6E 20 22 72 65 71 75 69 72 65 20 45 6E 63 6F 64
65 2F 24 66 3B 5C 6E 22 3B 0A 09 20 20 20 20 65 76 61 6C 20 7B 20 72 65
71 75 69 72 65 20 22 45 6E 63 6F 64 65 2F 24 66 22 3B 20 7D 3B 0A 09 20
20 20 20 24 40 20 61 6E 64 20 64 69 65 20 22 43 61 6E 27 74 20 72 65 71
75 69 72 65 20 45 6E 63 6F 64 65 2F 24 66 3A 20 24 40 5C 6E 22 3B 0A 09
20 20 20 20 66 6F 72 20 6D 79 20 24 65 6E 63 20 28 45 6E 63 6F 64 65 2D
3E 65 6E 63 6F 64 69 6E 67 73 28 29 29 7B 0A 09 09 6E 6F 20 77 61 72 6E
69 6E 67 73 20 27 6F 6E 63 65 27 3B 0A 09 09 24 69 6E 5F 63 6F 72 65 7B
24 65 6E 63 7D 20 61 6E 64 20 6E 65 78 74 3B 0A 09 09 24 45 6E 63 6F 64
65 3A 3A 43 6F 6E 66 69 67 3A 3A 45 78 74 4D 6F 64 75 6C 65 7B 24 65 6E
63 7D 20 61 6E 64 20 6E 65 78 74 3B 0A 09 09 6D 79 20 24 6D 6F 64 20 3D
20 22 45 6E 63 6F 64 65 2F 24 66 22 3B 20 0A 09 09 24 6D 6F 64 20 3D 7E
20 73 2F 5C 2E 70 6D 24 2F 2F 6F 3B 20 24 6D 6F 64 20 3D 7E 20 73 2C 2F
2C 3A 3A 2C 6F 67 3B 0A 09 09 24 4C 6F 63 61 6C 4D 6F 64 7B 24 65 6E 63
7D 20 7C 7C 3D 20 24 6D 6F 64 3B 0A 09 20 20 20 20 7D 0A 09 7D 0A 20 20
20 20 7D 0A 20 20 20 20 24 5F 4D 6F 64 4C 69 6E 65 73 20 3D 20 22 22 3B
0A 20 20 20 20 66 6F 72 20 6D 79 20 24 65 6E 63 20 28 73 6F 72 74 20 6B
65 79 73 20 25 4C 6F 63 61 6C 4D 6F 64 29 7B 0A 09 24 5F 4D 6F 64 4C 69
6E 65 73 20 2E 3D 20 0A 09 20 20 20 20 71 71 28 5C 24 45 6E 63 6F 64 65
3A 3A 45 78 74 4D 6F 64 75 6C 65 7B 27 24 65 6E 63 27 7D 20 3D 5C 74 22
24 4C 6F 63 61 6C 4D 6F 64 7B 24 65 6E 63 7D 22 3B 5C 6E 29 3B 0A 20 20
20 20 7D 0A 20 20 20 20 77 61 72 6E 20 24 5F 4D 6F 64 4C 69 6E 65 73 3B
0A 20 20 20 20 24 5F 4C 6F 63 61 6C 56 65 72 20 3D 20 5F 6D 6B 76 65 72
73 69 6F 6E 28 29 3B 0A 20 20 20 20 24 5F 45 32 58 20 3D 20 66 69 6E 64
5F 65 32 78 28 29 3B 0A 20 20 20 20 24 5F 49 6E 63 20 3D 20 24 49 4E 43
7B 22 45 6E 63 6F 64 65 2E 70 6D 22 7D 3B 20 24 5F 49 6E 63 20 3D 7E 20
73 2F 5C 2E 70 6D 24 2F 2F 6F 3B 20 20 20 20 0A 20 20 20 20 5F 70 72 69
6E 74 5F 65 78 70 61 6E 64 28 46 69 6C 65 3A 3A 53 70 65 63 2D 3E 63 61
74 66 69 6C 65 28 24 5F 45 32 58 2C 22 43 6F 6E 66 69 67 4C 6F 63 61 6C
5F 50 4D 2E 65 32 78 22 29 2C 20 20 20 20 0A 09 09 20 20 46 69 6C 65 3A
3A 53 70 65 63 2D 3E 63 61 74 66 69 6C 65 28 24 5F 49 6E 63 2C 22 43 6F
6E 66 69 67 4C 6F 63 61 6C 2E 70 6D 22 29 2C 0A 09 09 20 20 31 29 3B 0A
20 20 20 20 65 78 69 74 3B 0A 7D 0A 0A 73 75 62 20 5F 6D 6B 76 65 72 73
69 6F 6E 7B 0A 20 20 20 20 6D 79 20 28 24 73 73 2C 24 6D 6D 2C 24 68 68
2C 24 64 64 2C 24 6D 6F 2C 24 79 79 79 79 29 20 3D 20 6C 6F 63 61 6C 74
69 6D 65 28 29 3B 0A 20 20 20 20 24 79 79 79 79 20 2B 3D 20 31 39 30 30
2C 20 24 6D 6F 20 2B 3D 31 3B 0A 20 20 20 20 72 65 74 75 72 6E 20 73 70
72 69 6E 74 66 28 22 76 25 30 34 64 2E 25 30 34 64 2E 25 30 34 64 22 2C
20 24 79 79 79 79 2C 20 24 6D 6F 2A 31 30 30 2B 24 64 64 2C 20 24 68 68
2A 31 30 30 2B 24 6D 6D 29 3B 0A 7D 0A 0A 73 75 62 20 5F 70 72 69 6E 74
5F 65 78 70 61 6E 64 7B 0A 20 20 20 20 65 76 61 6C 20 7B 20 72 65 71 75
69 72 65 20 46 69 6C 65 3A 3A 42 61 73 65 6E 61 6D 65 3B 20 7D 3B 0A 20
20 20 20 24 40 20 61 6E 64 20 64 69 65 20 22 46 69 6C 65 3A 3A 42 61 73
65 6E 61 6D 65 20 6E 65 65 64 65 64 2E 20 20 41 72 65 20 79 6F 75 20 6F
6E 20 6D 69 6E 69 70 65 72 6C 3F 3B 5C 6E 65 72 72 6F 72 3A 20 24 40 5C
6E 22 3B 0A 20 20 20 20 46 69 6C 65 3A 3A 42 61 73 65 6E 61 6D 65 2D 3E
69 6D 70 6F 72 74 28 29 3B 0A 20 20 20 20 6D 79 20 28 24 73 72 63 2C 20
24 64 73 74 2C 20 24 63 6C 6F 62 62 65 72 29 20 3D 20 40 5F 3B 0A 20 20
20 20 69 66 20 28 21 24 63 6C 6F 62 62 65 72 20 61 6E 64 20 2D 65 20 24
64 73 74 29 7B 0A 09 77 61 72 6E 20 22 24 64 73 74 20 65 78 69 73 74 73
2E 20 73 6B 69 70 70 69 6E 67 5C 6E 22 3B 0A 09 72 65 74 75 72 6E 3B 0A
20 20 20 20 7D 0A 20 20 20 20 77 61 72 6E 20 22 47 65 6E 65 72 61 74 69
6E 67 20 24 64 73 74 2E 2E 2E 5C 6E 22 3B 0A 20 20 20 20 6F 70 65 6E 20
6D 79 20 24 69 6E 2C 20 24 73 72 63 20 6F 72 20 64 69 65 20 22 24 73 72
63 20 3A 20 24 21 22 3B 0A 20 20 20 20 69 66 20 28 28 6D 79 20 24 64 20
3D 20 64 69 72 6E 61 6D 65 28 24 64 73 74 29 29 20 6E 65 20 27 2E 27 29
7B 0A 09 2D 64 20 24 64 20 6F 72 20 6D 6B 64 69 72 20 24 64 2C 20 30 37
35 35 20 6F 72 20 64 69 65 20 20 22 6D 6B 64 69 72 20 24 64 20 3A 20 24
21 22 3B 0A 20 20 20 20 7D 09 20 20 20 0A 20 20 20 20 6F 70 65 6E 20 6D
79 20 24 6F 75 74 2C 20 22 3E 24 64 73 74 22 20 6F 72 20 64 69 65 20 22
24 21 22 3B 0A 20 20 20 20 6D 79 20 24 61 73 69 73 20 3D 20 30 3B 0A 20
20 20 20 77 68 69 6C 65 20 28 3C 24 69 6E 3E 29 7B 20 0A 09 69 66 20 28
2F 5E 23 23 23 23 20 45 4E 44 5F 4F 46 5F 48 45 41 44 45 52 2F 29 7B 0A
09 20 20 20 20 24 61 73 69 73 20 3D 20 31 3B 20 6E 65 78 74 3B 0A 09 7D
09 20 20 0A 09 73 2F 28 5C 24 5F 5B 41 2D 5A 5D 5B 41 2D 5A 61 2D 7A 30
2D 39 5D 2B 29 5F 2F 24 31 2F 67 65 65 20 75 6E 6C 65 73 73 20 24 61 73
69 73 3B 0A 09 70 72 69 6E 74 20 24 6F 75 74 20 24 5F 3B 0A 20 20 20 20
7D 0A 7D 0A 5F 5F 45 4E 44 5F 5F 0A 0A 3D 68 65 61 64 31 20 4E 41 4D 45
0A 0A 65 6E 63 32 78 73 20 2D 2D 20 50 65 72 6C 20 45 6E 63 6F 64 65 20
4D 6F 64 75 6C 65 20 47 65 6E 65 72 61 74 6F 72 0A 0A 3D 68 65 61 64 31
20 53 59 4E 4F 50 53 49 53 0A 0A 20 20 65 6E 63 32 78 73 20 2D 5B 6F 70
74 69 6F 6E 73 5D 0A 20 20 65 6E 63 32 78 73 20 2D 4D 20 4D 6F 64 4E 61
6D 65 20 6D 61 70 66 69 6C 65 73 2E 2E 2E 0A 20 20 65 6E 63 32 78 73 20
2D 43 0A 0A 3D 68 65 61 64 31 20 44 45 53 43 52 49 50 54 49 4F 4E 0A 0A
46 3C 65 6E 63 32 78 73 3E 20 62 75 69 6C 64 73 20 61 20 50 65 72 6C 20
65 78 74 65 6E 73 69 6F 6E 20 66 6F 72 20 75 73 65 20 62 79 20 45 6E 63
6F 64 65 20 66 72 6F 6D 20 65 69 74 68 65 72 0A 55 6E 69 63 6F 64 65 20
43 68 61 72 61 63 74 65 72 20 4D 61 70 70 69 6E 67 20 66 69 6C 65 73 20
28 2E 75 63 6D 29 20 6F 72 20 54 63 6C 20 45 6E 63 6F 64 69 6E 67 20 46
69 6C 65 73 20 28 2E 65 6E 63 29 2E 0A 42 65 73 69 64 65 73 20 62 65 69
6E 67 20 75 73 65 64 20 69 6E 74 65 72 6E 61 6C 6C 79 20 64 75 72 69 6E
67 20 74 68 65 20 62 75 69 6C 64 20 70 72 6F 63 65 73 73 20 6F 66 20 74
68 65 20 45 6E 63 6F 64 65 0A 6D 6F 64 75 6C 65 2C 20 79 6F 75 20 63 61
6E 20 75 73 65 20 46 3C 65 6E 63 32 78 73 3E 20 74 6F 20 61 64 64 20 79
6F 75 72 20 6F 77 6E 20 65 6E 63 6F 64 69 6E 67 20 74 6F 20 70 65 72 6C
2E 0A 4E 6F 20 6B 6E 6F 77 6C 65 64 67 65 20 6F 66 20 58 53 20 69 73 20
6E 65 63 65 73 73 61 72 79 2E 0A 0A 3D 68 65 61 64 31 20 51 75 69 63 6B
20 47 75 69 64 65 0A 0A 49 66 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 6B
6E 6F 77 20 61 73 20 6C 69 74 74 6C 65 20 61 62 6F 75 74 20 50 65 72 6C
20 61 73 20 70 6F 73 73 69 62 6C 65 20 62 75 74 20 6E 65 65 64 20 74 6F
0A 61 64 64 20 61 20 6E 65 77 20 65 6E 63 6F 64 69 6E 67 2C 20 6A 75 73
74 20 72 65 61 64 20 74 68 69 73 20 63 68 61 70 74 65 72 20 61 6E 64 20
66 6F 72 67 65 74 20 74 68 65 20 72 65 73 74 2E 0A 0A 3D 6F 76 65 72 20
34 0A 0A 3D 69 74 65 6D 20 30 2E 0A 0A 48 61 76 65 20 61 20 2E 75 63 6D
20 66 69 6C 65 20 72 65 61 64 79 2E 20 20 59 6F 75 20 63 61 6E 20 67 65
74 20 69 74 20 66 72 6F 6D 20 73 6F 6D 65 77 68 65 72 65 20 6F 72 20 79
6F 75 20 63 61 6E 20 77 72 69 74 65 0A 79 6F 75 72 20 6F 77 6E 20 66 72
6F 6D 20 73 63 72 61 74 63 68 20 6F 72 20 79 6F 75 20 63 61 6E 20 67 72
61 62 20 6F 6E 65 20 66 72 6F 6D 20 74 68 65 20 45 6E 63 6F 64 65 20 64
69 73 74 72 69 62 75 74 69 6F 6E 0A 61 6E 64 20 63 75 73 74 6F 6D 69 7A
65 20 69 74 2E 20 20 46 6F 72 20 74 68 65 20 55 43 4D 20 66 6F 72 6D 61
74 2C 20 73 65 65 20 74 68 65 20 6E 65 78 74 20 43 68 61 70 74 65 72 2E
20 20 49 6E 20 74 68 65 0A 65 78 61 6D 70 6C 65 20 62 65 6C 6F 77 2C 20
49 27 6C 6C 20 63 61 6C 6C 20 6D 79 20 74 68 65 6F 72 65 74 69 63 61 6C
20 65 6E 63 6F 64 69 6E 67 20 6D 79 61 73 63 69 69 2C 20 64 65 66 69 6E
65 64 0A 69 6E 20 49 3C 6D 79 2E 75 63 6D 3E 2E 20 20 43 3C 24 3E 20 69
73 20 61 20 73 68 65 6C 6C 20 70 72 6F 6D 70 74 2E 0A 0A 20 20 24 20 6C
73 20 2D 46 0A 20 20 6D 79 2E 75 63 6D 0A 0A 3D 69 74 65 6D 20 31 2E 0A
0A 49 73 73 75 65 20 61 20 63 6F 6D 6D 61 6E 64 20 61 73 20 66 6F 6C 6C
6F 77 73 3B 0A 0A 20 20 24 20 65 6E 63 32 78 73 20 2D 4D 20 4D 79 20 6D
79 2E 75 63 6D 0A 20 20 67 65 6E 65 72 61 74 69 6E 67 20 4D 61 6B 65 66
69 6C 65 2E 50 4C 0A 20 20 67 65 6E 65 72 61 74 69 6E 67 20 4D 79 2E 70
6D 0A 20 20 67 65 6E 65 72 61 74 69 6E 67 20 52 45 41 44 4D 45 0A 20 20
67 65 6E 65 72 61 74 69 6E 67 20 43 68 61 6E 67 65 73 0A 0A 4E 6F 77 20
74 61 6B 65 20 61 20 6C 6F 6F 6B 20 61 74 20 79 6F 75 72 20 63 75 72 72
65 6E 74 20 64 69 72 65 63 74 6F 72 79 2E 20 20 49 74 20 73 68 6F 75 6C
64 20 6C 6F 6F 6B 20 6C 69 6B 65 20 74 68 69 73 2E 0A 0A 20 20 24 20 6C
73 20 2D 46 0A 20 20 4D 61 6B 65 66 69 6C 65 2E 50 4C 20 20 20 4D 79 2E
70 6D 20 20 20 20 20 20 20 20 20 6D 79 2E 75 63 6D 20 20 20 20 20 20 20
20 74 2F 0A 0A 54 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 66 69 6C 65 73
20 77 65 72 65 20 63 72 65 61 74 65 64 2E 0A 0A 20 20 4D 61 6B 65 66 69
6C 65 2E 50 4C 20 2D 20 4D 61 6B 65 4D 61 6B 65 72 20 73 63 72 69 70 74
0A 20 20 4D 79 2E 70 6D 20 20 20 20 20 20 20 2D 20 45 6E 63 6F 64 65 20
73 75 62 6D 6F 64 75 6C 65 0A 20 20 74 2F 4D 79 2E 74 20 20 20 20 20 20
2D 20 74 65 73 74 20 66 69 6C 65 0A 0A 3D 6F 76 65 72 20 34 0A 0A 3D 69
74 65 6D 20 31 2E 31 2E 0A 0A 49 66 20 79 6F 75 20 77 61 6E 74 20 2A 2E
75 63 6D 20 69 6E 73 74 61 6C 6C 65 64 20 74 6F 67 65 74 68 65 72 20 77
69 74 68 20 74 68 65 20 6D 6F 64 75 6C 65 73 2C 20 64 6F 20 61 73 20 66
6F 6C 6C 6F 77 73 3B 0A 0A 20 20 24 20 6D 6B 64 69 72 20 45 6E 63 6F 64
65 0A 20 20 24 20 6D 76 20 2A 2E 75 63 6D 20 45 6E 63 6F 64 65 0A 20 20
24 20 65 6E 63 32 78 73 20 2D 4D 20 4D 79 20 45 6E 63 6F 64 65 2F 2A 75
63 6D 0A 0A 3D 62 61 63 6B 0A 0A 3D 69 74 65 6D 20 32 2E 0A 0A 45 64 69
74 20 74 68 65 20 66 69 6C 65 73 20 67 65 6E 65 72 61 74 65 64 2E 20 20
59 6F 75 20 64 6F 6E 27 74 20 68 61 76 65 20 74 6F 20 69 66 20 79 6F 75
20 68 61 76 65 20 6E 6F 20 74 69 6D 65 20 41 4E 44 20 6E 6F 0A 69 6E 74
65 6E 74 69 6F 6E 20 74 6F 20 67 69 76 65 20 69 74 20 74 6F 20 73 6F 6D
65 6F 6E 65 20 65 6C 73 65 2E 20 20 42 75 74 20 69 74 20 69 73 20 61 20
67 6F 6F 64 20 69 64 65 61 20 74 6F 20 65 64 69 74 0A 74 68 65 20 70 6F
64 20 61 6E 64 20 74 6F 20 61 64 64 20 6D 6F 72 65 20 74 65 73 74 73 2E
0A 0A 3D 69 74 65 6D 20 33 2E 0A 0A 4E 6F 77 20 69 73 73 75 65 20 61 20
63 6F 6D 6D 61 6E 64 20 61 6C 6C 20 50 65 72 6C 20 4D 6F 6E 67 65 72 73
20 6C 6F 76 65 3A 0A 0A 20 20 24 20 70 65 72 6C 20 4D 61 6B 65 66 69 6C
65 2E 50 4C 0A 20 20 57 72 69 74 69 6E 67 20 4D 61 6B 65 66 69 6C 65 20
66 6F 72 20 45 6E 63 6F 64 65 3A 3A 4D 79 0A 0A 3D 69 74 65 6D 20 34 2E
0A 0A 4E 6F 77 20 61 6C 6C 20 79 6F 75 20 68 61 76 65 20 74 6F 20 64 6F
20 69 73 20 6D 61 6B 65 2E 0A 0A 20 20 24 20 6D 61 6B 65 0A 20 20 63 70
20 4D 79 2E 70 6D 20 62 6C 69 62 2F 6C 69 62 2F 45 6E 63 6F 64 65 2F 4D
79 2E 70 6D 0A 20 20 2F 75 73 72 2F 6C 6F 63 61 6C 2F 62 69 6E 2F 70 65
72 6C 20 2F 75 73 72 2F 6C 6F 63 61 6C 2F 62 69 6E 2F 65 6E 63 32 78 73
20 2D 51 20 2D 4F 20 5C 0A 20 20 20 20 2D 6F 20 65 6E 63 6F 64 65 5F 74
2E 63 20 2D 66 20 65 6E 63 6F 64 65 5F 74 2E 66 6E 6D 0A 20 20 52 65 61
64 69 6E 67 20 6D 79 61 73 63 69 69 20 28 6D 79 61 73 63 69 69 29 0A 20
20 57 72 69 74 69 6E 67 20 63 6F 6D 70 69 6C 65 64 20 66 6F 72 6D 0A 20
20 31 32 38 20 62 79 74 65 73 20 69 6E 20 73 74 72 69 6E 67 20 74 61 62
6C 65 73 0A 20 20 33 38 34 20 62 79 74 65 73 20 28 37 35 25 29 20 73 61
76 65 64 20 73 70 6F 74 74 69 6E 67 20 64 75 70 6C 69 63 61 74 65 73 0A
20 20 31 20 62 79 74 65 73 20 28 30 2E 37 37 35 25 29 20 73 61 76 65 64
20 75 73 69 6E 67 20 73 75 62 73 74 72 69 6E 67 73 0A 20 20 2E 2E 2E 2E
0A 20 20 63 68 6D 6F 64 20 36 34 34 20 62 6C 69 62 2F 61 72 63 68 2F 61
75 74 6F 2F 45 6E 63 6F 64 65 2F 4D 79 2F 4D 79 2E 62 73 0A 20 20 24 0A
0A 54 68 65 20 74 69 6D 65 20 69 74 20 74 61 6B 65 73 20 76 61 72 69 65
73 20 64 65 70 65 6E 64 69 6E 67 20 6F 6E 20 68 6F 77 20 66 61 73 74 20
79 6F 75 72 20 6D 61 63 68 69 6E 65 20 69 73 20 61 6E 64 0A 68 6F 77 20
6C 61 72 67 65 20 79 6F 75 72 20 65 6E 63 6F 64 69 6E 67 20 69 73 2E 20
20 55 6E 6C 65 73 73 20 79 6F 75 20 61 72 65 20 77 6F 72 6B 69 6E 67 20
6F 6E 20 73 6F 6D 65 74 68 69 6E 67 20 62 69 67 0A 6C 69 6B 65 20 65 75
63 2D 74 77 2C 20 69 74 20 77 6F 6E 27 74 20 74 61 6B 65 20 74 6F 6F 20
6C 6F 6E 67 2E 0A 0A 3D 69 74 65 6D 20 35 2E 0A 0A 59 6F 75 20 63 61 6E
20 22 6D 61 6B 65 20 69 6E 73 74 61 6C 6C 22 20 61 6C 72 65 61 64 79 20
62 75 74 20 79 6F 75 20 73 68 6F 75 6C 64 20 74 65 73 74 20 66 69 72 73
74 2E 0A 0A 20 20 24 20 6D 61 6B 65 20 74 65 73 74 0A 20 20 50 45 52 4C
5F 44 4C 5F 4E 4F 4E 4C 41 5A 59 3D 31 20 2F 75 73 72 2F 6C 6F 63 61 6C
2F 62 69 6E 2F 70 65 72 6C 20 2D 49 62 6C 69 62 2F 61 72 63 68 20 2D 49
62 6C 69 62 2F 6C 69 62 20 5C 0A 20 20 20 20 2D 65 20 27 75 73 65 20 54
65 73 74 3A 3A 48 61 72 6E 65 73 73 20 20 71 77 28 26 72 75 6E 74 65 73
74 73 20 24 76 65 72 62 6F 73 65 29 3B 20 5C 0A 20 20 20 20 24 76 65 72
62 6F 73 65 3D 30 3B 20 72 75 6E 74 65 73 74 73 20 40 41 52 47 56 3B 27
20 74 2F 2A 2E 74 0A 20 20 74 2F 4D 79 2E 2E 2E 2E 6F 6B 0A 20 20 41 6C
6C 20 74 65 73 74 73 20 73 75 63 63 65 73 73 66 75 6C 2E 0A 20 20 46 69
6C 65 73 3D 31 2C 20 54 65 73 74 73 3D 32 2C 20 20 30 20 77 61 6C 6C 63
6C 6F 63 6B 20 73 65 63 73 0A 20 20 20 28 20 30 2E 30 39 20 63 75 73 72
20 2B 20 30 2E 30 31 20 63 73 79 73 20 3D 20 30 2E 30 39 20 43 50 55 29
0A 0A 3D 69 74 65 6D 20 36 2E 0A 0A 49 66 20 79 6F 75 20 61 72 65 20 63
6F 6E 74 65 6E 74 20 77 69 74 68 20 74 68 65 20 74 65 73 74 20 72 65 73
75 6C 74 2C 20 6A 75 73 74 20 22 6D 61 6B 65 20 69 6E 73 74 61 6C 6C 22
0A 0A 3D 69 74 65 6D 20 37 2E 0A 0A 49 66 20 79 6F 75 20 77 61 6E 74 20
74 6F 20 61 64 64 20 79 6F 75 72 20 65 6E 63 6F 64 69 6E 67 20 74 6F 20
45 6E 63 6F 64 65 27 73 20 64 65 6D 61 6E 64 2D 6C 6F 61 64 69 6E 67 20
6C 69 73 74 0A 28 73 6F 20 79 6F 75 20 64 6F 6E 27 74 20 68 61 76 65 20
74 6F 20 22 75 73 65 20 45 6E 63 6F 64 65 3A 3A 59 6F 75 72 45 6E 63 6F
64 69 6E 67 22 29 2C 20 72 75 6E 0A 0A 20 20 65 6E 63 32 78 73 20 2D 43
0A 0A 74 6F 20 75 70 64 61 74 65 20 45 6E 63 6F 64 65 3A 3A 43 6F 6E 66
69 67 4C 6F 63 61 6C 2C 20 61 20 6D 6F 64 75 6C 65 20 74 68 61 74 20 63
6F 6E 74 72 6F 6C 73 20 6C 6F 63 61 6C 20 73 65 74 74 69 6E 67 73 2E 0A
41 66 74 65 72 20 74 68 61 74 2C 20 22 75 73 65 20 45 6E 63 6F 64 65 3B
22 20 69 73 20 65 6E 6F 75 67 68 20 74 6F 20 6C 6F 61 64 20 79 6F 75 72
20 65 6E 63 6F 64 69 6E 67 73 20 6F 6E 20 64 65 6D 61 6E 64 2E 0A 0A 3D
62 61 63 6B 0A 0A 3D 68 65 61 64 31 20 54 68 65 20 55 6E 69 63 6F 64 65
20 43 68 61 72 61 63 74 65 72 20 4D 61 70 0A 0A 45 6E 63 6F 64 65 20 75
73 65 73 20 74 68 65 20 55 6E 69 63 6F 64 65 20 43 68 61 72 61 63 74 65
72 20 4D 61 70 20 28 55 43 4D 29 20 66 6F 72 6D 61 74 20 66 6F 72 20 73
6F 75 72 63 65 20 63 68 61 72 61 63 74 65 72 0A 6D 61 70 70 69 6E 67 73
2E 20 20 54 68 69 73 20 66 6F 72 6D 61 74 20 69 73 20 75 73 65 64 20 62
79 20 49 42 4D 27 73 20 49 43 55 20 70 61 63 6B 61 67 65 20 61 6E 64 20
77 61 73 20 61 64 6F 70 74 65 64 0A 62 79 20 4E 69 63 6B 20 49 6E 67 2D
53 69 6D 6D 6F 6E 73 20 66 6F 72 20 75 73 65 20 77 69 74 68 20 74 68 65
20 45 6E 63 6F 64 65 20 6D 6F 64 75 6C 65 2E 20 20 53 69 6E 63 65 20 55
43 4D 20 69 73 0A 6D 6F 72 65 20 66 6C 65 78 69 62 6C 65 20 74 68 61 6E
20 54 63 6C 27 73 20 45 6E 63 6F 64 69 6E 67 20 4D 61 70 20 61 6E 64 20
66 61 72 20 6D 6F 72 65 20 75 73 65 72 2D 66 72 69 65 6E 64 6C 79 2C 0A
74 68 69 73 20 69 73 20 74 68 65 20 72 65 63 6F 6D 6D 65 6E 64 65 64 20
66 6F 72 6D 65 74 20 66 6F 72 20 45 6E 63 6F 64 65 20 6E 6F 77 2E 0A 0A
41 20 55 43 4D 20 66 69 6C 65 20 6C 6F 6F 6B 73 20 6C 69 6B 65 20 74 68
69 73 2E 0A 0A 20 20 23 0A 20 20 23 20 43 6F 6D 6D 65 6E 74 73 0A 20 20
23 0A 20 20 3C 63 6F 64 65 5F 73 65 74 5F 6E 61 6D 65 3E 20 22 55 53 2D
61 73 63 69 69 22 20 23 20 52 65 71 75 69 72 65 64 0A 20 20 3C 63 6F 64
65 5F 73 65 74 5F 61 6C 69 61 73 3E 20 22 61 73 63 69 69 22 20 20 20 23
20 4F 70 74 69 6F 6E 61 6C 0A 20 20 3C 6D 62 5F 63 75 72 5F 6D 69 6E 3E
20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 23 20 52 65 71 75 69 72 65
64 3B 20 75 73 75 61 6C 6C 79 20 31 0A 20 20 3C 6D 62 5F 63 75 72 5F 6D
61 78 3E 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 23 20 4D 61 78 2E
20 23 20 6F 66 20 62 79 74 65 73 2F 63 68 61 72 0A 20 20 3C 73 75 62 63
68 61 72 3E 20 5C 78 33 46 20 20 20 20 20 20 20 20 20 20 20 20 20 23 20
53 75 62 73 74 69 74 75 74 69 6F 6E 20 63 68 61 72 0A 20 20 23 0A 20 20
43 48 41 52 4D 41 50 0A 20 20 3C 55 30 30 30 30 3E 20 5C 78 30 30 20 7C
30 20 23 20 3C 63 6F 6E 74 72 6F 6C 3E 0A 20 20 3C 55 30 30 30 31 3E 20
5C 78 30 31 20 7C 30 20 23 20 3C 63 6F 6E 74 72 6F 6C 3E 0A 20 20 3C 55
30 30 30 32 3E 20 5C 78 30 32 20 7C 30 20 23 20 3C 63 6F 6E 74 72 6F 6C
3E 0A 20 20 2E 2E 2E 2E 0A 20 20 3C 55 30 30 37 43 3E 20 5C 78 37 43 20
7C 30 20 23 20 56 45 52 54 49 43 41 4C 20 4C 49 4E 45 0A 20 20 3C 55 30
30 37 44 3E 20 5C 78 37 44 20 7C 30 20 23 20 52 49 47 48 54 20 43 55 52
4C 59 20 42 52 41 43 4B 45 54 0A 20 20 3C 55 30 30 37 45 3E 20 5C 78 37
45 20 7C 30 20 23 20 54 49 4C 44 45 0A 20 20 3C 55 30 30 37 46 3E 20 5C
78 37 46 20 7C 30 20 23 20 3C 63 6F 6E 74 72 6F 6C 3E 0A 20 20 45 4E 44
20 43 48 41 52 4D 41 50 0A 0A 3D 6F 76 65 72 20 34 0A 0A 3D 69 74 65 6D
20 2A 0A 0A 41 6E 79 74 68 69 6E 67 20 74 68 61 74 20 66 6F 6C 6C 6F 77
73 20 43 3C 23 3E 20 69 73 20 74 72 65 61 74 65 64 20 61 73 20 61 20 63
6F 6D 6D 65 6E 74 2E 0A 0A 3D 69 74 65 6D 20 2A 0A 0A 54 68 65 20 68 65
61 64 65 72 20 73 65 63 74 69 6F 6E 20 63 6F 6E 74 69 6E 75 65 73 20 75
6E 74 69 6C 20 61 20 6C 69 6E 65 20 63 6F 6E 74 61 69 6E 69 6E 67 20 74
68 65 20 77 6F 72 64 0A 43 48 41 52 4D 41 50 2E 20 54 68 69 73 20 73 65
63 74 69 6F 6E 20 68 61 73 20 61 20 66 6F 72 6D 20 6F 66 20 49 3C 45 3C
6C 74 3E 6B 65 79 77 6F 72 64 45 3C 67 74 3E 20 76 61 6C 75 65 3E 2C 20
6F 6E 65 0A 70 61 69 72 20 70 65 72 20 6C 69 6E 65 2E 20 20 53 74 72 69
6E 67 73 20 75 73 65 64 20 61 73 20 76 61 6C 75 65 73 20 6D 75 73 74 20
62 65 20 71 75 6F 74 65 64 2E 20 42 61 72 65 77 6F 72 64 73 20 61 72 65
0A 74 72 65 61 74 65 64 20 61 73 20 6E 75 6D 62 65 72 73 2E 20 20 49 3C
5C 78 58 58 3E 20 72 65 70 72 65 73 65 6E 74 73 20 61 20 62 79 74 65 2E
0A 0A 4D 6F 73 74 20 6F 66 20 74 68 65 20 6B 65 79 77 6F 72 64 73 20 61
72 65 20 73 65 6C 66 2D 65 78 70 6C 61 6E 61 74 6F 72 79 2E 20 49 3C 73
75 62 63 68 61 72 3E 20 6D 65 61 6E 73 0A 73 75 62 73 74 69 74 75 74 69
6F 6E 20 63 68 61 72 61 63 74 65 72 2C 20 6E 6F 74 20 73 75 62 63 68 61
72 61 63 74 65 72 2E 20 20 57 68 65 6E 20 79 6F 75 20 64 65 63 6F 64 65
20 61 20 55 6E 69 63 6F 64 65 0A 73 65 71 75 65 6E 63 65 20 74 6F 20 74
68 69 73 20 65 6E 63 6F 64 69 6E 67 20 62 75 74 20 6E 6F 20 6D 61 74 63
68 69 6E 67 20 63 68 61 72 61 63 74 65 72 20 69 73 20 66 6F 75 6E 64 2C
20 74 68 65 20 62 79 74 65 0A 73 65 71 75 65 6E 63 65 20 64 65 66 69 6E
65 64 20 68 65 72 65 20 77 69 6C 6C 20 62 65 20 75 73 65 64 2E 20 20 46
6F 72 20 6D 6F 73 74 20 63 61 73 65 73 2C 20 74 68 65 20 76 61 6C 75 65
20 68 65 72 65 20 69 73 0A 5C 78 33 46 3B 20 69 6E 20 41 53 43 49 49 2C
20 74 68 69 73 20 69 73 20 61 20 71 75 65 73 74 69 6F 6E 20 6D 61 72 6B
2E 0A 0A 3D 69 74 65 6D 20 2A 0A 0A 43 48 41 52 4D 41 50 20 73 74 61 72
74 73 20 74 68 65 20 63 68 61 72 61 63 74 65 72 20 6D 61 70 20 73 65 63
74 69 6F 6E 2E 20 20 45 61 63 68 20 6C 69 6E 65 20 68 61 73 20 61 20 66
6F 72 6D 20 61 73 0A 66 6F 6C 6C 6F 77 73 3A 0A 0A 20 20 3C 55 58 58 58
58 3E 20 5C 78 58 58 2E 2E 20 7C 30 20 23 20 63 6F 6D 6D 65 6E 74 0A 20
20 20 20 5E 20 20 20 20 20 5E 20 20 20 20 20 20 5E 0A 20 20 20 20 7C 20
20 20 20 20 7C 20 20 20 20 20 20 2B 2D 20 46 61 6C 6C 62 61 63 6B 20 66
6C 61 67 0A 20 20 20 20 7C 20 20 20 20 20 2B 2D 2D 2D 2D 2D 2D 2D 2D 20
45 6E 63 6F 64 65 64 20 62 79 74 65 20 73 65 71 75 65 6E 63 65 0A 20 20
20 20 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 55 6E 69 63 6F 64
65 20 43 68 61 72 61 63 74 65 72 20 49 44 20 69 6E 20 68 65 78 0A 0A 54
68 65 20 66 6F 72 6D 61 74 20 69 73 20 72 6F 75 67 68 6C 79 20 74 68 65
20 73 61 6D 65 20 61 73 20 61 20 68 65 61 64 65 72 20 73 65 63 74 69 6F
6E 20 65 78 63 65 70 74 20 66 6F 72 20 74 68 65 0A 66 61 6C 6C 62 61 63
6B 20 66 6C 61 67 3A 20 7C 20 66 6F 6C 6C 6F 77 65 64 20 62 79 20 30 2E
2E 33 2E 20 20 20 54 68 65 20 6D 65 61 6E 69 6E 67 20 6F 66 20 74 68 65
20 70 6F 73 73 69 62 6C 65 0A 76 61 6C 75 65 73 20 69 73 20 61 73 20 66
6F 6C 6C 6F 77 73 3A 0A 0A 3D 6F 76 65 72 20 34 0A 0A 3D 69 74 65 6D 20
7C 30 20 0A 0A 52 6F 75 6E 64 20 74 72 69 70 20 73 61 66 65 2E 20 20 41
20 63 68 61 72 61 63 74 65 72 20 64 65 63 6F 64 65 64 20 74 6F 20 55 6E
69 63 6F 64 65 20 65 6E 63 6F 64 65 73 20 62 61 63 6B 20 74 6F 20 74 68
65 0A 73 61 6D 65 20 62 79 74 65 20 73 65 71 75 65 6E 63 65 2E 20 20 4D
6F 73 74 20 63 68 61 72 61 63 74 65 72 73 20 68 61 76 65 20 74 68 69 73
20 66 6C 61 67 2E 0A 0A 3D 69 74 65 6D 20 7C 31 0A 0A 46 61 6C 6C 62 61
63 6B 20 66 6F 72 20 75 6E 69 63 6F 64 65 20 2D 3E 20 65 6E 63 6F 64 69
6E 67 2E 20 20 57 68 65 6E 20 73 65 65 6E 2C 20 65 6E 63 32 78 73 20 61
64 64 73 20 74 68 69 73 0A 63 68 61 72 61 63 74 65 72 20 66 6F 72 20 74
68 65 20 65 6E 63 6F 64 65 20 6D 61 70 20 6F 6E 6C 79 2E 0A 0A 3D 69 74
65 6D 20 7C 32 20 0A 0A 53 6B 69 70 20 73 75 62 2D 63 68 61 72 20 6D 61
70 70 69 6E 67 20 73 68 6F 75 6C 64 20 74 68 65 72 65 20 62 65 20 6E 6F
20 63 6F 64 65 20 70 6F 69 6E 74 2E 0A 0A 3D 69 74 65 6D 20 7C 33 20 0A
0A 46 61 6C 6C 62 61 63 6B 20 66 6F 72 20 65 6E 63 6F 64 69 6E 67 20 2D
3E 20 75 6E 69 63 6F 64 65 2E 20 20 57 68 65 6E 20 73 65 65 6E 2C 20 65
6E 63 32 78 73 20 61 64 64 73 20 74 68 69 73 0A 63 68 61 72 61 63 74 65
72 20 66 6F 72 20 74 68 65 20 64 65 63 6F 64 65 20 6D 61 70 20 6F 6E 6C
79 2E 0A 0A 3D 62 61 63 6B 0A 0A 3D 69 74 65 6D 20 2A 0A 0A 41 6E 64 20
66 69 6E 61 6C 6C 79 2C 20 45 4E 44 20 4F 46 20 43 48 41 52 4D 41 50 20
65 6E 64 73 20 74 68 65 20 73 65 63 74 69 6F 6E 2E 0A 0A 3D 62 61 63 6B
0A 0A 57 68 65 6E 20 79 6F 75 20 61 72 65 20 6D 61 6E 75 61 6C 6C 79 20
63 72 65 61 74 69 6E 67 20 61 20 55 43 4D 20 66 69 6C 65 2C 20 79 6F 75
20 73 68 6F 75 6C 64 20 63 6F 70 79 20 61 73 63 69 69 2E 75 63 6D 0A 6F
72 20 61 6E 20 65 78 69 73 74 69 6E 67 20 65 6E 63 6F 64 69 6E 67 20 77
68 69 63 68 20 69 73 20 63 6C 6F 73 65 20 74 6F 20 79 6F 75 72 73 2C 20
72 61 74 68 65 72 20 74 68 61 6E 20 77 72 69 74 65 0A 79 6F 75 72 20 6F
77 6E 20 66 72 6F 6D 20 73 63 72 61 74 63 68 2E 0A 0A 57 68 65 6E 20 79
6F 75 20 64 6F 20 73 6F 2C 20 6D 61 6B 65 20 73 75 72 65 20 79 6F 75 20
6C 65 61 76 65 20 61 74 20 6C 65 61 73 74 20 42 3C 55 30 30 30 30 3E 20
74 6F 20 42 3C 55 30 30 32 30 3E 20 61 73 0A 69 73 2C 20 75 6E 6C 65 73
73 20 79 6F 75 72 20 65 6E 76 69 72 6F 6E 6D 65 6E 74 20 69 73 20 45 42
43 44 49 43 2E 0A 0A 42 3C 43 41 56 45 41 54 3E 3A 20 6E 6F 74 20 61 6C
6C 20 66 65 61 74 75 72 65 73 20 69 6E 20 55 43 4D 20 61 72 65 20 69 6D
70 6C 65 6D 65 6E 74 65 64 2E 20 20 46 6F 72 20 65 78 61 6D 70 6C 65 2C
0A 69 63 75 3A 73 74 61 74 65 20 69 73 20 6E 6F 74 20 75 73 65 64 2E 20
20 42 65 63 61 75 73 65 20 6F 66 20 74 68 61 74 2C 20 79 6F 75 20 6E 65
65 64 20 74 6F 20 77 72 69 74 65 20 61 20 70 65 72 6C 0A 6D 6F 64 75 6C
65 20 69 66 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 73 75 70 70 6F 72 74
20 61 6C 67 6F 72 69 74 68 6D 69 63 61 6C 20 65 6E 63 6F 64 69 6E 67 73
2C 20 6E 6F 74 61 62 6C 79 0A 74 68 65 20 49 53 4F 2D 32 30 32 32 20 73
65 72 69 65 73 2E 20 20 53 75 63 68 20 6D 6F 64 75 6C 65 73 20 69 6E 63
6C 75 64 65 20 4C 3C 45 6E 63 6F 64 65 3A 3A 4A 50 3A 3A 32 30 32 32 5F
4A 50 3E 2C 0A 4C 3C 45 6E 63 6F 64 65 3A 3A 4B 52 3A 3A 32 30 32 32 5F
4B 52 3E 2C 20 61 6E 64 20 4C 3C 45 6E 63 6F 64 65 3A 3A 54 57 3A 3A 48
5A 3E 2E 0A 0A 3D 68 65 61 64 32 20 43 6F 70 69 6E 67 20 77 69 74 68 20
64 75 70 6C 69 63 61 74 65 20 6D 61 70 70 69 6E 67 73 0A 0A 57 68 65 6E
20 79 6F 75 20 63 72 65 61 74 65 20 61 20 6D 61 70 2C 20 79 6F 75 20 53
48 4F 55 4C 44 20 6D 61 6B 65 20 79 6F 75 72 20 6D 61 70 70 69 6E 67 73
20 72 6F 75 6E 64 2D 74 72 69 70 20 73 61 66 65 2E 0A 54 68 61 74 20 69
73 2C 20 43 3C 65 6E 63 6F 64 65 28 27 79 6F 75 72 2D 65 6E 63 6F 64 69
6E 67 27 2C 20 64 65 63 6F 64 65 28 27 79 6F 75 72 2D 65 6E 63 6F 64 69
6E 67 27 2C 20 24 64 61 74 61 29 29 20 65 71 0A 24 64 61 74 61 3E 20 73
74 61 6E 64 73 20 66 6F 72 20 61 6C 6C 20 63 68 61 72 61 63 74 65 72 73
20 74 68 61 74 20 61 72 65 20 6D 61 72 6B 65 64 20 61 73 20 43 3C 7C 30
3E 2E 20 20 48 65 72 65 20 69 73 0A 68 6F 77 20 74 6F 20 6D 61 6B 65 20
73 75 72 65 3A 0A 0A 3D 6F 76 65 72 20 34 0A 0A 3D 69 74 65 6D 20 2A 20
0A 0A 53 6F 72 74 20 79 6F 75 72 20 6D 61 70 20 69 6E 20 55 6E 69 63 6F
64 65 20 6F 72 64 65 72 2E 0A 0A 3D 69 74 65 6D 20 2A 0A 0A 57 68 65 6E
20 79 6F 75 20 68 61 76 65 20 61 20 64 75 70 6C 69 63 61 74 65 20 65 6E
74 72 79 2C 20 6D 61 72 6B 20 65 69 74 68 65 72 20 6F 6E 65 20 77 69 74
68 20 27 7C 31 27 20 6F 72 20 27 7C 33 27 2E 0A 20 20 0A 3D 69 74 65 6D
20 2A 20 0A 0A 41 6E 64 20 6D 61 6B 65 20 73 75 72 65 20 74 68 65 20 27
7C 31 27 20 6F 72 20 27 7C 33 27 20 65 6E 74 72 79 20 46 4F 4C 4C 4F 57
53 20 74 68 65 20 27 7C 30 27 20 65 6E 74 72 79 2E 0A 0A 3D 62 61 63 6B
0A 0A 48 65 72 65 20 69 73 20 61 6E 20 65 78 61 6D 70 6C 65 20 66 72 6F
6D 20 62 69 67 35 2D 65 74 65 6E 2E 0A 0A 20 20 3C 55 32 35 35 30 3E 20
5C 78 46 39 5C 78 46 39 20 7C 30 0A 20 20 3C 55 32 35 35 30 3E 20 5C 78
41 32 5C 78 41 34 20 7C 33 0A 0A 49 6E 74 65 72 6E 61 6C 6C 79 20 45 6E
63 6F 64 69 6E 67 20 2D 3E 20 55 6E 69 63 6F 64 65 20 61 6E 64 20 55 6E
69 63 6F 64 65 20 2D 3E 20 45 6E 63 6F 64 69 6E 67 20 4D 61 70 20 6C 6F
6F 6B 73 20 6C 69 6B 65 0A 74 68 69 73 3B 0A 0A 20 20 45 20 74 6F 20 55
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 20 74 6F 20 45 0A 20 20
2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D
2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0A 20 20 5C 78 46 39 5C 78 46
39 20 3D 3E 20 55 32 35 35 30 20 20 20 20 55 32 35 35 30 20 3D 3E 20 5C
78 46 39 5C 78 46 39 0A 20 20 5C 78 41 32 5C 78 41 34 20 3D 3E 20 55 32
35 35 30 0A 20 0A 53 6F 20 69 74 20 69 73 20 72 6F 75 6E 64 2D 74 72 69
70 20 73 61 66 65 20 66 6F 72 20 5C 78 46 39 5C 78 46 39 2E 20 20 42 75
74 20 69 66 20 74 68 65 20 6C 69 6E 65 20 61 62 6F 76 65 20 69 73 20 75
70 73 69 64 65 0A 64 6F 77 6E 2C 20 68 65 72 65 20 69 73 20 77 68 61 74
20 68 61 70 70 65 6E 73 2E 0A 0A 20 20 45 20 74 6F 20 55 20 20 20 20 20
20 20 20 20 20 20 20 20 20 20 55 20 74 6F 20 45 0A 20 20 2D 2D 2D 2D 2D
2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D
2D 2D 2D 2D 2D 2D 2D 2D 2D 0A 20 20 5C 78 41 32 5C 78 41 34 20 3D 3E 20
55 32 35 35 30 20 20 20 20 55 32 35 35 30 20 3D 3E 20 5C 78 46 39 5C 78
46 39 0A 20 20 28 5C 78 46 39 5C 78 46 39 20 3D 3E 20 55 32 35 35 30 20
69 73 20 6E 6F 77 20 6F 76 65 72 77 72 69 74 74 65 6E 21 29 0A 0A 54 68
65 20 45 6E 63 6F 64 65 20 70 61 63 6B 61 67 65 20 63 6F 6D 65 73 20 77
69 74 68 20 46 3C 75 63 6D 6C 69 6E 74 3E 2C 20 61 20 63 72 75 64 65 20
62 75 74 20 73 75 66 66 69 63 69 65 6E 74 0A 75 74 69 6C 69 74 79 20 74
6F 20 63 68 65 63 6B 20 74 68 65 20 69 6E 74 65 67 72 69 74 79 20 6F 66
20 61 20 55 43 4D 20 66 69 6C 65 2E 20 20 43 68 65 63 6B 20 75 6E 64 65
72 20 74 68 65 0A 45 6E 63 6F 64 65 2F 62 69 6E 20 64 69 72 65 63 74 6F
72 79 20 66 6F 72 20 74 68 69 73 2E 0A 0A 57 68 65 6E 20 69 6E 20 64 6F
75 62 74 2C 20 79 6F 75 20 63 61 6E 20 75 73 65 20 46 3C 75 63 6D 73 6F
72 74 3E 2C 20 79 65 74 20 61 6E 6F 74 68 65 72 20 75 74 69 6C 69 74 79
20 75 6E 64 65 72 0A 45 6E 63 6F 64 65 2F 62 69 6E 20 64 69 72 65 63 74
6F 72 79 2E 0A 0A 3D 68 65 61 64 31 20 42 6F 6F 6B 6D 61 72 6B 73 0A 0A
3D 6F 76 65 72 20 34 0A 0A 3D 69 74 65 6D 20 2A 0A 0A 49 43 55 20 48 6F
6D 65 20 50 61 67 65 20 0A 4C 3C 68 74 74 70 3A 2F 2F 6F 73 73 2E 73 6F
66 74 77 61 72 65 2E 69 62 6D 2E 63 6F 6D 2F 69 63 75 2F 3E 0A 0A 3D 69
74 65 6D 20 2A 0A 0A 49 43 55 20 43 68 61 72 61 63 74 65 72 20 4D 61 70
70 69 6E 67 20 54 61 62 6C 65 73 0A 4C 3C 68 74 74 70 3A 2F 2F 6F 73 73
2E 73 6F 66 74 77 61 72 65 2E 69 62 6D 2E 63 6F 6D 2F 69 63 75 2F 63 68
61 72 73 65 74 2F 3E 0A 0A 3D 69 74 65 6D 20 2A 0A 0A 49 43 55 3A 43 6F
6E 76 65 72 73 69 6F 6E 20 44 61 74 61 0A 4C 3C 68 74 74 70 3A 2F 2F 6F
73 73 2E 73 6F 66 74 77 61 72 65 2E 69 62 6D 2E 63 6F 6D 2F 69 63 75 2F
75 73 65 72 67 75 69 64 65 2F 63 6F 6E 76 65 72 73 69 6F 6E 2D 64 61 74
61 2E 68 74 6D 6C 3E 0A 0A 3D 62 61 63 6B 0A 0A 3D 68 65 61 64 31 20 53
45 45 20 41 4C 53 4F 0A 0A 4C 3C 45 6E 63 6F 64 65 3E 2C 0A 4C 3C 70 65
72 6C 6D 6F 64 3E 2C 0A 4C 3C 70 65 72 6C 70 6F 64 3E 0A 0A 3D 63 75 74
0A 0A 23 20 2D 51 20 74 6F 20 64 69 73 61 62 6C 65 20 74 68 65 20 64 75
70 6C 69 63 61 74 65 20 63 6F 64 65 70 6F 69 6E 74 20 74 65 73 74 0A 23
20 2D 53 20 6D 61 6B 65 20 6D 61 70 70 69 6E 67 20 65 72 72 6F 72 73 20
66 61 74 61 6C 0A 23 20 2D 71 20 74 6F 20 72 65 6D 6F 76 65 20 63 6F 6D
6D 65 6E 74 73 20 77 72 69 74 74 65 6E 20 74 6F 20 6F 75 74 70 75 74 20
66 69 6C 65 73 0A 23 20 2D 4F 20 74 6F 20 65 6E 61 62 6C 65 20 74 68 65
20 28 62 72 75 74 65 20 66 6F 72 63 65 29 20 73 75 62 73 74 72 69 6E 67
20 6F 70 74 69 6D 69 73 65 72 0A 23 20 2D 6F 20 3C 6F 75 74 70 75 74 3E
20 74 6F 20 73 70 65 63 69 66 79 20 74 68 65 20 6F 75 74 70 75 74 20 66
69 6C 65 20 6E 61 6D 65 20 28 65 6C 73 65 20 69 74 27 73 20 74 68 65 20
66 69 72 73 74 20 61 72 67 29 0A 23 20 2D 66 20 3C 69 6E 6C 69 73 74 3E
20 74 6F 20 67 69 76 65 20 61 20 66 69 6C 65 20 77 69 74 68 20 61 20 6C
69 73 74 20 6F 66 20 69 6E 70 75 74 20 66 69 6C 65 73 20 28 65 6C 73 65
20 75 73 65 20 74 68 65 20 61 72 67 73 29 0A 23 20 2D 6E 20 3C 6E 61 6D
65 3E 20 74 6F 20 6E 61 6D 65 20 74 68 65 20 65 6E 63 6F 64 69 6E 67 20
28 65 6C 73 65 20 75 73 65 20 74 68 65 20 62 61 73 65 6E 61 6D 65 20 6F
66 20 74 68 65 20 69 6E 70 75 74 20 66 69 6C 65 2E 0A 0A 57 69 74 68 20
25 73 65 65 6E 20 68 6F 6C 64 69 6E 67 20 61 72 72 61 79 20 72 65 66 73
3A 0A 0A 20 20 20 20 20 20 38 36 35 2E 36 36 20 72 65 61 6C 20 20 20 20
20 20 20 20 32 38 2E 38 30 20 75 73 65 72 20 20 20 20 20 20 20 20 20 38
2E 37 39 20 73 79 73 0A 20 20 20 20 20 20 37 39 30 34 20 20 6D 61 78 69
6D 75 6D 20 72 65 73 69 64 65 6E 74 20 73 65 74 20 73 69 7A 65 0A 20 20
20 20 20 20 31 33 35 36 20 20 61 76 65 72 61 67 65 20 73 68 61 72 65 64
20 6D 65 6D 6F 72 79 20 73 69 7A 65 0A 20 20 20 20 20 31 38 35 36 36 20
20 61 76 65 72 61 67 65 20 75 6E 73 68 61 72 65 64 20 64 61 74 61 20 73
69 7A 65 0A 20 20 20 20 20 20 20 32 32 39 20 20 61 76 65 72 61 67 65 20
75 6E 73 68 61 72 65 64 20 73 74 61 63 6B 20 73 69 7A 65 0A 20 20 20 20
20 34 36 30 38 30 20 20 70 61 67 65 20 72 65 63 6C 61 69 6D 73 0A 20 20
20 20 20 33 33 33 37 33 20 20 70 61 67 65 20 66 61 75 6C 74 73 0A 0A 57
69 74 68 20 25 73 65 65 6E 20 68 6F 6C 64 69 6E 67 20 73 69 6D 70 6C 65
20 73 63 61 6C 61 72 73 3A 0A 0A 20 20 20 20 20 20 33 34 32 2E 31 36 20
72 65 61 6C 20 20 20 20 20 20 20 20 32 37 2E 31 31 20 75 73 65 72 20 20
20 20 20 20 20 20 20 33 2E 35 34 20 73 79 73 0A 20 20 20 20 20 20 38 33
38 38 20 20 6D 61 78 69 6D 75 6D 20 72 65 73 69 64 65 6E 74 20 73 65 74
20 73 69 7A 65 0A 20 20 20 20 20 20 31 33 39 34 20 20 61 76 65 72 61 67
65 20 73 68 61 72 65 64 20 6D 65 6D 6F 72 79 20 73 69 7A 65 0A 20 20 20
20 20 31 34 39 36 39 20 20 61 76 65 72 61 67 65 20 75 6E 73 68 61 72 65
64 20 64 61 74 61 20 73 69 7A 65 0A 20 20 20 20 20 20 20 32 33 36 20 20
61 76 65 72 61 67 65 20 75 6E 73 68 61 72 65 64 20 73 74 61 63 6B 20 73
69 7A 65 0A 20 20 20 20 20 32 38 31 35 39 20 20 70 61 67 65 20 72 65 63
6C 61 69 6D 73 0A 20 20 20 20 20 20 39 38 33 39 20 20 70 61 67 65 20 66
61 75 6C 74 73 0A 0A 59 65 73 2C 20 35 20 6D 69 6E 75 74 65 73 20 69 73
20 66 61 73 74 65 72 20 74 68 61 6E 20 31 35 2E 20 41 62 6F 76 65 20 69
73 20 66 6F 72 20 43 50 39 33 36 20 69 6E 20 43 4E 2E 20 4F 6E 6C 79 20
64 69 66 66 65 72 65 6E 63 65 20 69 73 0A 68 6F 77 20 25 73 65 65 6E 20
69 73 20 73 74 6F 72 69 6E 67 20 74 68 69 6E 67 73 20 69 74 73 20 73 65
65 6E 2E 20 53 6F 20 69 74 20 69 73 20 70 61 74 68 61 6C 6F 67 69 63 61
6C 6C 79 20 62 61 64 20 6F 6E 20 61 20 31 36 4D 0A 52 41 4D 20 6D 61 63
68 69 6E 65 2C 20 62 75 74 20 69 74 27 73 20 67 6F 69 6E 67 20 74 6F 20
68 65 6C 70 20 65 76 65 6E 20 6F 6E 20 6D 6F 64 65 72 6E 20 6D 61 63 68
69 6E 65 73 2E 0A 53 77 61 70 70 69 6E 67 20 69 73 20 62 61 64 2C 20 6D
27 6B 61 79 20 3A 2D 29 0A 		#!/usr/bin/perl     eval
 'exec /usr/bin/perl -S 
$0 ${1+"$@"}'  if $runni
ng_under_some_shell; #!.
/perl BEGIN {     # @INC
 poking  no longer neede
d w/ new MakeMaker and M
akefile.PL's     # with 
$ENV{PERL_CORE} set     
# In case we need it in 
future...     require Co
nfig; import Config; } u
se strict; use warnings;
 use Getopt::Std; my @or
ig_ARGV = @ARGV; our $VE
RSION  = do { my @r = (q
$Revision: 2.1 $ =~ /\d+
/g); sprintf "%d."."%02d
" x $#r, @r };  # These 
may get re-ordered. # RA
W is a do_now as inserte
d by &enter # AGG is an 
aggreagated do_now, as b
uilt up by &process  use
 constant {   RAW_NEXT =
> 0,   RAW_IN_LEN => 1, 
  RAW_OUT_BYTES => 2,   
RAW_FALLBACK => 3,    AG
G_MIN_IN => 0,   AGG_MAX
_IN => 1,   AGG_OUT_BYTE
S => 2,   AGG_NEXT => 3,
   AGG_IN_LEN => 4,   AG
G_OUT_LEN => 5,   AGG_FA
LLBACK => 6, };  # (See 
the algorithm in encengi
ne.c - we're building st
ructures for it)  # Ther
e are two sorts of struc
tures. # "do_now" (an ar
ray, two variants of wha
t needs storing) is what
ever we need # to do now
 we've read an input byt
e. # It's housed in a "d
o_next" (which is how we
 got to it), and in turn
 points # to a "do_next"
 which contains all the 
"do_now"s for the next i
nput byte.  # There will
 be a "do_next" which is
 the start state. # For 
a single byte encoding i
t's the only "do_next" -
 each "do_now" points # 
back to it, and each "do
_now" will cause bytes. 
There is no state.  # Fo
r a multi-byte encoding 
where all characters in 
the input are the same #
 length, then there will
 be a tree of "do_now"->
"do_next"->"do_now" # br
anching out from the sta
rt state, one step for e
ach input byte. # The le
af "do_now"s will all be
 at the same distance fr
om the start state, # on
ly the leaf "do_now"s ca
use output bytes, and th
ey in turn point back to
 # the start state.  # F
or an encoding where the
re are varaible length i
nput byte sequences, you
 # will encounter a leaf
 "do_now" sooner for the
 shorter input sequences
, but # as before the le
aves will point back to 
the start state.  # The 
system will cope with es
cape encodings (imagine 
them as a mostly # self-
contained tree for each 
escape state, and cross 
links between trees # at
 the state-switching cha
racters) but so far no i
nput format defines thes
e.  # The system will al
so cope with having outp
ut "leaves" in the middl
e of # the bifurcating b
ranches, not just at the
 extremities, but again 
no # input format does t
his yet.  # There are tw
o variants of the "do_no
w" structure. The first,
 smaller variant # is ge
nerated by &enter as the
 input file is read. The
re is one structure # fo
r each input byte. Say w
e are mapping a single b
yte encoding to a # sing
le byte encoding, with  
"ABCD" going "abcd". The
re will be # 4 "do_now"s
, {"A" => [...,"a",...],
 "B" => [...,"b",...], "
C"=>..., "D"=>...}  # &p
rocess then walks the tr
ee, building aggregate "
do_now" structres for # 
adjacent bytes where pos
sible. The aggregate is 
for a contiguous range o
f # bytes which each pro
duce the same length of 
output, each move to the
 # same next state, and 
each have the same fallb
ack flag. # So our 4 RAW
 "do_now"s above become 
replaced by a single str
ucture # containing: # [
"A", "D", "abcd", 1, ...
] # ie, for an input byt
e $_ in "A".."D", output
 1 byte, found as # subs
tr ("abcd", (ord $_ - or
d "A") * 1, 1) # which m
aps very nicely into poi
nter arithmetic in C for
 encengine.c  sub encode
_U {  # UTF-8 encode lon
g hand - only covers par
t of perl's range  ## my
 $uv = shift;  # chr() w
orks in native space so 
convert value from table
  # into that space befo
re using chr().  my $ch 
= chr(utf8::unicode_to_n
ative($_[0]));  # Now ge
t core perl to encode th
at the way it likes.  ut
f8::encode($ch);  return
 $ch; }  sub encode_S { 
 # encode single byte  #
# my ($ch,$page) = @_; r
eturn chr($ch);  return 
chr $_[0]; }  sub encode
_D {  # encode double by
te MS byte first  ## my 
($ch,$page) = @_; return
 chr($page).chr($ch);  r
eturn chr ($_[1]) . chr 
$_[0]; }  sub encode_M {
  # encode Multi-byte - 
single for 0..255 otherw
ise double  ## my ($ch,$
page) = @_;  ## return &
encode_D if $page;  ## r
eturn &encode_S;  return
 chr ($_[1]) . chr $_[0]
 if $_[1];  return chr $
_[0]; }  my %encode_type
s = (U => \&encode_U,   
                  S => \
&encode_S,              
       D => \&encode_D, 
                    M =>
 \&encode_M,            
        );  # Win32 does
 not expand globs on com
mand line eval "\@ARGV =
 map(glob(\$_),\@ARGV)" 
if ($^O eq 'MSWin32');  
my %opt; # I think these
 are: # -Q to disable th
e duplicate codepoint te
st # -S make mapping err
ors fatal # -q to remove
 comments written to out
put files # -O to enable
 the (brute force) subst
ring optimiser # -o <out
put> to specify the outp
ut file name (else it's 
the first arg) # -f <inl
ist> to give a file with
 a list of input files (
else use the args) # -n 
<name> to name the encod
ing (else use the basena
me of the input file. ge
topts('CM:SQqOo:f:n:',\%
opt);  $opt{M} and make_
makefile_pl($opt{M}, @AR
GV); $opt{C} and make_co
nfiglocal_pm($opt{C}, @A
RGV);  # This really sho
uld go first, else the d
ie here causes empty (no
n-erroneous) # output fi
les to be written. my @e
ncfiles; if (exists $opt
{'f'}) {     # -F is fol
lowed by name of file co
ntaining list of filenam
es     my $flist = $opt{
'f'};     open(FLIST,$fl
ist) || die "Cannot open
 $flist:$!";     chomp(@
encfiles = <FLIST>);    
 close(FLIST); } else { 
    @encfiles = @ARGV; }
  my $cname = (exists $o
pt{'o'}) ? $opt{'o'} : s
hift(@ARGV); chmod(0666,
$cname) if -f $cname && 
!-w $cname; open(C,">$cn
ame") || die "Cannot ope
n $cname:$!";  my $dname
 = $cname; my $hname = $
cname;  my ($doC,$doEnc,
$doUcm,$doPet);  if ($cn
ame =~ /\.(c|xs)$/i) # V
MS may have upcased file
names with DECC$ARGV_PAR
SE_STYLE defined  {   $d
oC = 1;   $dname =~ s/(\
.[^\.]*)?$/.exh/;   chmo
d(0666,$dname) if -f $cn
ame && !-w $dname;   ope
n(D,">$dname") || die "C
annot open $dname:$!";  
 $hname =~ s/(\.[^\.]*)?
$/.h/;   chmod(0666,$hna
me) if -f $cname && !-w 
$hname;   open(H,">$hnam
e") || die "Cannot open 
$hname:$!";    foreach m
y $fh (\*C,\*D,\*H)   { 
   print $fh <<"END" unl
ess $opt{'q'}; /*  !!!!!
!!   DO NOT EDIT THIS FI
LE   !!!!!!!  This file 
was autogenerated by:  $
^X $0 @orig_ARGV */ END 
  }    if ($cname =~ /(\
w+)\.xs$/)    {     prin
t C "#include <EXTERN.h>
\n";     print C "#inclu
de <perl.h>\n";     prin
t C "#include <XSUB.h>\n
";     print C "#define 
U8 U8\n";    }   print C
 "#include \"encode.h\"\
n\n";   } elsif ($cname 
=~ /\.enc$/)  {   $doEnc
 = 1;  } elsif ($cname =
~ /\.ucm$/)  {   $doUcm 
= 1;  } elsif ($cname =~
 /\.pet$/)  {   $doPet =
 1;  }  my %encoding; my
 %strings; my $string_ac
c; my %strings_in_acc;  
my $saved = 0; my $subsa
ve = 0; my $strings = 0;
  sub cmp_name {  if ($a
 =~ /^.*-(\d+)/)   {    
my $an = $1;    if ($b =
~ /^.*-(\d+)/)     {    
  my $r = $an <=> $1;   
   return $r if $r;     
}   }  return $a cmp $b;
 }   foreach my $enc (so
rt cmp_name @encfiles)  
{   my ($name,$sfx) = $e
nc =~ /^.*?([\w-]+)\.(en
c|ucm)$/;   $name = $opt
{'n'} if exists $opt{'n'
};   if (open(E,$enc))  
  {     if ($sfx eq 'enc
')      {       compile_
enc(\*E,lc($name));     
 }     else      {      
 compile_ucm(\*E,lc($nam
e));      }    }   else 
   {     warn "Cannot op
en $enc for $name:$!";  
  }  }  if ($doC)  {   p
rint STDERR "Writing com
piled form\n";   foreach
 my $name (sort cmp_name
 keys %encoding)    {   
  my ($e2u,$u2e,$erep,$m
in_el,$max_el) = @{$enco
ding{$name}};     proces
s($name.'_utf8',$e2u);  
   addstrings(\*C,$e2u);
      process('utf8_'.$n
ame,$u2e);     addstring
s(\*C,$u2e);    }   outb
igstring(\*C,"enctable")
;   foreach my $name (so
rt cmp_name keys %encodi
ng)    {     my ($e2u,$u
2e,$erep,$min_el,$max_el
) = @{$encoding{$name}};
     outtable(\*C,$e2u, 
"enctable");     outtabl
e(\*C,$u2e, "enctable");
      # push(@{$encoding
{$name}},outstring(\*C,$
e2u->{Cname}.'_def',$ere
p));    }   foreach my $
enc (sort cmp_name keys 
%encoding)    {     # my
 ($e2u,$u2e,$rep,$min_el
,$max_el,$rsym) = @{$enc
oding{$enc}};     my ($e
2u,$u2e,$rep,$min_el,$ma
x_el) = @{$encoding{$enc
}};     #my @info = ($e2
u->{Cname},$u2e->{Cname}
,$rsym,length($rep),$min
_el,$max_el);     my $re
plen = 0;      $replen++
 while($rep =~ /\G\\x[0-
9A-Fa-f]/g);     my @inf
o = ($e2u->{Cname},$u2e-
>{Cname},qq((U8 *)"$rep"
),$replen,$min_el,$max_e
l);     my $sym = "${enc
}_encoding";     $sym =~
 s/\W+/_/g;     print C 
"encode_t $sym = \n";   
  # This is to make null
 encoding work -- dankog
ai     for (my $i = (sca
lar @info) - 1;  $i >= 0
; --$i){  $info[$i] ||= 
1;     }     # end of nu
ll tweak -- dankogai    
 print C " {",join(',',@
info,"{\"$enc\",(const c
har *)0}"),"};\n\n";    
}    foreach my $enc (so
rt cmp_name keys %encodi
ng)    {     my $sym = "
${enc}_encoding";     $s
ym =~ s/\W+/_/g;     pri
nt H "extern encode_t $s
ym;\n";     print D " En
code_XSEncoding(aTHX_ &$
sym);\n";    }    if ($c
name =~ /(\w+)\.xs$/)   
 {     my $mod = $1;    
 print C <<'END';  stati
c void Encode_XSEncoding
(pTHX_ encode_t *enc) { 
 dSP;  HV *stash = gv_st
ashpv("Encode::XS", TRUE
);  SV *sv    = sv_bless
(newRV_noinc(newSViv(PTR
2IV(enc))),stash);  int 
i = 0;  PUSHMARK(sp);  X
PUSHs(sv);  while (enc->
name[i])   {    const ch
ar *name = enc->name[i++
];    XPUSHs(sv_2mortal(
newSVpvn(name,strlen(nam
e))));   }  PUTBACK;  ca
ll_pv("Encode::define_en
coding",G_DISCARD);  SvR
EFCNT_dec(sv); }  END   
   print C "\nMODULE = E
ncode::$mod\tPACKAGE = E
ncode::$mod\n\n";     pr
int C "BOOT:\n{\n";     
print C "#include \"$dna
me\"\n";     print C "}\
n";    }   # Close in vo
id context is bad, m'kay
   close(D) or warn "Err
or closing '$dname': $!"
;   close(H) or warn "Er
ror closing '$hname': $!
";    my $perc_saved    
= $saved/($strings + $sa
ved) * 100;   my $perc_s
ubsaved = $subsave/($str
ings + $subsave) * 100; 
  printf STDERR "%d byte
s in string tables\n",$s
trings;   printf STDERR 
"%d bytes (%.3g%%) saved
 spotting duplicates\n",
     $saved, $perc_saved
              if $saved;
   printf STDERR "%d byt
es (%.3g%%) saved using 
substrings\n",     $subs
ave, $perc_subsaved     
    if $subsave;  } elsi
f ($doEnc)  {   foreach 
my $name (sort cmp_name 
keys %encoding)    {    
 my ($e2u,$u2e,$erep,$mi
n_el,$max_el) = @{$encod
ing{$name}};     output_
enc(\*C,$name,$e2u);    
}  } elsif ($doUcm)  {  
 foreach my $name (sort 
cmp_name keys %encoding)
    {     my ($e2u,$u2e,
$erep,$min_el,$max_el) =
 @{$encoding{$name}};   
  output_ucm(\*C,$name,$
u2e,$erep,$min_el,$max_e
l);    }  }  # writing h
alf meg files and then n
ot checking to see if yo
u just filled the # disk
 is bad, m'kay close(C) 
or die "Error closing '$
cname': $!";  # End of t
he main program.  sub co
mpile_ucm {  my ($fh,$na
me) = @_;  my $e2u = {};
  my $u2e = {};  my $cs;
  my %attr;  while (<$fh
>)   {    s/#.*$//;    l
ast if /^\s*CHARMAP\s*$/
i;    if (/^\s*<(\w+)>\s
+"?([^"]*)"?\s*$/i) # " 
# Grrr     {      $attr{
$1} = $2;     }   }  if 
(!defined($cs =  $attr{'
code_set_name'}))   {   
 warn "No <code_set_name
> in $name\n";   }  else
   {    $name = $cs unle
ss exists $opt{'n'};   }
  my $erep;  my $urep;  
my $max_el;  my $min_el;
  if (exists $attr{'subc
har'})   {    #my @byte;
    #$attr{'subchar'} =~
 /^\s*/cg;    #push(@byt
e,$1) while $attr{'subch
ar'} =~ /\G\\x([0-9a-f]+
)/icg;    #$erep = join(
'',map(chr(hex($_)),@byt
e));    $erep = $attr{'s
ubchar'};     $erep =~ s
/^\s+//; $erep =~ s/\s+$
//;   }  print "Reading 
$name ($cs)\n";  my $nfb
 = 0;  my $hfb = 0;  whi
le (<$fh>)   {    s/#.*$
//;    last if /^\s*END\
s+CHARMAP\s*$/i;    next
 if /^\s*$/;    my (@uni
, @byte) = ();    my ($u
ni, $byte, $fb) = m/^(\S
+)\s+(\S+)\s+(\S+)\s+/o 
       or die "Bad line:
 $_";    while ($uni =~ 
 m/\G<([U0-9a-fA-F\+]+)>
/g){        push @uni, m
ap { substr($_, 1) } spl
it(/\+/, $1);    }    wh
ile ($byte =~ m/\G\\x([0
-9a-fA-F]+)/g){        p
ush @byte, $1;    }    i
f (@uni)     {      my $
uch =  join('', map { en
code_U(hex($_)) } @uni )
;      my $ech = join(''
,map(chr(hex($_)),@byte)
);      my $el  = length
($ech);      $max_el = $
el if (!defined($max_el)
 || $el > $max_el);     
 $min_el = $el if (!defi
ned($min_el) || $el < $m
in_el);      if (length(
$fb))       {        $fb
 = substr($fb,1);       
 $hfb++;       }      el
se       {        $nfb++
;        $fb = '0';     
  }      # $fb is fallba
ck flag      # 0 - round
 trip safe      # 1 - fa
llback for unicode -> en
c      # 2 - skip sub-ch
ar mapping      # 3 - fa
llback enc -> unicode   
   enter($u2e,$uch,$ech,
$u2e,$fb+0) if ($fb =~ /
[01]/);      enter($e2u,
$ech,$uch,$e2u,$fb+0) if
 ($fb =~ /[03]/);     } 
   else     {      warn 
$_;     }   }  if ($nfb 
&& $hfb)   {    die "$nf
b entries without fallba
ck, $hfb entries with\n"
;   }  $encoding{$name} 
= [$e2u,$u2e,$erep,$min_
el,$max_el]; }    sub co
mpile_enc {  my ($fh,$na
me) = @_;  my $e2u = {};
  my $u2e = {};   my $ty
pe;  while ($type = <$fh
>)   {    last if $type 
!~ /^\s*#/;   }  chomp($
type);  return if $type 
eq 'E';  # Do the hash l
ookup once, rather than 
once per function call. 
4% speedup.  my $type_fu
nc = $encode_types{$type
};  my ($def,$sym,$pages
) = split(/\s+/,scalar(<
$fh>));  warn "$type enc
oded $name\n";  my $rep 
= '';  # Save a defined 
test by setting these to
 defined values.  my $mi
n_el = ~0; # A very big 
integer  my $max_el = 0;
  # Anything must be lon
ger than 0  {   my $v = 
hex($def);   $rep = &$ty
pe_func($v & 0xFF, ($v >
> 8) & 0xffe);  }  my $e
rrors;  my $seen;  # use
 -Q to silence the seen 
test. Makefile.PL uses t
his by default.  $seen =
 {} unless $opt{Q};  do 
  {    my $line = <$fh>;
    chomp($line);    my 
$page = hex($line);    m
y $ch = 0;    my $i = 16
;    do     {      # So 
why is it 1% faster to l
eave the my here?      m
y $line = <$fh>;      $l
ine =~ s/\r\n$/\n/;     
 die "$.:${line}Line sho
uld be exactly 65 charac
ters long including     
 newline (".length($line
).")" unless length ($li
ne) == 65;      # Split 
line into groups of 4 he
x digits, convert groups
 to ints      # This tak
es 65.35       # map {h
ex $_} $line =~ /(....)/
g      # This takes 63.7
5 (2.5% less time)      
# unpack "n*", pack "H*"
, $line      # There's a
n implicit loop in map. 
Loops are bad, m'kay. Op
s are bad, m'kay      # 
Doing it as while ($line
 =~ /(....)/g) took 74.6
3      foreach my $val (
unpack "n*", pack "H*", 
$line)       {        ne
xt if $val == 0xFFFD;   
     my $ech = &$type_fu
nc($ch,$page);        if
 ($val || (!$ch && !$pag
e))         {          m
y $el  = length($ech);  
        $max_el = $el if
 $el > $max_el;         
 $min_el = $el if $el < 
$min_el;          my $uc
h = encode_U($val);     
     if ($seen) {       
     # We're doing the t
est.            # We don
't need to read this qui
ckly, so storing it as a
 scalar,            # ra
ther than 3 (anon array,
 plus the 2 scalars it h
olds) saves            #
 RAM and may make us fas
ter on low RAM systems. 
[see __END__]           
 if (exists $seen->{$uch
})              {       
         warn sprintf("U
%04X is %02X%02X and %04
X\n",                   
          $val,$page,$ch
,$seen->{$uch});        
        $errors++;      
        }            els
e              {        
        $seen->{$uch} = 
$page << 8 | $ch;       
       }          }     
     # Passing 2 extra a
rgs each time is 3.6% sl
ower!          # Even wi
th having to add $fallba
ck ||= 0 later          
enter_fb0($e2u,$ech,$uch
);          enter_fb0($u
2e,$uch,$ech);         }
        else         {  
        # No character a
t this position         
 # enter($e2u,$ech,undef
,$e2u);         }       
 $ch++;       }     } wh
ile --$i;   } while --$p
ages;  die "\$min_el=$mi
n_el, \$max_el=$max_el -
 seems we read no lines"
    if $min_el > $max_el
;  die "$errors mapping 
conflicts\n" if ($errors
 && $opt{'S'});  $encodi
ng{$name} = [$e2u,$u2e,$
rep,$min_el,$max_el]; } 
 # my ($a,$s,$d,$t,$fb) 
= @_; sub enter {   my (
$current,$inbytes,$outby
tes,$next,$fallback) = @
_;   # state we shift to
 after this (multibyte) 
input character defaults
 to same   # as current 
state.   $next ||= $curr
ent;   # Making sure it 
is defined seems to be f
aster than {no warnings;
} in   # &process, or pa
ssing it in as 0 explici
ty.   # XXX $fallback ||
= 0;    # Start at the b
eginning and work forwar
ds through the string to
 zero.   # effectively w
e are removing 1 charact
er from the front each t
ime   # but we don't act
ually edit the string. [
this alone seems to be 1
4% speedup]   # Hence -$
pos is the length of the
 remaining string.   my 
$pos = -length $inbytes;
   while (1) {     my $b
yte = substr $inbytes, $
pos, 1;     #  RAW_NEXT 
=> 0,     #  RAW_IN_LEN 
=> 1,     #  RAW_OUT_BYT
ES => 2,     #  RAW_FALL
BACK => 3,     # to unic
ode an array would seem 
to be better, because th
e pages are dense.     #
 from unicode can be ver
y sparse, favouring a ha
sh.     # hash using the
 bytes (all length 1) as
 keys rather than ord va
lue,     # as it's easie
r to sort these in &proc
ess.      # It's faster 
to always add $fallback 
even if it's undef, rath
er than     # choosing b
etween 3 and 4 element a
rray. (hence why we set 
it defined     # above) 
    my $do_now = $curren
t->{Raw}{$byte} ||= [{},
-$pos,'',$fallback];    
 # When $pos was -1 we w
ere at the last input ch
aracter.     unless (++$
pos) {       $do_now->[R
AW_OUT_BYTES] = $outbyte
s;       $do_now->[RAW_N
EXT] = $next;       retu
rn;     }     # Tail rec
ursion. The intermdiate 
state may not have a nam
e yet.     $current = $d
o_now->[RAW_NEXT];   } }
  # This is purely for o
ptimistation. It's just 
&enter hard coded for $f
allback # of 0, using on
ly a 3 entry array ref t
o save memory for every 
entry. sub enter_fb0 {  
 my ($current,$inbytes,$
outbytes,$next) = @_;   
$next ||= $current;    m
y $pos = -length $inbyte
s;   while (1) {     my 
$byte = substr $inbytes,
 $pos, 1;     my $do_now
 = $current->{Raw}{$byte
} ||= [{},-$pos,''];    
 unless (++$pos) {      
 $do_now->[RAW_OUT_BYTES
] = $outbytes;       $do
_now->[RAW_NEXT] = $next
;       return;     }   
  $current = $do_now->[R
AW_NEXT];   } }  sub pro
cess {   my ($name,$a) =
 @_;   $name =~ s/\W+/_/
g;   $a->{Cname} = $name
;   my $raw = $a->{Raw};
   my ($l, $agg_max_in, 
$agg_next, $agg_in_len, 
$agg_out_len, $agg_fallb
ack);   my @ent;   $agg_
max_in = 0;   foreach my
 $key (sort keys %$raw) 
{     #  RAW_NEXT => 0, 
    #  RAW_IN_LEN => 1, 
    #  RAW_OUT_BYTES => 
2,     #  RAW_FALLBACK =
> 3,     my ($next, $in_
len, $out_bytes, $fallba
ck) = @{$raw->{$key}};  
   # Now we are converti
ng from raw to aggregate
, switch from 1 byte str
ings     # to numbers   
  my $b = ord $key;     
$fallback ||= 0;     if 
($l &&         # If this
 == fails, we're going t
o reset $agg_max_in belo
w anyway.         $b == 
++$agg_max_in &&        
 # References in numeric
 context give the pointe
r as an int.         $ag
g_next == $next &&      
   $agg_in_len == $in_le
n &&         $agg_out_le
n == length $out_bytes &
&         $agg_fallback 
== $fallback         # &
& length($l->[AGG_OUT_BY
TES]) < 16        ) {   
    #     my $i = ord($b
)-ord($l->[AGG_MIN_IN]);
       # we can aggregat
e this byte onto the end
.       $l->[AGG_MAX_IN]
 = $b;       $l->[AGG_OU
T_BYTES] .= $out_bytes; 
    } else {       # AGG
_MIN_IN => 0,       # AG
G_MAX_IN => 1,       # A
GG_OUT_BYTES => 2,      
 # AGG_NEXT => 3,       
# AGG_IN_LEN => 4,      
 # AGG_OUT_LEN => 5,    
   # AGG_FALLBACK => 6, 
      # Reset the last t
hing we saw, plus set 5 
lexicals to save some de
refs.       # (only gain
s .6% on euc-jp  -- is i
t worth it?)       push 
@ent, $l = [$b, $agg_max
_in = $b, $out_bytes, $a
gg_next = $next,        
                $agg_in_
len = $in_len, $agg_out_
len = length $out_bytes,
                        
$agg_fallback = $fallbac
k];     }     if (exists
 $next->{Cname}) {      
 $next->{'Forward'} = 1 
if $next != $a;     } el
se {       process(sprin
tf("%s_%02x",$name,$b),$
next);     }   }   # enc
engine.c rules say that 
last entry must be for 2
55   if ($agg_max_in < 2
55) {     push @ent, [1+
$agg_max_in, 255,undef,$
a,0,0];   }   $a->{'Entr
ies'} = \@ent; }   sub a
ddstrings {  my ($fh,$a)
 = @_;  my $name = $a->{
'Cname'};  # String tabl
es  foreach my $b (@{$a-
>{'Entries'}})   {    ne
xt unless $b->[AGG_OUT_L
EN];    $strings{$b->[AG
G_OUT_BYTES]} = undef;  
 }  if ($a->{'Forward'})
   {    my $var = $^O eq
 'MacOS' ? 'extern' : 's
tatic';    print $fh "$v
ar encpage_t $name\[",sc
alar(@{$a->{'Entries'}})
,"];\n";   }  $a->{'Done
Strings'} = 1;  foreach 
my $b (@{$a->{'Entries'}
})   {    my ($s,$e,$out
,$t,$end,$l) = @$b;    a
ddstrings($fh,$t) unless
 $t->{'DoneStrings'};   
} }  sub outbigstring { 
  my ($fh,$name) = @_;  
  $string_acc = '';    #
 Make the big string in 
the string accumulator. 
Longest first, on the ho
pe   # that this makes i
t more likely that we fi
nd the short strings lat
er on.   # Not sure if i
t helps sorting strings 
of the same length lexci
cally.   foreach my $s (
sort {length $b <=> leng
th $a || $a cmp $b} keys
 %strings) {     my $ind
ex = index $string_acc, 
$s;     if ($index >= 0)
 {       $saved += lengt
h($s);       $strings_in
_acc{$s} = $index;     }
 else {     OPTIMISER: {
  if ($opt{'O'}) {    my
 $sublength = length $s;
    while (--$sublength 
> 0) {      # progressiv
ely lop characters off t
he end, to see if the st
art of      # the new st
ring overlaps the end of
 the accumulator.      i
f (substr ($string_acc, 
-$sublength)  eq substr
 ($s, 0, $sublength)) { 
      $subsave += $subl
ength;        $strings_i
n_acc{$s} = length ($str
ing_acc) - $sublength; 
      # append the last 
bit on the end.        $
string_acc .= substr ($s
, $sublength);        la
st OPTIMISER;      }    
  # or if the end of the
 new string overlaps the
 start of the      # acc
umulator      next unles
s substr ($string_acc, 0
, $sublength)        eq 
substr ($s, -$sublength)
;      # well, the last 
$sublength characters of
 the accumulator match. 
    # so as we're prepe
nding to the accumulator
, need to shift all our 
    # existing offsets 
forwards      $_ += $sub
length foreach values %s
trings_in_acc;      $sub
save += $sublength;     
 $strings_in_acc{$s} = 0
;      # append the firs
t bit on the start.     
 $string_acc = substr ($
s, 0, -$sublength) . $st
ring_acc;      last OPTI
MISER;    }  }  # Optimi
ser (if it ran) found no
thing, so just going hav
e to tack the  # whole t
hing on the end.  $strin
gs_in_acc{$s} = length $
string_acc;  $string_acc
 .= $s;       };     }  
 }    $strings = length 
$string_acc;   my $defin
ition = "\nstatic const 
U8 $name\[$strings] = { 
" .     join(',',unpack 
"C*",$string_acc);   # W
e have a single long lin
e. Split it at convenien
t commas.   print $fh $1
, "\n" while $definition
 =~ /\G(.{74,77},)/gcs; 
  print $fh substr ($def
inition, pos $definition
), " };\n"; }  sub finds
tring {   my ($name,$s) 
= @_;   my $offset = $st
rings_in_acc{$s};   die 
"Can't find string " . j
oin (',',unpack "C*",$s)
 . " in accumulator"    
 unless defined $offset;
   "$name + $offset"; } 
 sub outtable {  my ($fh
,$a,$bigname) = @_;  my 
$name = $a->{'Cname'};  
$a->{'Done'} = 1;  forea
ch my $b (@{$a->{'Entrie
s'}})   {    my ($s,$e,$
out,$t,$end,$l) = @$b;  
  outtable($fh,$t,$bigna
me) unless $t->{'Done'};
   }  print $fh "\nstati
c encpage_t $name\[",sca
lar(@{$a->{'Entries'}}),
"] = {\n";  foreach my $
b (@{$a->{'Entries'}})  
 {    my ($sc,$ec,$out,$
t,$end,$l,$fb) = @$b;   
 # $end |= 0x80 if $fb; 
# what the heck was on y
our mind, Nick?  -- Dan 
   print  $fh "{";    if
 ($l)     {      printf 
$fh findstring($bigname,
$out);     }    else    
 {      print  $fh "0"; 
    }    print  $fh ",",
$t->{Cname};    printf $
fh ",0x%02x,0x%02x,$l,$e
nd},\n",$sc,$ec;   }  pr
int $fh "};\n"; }  sub o
utput_enc {  my ($fh,$na
me,$a) = @_;  die "Chang
ed - fix me for new stru
cture";  foreach my $b (
sort keys %$a)   {    my
 ($s,$e,$out,$t,$end,$l,
$fb) = @{$a->{$b}};   } 
}  sub decode_U {  my $s
 = shift; }  my @uname; 
sub char_names {  my $s 
= do "unicore/Name.pl"; 
 die "char_names: unicor
e/Name.pl: $!\n" unless 
defined $s;  pos($s) = 0
;  while ($s =~ /\G([0-9
a-f]+)\t([0-9a-f]*)\t(.*
?)\s*\n/igc)   {    my $
name = $3;    my $s = he
x($1);    last if $s >= 
0x10000;    my $e = leng
th($2) ? hex($2) : $s;  
  for (my $i = $s; $i <=
 $e; $i++)     {      $u
name[$i] = $name; #    p
rint sprintf("U%04X $nam
e\n",$i);     }   } }  s
ub output_ucm_page {   m
y ($cmap,$a,$t,$pre) = @
_;   # warn sprintf("Pag
e %x\n",$pre);   my $raw
 = $t->{Raw};   foreach 
my $key (sort keys %$raw
) {     #  RAW_NEXT => 0
,     #  RAW_IN_LEN => 1
,     #  RAW_OUT_BYTES =
> 2,     #  RAW_FALLBACK
 => 3,     my ($next, $i
n_len, $out_bytes, $fall
back) = @{$raw->{$key}};
     my $u = ord $key;  
   $fallback ||= 0;     
 if ($next != $a && $nex
t != $t) {       output_
ucm_page($cmap,$a,$next,
(($pre|($u &0x3F)) << 6)
&0xFFFF);     } elsif (l
ength $out_bytes) {     
  if ($pre) {         $u
 = $pre|($u &0x3f);     
  }       my $s = sprint
f "<U%04X> ",$u;       #
foreach my $c (split(//,
$out_bytes)) {       #  
$s .= sprintf "\\x%02X",
ord($c);       #}       
# 9.5% faster changing t
hat loop to this:       
$s .= sprintf +("\\x%02X
" x length $out_bytes), 
unpack "C*", $out_bytes;
       $s .= sprintf " |
%d # %s\n",($fallback ? 
1 : 0),$uname[$u];      
 push(@$cmap,$s);     } 
else {       warn join('
,',$u, @{$raw->{$key}},$
a,$t);     }   } }  sub 
output_ucm {  my ($fh,$n
ame,$h,$rep,$min_el,$max
_el) = @_;  print $fh "#
 $0 @orig_ARGV\n" unless
 $opt{'q'};  print $fh "
<code_set_name> \"$name\
"\n";  char_names();  if
 (defined $min_el)   {  
  print $fh "<mb_cur_min
> $min_el\n";   }  if (d
efined $max_el)   {    p
rint $fh "<mb_cur_max> $
max_el\n";   }  if (defi
ned $rep)   {    print $
fh "<subchar> ";    fore
ach my $c (split(//,$rep
))     {      printf $fh
 "\\x%02X",ord($c);     
}    print $fh "\n";   }
  my @cmap;  output_ucm_
page(\@cmap,$h,$h,0);  p
rint $fh "#\nCHARMAP\n";
  foreach my $line (sort
 { substr($a,8) cmp subs
tr($b,8) } @cmap)   {   
 print $fh $line;   }  p
rint $fh "END CHARMAP\n"
; }  use vars qw(     $_
Enc2xs     $_Version    
 $_Inc     $_E2X      $_
Name     $_TableFiles   
  $_Now );  sub find_e2x
{     eval { require Fil
e::Find; };     my (@inc
, %e2x_dir);     for my 
$inc (@INC){  push @inc,
 $inc unless $inc eq '.'
; #skip current dir     
}     File::Find::find( 
     sub {   my ($dev,
$ino,$mode,$nlink,$uid,$
gid,$rdev,$size,       
$atime,$mtime,$ctime,$bl
ksize,$blocks)       = 
lstat($_) or return;   
-f _ or return;   if (/
^.*\.e2x$/o){       no 
warnings 'once';       
$e2x_dir{$File::Find::di
r} ||= $mtime;   }   r
eturn;       }, @inc);  
   warn join("\n", keys 
%e2x_dir), "\n";     for
 my $d (sort {$e2x_dir{$
a} <=> $e2x_dir{$b}} key
s %e2x_dir){  $_E2X = $d
;  # warn "$_E2X => ", s
calar localtime($e2x_dir
{$d});  return $_E2X;   
  } }  sub make_makefile
_pl {     eval { require
 Encode; };     $@ and d
ie "You need to install 
Encode to use enc2xs -M\
nerror: $@\n";     # our
 used for variable expan
stion     $_Enc2xs = $0;
     $_Version = $VERSIO
N;     $_E2X = find_e2x(
);     $_Name = shift;  
   $_TableFiles = join("
,", map {qq('$_')} @_); 
    $_Now = scalar local
time();      eval { requ
ire File::Spec; };     _
print_expand(File::Spec-
>catfile($_E2X,"Makefile
_PL.e2x"),"Makefile.PL")
;     _print_expand(File
::Spec->catfile($_E2X,"_
PM.e2x"),        "$_Name
.pm");     _print_expand
(File::Spec->catfile($_E
2X,"_T.e2x"),         "t
/$_Name.t");     _print_
expand(File::Spec->catfi
le($_E2X,"README.e2x"), 
    "README");     _prin
t_expand(File::Spec->cat
file($_E2X,"Changes.e2x"
),    "Changes");     ex
it; }  use vars qw(     
 $_ModLines      $_Local
Ver      );  sub make_co
nfiglocal_pm {     eval 
{ require Encode; };    
 $@ and die "Unable to r
equire Encode: $@\n";   
  eval { require File::S
pec; };     # our used f
or variable expanstion  
   my %in_core = map {$_
=>1}('ascii','iso-8859-1
','utf8');     my %Local
Mod = ();     for my $d 
(@INC){  my $inc = File:
:Spec->catfile($d, "Enco
de");  -d $inc or next; 
opendir my $dh, $inc or
 die "$inc:$!";  warn "C
hecking $inc...\n";  for
 my $f (grep /\.pm$/o, r
eaddir($dh)){      -f Fi
le::Spec->catfile($inc, 
"$f") or next;      $INC
{"Encode/$f"} and next; 
    warn "require Encod
e/$f;\n";      eval { re
quire "Encode/$f"; };   
   $@ and die "Can't req
uire Encode/$f: $@\n"; 
    for my $enc (Encode-
>encodings()){  no warn
ings 'once';  $in_core{
$enc} and next;  $Encod
e::Config::ExtModule{$en
c} and next;  my $mod =
 "Encode/$f";   $mod =~
 s/\.pm$//o; $mod =~ s,/
,::,og;  $LocalMod{$enc
} ||= $mod;      }  }   
  }     $_ModLines = "";
     for my $enc (sort k
eys %LocalMod){  $_ModLi
nes .=       qq(\$Encode
::ExtModule{'$enc'} =\t"
$LocalMod{$enc}";\n);   
  }     warn $_ModLines;
     $_LocalVer = _mkver
sion();     $_E2X = find
_e2x();     $_Inc = $INC
{"Encode.pm"}; $_Inc =~ 
s/\.pm$//o;         _pri
nt_expand(File::Spec->ca
tfile($_E2X,"ConfigLocal
_PM.e2x"),        File:
:Spec->catfile($_Inc,"Co
nfigLocal.pm"),    1); 
    exit; }  sub _mkvers
ion{     my ($ss,$mm,$hh
,$dd,$mo,$yyyy) = localt
ime();     $yyyy += 1900
, $mo +=1;     return sp
rintf("v%04d.%04d.%04d",
 $yyyy, $mo*100+$dd, $hh
*100+$mm); }  sub _print
_expand{     eval { requ
ire File::Basename; };  
   $@ and die "File::Bas
ename needed.  Are you o
n miniperl?;\nerror: $@\
n";     File::Basename->
import();     my ($src, 
$dst, $clobber) = @_;   
  if (!$clobber and -e $
dst){  warn "$dst exists
. skipping\n";  return; 
    }     warn "Generati
ng $dst...\n";     open 
my $in, $src or die "$sr
c : $!";     if ((my $d 
= dirname($dst)) ne '.')
{  -d $d or mkdir $d, 07
55 or die  "mkdir $d : $
!";     }         open m
y $out, ">$dst" or die "
$!";     my $asis = 0;  
   while (<$in>){   if (
/^#### END_OF_HEADER/){ 
    $asis = 1; next;  }
    s/(\$_[A-Z][A-Za-z0
-9]+)_/$1/gee unless $as
is;  print $out $_;     
} } __END__  =head1 NAME
  enc2xs -- Perl Encode 
Module Generator  =head1
 SYNOPSIS    enc2xs -[op
tions]   enc2xs -M ModNa
me mapfiles...   enc2xs 
-C  =head1 DESCRIPTION  
F<enc2xs> builds a Perl 
extension for use by Enc
ode from either Unicode 
Character Mapping files 
(.ucm) or Tcl Encoding F
iles (.enc). Besides bei
ng used internally durin
g the build process of t
he Encode module, you ca
n use F<enc2xs> to add y
our own encoding to perl
. No knowledge of XS is 
necessary.  =head1 Quick
 Guide  If you want to k
now as little about Perl
 as possible but need to
 add a new encoding, jus
t read this chapter and 
forget the rest.  =over 
4  =item 0.  Have a .ucm
 file ready.  You can ge
t it from somewhere or y
ou can write your own fr
om scratch or you can gr
ab one from the Encode d
istribution and customiz
e it.  For the UCM forma
t, see the next Chapter.
  In the example below, 
I'll call my theoretical
 encoding myascii, defin
ed in I<my.ucm>.  C<$> i
s a shell prompt.    $ l
s -F   my.ucm  =item 1. 
 Issue a command as foll
ows;    $ enc2xs -M My m
y.ucm   generating Makef
ile.PL   generating My.p
m   generating README   
generating Changes  Now 
take a look at your curr
ent directory.  It shoul
d look like this.    $ l
s -F   Makefile.PL   My.
pm         my.ucm       
 t/  The following files
 were created.    Makefi
le.PL - MakeMaker script
   My.pm       - Encode 
submodule   t/My.t      
- test file  =over 4  =i
tem 1.1.  If you want *.
ucm installed together w
ith the modules, do as f
ollows;    $ mkdir Encod
e   $ mv *.ucm Encode   
$ enc2xs -M My Encode/*u
cm  =back  =item 2.  Edi
t the files generated.  
You don't have to if you
 have no time AND no int
ention to give it to som
eone else.  But it is a 
good idea to edit the po
d and to add more tests.
  =item 3.  Now issue a 
command all Perl Mongers
 love:    $ perl Makefil
e.PL   Writing Makefile 
for Encode::My  =item 4.
  Now all you have to do
 is make.    $ make   cp
 My.pm blib/lib/Encode/M
y.pm   /usr/local/bin/pe
rl /usr/local/bin/enc2xs
 -Q -O \     -o encode_t
.c -f encode_t.fnm   Rea
ding myascii (myascii)  
 Writing compiled form  
 128 bytes in string tab
les   384 bytes (75%) sa
ved spotting duplicates 
  1 bytes (0.775%) saved
 using substrings   ....
   chmod 644 blib/arch/a
uto/Encode/My/My.bs   $ 
 The time it takes varie
s depending on how fast 
your machine is and how 
large your encoding is. 
 Unless you are working 
on something big like eu
c-tw, it won't take too 
long.  =item 5.  You can
 "make install" already 
but you should test firs
t.    $ make test   PERL
_DL_NONLAZY=1 /usr/local
/bin/perl -Iblib/arch -I
blib/lib \     -e 'use T
est::Harness  qw(&runtes
ts $verbose); \     $ver
bose=0; runtests @ARGV;'
 t/*.t   t/My....ok   Al
l tests successful.   Fi
les=1, Tests=2,  0 wallc
lock secs    ( 0.09 cusr
 + 0.01 csys = 0.09 CPU)
  =item 6.  If you are c
ontent with the test res
ult, just "make install"
  =item 7.  If you want 
to add your encoding to 
Encode's demand-loading 
list (so you don't have 
to "use Encode::YourEnco
ding"), run    enc2xs -C
  to update Encode::Conf
igLocal, a module that c
ontrols local settings. 
After that, "use Encode;
" is enough to load your
 encodings on demand.  =
back  =head1 The Unicode
 Character Map  Encode u
ses the Unicode Characte
r Map (UCM) format for s
ource character mappings
.  This format is used b
y IBM's ICU package and 
was adopted by Nick Ing-
Simmons for use with the
 Encode module.  Since U
CM is more flexible than
 Tcl's Encoding Map and 
far more user-friendly, 
this is the recommended 
formet for Encode now.  
A UCM file looks like th
is.    #   # Comments   
#   <code_set_name> "US-
ascii" # Required   <cod
e_set_alias> "ascii"   #
 Optional   <mb_cur_min>
 1             # Require
d; usually 1   <mb_cur_m
ax> 1             # Max.
 # of bytes/char   <subc
har> \x3F             # 
Substitution char   #   
CHARMAP   <U0000> \x00 |
0 # <control>   <U0001> 
\x01 |0 # <control>   <U
0002> \x02 |0 # <control
>   ....   <U007C> \x7C 
|0 # VERTICAL LINE   <U0
07D> \x7D |0 # RIGHT CUR
LY BRACKET   <U007E> \x7
E |0 # TILDE   <U007F> \
x7F |0 # <control>   END
 CHARMAP  =over 4  =item
 *  Anything that follow
s C<#> is treated as a c
omment.  =item *  The he
ader section continues u
ntil a line containing t
he word CHARMAP. This se
ction has a form of I<E<
lt>keywordE<gt> value>, 
one pair per line.  Stri
ngs used as values must 
be quoted. Barewords are
 treated as numbers.  I<
\xXX> represents a byte.
  Most of the keywords a
re self-explanatory. I<s
ubchar> means substituti
on character, not subcha
racter.  When you decode
 a Unicode sequence to t
his encoding but no matc
hing character is found,
 the byte sequence defin
ed here will be used.  F
or most cases, the value
 here is \x3F; in ASCII,
 this is a question mark
.  =item *  CHARMAP star
ts the character map sec
tion.  Each line has a f
orm as follows:    <UXXX
X> \xXX.. |0 # comment  
   ^     ^      ^     | 
    |      +- Fallback f
lag     |     +-------- 
Encoded byte sequence   
  +-------------- Unicod
e Character ID in hex  T
he format is roughly the
 same as a header sectio
n except for the fallbac
k flag: | followed by 0.
.3.   The meaning of the
 possible values is as f
ollows:  =over 4  =item 
|0   Round trip safe.  A
 character decoded to Un
icode encodes back to th
e same byte sequence.  M
ost characters have this
 flag.  =item |1  Fallba
ck for unicode -> encodi
ng.  When seen, enc2xs a
dds this character for t
he encode map only.  =it
em |2   Skip sub-char ma
pping should there be no
 code point.  =item |3  
 Fallback for encoding -
> unicode.  When seen, e
nc2xs adds this characte
r for the decode map onl
y.  =back  =item *  And 
finally, END OF CHARMAP 
ends the section.  =back
  When you are manually 
creating a UCM file, you
 should copy ascii.ucm o
r an existing encoding w
hich is close to yours, 
rather than write your o
wn from scratch.  When y
ou do so, make sure you 
leave at least B<U0000> 
to B<U0020> as is, unles
s your environment is EB
CDIC.  B<CAVEAT>: not al
l features in UCM are im
plemented.  For example,
 icu:state is not used. 
 Because of that, you ne
ed to write a perl modul
e if you want to support
 algorithmical encodings
, notably the ISO-2022 s
eries.  Such modules inc
lude L<Encode::JP::2022_
JP>, L<Encode::KR::2022_
KR>, and L<Encode::TW::H
Z>.  =head2 Coping with 
duplicate mappings  When
 you create a map, you S
HOULD make your mappings
 round-trip safe. That i
s, C<encode('your-encodi
ng', decode('your-encodi
ng', $data)) eq $data> s
tands for all characters
 that are marked as C<|0
>.  Here is how to make 
sure:  =over 4  =item * 
  Sort your map in Unico
de order.  =item *  When
 you have a duplicate en
try, mark either one wit
h '|1' or '|3'.    =item
 *   And make sure the '
|1' or '|3' entry FOLLOW
S the '|0' entry.  =back
  Here is an example fro
m big5-eten.    <U2550> 
\xF9\xF9 |0   <U2550> \x
A2\xA4 |3  Internally En
coding -> Unicode and Un
icode -> Encoding Map lo
oks like this;    E to U
               U to E   
------------------------
--------------   \xF9\xF
9 => U2550    U2550 => \
xF9\xF9   \xA2\xA4 => U2
550   So it is round-tri
p safe for \xF9\xF9.  Bu
t if the line above is u
pside down, here is what
 happens.    E to U     
          U to E   -----
------------------------
---------   \xA2\xA4 => 
U2550    U2550 => \xF9\x
F9   (\xF9\xF9 => U2550 
is now overwritten!)  Th
e Encode package comes w
ith F<ucmlint>, a crude 
but sufficient utility t
o check the integrity of
 a UCM file.  Check unde
r the Encode/bin directo
ry for this.  When in do
ubt, you can use F<ucmso
rt>, yet another utility
 under Encode/bin direct
ory.  =head1 Bookmarks  
=over 4  =item *  ICU Ho
me Page  L<http://oss.so
ftware.ibm.com/icu/>  =i
tem *  ICU Character Map
ping Tables L<http://oss
.software.ibm.com/icu/ch
arset/>  =item *  ICU:Co
nversion Data L<http://o
ss.software.ibm.com/icu/
userguide/conversion-dat
a.html>  =back  =head1 S
EE ALSO  L<Encode>, L<pe
rlmod>, L<perlpod>  =cut
  # -Q to disable the du
plicate codepoint test #
 -S make mapping errors 
fatal # -q to remove com
ments written to output 
files # -O to enable the
 (brute force) substring
 optimiser # -o <output>
 to specify the output f
ile name (else it's the 
first arg) # -f <inlist>
 to give a file with a l
ist of input files (else
 use the args) # -n <nam
e> to name the encoding 
(else use the basename o
f the input file.  With 
%seen holding array refs
:        865.66 real    
    28.80 user         8
.79 sys       7904  maxi
mum resident set size   
    1356  average shared
 memory size      18566 
 average unshared data s
ize        229  average 
unshared stack size     
 46080  page reclaims   
   33373  page faults  W
ith %seen holding simple
 scalars:        342.16 
real        27.11 user  
       3.54 sys       83
88  maximum resident set
 size       1394  averag
e shared memory size    
  14969  average unshare
d data size        236  
average unshared stack s
ize      28159  page rec
laims       9839  page f
aults  Yes, 5 minutes is
 faster than 15. Above i
s for CP936 in CN. Only 
difference is how %seen 
is storing things its se
en. So it is pathalogica
lly bad on a 16M RAM mac
hine, but it's going to 
help even on modern mach
ines. Swapping is bad, m
'kay :-) 

HEXDUMP: [Full] [Preview]
Base64: [Encode]  [+chunk]  [+chunk+quotes]  [Decode] 


:: Command execute ::

Enter:
 
Select:
 

:: Shadow's tricks :D ::

Useful Commands
 
Warning. Kernel may be alerted using higher levels
Kernel Info:

:: Preddy's tricks :D ::

Php Safe-Mode Bypass (Read Files)

File:

eg: /etc/passwd
Php Safe-Mode Bypass (List Directories):

Dir:

eg: /etc/

:: Search ::
  - regexp 
:: Upload ::
 
[ Read-Only ]

:: Make Dir ::
 
[ Read-Only ]
:: Make File ::
 
[ Read-Only ]

:: Go Dir ::
 
:: Go File ::
 

--[ c999shell v. 1.0 pre-release build #16 Modded by Shadow & Preddy | RootShell Security Group | r57 c99 shell | Generation time: 0.1588 ]--