control.jam

1、 南北和东西方向各有一组绿、黄、红灯

' Copyright (C) 1988-2001 Altera Corporation
' Any megafunction design, and related net list (encrypted or decrypted),
' support information, device programming or simulation file, and any other
' associated documentation or information provided by Altera or a partner
' under Altera's Megafunction Partnership Program may be used only to
' program PLD devices (but not masked PLD devices) from Altera.  Any other
' use of such megafunction design, net list, support information, device
' programming or simulation file, or any other related documentation or
' information is prohibited for any other purpose, including, but not
' limited to modification, reverse engineering, de-compiling, or use with
' any other silicon devices, unless such use is explicitly licensed under
' a separate agreement with Altera or a megafunction partner.  Title to
' the intellectual property, including patents, copyrights, trademarks,
' trade secrets, or maskworks, embodied in any such megafunction design,
' net list, support information, device programming or simulation file, or
' any other related documentation or information provided by Altera or a
' megafunction partner, remains with Altera, the megafunction partner, or
' their respective licensors.  No other licenses, including any licenses
' needed under any third party's intellectual property, are provided herein.

'Device #1: EPM7128S - g:\traffic lights\control.pof Fri Dec 03 16:09:56 2004

NOTE "CREATOR" "Altera Jam/STAPL Composer Version 10.1 06/12/2001";
NOTE "DATE" "2004/12/04";
NOTE "DEVICE" "EPM7128S";
NOTE "FILE" "control.pof";
NOTE "TARGET" "1";
NOTE "IDCODE" "071280DD";
NOTE "UES" "FFFF";
NOTE "CHECKSUM" "001D0147";
NOTE "SAVE_DATA" "DEVICE_DATA";
NOTE "SAVE_DATA_VARIABLES" "V0, A12, A13, A21, A22, A25, A43";
NOTE "STAPL_VERSION" "JESD71";
NOTE "JAM_VERSION" "2.0";
NOTE "ALG_VERSION" "12";
ACTION PROGRAM = PR_INIT_PROGRAM, DO_BLANK_CHECK OPTIONAL, DO_VERIFY RECOMMENDED, DO_SECURE OPTIONAL,
DO_READ_UES OPTIONAL,
PR_EXECUTE;
ACTION BLANKCHECK = PR_INIT_BLANKCHECK, PR_EXECUTE;
ACTION VERIFY = PR_INIT_VERIFY,
DO_READ_UES OPTIONAL,
PR_EXECUTE;
ACTION ERASE = PR_INIT_ERASE, PR_EXECUTE;
ACTION READ_UES = PR_INIT_READ_UES, PR_EXECUTE;
DATA DEVICE_DATA;
INTEGER V0 = 1;
INTEGER V1 = 0;
INTEGER A12[1] = 4;
INTEGER A59[1] = 288;
INTEGER A60[1] = 1;
INTEGER A61[1] = 118653149;
INTEGER A13[1] = 5;
INTEGER A25[1] = 10;
INTEGER A43[1] = 0;
BOOLEAN A21[104320] = @
mB300u@@@@3q6aP8_1@@@_Uz@@z@@@xt@@@S2sx@@T_t@x@_Fd@w@d_h@V@@t@_@
_@3D7@@@@_z_@z@x@mtl@d_@rlw@w@GfY@@z@WQW@_z@IpW@@lV@l_@_@Vz3QHPP
2X2K1rCkV@N3AgyVh@Bz@xplRxd@@@VDz@@Xd4yL@r7yind@Vl@@@Fcb@ttH62PH
H@@wDWsY@@tPR@QlktxNSBdr4yGoh@_F@V@V__t@dw4y_@@x@@Hteq7V0r0xzt@_
t_@7tduzzVr@@@jV_ztXE36X_uz@@@xV@@d_@rlwTdV@z@_kx@@3ygus@@FqwXxl
_wWCaKVzV9z@wF4K5_l@h_@V@zs@Ugt@@FVKYWHOy@@VRxN@r@V@hVxzkYp4y@@t
6KyWwl_wGmYyl__5WAa@@@TZGVy_7zHHFy@7gMa_@@@mo7yt@t7Wkd@@@_0P6y@n
@7goWo@@@Ws9zz@@x@@@t@g@NWCI_lz@3fDGzd@VOEC_@V@3fhm@@BVmjb_@t@v@
V@x@@@E8OHTCCmz@@VeFgqNz@7OS6V@@l11DpVvNVWnzi@@@70r0@l@l_@@@z@lz
7Y4omcV6eb1@@@UXIbmVzNTWnYy@@w7Kb1vV@@1VXn@_@lV@lV@@_@P5P8uBC_@@
UDVhxvzUldtxykp@@V@94__@@@zp@@7er9@@@U_l@@vz@@xNz@BuBL_x@h3DFZwy
@VtvN__@tx7JRGOuVyx@lxz@@to_xj@__l0oKv@@jD8TK_@Fz3XtY@@@T@@@_Uz@
_3N3cr@@@0tBv@__t@x@j@@@Uxzl__h@wz@R@P@@jD0@Fg@@tzJlL7yr0w@t@1VR
9el1_@y@3hBKGQK58O2_@@@i@@@783as@rs3EC1@@LzX@9X@@@hW3dnl@@dl@@T_
lltc@@@34a7llVhX9AX@wx@07DW_lrlw@tT@zx@1CsY@@_N@@xz5GAX@@ND@rVrE
j@tyVwt74v9_VlrjwzURlzRtjU@VOY5v@zRDWHmyp@@@nd11oCJWWRe@@@FSIUy@
_@x@@Vp_@tN_O64uXGUxx@zka_pxxVEG6Uy@@wxb@@t@@@lV@7@WH4TrK3yV_kh@
x@r_ljZxyNV@rVzupU@y@tr7UAF_@U@j@@zxUwtt@w@d_h@Ufzt@wt_@3lQRtv@@
w@p@ztzzhVz@BuLUy@x@xVltt@@dlRjVR@tUjyVFz2PT9@l@@1lQW@_@F@@zzXso
Z@t@@WNBQ9t4yU@@x@zVFWMaw8CXmOjnh@tlxzUlZOI8arAy_z@7ahY_@@@2cx@m
Y5o@@xVOnCu_x@F0vCzxz@588vk@@z3fs0V@@V_@@xZ2u4t@__Uz@@z@l@pp@UlU
R3y@@@v@Vlt@@VkVd@@miDmx@zlll@@u1Enxv_g@t@TzUllsx@@dF91z_@@_xy@3
506@@tz__k@j@f@x@@@r@__ltxzUUltxB0KWUltRxTUlctxzeVFzZ_jUNFtxjv_V
@O4Wnx@@l@txT@@@@_xzVT@t@xyVdttxhVu19uzSFbtxzkUltpp1I8U06eUFrZwj
UNFtxjvUFVl_zUUl@xzvVl7AG2_@tx35mWm3cnxv_Qy06Olt@FK09e_VrhwlUFA0
32Auae0G9y0Iyl@pxzSFrtxzUC2O4oG2n3eYzFrRxzUlktp@ZCe8pz@_Ur@zzU@t
7G13_l@@z@Vtx@v@t@g@dwh_Rl@t@_@_t3UuaG6mBw3Lyg@@7Qn3XWiXx@y@uGAA
K0eY70cW2KfBT3YJFXWHa8446w@tWGGI8SZ4Y2WXm3uC6cPcynWG1WAe0G3KGHxV
wtXt@mYb64wZDk@@yzw@@v@_@tl@@k@@@R@z@@XWuHGGd4Ok4_@_@D@@@H@_wNzV
@l@k@@eFoH@@@Vfy6472L_Nz@Yv0Lld@f__l@r@zVwltxtzV@d@x@UV@txw@_lzt
zzR_l@ZwzLlg@wVzT@tXbOW@@@UV_t@w@_@z@@@x_l@tx@Vl@@xUzl@t_N@@KVrV
v@__FiajZN9v0PkL_l_Vm@9K9Q21aPZ__@@0oCm@z@lF@@@ztJm@@Vl@@@_mmC8O
aSY@9XWhDm@ttVCH8v@t@t@@@NuQ6ulwhFia@3BPZ0tCmfV@d@@@U@_t@_@_@NBn
0@t@@__@xz@_VxFzxJ@L@LO9gu@llt@v@gl@@Vz@@dnEbG0UCG@_wNrV@V8DsSHZ
1ROQGm394LH2nxnJe564I3L1KuKCC@7cJxUF@Nz@@@x@x@r@ltV2n6yAh1nhO0rx
h@OdC88I3y@@t7yV2H1mGaLFul@xt@V_d@@@UV@t@w@@lh0m0tt@___FzZ9o0@@@
T_V@Jz@V@x@@@DAW4y@V@x@@@s@ttlz@_Fw@N@g@h@zt@V7k6mnOPG8N9e@@@CQt
4Yep0@VV@s@@@2Fm0@T@tXX1J8394hJ5_@@xY2bdGkCm@x@TWMKfwl@FUg@3vw@m
IeAwD32B9XWND8sa4IMt0@F@@nSmGO9a4f6316PGi9940r3k@@@1;

BOOLEAN A22[65920] = @
m0200u@@@@3q6aPm@@@l@@_x_4y@x@x@@vobM@VOCi_l@x@@@drtz@e9u@@dds@z
VmOuz@@t@@@Eh_@@1oWx@@@GnW@ltwGnmLPmV@@k@@@tGzW@ttwWwXzj_kmlHG9X
@j_@mJbG1gQc1@@l@1rF_@VVtO6y@@VxzV@t@x@VmB1@RNVX76y@@_ltOm@h@fVz
@@W73__l@BAFOl@@FCoWVz@@053_@7@pcCOzV@BGD3Z@@@0w9yVe@ljCu@z@9W_W
r@@@Wt6_71A2jFuj@@d@o@@N63@@___@@@9jry6gPm@I@@lE1hwx@_@Vj3o9uV@t
t@@Flt@@l0E6U@z@z@q@po@@VedW@@VQ@@dtXx4Kx@@Rw@jcT@@VXd1@Vz@3v42j
Luh@@lyNX@Nxt0F9y@@tzEzGWt3_tAxVgm84y1@@@p_@@@7xO8av1ll@@XRRu@@L
dj@@Vm83_Vl@z@_@xEh@VmqWAh42KOm@@Rrm83_V@@VqIm@fsHW79w@@@31pn@@B
Fn@@@0qDy@qI7goW@@Vwme42LDmqQRTOv6_@t@VPD8iSonI3y@@V78pW@_@@0P6o
lOm@@lkV@@lGLmyz@_7_wKF661oOSgcGOk1_@Vh2knuUoWst42UcCqd4_@r_2pnZ
@@V@bR94m3fVC94wJeXHF44ienZ94E4I@V@@k@t@3HsYV@z@0A_5samni9u@@@tv
@@VeqS2CU2@j_@0lFKsD18Gn@_@V@PzL@@7RZylCuz@Vtk@@VmtDyh@@5yb1@@lF
xUV8CA3_@@pz@F_7eb1O0mF1GVmV_@VWMFy@fv5ozd1QC4yj2M@z@XcFfKf4u@l@
3DpW@xqvmmCu@@zbV@@VGwDyllVbl_1f@@@XhPmU@@V0P6kY_Wr@z@05IiWyX@Y9
4Q6Z@l94ukY5fI4a69@@@tvjP8SzL_V@@3hxXz@twmwCu@@l@Pz3_@@x2mpW__tQ
z_@@bvJm@U@P0UFCls@FW73@@_@_@@lTib_@Q@Xoz9OzV@t@VVTmN6AW@G9y726H
LGQj4Ao3Xw5I09F4g7ObezW@@_V@x@@3ubW@@@T@@t@X@zmvUCu@b@Dum7wAa1@@
@@_@@j5@@@7c83wr@@34KbW@Cuvl7szAXEPCm@t@FfV@@06tmz@RT8S9Sxd1VnbG
m4F4we1_@VgVJxXWvIm@htZ@@@V@RrLr55IOUC4cu6MVr@3Jib_SC8SoMytz@d4v
3@JcGeZLyD9312MHWAC4aXGPO_mELCu@@@tx@xFx_@@mNs8Op7u@G_cx33_V@ViL
s@7i93Mld@3EqZ0UyGx@@VOdFm@@@F4J6Afy1h@h@1CsLGAFu@@@t@@tdp@btWIP
WqAQvdfCuV@@Deq7Slrs5_Y71b_WxjctW_U8um72o0ZGHjiia7yFV@6yA3_@@_2F
r3@@zr1loW@@VQuy@@1ocW@@E_WNVm@_@ROiCu@@bca@@VWgU4y03XiEJmhE54a4
XnwX@dN@WqufZL62eL8_2k@_x@@7OCXmr6s@@VVmS@7MS8XcvX@@t@0aVp@@vV83
jtXR21vcGOngO9V_pyo@Nml90NG_r@vPVul9ugxN700000I1WmkJm@_u7fbyFU30
000000000W3gyXVJBTGm9uA40WF_DDfjogW0Ce103o081000gW00000008500OG0
30W10N50300WNHol@hlxjc@00Gn064A061XdW@znl2YPeaO9g6l2@@@ry@V@z@@N
v@@zt@IBTOlCSqz9VPLHG0W4ma4k_@@@4d1@tN@ywl@3u_1VVN@fVnW_x@@ckz8N
T9y@@KfAgg2LLHbg_@ArVjTw_gk2FGbg0K9vSIq@@VV@E3wt@kr@@tx_@lF4_4yl
@V5883_@@@zlV@VUs3X7eYhkwEtLVt_ghk2dt0@@Ttws@@z@@TN_U2_@@_zzV@NM
83Vy9HxOIqd0O_@V_TF@tZ@xvtz_Vl@ldVt@@@kghhqrLTvg_kpVNrdlxwlGjnuL
@7q@@zfxl@d@zzNGt9uwx@t@@@l@xx@kfPmt_@@Vbd4UGNu@U@Tl@@Z@x@tzz@Vu
16ugk_tVtrbh_@U@@@@0;

ENDDATA;
DATA TEMP_DATA;
INTEGER A0[29] =
23, 96, 96, 96, 96, 96, 95, 95, 95, 95, 95, 95, 95, 95, 95, 95, 15, 791, 791, 791, 791, 317, 293, 281, 273, 261, 253, 237, 791;
INTEGER A1[29] =
16,3144, 1574, 716, 360, 183, 1574, 716, 360, 183,3144, 0,1574, 716, 360, 183, 64, 280, 240, 200, 160, 640, 480, 400, 320, 240, 160, 80,3144;
INTEGER A2[29] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 165, 165, 165, 165, 0, 0, 0, 0, 0, 0, 0, 165;
INTEGER A3[29] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 112, 96, 80, 64, 0, 0, 0, 0, 0, 0, 0, 112;
INTEGER A4[29] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 648, 600, 552, 504, 0, 0, 0, 0, 0, 0, 0, 648;
INTEGER A5[29] =
18,3144, 1574, 716, 360, 183, 1574, 716, 360, 183,3144, 0,1574, 716, 360, 183, 64, 56, 48, 40, 32, 128, 96, 80, 64, 48, 32, 16,3144;
INTEGER A6[29] =
0, 32, 16, 8, 4, 2, 16, 8, 4, 2, 32, 24, 16, 8, 4, 2, 0, 0, 0, 0, 0, 16, 12, 10, 8, 6, 4, 2, 32;
INTEGER A7[29] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 6, 5, 4, 0, 0, 0, 0, 0, 0, 0, 7;
INTEGER A8[29] =
0, 512, 256, 128, 64, 32, 256, 128, 64, 32, 512, 384, 256, 128, 64, 32, 0, 560, 480, 400, 320, 256, 192, 160, 128, 96, 64, 32, 560;
INTEGER A9[21] =
12, 3, 131, 8, 3, 131, 0, 0, 0, 6, 3, 131, 0, 0, 0, 3, 1, 118, 1, 3, 126;
INTEGER A10[14] =
12, 3, 8, 3, 8, 3, 6, 3, 0, 0, 3, 1, 1, 1;
INTEGER A51[15] =
294, 148, 38, 20, 2, 148, 38, 20, 2, 294, 0, 148, 38, 20, 2;
INTEGER A49[14] =
12, 114, 8, 114, 8, 114, 6, 114, 0, 0, 3, 109, 1, 109;
INTEGER A11[5 * 3 * 28] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0,1025, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0,1025, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0,1025, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0,1025, 0, 0,
0, 0, 0, 0, 0, 0,1025, 4, 0, 1, 1, 0,1025, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 99, 1, 0, 99,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 99, 1, 0, 99,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 99, 1, 0, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 99, 1, 0, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 99,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 99,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 97, 0, 1, 94,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 95,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 95,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 97, 0, 1, 94,
0, 0, 0, 1, 0, 98, 2, 1, 96, 1, 0, 97, 0, 2, 96,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 97, 0, 0, 96,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 98,
129, 10, 98, 1, 0, 98, 2, 1, 96, 1, 0, 97, 0, 0, 96,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 1, 97, 1, 0, 97, 0, 2, 96, 0, 1, 96,
0, 0, 0, 0, 0, 0, 1, 31, 97, 4, 31, 98, 1, 0, 98;
INTEGER A14[64] =
8600,6400,4800,3600,2800,2000,1540,1140, 860, 640, 480, 360, 280, 200, 154, 116,
86, 64, 50, 36, 28, 24, 20, 16, 14, 12, 11, 9, 7, 5, 4, 3,
2000,1600,1300,1000, 900, 800, 720, 660, 600, 560, 520, 480, 440, 400, 380, 360,
340, 300, 280, 260, 240, 220, 200, 180, 160, 140, 120, 100, 80, 60, 40, 20;
INTEGER A15[16] =
60000,28000,10800,4200,1660, 660, 260, 100, 500, 200, 100, 60, 40, 30, 20, 10;
INTEGER A54[30] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 31, 16, 0, 0, 0, 32, 0, 32, 255, 65, 255, 82, 255, 69, 255, 84, 255, 76, 255, 65;
INTEGER A55[30] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 31, 16, 0, 32, 0, 32, 255, 65, 255, 82, 255, 69, 255, 84, 255, 76, 255, 65;
INTEGER A56[8] =
255, 1, 255, 56, 255, 57, 255, 65;
' VARIABLES
INTEGER A17[1];
INTEGER A48[1];
INTEGER A52[1];
BOOLEAN A32[60];
BOOLEAN A33[10];
BOOLEAN A39[10];
BOOLEAN A26[1600];
BOOLEAN A27[5];
BOOLEAN A28[273];
BOOLEAN A31[640];
BOOLEAN A57[640];
BOOLEAN A45[640];
BOOLEAN A29[640];
BOOLEAN A30[640];
BOOLEAN A34[50];
BOOLEAN A35[50];
BOOLEAN A36[50];
BOOLEAN A37[50];
BOOLEAN A38[70];
INTEGER V2 = 0;
INTEGER V3 = 0;
INTEGER V4 = 32;
BOOLEAN b;
INTEGER i;
INTEGER j;
INTEGER k;
INTEGER l;
INTEGER V10;
INTEGER V11;
INTEGER V12;
INTEGER V13;
BOOLEAN A18[21];
BOOLEAN A19[20];
BOOLEAN A20[10];
INTEGER V14;
INTEGER V15;
INTEGER V89;
INTEGER V16;
INTEGER V87;
INTEGER V17;
INTEGER V181;
INTEGER V18;
INTEGER V19;
INTEGER V20;
INTEGER V21;
INTEGER V88;
INTEGER V94;
INTEGER V22;
INTEGER V179;
INTEGER V23;
INTEGER V24;
INTEGER V25;
INTEGER V26;
INTEGER V27;
INTEGER V28;
INTEGER V29 = 1;
INTEGER A16[15];
INTEGER V30;
INTEGER V31;
INTEGER V32 = 0;
INTEGER V33 = 0;
INTEGER V34 = 1;
INTEGER V35 = 0;
INTEGER V36 = 0;
INTEGER V37 = 0;
INTEGER V38 = 0;
INTEGER V72 = 0;
INTEGER V73 = 0;
BOOLEAN V39 = 0;
BOOLEAN V40 = 0;
INTEGER V41 = 0;
INTEGER V42 = 0;
BOOLEAN V43 = 0;
BOOLEAN V44 = 0;
BOOLEAN V45 = 0;
INTEGER V46;
INTEGER V47;
INTEGER V48;
BOOLEAN V49 = 0;
INTEGER V51 = -1;
INTEGER V52 = -1;
BOOLEAN V74 = 0;
BOOLEAN V75 = 0;
BOOLEAN V56 = 0;
BOOLEAN V57 = 0;
BOOLEAN V58 = 1;
BOOLEAN A40[10];
BOOLEAN A41[10];
BOOLEAN A44[10];
BOOLEAN V76 = 0;
BOOLEAN V80 = 1;
BOOLEAN V81 = 0;
BOOLEAN V82 = 0;
INTEGER V83 = 5;
INTEGER V84 = 0;
INTEGER V86 = 0;
BOOLEAN V91 = 0;
INTEGER V68 = 0;
INTEGER V69 = 0;
INTEGER V96 = 94;
BOOLEAN V97 = 1;
BOOLEAN V102 = 0;
BOOLEAN V100 = 0;
BOOLEAN V103 = 0;
BOOLEAN V108 = 0;
BOOLEAN V104 = 0;
BOOLEAN V105 = 0;
BOOLEAN V107 = 0;
BOOLEAN V106 = 0;
BOOLEAN V101 = 0;
BOOLEAN USE_EXTEND_IR_DELAY_METHOD = 0;
BOOLEAN USE_FIXED_ALGORITHM = 0;
ENDDATA;
PROCEDURE PR_INIT_PROGRAM USES TEMP_DATA;
V102 = 1;
V103 = 1;
ENDPROC;
PROCEDURE DO_BLANK_CHECK USES TEMP_DATA;
V100 = 1;
ENDPROC;
PROCEDURE DO_VERIFY USES TEMP_DATA;
V108 = 1;
ENDPROC;
PROCEDURE DO_SECURE USES TEMP_DATA;
V107 = 1;
V106 = 1;
ENDPROC;
PROCEDURE DO_READ_UES USES TEMP_DATA;
V104 = 1;
ENDPROC;
PROCEDURE PR_INIT_BLANKCHECK USES TEMP_DATA;
V100 = 1;
ENDPROC;
PROCEDURE PR_INIT_VERIFY USES TEMP_DATA;
V108 = 1;
ENDPROC;
PROCEDURE PR_INIT_READ_UES USES TEMP_DATA;
V104 = 1;
ENDPROC;
PROCEDURE PR_INIT_ERASE USES TEMP_DATA;
V102 = 1;
ENDPROC;
PROCEDURE PR_EXECUTE USES DEVICE_DATA, TEMP_DATA, L6, L26,
L96,
L97, L75, L55, L82,
L257,
L41, L35, L21;
CALL L6;
V3 = 0;
V4 = 1;
CALL L26;
IF (V2 == 0) THEN GOTO L2;
IF (V42 == 0) THEN CALL L97;
IF ((V42 == 0) && V102) THEN CALL L75;
IF ((V42 == 0) && V100) THEN CALL L96;
IF ((V42 == 0) && V103) THEN CALL L55;
IF ((V42 == 0) && V108) THEN CALL L82;
IF ((V42 == 0) && V107) THEN CALL L257;
IF ((V42 == 0) && V104) THEN CALL L41;
L2:
IF ((V42 == 0) && V104) THEN CALL L41;
CALL L21;
EXIT V42;
ENDPROC;
PROCEDURE L6 USES DEVICE_DATA, TEMP_DATA, L30, L276, L32;
INTEGER V66 = 0;
INTEGER V90 = 0;
INTEGER V95 = 0;
INTEGER V67 = 0;
INTEGER V180 = 0;
IF (V103) THEN V102 = 1;
IF (V106) THEN V107 = 1;
IF ((V102 || V100) && !V103 &&
(V108 || V107)) THEN V42 = 1;
IF (V42 != 0) THEN GOTO L463;
V21 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 1) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L7;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L7:
V21 = V21 + j;
V66 = V66 + k;
NEXT i;
l = 0;
FOR i = 4 TO 0 STEP -1;
FOR j = 0 TO V1;
IF (((A13[j] & 1) == 0) ||
((A13[j] & 4) == 0)) THEN GOTO L8;
V2 = A12[j];
FOR k = 0 TO (A1[V2] - 1);
IF ((k % 5) == i) THEN A26[l] = 1;
l = l + 1;
NEXT k;
GOTO L9;
L8:
l = l + 1;
L9:
NEXT j;
NEXT i;
V88 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 256) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L10;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
IF ((V2 >= 23) && (V2 <= 27)) THEN
V96 = 95;
L10:
V88 = V88 + j;
V90 = V90 + k;
NEXT i;
V94 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 512) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L11;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L11:
V94 = V94 + j;
V95 = V95 + k;
NEXT i;
V179 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 2048) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L12;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L12:
V179 = V179 + j;
V180 = V180 + k;
NEXT i;
V22 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 2) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L13;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L13:
V22 = V22 + j;
V67 = V67 + k;
NEXT i;
l = 0;
FOR i = 4 TO 0 STEP -1;
FOR j = 0 TO V1;
IF (((A13[j] & 2) == 0) ||
((A13[j] & 4) == 0)) THEN GOTO L14;
V2 = A12[j];
FOR k = 0 TO (A1[V2] - 1);
IF ((k % 5) == i) THEN A27[l] = 1;
l = l + 1;
NEXT k;
GOTO L15;
L14:
l = l + 1;
L15:
NEXT j;
NEXT i;
V16 = 0;
FOR i = 0 TO V1;
j = 1;
IF (((A13[i] & 1) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L16;
V2 = A12[i];
j = A0[V2];
L16:
V16 = V16 + j;
NEXT i;
V87 = 0;
FOR i = 0 TO V1;
j = 1;
IF (((A13[i] & 256) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L17;
V2 = A12[i];
j = A0[V2];
L17:
V87 = V87 + j;
NEXT i;
V17 = 0;
FOR i = 0 TO V1;
j = 1;
IF (((A13[i] & 2) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L18;
V2 = A12[i];
j = A0[V2];
L18:
V17 = V17 + j;
NEXT i;
V181 = 0;
FOR i = 0 TO V1;
j = 1;
IF (((A13[i] & 2048) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L19;
V2 = A12[i];
j = A0[V2];
L19:
V181 = V181 + j;
NEXT i;
V18 = V17;
IF (V16 > V18) THEN V18 = V16;
IF (V87 > V18) THEN V18 = V87;
IF (V181 > V18) THEN V18 = V181;
V20 = 32 + V1;
IF ((2 * 5 * 5 * V67) > V20) THEN V20 = 2 * 5 * 5 * V67;
IF ((2 * 5 * V66) > V20) THEN V20 = 2 * 5 * V66;
IF (V90 > V20) THEN V20 = V90;
IF (V95 > V20) THEN V20 = V95;
IF (V180 > V20) THEN V20 = V180;
V19 = V18;
IF (V21 > V19) THEN V19 = V21;
IF (V88 > V19) THEN V19 = V88;
IF (V94 > V19) THEN V19 = V94;
IF (V179 > V19) THEN V19 = V179;
IF (V20 > V19) THEN V19 = V20;
FOR i = 0 TO (V19 - 1);
A30[i] = 1;
NEXT i;
V33 = 0;
FOR i = 0 TO V1;
IF (((A13[i] & 2) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L20;
V2 = A12[i];
IF (V33 < A7[V2]) THEN
V33 = A7[V2];
L20:
NEXT i;
V12 = 0;
V13 = 0;
FOR i = 0 TO V1;
V12 = V12 + A25[i];
IF (A25[i] > V13) THEN V13 = A25[i];
NEXT i;
FOR i = 0 TO (V13 - 1);
A39[i] = 1;
NEXT i;
FOR i = 0 TO 4;
j = 10 * i;
A34[(j + 9)..j] = $016;
A35[(j + 9)..j] = $01A;
A36[(j + 9)..j] = $022;
A37[(j + 9)..j] = $026;
FOR k = 0 TO 2;
b = 0;
IF ((i & (1 << k)) != 0) THEN b = 1;
A34[j + k + 7] = b;
A35[j + k + 7] = b;
A36[j + k + 7] = b;
A37[j + k + 7] = b;
NEXT k;
NEXT i;
FOR i = 0 TO 6;
j = 10 * i;
A38[(j + 9)..j] = $02A;
FOR k = 0 TO 2;
b = 0;
IF ((i & (1 << k)) != 0) THEN b = 1;
A38[j + k + 7] = b;
NEXT k;
NEXT i;
FOR i = 0 TO V1;
A52[i] = 0;
IF (((A13[i] & 256) == 0) ||