[Openlcb-svn-commits] SF.net SVN: openlcb:[3169] trunk/prototypes/mikroPascal/ dsPIC33EP256_CommandStation/NMRAnetAppCallbacks.mpas

[<jim...@us...>]

Revision: 3169
          http://sourceforge.net/p/openlcb/svn/3169
Author:   jimkueneman626
Date:     2013-04-15 01:42:01 +0000 (Mon, 15 Apr 2013)
Log Message:
-----------
- Updates and bug fixes in the CS code

Modified Paths:
--------------
    trunk/prototypes/mikroPascal/dsPIC33EP256_CommandStation/NMRAnetAppCallbacks.mpas

Modified: trunk/prototypes/mikroPascal/dsPIC33EP256_CommandStation/NMRAnetAppCallbacks.mpas
===================================================================
--- trunk/prototypes/mikroPascal/dsPIC33EP256_CommandStation/NMRAnetAppCallbacks.mpas	2013-04-15 01:28:33 UTC (rev 3168)
+++ trunk/prototypes/mikroPascal/dsPIC33EP256_CommandStation/NMRAnetAppCallbacks.mpas	2013-04-15 01:42:01 UTC (rev 3169)
@@ -898,7 +898,7 @@
                         NMRA_DCC_QueuePacket(@Track, @DCCPacket, False);
                       end;
                 128 : begin
-                        AddressHi := AddressHi or $C0;    // Allow a mistaken short address to work here by adding the $C0
+                        AddressHi := AddressHi or $C0;    // Allow a mistaken short address to work here by adding the $C0  Per Tim
                         AbsoluteSpeed := (127/100) * AbsoluteSpeed;
                         SpeedStep := Word( AbsoluteSpeed);
                         if SpeedStep > 0 then

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.