seltime_dc.jam

个人设计的基于VHDL的数字电子日历 在MAX+PLUSH软件平台上编译、仿真

' Copyright (C) 1988-2000 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: EPM7064S - k:\timevhd\seltime_dc.pof Thu Apr 14 14:32:02 2005

NOTE "CREATOR" "Altera Jam/STAPL Composer Version 10.0 10/5/2000";
NOTE "DATE" "2005/04/14";
NOTE "DEVICE" "EPM7064S";
NOTE "FILE" "seltime_dc.pof";
NOTE "TARGET" "1";
NOTE "IDCODE" "070640DD";
NOTE "UES" "FFFF";
NOTE "CHECKSUM" "000DDFE9";
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" "10";
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, PR_EXECUTE;
ACTION READ_UES = PR_INIT_READ_UES, PR_EXECUTE;
DATA DEVICE_DATA;
INTEGER V0 = 1;
INTEGER V1 = 0;
INTEGER A12[1] = 2;
INTEGER A59[1] = 0;
INTEGER A60[1] = 1;
INTEGER A61[1] = 117850333;
INTEGER A13[1] = 5;
INTEGER A25[1] = 10;
INTEGER A43[1] = 0;
BOOLEAN A21[45760] = @
OP100u@@Vr@@@@DW@@@V@tz@_@@@rz@tYvsxbDnvchqxTr@@@_lFzzNB_x@t@rt_
@VL3y@@pxlt@tzp@Facn22biZgarIHvV@xVV@d_@qY@_@@EJuY5QX1@@l__hb@ZI
2tx@l_@Fy500VW@7yt@V0e@@1Gw@NBU@t@zxV@lg7y@@ix@Vzpy_@7@@@V@_@@_N
@@Ko@zv@@@Fe9u@@@tz@@l@@@NVt_@_@l@zzMh9aWl700fkUQnBw@@@VF1@@@__@
@@T@_@FW6u@@lk7C8eCm@l@@c9HiOW@@wV@@@@_N@lYi7y@z@v@@@tz@@aTzs9Rx
SjQjtx3lAy@@Px@t@tzP@FO9g4nIICSoAbao@@6ZLu@@_VdDm@UzF@@@Vrw@@w_@
qukwz9blrVQbm@@@dT@@VR@@@_z@h5oetpoeqtFbud__@@VF1@@V@BG1_@@@z@l@
g_@@tMx@V8ZHAq0D@@@yx@@zl@l5tCWVjyVmJYt53_@x@z@@@6yCmt@@@6y1@30W
NJ3y@@lx@xzt@wtZM_V@ne4_@@ljlt@x@@hVWPGGP3lzx@yQRdz@lrow@@tV@@Vi
q0@_v@Zs4Cz@@x@xds@t@l@B@U@@Fz_@@OqzzeWCnxH8UXdt@@zGR2_l@@y_@@h@
@H004e140W0FWIfUVq@Tzsw7Zm8MQWt@_@GB3X79y@@ix@VzHy_@7jMx@WI21PRy
x@@Rl@@TgRW@Vm@Oa7_@@tz@@_A@@_tVhzVu63@@@__@@VvTx@wl@_tNR@VCt6bN
6CzO0jc@V@@xVHVR4lPWh@@N@V@@wN@@qY@@75iH8u3ZHI4pb0j_0muG3y_l@NC_
W@@FOV@@@_@z@z@@zxVl@FOq0jyVVV2Ri3QGSe15Y64MEJK0A156SiQW@@F7@Vll
gN@VYW8n@@fl@QnlWYAy@ztO@_@t@@@FC_@@GLCy@V@xV_@p@@@kV@@V7@@xc@@x
jl_@5l_GJg1k@@@tEDm@txVCI2JkUaxP0z@hbIH32Vd90YXebGS@@@FwQW@@lR@d
dxqllMy@_@FtmGem3_Ul@z@@@xVr@JBVx@8j4_@@_zt@@x@V@s@@@ltl@Vt@l_Xb
OG@x@n_j@l@@@OOy@w_@xjf@Vjq2NX@VxN@xtsU_@VdwC8K5ZOJ3y@@zxzQjEMA4
z@@@_@_@jt@@x@rzdw@rY@r@@RuAckDmt@@l_@@F@hVVQvx@3ey8iqZuBduVzltl
@tURG3YHaG0F6UvPGq23y@l@x@Zn8QH2HIaOAc1w@@@z@@V7IpZ889yYp0@h@VQv
@VxfWngn4qs@gxlM_Ece7_@@lz@@_J@@Q9QX41jE9weAbZa8aXAQvz@7MMnZE62z
j10u@V@@@7u@@@ZOcG@f7MFcW@s@V@@@@E6@@z@@V77IY@a9u_@@Nx@@l@@@3l@_
@1t_fSa4Xv8n@_@VikJSl@7I@_Q9rP5_@@Vz@txpzV@tlM@VOkDy@@FRVl@pt@tl
th@@eFUiWzXuaL4yeb0jF4FzX5RO4KLYJfC45mZ4gC0_@@FeGBnSaGm@@@2W2YHu
HK0KYwTLaXGYHiX@@z@GLv4a6ZCrX42oWupCux@rtVjyi@VlN@xzUUl@xvzU@ht@
@s_w@dMU@V@@x@1kJm@@@7r@h4k@txwzUljtxzwVltpxz_FltJTzKYpsx@@35yWM
U_le06i5m0@@zUq@lMy__@7FeYe0Iuz_lFFG2ktxzfVFjuvzVNltxTG13yVlt7Am
WiJaGz@AXx@@U6X4yUltdMmWV19iKm0xfVFQvvzY24IUWA25iHa16u@_whdMU@4X
1Ul@@vzUlhtx@sUg@dIUVVlt@z_UltZ2mWtt@@dxC4PGbG66a0BaOO6uzV@tt@@l
@ltR@z@l9xDmp@@_hA3I1OW@@J@e0e4om9n3aW@V@VtxzVU@t@z@VgxlISk203I1
uX83E9UWJ2ZmZMvC8PWGy@@x5hJ2p5_W@rlliTIG@@@@HW6G@_Qnx@@Uy0m49e19
DOGyW9u@_@tt@fVeF6KbN2_@_@zl_@fat@l_l4i@x@7ce1U_@@x0C1@t@@PEOW@_
@@czO8883yV@tx@@@N@t@TF06a7W1w@_@z@@@x_l@FP062P0ii4O81X4c8aXKZOm
@@z@bO6u@@@Bg792ZmZg1D85g4I1u1V@l__hbtztx@7e03PAPG8Y6u@x@l6H3YHW
XLBCmt@hl@AvzyAWv_G3IumWy5I8tW4qop@lg73k@@@3ymWArImx@@Vy06ult@FG
1CQvBXKeU8tW4MhyXyeCuTj7YM0ZV6I8VXJoSG2@@@@__l@Zqu1@V@@@WQGo56yk
G2XMOGo59u@_@Fg23yd_@fbd@BP0CIlXXyAqA223IQ8Xu1U87236ICX83Im@z@@z
46qnX1fFOG0Asar13fFWHEOIul@@Fo5CYDXXq7Umt@z@S16aYI2xFcG05Lal03Ha
810;

BOOLEAN A22[31680] = @
uz000u@@@stzTk@U@V@@@@mZTVz_x@x@@d5_@Rk@@@V@tl3y@@tz@tVxXx@dvg@l
@iNGu@___@@@z@ZRu@t@t@V@DcEeVc@_@__R14@@@w@@@t@mpWVD@V@@@@9GG46u
@t@V43Yv1@R_@_@@pzHxvw@@@t@@TXspv9@@@@_@YsbZv@713y@@@723i@@@x@_U
t_tzk@@@Vzp_@Uz@@z@@xo@@DFQCut@@dvl@l@@@VVG0Y_@@@v@_@Jpt@t@@@lxx
73c_@@_@@_z06@kH3iXv@x@@lt@V_VGPm@@@f@D@V@@zt1r3_@@@wi4i_@@x@@@s
V@R_iz0p@@V@zlYm@@@z@@@x@l@F6DGVd@Fp@@V@@@fs@@@z@@@x@yPm@c@l@@sQ
rTm__@@@z@@e0X@Vt@@@l@54@un0OHm@_@@@zzt6u_@Dt@@@d@V_Vzpv@_@@@z@@
Rxy@@t@@@lF@rqep0Vy@@_@@@zldVpy@@t@@lh@5Oimr0__w@_@@@rtRO5m6uVy@
r@@@l@t@FxO_@1d1Vc1y@@t3P6yld@x@@@ttV@RGp0@ttRzD3i@@@hz@@t@@lR4I
2c@@@fk4y@@@77D8u9X_D@V@@@@m@Vpbx_@x@@nF2QW@n@@Of1V93219u@@xFCMX
@FV@Ef1o@z@P_@@x@@La@@@Vmq0l@_@_@@@rt3@py@@t@@@xwq0@@F7_tyzz@tNx
@xB30@@l@@tR@hffU@@lzzttZNJVt@V@j@ld3@_@@_@@ly@7cpz@@Z@0WED@@V@@
@@I1X@z_@@x@@11wRPk@@@V@302s@@tz@tV3K2sFqoW@t@@Gh1kF@@3o6qRDm@l@
VOs0zzm@_V@@z@@zXztVFgoW@zu@eQ21PLwp6u@@@pP@@Uas0@@_@nW421Cu@V_@
hQGusWWS2_td@@u6u_@Dt@@@l@@xxEW1o@z@3o6e@@Dt@@@l@x@vsE3yw@@7aPWV
_R@8F3u@x@x@@@t@@uVid1k@@V3_C8wp0@@zz1V6u@VVlmoWuG36TI8ye2@@@tX7
OuZy@FGq0v@q@X064xPW@p@@OH3alv@x@@@kcp0@@zt_@@Nz@@@xh@ln@c@VCW1F
S64EcW@lV@8I62AIefC1cl@@XCg4RUYl@@Vdl@@_@@lZHCm@Vzl@vtyVG3m@@@x@
@@s@@@JKg11Q94b_mfL2156u_V_Fen0@y@x_@@@z@x@4qQWj@@@GL6y@@Vpt@@t@
@@k@@_@uL3yztcx@@@t@_r@4f1i@@z3QDm@@VNO931e64UiHqY1_@@@YHuf6E1_@
@@nNUu@@xNl@@l@@tV@l@xXJCu@@@ubr0@@jvXH6uVl@FKmWHG3y@@c6fLX@z@@P
J32fDm@@@Dp@@V@@l@n86u@x@Fys0@@nd_V@@z@@lwZ@Vt@@@l@T@3xP_@_@@@jr
@@tXPW@ttS_@@@_NL@RZI8YqWWI3Y8Jm@z@ViP5_@Z@ZDDO9t0@d@3Hx6u@R_dl@
@l@@@V@@zx1w64_Qmrb1XP9u@@@M@T@Vgk1nwFKWQW@_@@8i7y@x@x@@@AcAXWC9
y@_@7VXanS6ut@@F6X1_VFpz@@@x@z_F6H21yCm7_@l@@@F@@@7n@Cm@VyTq292d
OGGmD22bG0l4u@@@NJpW8XF4Um0@@@@_@Vl3KaGRF3YHmGuZ4kYbGia4YrPGe5UM
2QGS8Iy@V@7CAaG69KooW8IUu@x@FGc7ul@@z@@@x@@vN@@@M803Y1yG0C3u@@VE
Yq0l@v@X8JeVI21EPmV_@l@@@V@@xVnEDW@@jV44621PJYG3YNTIvE32pXX@@@yA
X6u@@UEYg1_py@dSoG803y@cw7KzXGL6SND1@xp@1XOmz@@VaL3ytt@7xqWbh6u@
yVEsw3n9D8G691F89UQ21K29A09PSD8KW7k@@@33QG053Y3QGC06Yy_GCdA2@QGe
s4YrQWs@@VV@z@n0a8A0AHpc9qNBH6s8613HaC86n6XgE9SeA3gD8446_tytz@tV
312oq@h@l@C308W00U@@lz5000ZVVt@V@D0003@I000CJ0GG4@7ps0@RE0000000
008300e2W1X0C00PG000D70m04ib200Qk@x@xDFAW100W@7TRW@r_8x@jUEQl@Z0
OGvd4yls6HFZqZHwPKyx7QCoW@@@7@@t@_@@_zVl@hV@@Vij1_@V@zl@@gh@@s@t
Vl@_rVV@t@wxllz@@@h_g_strVjxl@@H1IuV@@d@@@l_@@V@r@VbXJmt@zl@@_FV
@dV_l@@r@zzx_@@crtz@ai4y@trx_@wsz@Vl@v@VUVd@_t@@JkOW_@@V@V@@k@@@
r@@@@FEXPf6uh@xt@tzlxllVzzzVw_klAubmiz7u@tsxV@@tttTl@xxRzzTzw_@@
hldWx@@_6y6u@@_hti1w@@@rLV@xlx@d@@@lx@_@fv60;

ENDDATA;
DATA TEMP_DATA;
INTEGER A0[28] =
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[28] =
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[28] =
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[28] =
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[28] =
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[28] =
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[28] =
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[28] =
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[28] =
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 * 27] =
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[800];
BOOLEAN A27[5];
BOOLEAN A28[253];
BOOLEAN A45[253];
BOOLEAN A29[253];
BOOLEAN A30[253];
BOOLEAN A31[320];
BOOLEAN A57[320];
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 V18;
INTEGER V19;
INTEGER V20;
INTEGER V21;
INTEGER V88;
INTEGER V94;
INTEGER V22;
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_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;
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;
IF (V103) THEN V102 = 1;
IF (V106) THEN V107 = 1;
IF ((V102 || V100) && !V103 &&
(V108 || V107)) THEN V42 = 1;
IF (V42 != 0) THEN GOTO L16;
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;
V22 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 2) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L12;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L12:
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 L13;
V2 = A12[j];
FOR k = 0 TO (A1[V2] - 1);
IF ((k % 5) == i) THEN A27[l] = 1;
l = l + 1;
NEXT k;
GOTO L14;
L13:
l = l + 1;
L14:
NEXT j;
NEXT i;
V16 = 0;
FOR i = 0 TO V1;
j = 1;
IF (((A13[i] & 1) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L15;
V2 = A12[i];
j = A0[V2];
L15:
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 L16;
V2 = A12[i];
j = A0[V2];
L16:
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 L17;
V2 = A12[i];
j = A0[V2];
L17:
V17 = V17 + j;
NEXT i;
V18 = V17;
IF (V16 > V18) THEN V18 = V16;
IF (V87 > V18) THEN V18 = V87;
V19 = V18;
IF (V21 > V19) THEN V19 = V21;
IF (V88 > V19) THEN V19 = V88;
IF (V94 > V19) THEN V19 = V94;
FOR i = 0 TO (V19 - 1);
A30[i] = 1;
NEXT i;
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;
V33 = 0;
FOR i = 0 TO V1;
IF (((A13[i] & 2) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L18;
V2 = A12[i];
IF (V33 < A7[V2]) THEN
V33 = A7[V2];
L18:
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;