Attribute VB_Name = "StampPinCrossReference"
'-------------------------------------------------------------------------------
Option Explicit

' This module defines BX-24 pin numbers to match those of the Stamp.
'
' As an example, this line would raise the Stamp equivalent of pin 15,
' which is pin 20 on the BX-24:
'
'     Call PutPin(P15, 1)
'
Public Const P0 As Byte = 5
Public Const P1 As Byte = 6
Public Const P2 As Byte = 7
Public Const P3 As Byte = 8
Public Const P4 As Byte = 9
Public Const P5 As Byte = 10
Public Const P6 As Byte = 11
Public Const P7 As Byte = 12
Public Const P8 As Byte = 13
Public Const P9 As Byte = 14
Public Const P10 As Byte = 15
Public Const P11 As Byte = 16
Public Const P12 As Byte = 17
Public Const P13 As Byte = 18
Public Const P14 As Byte = 19
Public Const P15 As Byte = 20
'-------------------------------------------------------------------------------