BillsEditor/Encrypt/ScEncryptEditions.pas

unit ScEncryptEditions;

interface

function CheckEncryptEdition(AEdition: Integer): Boolean;

const
  eidLimitedFixBills = 52;
  eidFixBills = 53;
  eidStandard = 178;
  
implementation

uses
  ScEncryptUnit, SysUtils;

function CheckEncryptEdition(AEdition: Integer): Boolean;
var
  setEditions: set of Byte;
begin
  setEditions := {$IFDEF _ScPersonal}
                   [164];                          // 몸훙경
                 {$ENDIF}
                 {$IFDEF _ScBillsForArch}
                   {$IFDEF _ScBills}
                   [178, 161, 162];                // 쉔蓼경 ，淚撚경, 徠尻깃경
                   {$ELSE}
                   [178, 161];                     // 쉔蓼경 , 淚撚경
                   {$ENDIF}
                 {$ELSE}
                   {$IFDEF _ScBills}
                     {$IFDEF _ScJiangXi}
                     [34];                         // 쉭鮫淚撚경
                     {$ELSE}
                       {$IFDEF _ScGanSu}
                         {$IFDEF _ScGanSu_XX}
                         [88];                     // 맵據크닷경
                         {$ELSE}
                         [81];                     // 맵據淚撚경
                         {$ENDIF}
                       {$ELSE}
                         {$IFDEF _ScYangHu_GuangXi}
                         [161, 21];               // 밤鮫楠빱渡炬경
                         {$ELSE}
                           {$IFDEF _ScYangHu_HeNan}
                           [25];                // 붉켓楠빱徠尻깃경
                           {$ELSE}
                                   [161, 162, 34, 81, 165];       // 淚撚경넋埼옵쇗휭 淚撚경/徠尻깃경/쉭鮫淚撚경/맵據淚撚경/밤땜경
                           {$ENDIF}
                         {$ENDIF}
                       {$ENDIF}
                     {$ENDIF}
                   {$ENDIF}
                   {$IFDEF _ScBudget}
                     {$IFDEF _ScGuangDong}     // 밤땜경
                     // 밤땜淃커淚撚경207、밤땜淚撚경165、밤땜徠尻깃경172、헌데긍齡188 돨傑矜狼콘댔역헌데긍齡
                     [165, 172, 207, 170, 188];     // 밤땜경邱痰161肩묏던浬돨뭍角161，鹿빈疼맣냥165。
                     {$ELSE}
                     {$IFDEF _ScGanSu}
                       {$IFDEF _ScGanSu_XX}
                       [88];                       // 맵據크닷경
                       {$ELSE}
                       [81, 82];                   // 맵據淚撚경/맵據매渡뮌炬경
                       {$ENDIF}
                     {$ELSE}
                       {$IFDEF _ScJiangXi}
                         {$IFDEF _ScYangHu_JiangXi}
                         [33];                     // 쉭鮫楠빱渡炬경
                         {$ELSE}
                         [33, 34];                 // 쉭鮫淚撚경
                         {$ENDIF}
                       {$ELSE}
                         {$IFDEF _ScGuangXi}
                           {$IFDEF _ScYangHu_GuangXi}
                           [161, 21];               // 밤鮫楠빱渡炬경
                           {$ELSE}
                           [22];                    // 밤鮫淚撚경
                           {$ENDIF}
                         {$ELSE}
                           {$IFDEF _ScYangHu_HeNan}
                           [25];               // 붉켓楠빱渡炬경
                           {$ELSE}
                             {$IFDEF _ScEstimate}
                             [161, 163, 34, 81];       // 淚撚경넋埼옵쇗휭 淚撚경/매渡뮌炬경/쉭鮫淚撚경/맵據淚撚경
                             {$ELSE}
                               [161, 163, 33, 34, 81, 165];   // 淚撚경넋埼옵쇗휭 淚撚경/매渡뮌炬경/쉭鮫楠빱渡炬경/쉭鮫淚撚경/맵據淚撚경/밤땜경
                               {$ENDIF}
                             {$ENDIF}
                           {$ENDIF}
                         {$ENDIF}
                       {$ENDIF}
                     {$ENDIF}
                   {$ENDIF}
                 {$ENDIF}

  Result := AEdition in setEditions;
  AddEncryptLog(Format('[N] CheckS4Edition: Edition = %d And Result = %d', [AEdition, (Ord(Result))]));
end;

end.