Parcourir la source

Bug: List of images for microbit is different from implementation

Wilfried Klaas il y a 5 ans
Parent
commit
7e99af3959
4 fichiers modifiés avec 11 ajouts et 10 suppressions
  1. 2 2
      SPS_EMU.000
  2. 1 1
      SPS_Emu.lpi
  3. BIN
      SPS_Emu.lsu
  4. 8 7
      umicrobit.pas

+ 2 - 2
SPS_EMU.000

@@ -2,8 +2,8 @@
 LSUTextFile=1
 LSUTextFile=1
 Copyrigth=MCS Media Computer Software
 Copyrigth=MCS Media Computer Software
 [LSUInfo]
 [LSUInfo]
-CompileDate=09.05.2021
-CompileTime=14:46:27
+CompileDate=14.05.2021
+CompileTime=13:13:11
 Name=Wilfried Klaas
 Name=Wilfried Klaas
 LSUBinFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.lsu
 LSUBinFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.lsu
 LSUTextFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.
 LSUTextFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.

+ 1 - 1
SPS_Emu.lpi

@@ -22,7 +22,7 @@
       <AutoIncrementBuild Value="True"/>
       <AutoIncrementBuild Value="True"/>
       <MinorVersionNr Value="2"/>
       <MinorVersionNr Value="2"/>
       <RevisionNr Value="1"/>
       <RevisionNr Value="1"/>
-      <BuildNr Value="86"/>
+      <BuildNr Value="87"/>
       <Language Value="0407"/>
       <Language Value="0407"/>
       <StringTable CompanyName="MCS" FileDescription="TPS/SPS Emulator" InternalName="SPS_EMU" LegalCopyright="MCS (C) Wilfried Klaas" OriginalFilename="SPS_EMU.exe" ProductName="TPS/SPS Emulator" ProductVersion="0.2"/>
       <StringTable CompanyName="MCS" FileDescription="TPS/SPS Emulator" InternalName="SPS_EMU" LegalCopyright="MCS (C) Wilfried Klaas" OriginalFilename="SPS_EMU.exe" ProductName="TPS/SPS Emulator" ProductVersion="0.2"/>
     </VersionInfo>
     </VersionInfo>

BIN
SPS_Emu.lsu


+ 8 - 7
umicrobit.pas

@@ -18,12 +18,6 @@ const
     (1, 1, 1, 1, 1),
     (1, 1, 1, 1, 1),
     (0, 1, 1, 1, 0),
     (0, 1, 1, 1, 0),
     (0, 0, 1, 0, 0)),
     (0, 0, 1, 0, 0)),
-    //IMAGE_HEART_SMALL: TMBImage =
-    ((0, 0, 0, 0, 0),
-    (0, 1, 0, 1, 0),
-    (0, 1, 1, 1, 0),
-    (0, 0, 1, 0, 0),
-    (0, 0, 0, 0, 0)),
     // smilies
     // smilies
     //IMAGE_HAPPY: TMBImage = (
     //IMAGE_HAPPY: TMBImage = (
     ((0, 0, 0, 0, 0),
     ((0, 0, 0, 0, 0),
@@ -397,7 +391,14 @@ const
     (1, 1, 0, 1, 1),
     (1, 1, 0, 1, 1),
     (0, 1, 0, 1, 0),
     (0, 1, 0, 1, 0),
     (0, 1, 1, 1, 0),
     (0, 1, 1, 1, 0),
-    (0, 0, 0, 0, 0)));
+    (0, 0, 0, 0, 0)),
+    //IMAGE_HEART_SMALL: TMBImage =
+    ((0, 0, 0, 0, 0),
+    (0, 1, 0, 1, 0),
+    (0, 1, 1, 1, 0),
+    (0, 0, 1, 0, 0),
+    (0, 0, 0, 0, 0))
+);
 
 
 implementation
 implementation