Browse Source

Bug: List of images for microbit is different from implementation

Wilfried Klaas 3 years ago
parent
commit
7e99af3959
4 changed files with 11 additions and 10 deletions
  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
 Copyrigth=MCS Media Computer Software
 [LSUInfo]
-CompileDate=09.05.2021
-CompileTime=14:46:27
+CompileDate=14.05.2021
+CompileTime=13:13:11
 Name=Wilfried Klaas
 LSUBinFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.lsu
 LSUTextFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.

+ 1 - 1
SPS_Emu.lpi

@@ -22,7 +22,7 @@
       <AutoIncrementBuild Value="True"/>
       <MinorVersionNr Value="2"/>
       <RevisionNr Value="1"/>
-      <BuildNr Value="86"/>
+      <BuildNr Value="87"/>
       <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"/>
     </VersionInfo>

BIN
SPS_Emu.lsu


+ 8 - 7
umicrobit.pas

@@ -18,12 +18,6 @@ const
     (1, 1, 1, 1, 1),
     (0, 1, 1, 1, 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
     //IMAGE_HAPPY: TMBImage = (
     ((0, 0, 0, 0, 0),
@@ -397,7 +391,14 @@ const
     (1, 1, 0, 1, 1),
     (0, 1, 0, 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