xupsd.jam

税控收款机软件。包括底层驱动和上层的应用一起。是一个完整的税控收款机软件方案

NOTE "CREATOR"       "PSDsoft Express 7.80";
NOTE "DEVICE"        "uPSD3254A";
NOTE "DATE"          "02/10/2005";
NOTE "STAPL_VERSION" "JESDOO-A";
NOTE "ALG_VERSION"   "1";
NOTE "STACK_DEPTH"   "2";
NOTE "TARGET"        "1";                       'Target #1
NOTE "MAX_FREQ"      "14000000";                '14 MHz
NOTE "VECTOR"        "ON";


'******************************************************************************
'*                                                                            *
'*  Blank Check Operation                                                     *
'*                                                                            *
'******************************************************************************
ACTION BLANKCHECK = ASSERT_RESET,
                    EnableISP,
                    DoBlankCheck,
                    DisableISP,
                    DEASSERT_RESET;


'******************************************************************************
'*                                                                            *
'*  Erase Operation                                                           *
'*                                                                            *
'******************************************************************************
ACTION ERASE = ASSERT_RESET,
               EnableISP,
               DoErase,
               DisableISP,
               DEASSERT_RESET;


'******************************************************************************
'*                                                                            *
'*  Program & Verify                                                          *
'*                                                                            *
'******************************************************************************
ACTION PROGRAM = ASSERT_RESET,
                 EnableISP,
                 DoProgramVerify,
                 DisableISP,
                 DEASSERT_RESET;


'******************************************************************************
'*                                                                            *
'*  Program Only                                                              *
'*                                                                            *
'******************************************************************************
ACTION PROGRAM_ONLY = ASSERT_RESET,
                      EnableISP,
                      DoProgram,
                      DisableISP,
                      DEASSERT_RESET;


'******************************************************************************
'*                                                                            *
'*  Verify Operation                                                          *
'*                                                                            *
'******************************************************************************
ACTION VERIFY  = ASSERT_RESET,
                 EnableISP,
                 DoVerify,
                 DisableISP,
                 DEASSERT_RESET;


'******************************************************************************
'*                                                                            *
'*  Global data used by all procedure                                         *
'*                                                                            *
'******************************************************************************
DATA Global_Var;

   BOOLEAN gStatus                  =  0;
   BOOLEAN gIDCODE[32]              =  $00000000;
   BOOLEAN gDoProgramVerify         =  1;
   BOOLEAN gTDI[40];
   BOOLEAN gTDO[40];
   BOOLEAN gMASK[40];
   BOOLEAN gSMASK[40];
   BOOLEAN gDoVerify;
   BOOLEAN gDoErase;
   BOOLEAN gDoUseVarMask;
   INTEGER gLocalIndex;
   INTEGER gLoopIndex0;
   INTEGER gLoopIndex1;
   INTEGER gTopLoop0;
   INTEGER gTopLoop1;
   INTEGER gSectorBase;

   INTEGER gStartBit;
   INTEGER gEndBit;
   INTEGER gPrevStartBit;
   INTEGER gPrevEndBit;
   INTEGER glStartBit;
   INTEGER glEndBit;
   INTEGER glPrevStartBit;
   INTEGER glPrevEndBit;
   INTEGER gBitSize;

   INTEGER gDeviceStartBit;
   INTEGER gDataSize;
   INTEGER gFlow                    =  0;
   INTEGER gErrorType               =  0;
   INTEGER gSuccess                 =  0;
   INTEGER gFailCheckChain          =  1;
   INTEGER gFailReadIDCODE          =  2;
   INTEGER gFailReadUSERCODE        =  3;
   INTEGER gFailReadUESCODE         =  4;
   INTEGER gFailEnterISP            =  5;
   INTEGER gInvalidDeviceID         =  6;
   INTEGER gDevVerNotSupported      =  7;
   INTEGER gFailErase               =  8;
   INTEGER gFailBlankCheck          =  9;
   INTEGER gFailProgram             =  10;
   INTEGER gFailVerify              =  11;
   INTEGER gFailRead                =  12;
   INTEGER gFailCalCheckSum         =  13;
   INTEGER gFailSetSecureBit        =  14;
   INTEGER gFailQuerySecureBit      =  15;
   INTEGER gFailExitISP             =  16;
   INTEGER gFailSysTest             =  17;
   INTEGER gProcedureStatus         =  0;
   INTEGER gFailure                 =  -1;
   INTEGER gFunctionalFailure       =  -2;

   BOOLEAN gISC_SPECIAL_NONE[2]              =  $0;
   BOOLEAN gISC_SPECIAL_ERASE[2]             =  $1;
   BOOLEAN gISC_SPECIAL_PGM[2]               =  $2;
   BOOLEAN gISC_SPECIAL_PGM_ERASE[2]         =  $3;
   BOOLEAN gISC_SPECIAL_MODE[2];

   BOOLEAN gDataOut[10000];
   BOOLEAN gMaskIn[10000];

   BOOLEAN gHasEEPROMBoot;
   BOOLEAN gEEPROMBootPart[32]               =  $28030047;
   BOOLEAN gHasModifiedErasePart;
   BOOLEAN gModifiedErasePart[32]            =  $08031047;
   BOOLEAN gIsSecuredPart;

   INTEGER gSectorIndex;
   INTEGER gnNumOfBits;
   INTEGER gnSectorIndex;

   BOOLEAN gDoMAIN;
   BOOLEAN gDoPLDACR;

   'Spec. calls for 800 ns
   INTEGER gISC_BLANK_CHECK_FLASHBOOT_TOUT = 1;