version 51

Holtec -> Holtek

README.md

@@ -9,6 +9,7 @@ Version 0.2.1.51
 	- BUG: on Export the field names are no correctly padded
 	- BUG: on "new file" changes of the actual file will not be saved
 	- FEATURE: loading and saving of input presets, adding PRG and SEL Buttons to preset
+	- BUG: Holtec -> Holtek
 	
 10.11.2018 Version 0.2.1.50
 

SPS_EMU.000

@@ -3,7 +3,7 @@ LSUTextFile=1
 Copyrigth=MCS Media Computer Software
 [LSUInfo]
 CompileDate=14.11.2018
-CompileTime=11:50:41
+CompileTime=12:01:18
 Name=Wilfried Klaas
 LSUBinFile=E:\daten\git-sourcen\SPS_Emulator\SPS_Emu.lsu
 LSUTextFile=E:\daten\git-sourcen\SPS_Emulator\SPS_Emu.

ugui.lfm

@@ -737,9 +737,8 @@ object Form1: TForm1
       Top = 2
       Width = 125
       ItemHeight = 15
-      ItemIndex = 0
       Items.Strings = (
-        'TPS Holtec'
+        'TPS Holtek'
         'TPS ATMega8'
         'Willies SPS ATTiny84'
         'Willies SPS Arduino'
@@ -747,7 +746,6 @@ object Form1: TForm1
       OnChange = cbTPSVersionChange
       Style = csDropDownList
       TabOrder = 0
-      Text = 'TPS Holtec'
     end
     object Label3: TLabel
       Left = 345

ugui.pas

@@ -992,7 +992,7 @@ begin
   if (cbTPSVersion.ItemIndex = 0) then
   begin
     // HOLTEC
-    sps.setTPSVersion(Holtec);
+    sps.setTPSVersion(Holtek);
 
     Label2.Visible := True;
     ADC2.Visible := True;

usps.pas

@@ -135,7 +135,7 @@ const
 type
   {TPSVersion}
 
-  TTPSVersion = (Holtec, ATMega8, ATTiny84, Arduino);
+  TTPSVersion = (Holtek, ATMega8, ATTiny84, Arduino);
 
   { TServo }
 
@@ -603,7 +603,7 @@ begin
   if (cmd = 0) then
   begin
     case version of
-      Holtec, ATMega8: MCSStrings.copyArray2List(O_LIST_H, list);
+      Holtek, ATMega8: MCSStrings.copyArray2List(O_LIST_H, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(O_LIST_AT, list);
     end;
   end;
@@ -620,7 +620,7 @@ begin
   if (cmd = 5) then
   begin
     case version of
-      Holtec: MCSStrings.copyArray2List(IS_A_LIST_H, list);
+      Holtek: MCSStrings.copyArray2List(IS_A_LIST_H, list);
       ATMega8: MCSStrings.copyArray2List(IS_A_LIST_A8, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(IS_A_LIST_AT, list);
     end;
@@ -628,7 +628,7 @@ begin
   if (cmd = 6) then
   begin
     case version of
-      Holtec: MCSStrings.copyArray2List(A_IS_LIST_H, list);
+      Holtek: MCSStrings.copyArray2List(A_IS_LIST_H, list);
       ATMega8: MCSStrings.copyArray2List(A_IS_LIST_A8, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(A_IS_LIST_AT, list);
     end;
@@ -636,14 +636,14 @@ begin
   if (cmd = 7) then
   begin
     case version of
-      Holtec, ATMega8: MCSStrings.copyArray2List(A_CALC_LIST_H, list);
+      Holtek, ATMega8: MCSStrings.copyArray2List(A_CALC_LIST_H, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(A_CALC_LIST_AT, list);
     end;
   end;
   if (cmd = 8) then
   begin
     case version of
-      Holtec, ATMega8: MCSStrings.copyArray2List(PAGE_LIST_H, list);
+      Holtek, ATMega8: MCSStrings.copyArray2List(PAGE_LIST_H, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(PAGE_LIST_AT, list);
     end;
   end;
@@ -656,7 +656,7 @@ begin
   if (cmd = 12) then
   begin
     case version of
-      Holtec: MCSStrings.copyArray2List(SKIP_LIST_H, list);
+      Holtek: MCSStrings.copyArray2List(SKIP_LIST_H, list);
       ATMega8: MCSStrings.copyArray2List(SKIP_LIST_A8, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(SKIP_LIST_AT, list);
     end;
@@ -666,14 +666,14 @@ begin
   if (cmd = 14) then
   begin
     case version of
-      Holtec, ATMega8: MCSStrings.copyArray2List(RET_LIST_H, list);
+      Holtek, ATMega8: MCSStrings.copyArray2List(RET_LIST_H, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(RET_LIST_AT, list);
     end;
   end;
   if (cmd = 15) then
   begin
     case version of
-      Holtec, ATMega8: MCSStrings.copyArray2List(F_LIST_H, list);
+      Holtek, ATMega8: MCSStrings.copyArray2List(F_LIST_H, list);
       ATTiny84, Arduino: MCSStrings.copyArray2List(F_LIST_AT, list);
     end;
   end;
@@ -868,7 +868,7 @@ begin
       end;
   end;
   case version of
-    Holtec, ATMega8: a := a and 15;
+    Holtek, ATMega8: a := a and 15;
   end;
 end;