⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 sellmachine.jam

📁 用VHDL语言编写的自动售货机程序
💻 JAM
📖 第 1 页 / 共 3 页
字号:
🔍
123 
' Copyright (C) 1988-2002 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: EPM7128B - d:\dspexperiment\eda\sellmachine.pof Thu Dec 02 03:26:12 2004

NOTE "CREATOR" "Altera Jam/STAPL Composer Version 10.2 06/28/2002";
NOTE "DATE" "2004/12/02";
NOTE "DEVICE" "EPM7128B";
NOTE "FILE" "sellmachine.pof";
NOTE "TARGET" "1";
NOTE "IDCODE" "271280DD";
NOTE "USERCODE" "FFFFFFFF";
NOTE "CHECKSUM" "0019424F";
NOTE "SAVE_DATA" "DEVICE_DATA";
NOTE "SAVE_DATA_VARIABLES" "V0, A12, A13, A25, A43, A50";
NOTE "STAPL_VERSION" "JESD71";
NOTE "JAM_VERSION" "2.0";
NOTE "ALG_VERSION" "14";
ACTION PROGRAM = L0, DO_BLANK_CHECK OPTIONAL, DO_VERIFY RECOMMENDED, DO_SECURE OPTIONAL,
DO_READ_USERCODE OPTIONAL,
L15;
ACTION BLANKCHECK = L7, L15;
ACTION VERIFY = L8,
DO_READ_USERCODE OPTIONAL,
L15;
ACTION ERASE = L12, L15;
ACTION READ_USERCODE = L13, L15;
DATA DEVICE_DATA;
INTEGER V0 = 1;
INTEGER V1 = 0;
INTEGER A12[1] = 25;
INTEGER A59[1] = 288;
INTEGER A60[1] = 1;
INTEGER A61[1] = 655524061;
INTEGER A13[1] = 260;
INTEGER A25[1] = 10;
INTEGER A43[1] = 0;
BOOLEAN A50[67304] = @
T3200ugltNWwFl@NzUxh@w_@@@frVzx@@rYIhMAArQDjMArqQjMLfD6PlIRaD@@l
@@@N@@@@_@@VTltxvbVzd_@rlVl@V@r@t_txzyMlpx@@_tVlVjj_@V@hzVMzt_v@
UxfwU@twtxlzqlVbwfUUltJHzKlhtJhbrQjcMhrIQjMBe42biw@5RQrNr@@@l@@V
V@@@@_@@zyUltp_rVr@N@kz_@VN@@@UltxvzUtx@x@tx@thx@@Vls@DKVptzxjNv
xz@b@@@lN@@@pcW@rQDlMhrqQjM7c1y@h@qwl_x@@@@03u@@@t@xUFlpxD@wk__h
@VT@@zf@@kdtxzkSE@V@v@@_@xzyl@_Jx@MrhzvlzshUz_@o_@@@f@@lwN@@t@lM
lh@@@Nn0rQfMMhrQPjMhx@wlc_h@VjaW@txTzUlvM@r@Tz@xv@@lwiCmU@@lx@@@
po0zVh_s_zVTxLVR_Jz7@@@At@N@pg2jMhtswjMTht@x@@xM_@UZ@z@V@UltsxjV
Rs4y@@URltxrz@@d@@@VVlt@DR2sh_Uz@w@u@zqlPDmfLFbt@zKrQlMLe1dL2M@d
zT@x@vV_@tz@zlzEltcr0@lt@DR2d56ShwRsiQPlPWV@@tpY7_Mh@EB9Oz@@t@o@
VpYXpY4@D3y@@Uwz@tR6QmPPZcb1pmJyll@v_@@t@z@VpA1@r@FE@@@q@@@pxvSl
PXnCyXpI5upz@z@@@o@@y@iuX@@@bpo6qIjLLAbQPjMh5rQjMcD1@txk_@@@vx@x
F3bmUlnhx@@F@@_s_Mh@@t6WV@tpUrthxN@V@@l___rVpi9KAC8poWr@@Iz@lvy@
v_r@t@PltxrzshkM@@Q@lpz@R9u@@jt_@@VpI5_J@r@taWKBbgQjvB_qQZif@@Ty
@@3k@dtN@@Rcb4Uhtxz@V@x@w@kPPc@j7O@wlwUh@dU@xlh@@Vlrxz@R9uk@@V6w
1d_@@bXdylrY@@VVw@@hyr@@z@hrxg@@@im3@lpx@RF8txz_VxXChMEBmWl@xTpY
1_@@@zjMRxl@rsVh_h_zFlcbPEBUm@lpxoP2wz_zNEDmx@UZh_UV@gNxUVr@zlkh
pxzUdMtrj_UNhOM6KflNvlMVbl@@VpI5_f@lzltxvrUlt@@zl@@@Bhr@@No6m@Ts
xVp3qQbMMz@wTjwh7pomof1_@wtbt@@N6Y1VlzgBP3yg@xtVRW@wV@BP6aMhrE3j
1h@@Fz@@@yUjsZPDm@Vdd@@VVQ@tg_jRljrUrN6cWFzxTzUQrc_jVZPPWrQbcnez
AQZsyPMF4pAXx@l@Bv4izxlwsh_kP16zUltsxjVvd_vDsRW@zMBxzUlk@@xyz@@x
xz_@iW1ws@zMEvXMhLQAj_@g_Qzjwt@xF@@V3e1ZzCmh@FrbC6y@@trVZ1ltRjkw
xzzh@lFs3ZoG6mdM@b@@zj@nxVU_@@yt@VxlnWzwtN@xzMEktxz@V@x@@@qSk_Ro
G6i_z@7pA4@@l@_@@lzz@@tiG2lpxyZzImzj@lNx@Mwdzx_zshyz__6pg2QjMBAb
QfMEPWMRqV@@l@_@@@z@xxFsp0Vwlwd5CG@@@FltxynU9ulV@@Is6nigm@xVtaG3
y@UlZtvjVi73wTUlJ6_mP13UHQWl@N@NaRuN@tt@@@l@V@Tzsv@93Pmltrlt@pRx
zUjjMCe@s6Ub_hzV@lcCK2h@NQkE@EzplhxV@@Vit3_@zEVH_WRqVxAd6uL@ltjd
Q__q4a_@QLva1rQlN_hqUP@xvx@tTtVM@j@x@tNaLu@z_d@@@jz_@V@fzVMzts7x
nm@cAGhrAPr@htrwlQgL3y@Vtvc@tBP86_@_UT@@@xrUlb_R@cVlzAVk@kniufof
7_zx@fV@b_YC4@x@@_@rtVHIYDV@NtUqtslN@z@@lw@@rsQlthxrQFj@wzXPhm@@
Fl@@@F@@@zxJ9Hp_ltPXJi_@Pvv@@tx@tkz@z@AdaOzVlzuR2wN@rF_o0BrQjNaC
m@@rq@_llVV@Vl_@jktxzyshUJltwtlr_l@w@V@xzMMdrQz@R@wzjt_uB3l8Duux
3iMgrE__WVz@N@@_@yVJ@YPjnnt7uz_@sIc4@@s@_@@@K@@@Tyr0@wlkkh@VT@@@
X@@@@uh4_jV@isUr@YKb8r6Cfs0h_w@XPzmj7zfvZqVw@zh__1zaUjMJBjUHloh5
fMxLrQjKKgrQPfMgfbQztN@bYVv@@NaCOht_jby6_BrVhScZpjVvZl8Lvy1lzf@B
dCGTz@dxyUBhtQj_@lzdKRW@r_Dh_R@qVlzsdgYx@wVz@@z__@zyUlpFfE1Nz@@B
dUOVA97VPGT@Vec_FUwVTt_@txvzUhvN_rtVz@gxV@Fz@@@iUltR9VIc59_g@WUB
t_9rBbCq3yN@_q@hnxjtwtzhRjjMltlwUeofGE_Q3l_@L_Vlx3pgYAdCmHTElFrx
T@UgtsJzrz@@@Jf@wV5G3cKB1rwtJshrFvt@@VyL2krxzysl_J@@olOlASlsyPrV
xb@xjdwxzzytCmhlwhxzULrNzz_UrQB391qAbMM@@wTj_hk283SlrxBsR3hs@jVr
b0@@@t83XnlkhRP86i2u3__l@F_Q6@@V@_@@xYCqWoGmuuB6kNq0@@lyM_@@zlK_
9@@@@UnAyy@@x_@@tl@@lVhtRxzslyN_@ME13@Dgl5xfYr@lVVxzt_@@@r@x@Rkt
wT5GIME91@fNwBdO0vrIhk8PO623ut@_x@@@t@@VVoGF4po3ov@@Ths_j2u3SzN@
ZCK2rQjIMz@gTjwhxN@Vtx@xh@@t@ZlsG@@pRaXF4c56grQjiMhbUlO2s@@xydVy
l2e1_rFzjN@@s596_jVlfrUr7Pu9_V@@zxtVpx@tFbp4Cz@xT9Z7c@J@Jvq0fVlt
sJhVql@xLiN8qxjV7kS3Rjwlwt_zM1S6xvUlkt_rzw@Ns5P8xJPWzrUjNagOVA3O
@@@l2O2ktwzIvy1ltRi_@klztxVRl@@tVQldL@jzp22HjIfbr@lwlwOm@@FdtxzU
sl_BfSo0ltxU@Vt@rdQWNxlsXBJW_@@VNaFerIfaMhbQNaCedwkpX@xAPtVw7HRf
_q7yQjqVyb4_z@yT_@@h@@zt@xzkUlp_KE5IhrwkkkhLxw_@h0YHzf6us@tp@_QV
zfC8lwxjBoPEBm0@dt@rdoW@lz_k8bOuo7ishbcof1aQfKLh@VndM@jBoSyl_zFs
ZArdg2@_@@JSt0@VztmbIuN@LFOM9y@txu@@@dszjQ@D6aovCuzUx3cj2@pxz_@l
Nr_jwFSPHPMqoZeaSYx6kL_jd7s0@wx@p3hY@@VMtxzUUxNVpIs0_r@@D_cW@V_x
vXDmgts@ym6Ozz@FOsDi_@rAQzNl_K9ycr@Rl@VZr@@@ym9u@zxrz@@z9kCSMW1f
SQWxw_lKEPe_KCyhlwxl_lrz@zsym9uh@@t@VldN@@@p2_nwl_lg@VF@@@r_@srF
BmZlwIGx@U@lpFuhDQThL9ul__f@RlFBv4S@@dvl@@ttxzUMoCqiG81pYnNTXuN@
zt@l_l@rRTzUltqwjUzltQTMm6_@@N@T_1zxzUDBaWz_@F_hzVd5KXwl_xJSzm@@
jdtxzUsjUh@EdGp26u@xllaw4e@skdPnC_@NxfzUl5@T2w@@rnzUlhtx@tR@_V9r
9y8Q2PMqY@rxzIgJm@@NzYsRylH8pG8XzUxshoJm@@pzYsCu@trqTh_h_vTkCB4o
@ldwP18vUlNJR@wFz@hV@U@VUhl@jktx5@j1kVxlFBO3rVzVbX4Yshz_ulDmU@VF
hl@NktxzyUl@z@z@Pz@xrz@@FNpxMwlzpsvshyz_@o@_@lP1O6Xt0t@@NNbxno9C
uw@zlCaJkAt0@@zxzgRWx@V@UrPmj@@l@2@NGVy@E@vFm7000W@7q3W0W@zFVltx
@_Vltr@zVR@@lXvw_lclv@IuDm@@@kuU@UUxtzU_dnz_zzodnttDZthltxTzwzus
y6XjltBY7R@dsxVl6lsRBbGfYGI442f4GQa0G0000WG04080G882YWGG883XGW48
X02X853H2Ha8@@pct0@@FCC442XG8I29n81CAbWnea662XWeKAbaGOKA6ZnGfK61
Z2YG8GY1GXG4S7txvTSl7txukU7ZHnOC66ZnOuE6ZL1W1V0O0ZnvCS6Zpmv@@Rit
0@@dxmOC65dxuQSlZZxvSEldxTOC6dcpvSSEtpvzUl7dpziE6ZHpuUk6Znvv@Uxh
@xztUxtlxztRxzVl_txzrV@_N1W1B0KWz_@U_lz_w@_@@nt0@@@_UltkTdxxuskl
pxlthx@UVltxz__zth0mWF0Cmtx@kRl@xFzJO2W4A1GYa0Um@@tlxzVF@t@zv1Cp
t0Uu@x@s_lt@A1X0;

ENDDATA;
DATA TEMP_DATA;
INTEGER A0[32] =
95, 23, 23, 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[32] =
3144, 16, 16, 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[32] =
0, 0, 0, 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[32] =
0, 0, 0, 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[32] =
0, 0, 0, 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[32] =
3144, 18, 18, 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[32] =
32, 0, 0, 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[32] =
0, 16, 8, 4, 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[32] =
512, 0, 0, 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[19] =
294, 0, 0, 0, 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 * 31] =
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 2, 1, 0, 98,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (39 << 16) + 0, 233, 176,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (23 << 16) + 0, 237, 176,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (7 << 16) + 6, 113, 137,
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[5];
BOOLEAN A27[5];
BOOLEAN A28[96];
BOOLEAN A31[716];
BOOLEAN A57[716];
BOOLEAN A45[716];
BOOLEAN A29[716];
BOOLEAN A30[716];
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;
BOOLEAN USE_REV0_PROG_ALG = 0;
ENDDATA;
PROCEDURE L0 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_USERCODE USES TEMP_DATA;
V105 = 1;
ENDPROC;
PROCEDURE L7 USES TEMP_DATA;
V100 = 1;
ENDPROC;
PROCEDURE L8 USES TEMP_DATA;
V108 = 1;
ENDPROC;
PROCEDURE L12 USES TEMP_DATA;
V102 = 1;
ENDPROC;
PROCEDURE L13 USES TEMP_DATA;
V105 = 1;
ENDPROC;
PROCEDURE L15 USES DEVICE_DATA, TEMP_DATA, L22, L49,
L149,
L163, L109, L83, L129, L86,
L319,
L67, L60, L42;
CALL L22;
V3 = 0;
V4 = 256;
CALL L49;
IF (V2 == 0) THEN GOTO L18;
IF (V42 == 0) THEN CALL L163;
IF ((V42 == 0) && V102) THEN CALL L109;
IF ((V42 == 0) && V100) THEN CALL L149;
IF ((V42 == 0) && V103) THEN CALL L83;
IF ((V42 == 0) && V108) THEN CALL L129;
IF ((V42 == 0) && V107) THEN CALL L319;
IF ((V42 == 0) && (V103 || V100 || V108)) THEN CALL L86;
L18:
IF ((V42 == 0) && V104) THEN CALL L67;
CALL L42;
EXIT V42;
ENDPROC;
PROCEDURE L22 USES DEVICE_DATA, TEMP_DATA,
L53, L338, L55;
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 L41;
V21 = 0;
FOR i = 0 TO V1;
j = 1;
k = 1;
IF (((A13[i] & 1) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L23;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L23:
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 L24;
V2 = A12[j];
FOR k = 0 TO (A1[V2] - 1);
IF ((k % 5) == i) THEN A26[l] = 1;
l = l + 1;
NEXT k;
GOTO L25;
L24:
l = l + 1;
L25:
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 L26;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
IF ((V2 >= 23) && (V2 <= 27)) THEN
V96 = 95;
L26:
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 L27;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L27:
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 L28;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L28:
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 L29;
V2 = A12[i];
j = A1[V2];
k = A5[V2];
L29:
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 L30;
V2 = A12[j];
FOR k = 0 TO (A1[V2] - 1);
IF ((k % 5) == i) THEN A27[l] = 1;
l = l + 1;
NEXT k;
GOTO L31;
L30:
l = l + 1;
L31:
NEXT j;
NEXT i;
V16 = 0;
FOR i = 0 TO V1;
j = 1;
IF (((A13[i] & 1) == 0) ||
((A13[i] & 4) == 0)) THEN GOTO L32;
V2 = A12[i];
j = A0[V2];
L32:
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 L33;
V2 = A12[i];
j = A0[V2];
L33:
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 L34;
V2 = A12[i];
j = A0[V2];
L34:
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 L35;
V2 = A12[i];
j = A0[V2];
L35:
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;
123

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -