BS2p40
argmafia
Posts: 30
Is this their a fairly inexpensive carrier board that I can use to program my BS2p40?
Comments
'
[noparse][[/noparse] Set the Time ]
' To set time, change the values to current time, then run program
' [noparse][[/noparse]$55,$00,ss,mm,hh,dd,mo,yl,yh]
SEROUT ToPWB,PWBBaud,[noparse][[/noparse]$55,$00,00,45,08,8,3,05,20]
main:
'Get time from PWB:
SEROUT ToPWB, PWBBaud, [noparse][[/noparse]$55,$12] 'send request for time
SERIN FromPWB, PWBBaud, 100, nodat, [noparse][[/noparse]ss,mm,hh,dd,mo,yl,yh] 'populate variables with response from PWB
nodat:
' Check AM/PM & set flag
IF HH>12 THEN
HH=HH-12: PM=1
ELSE
PM=0
ENDIF
' Write time to line 1 of the LCD
SEROUT TX, LCDBaud, [noparse][[/noparse]LcdLine2]
SEROUT TX, LCDBaud, [noparse][[/noparse]" ",DEC hh,":",DEC2 mm,":",DEC2 ss]
IF PM=1 THEN 'If PM var set then DONT print AM
SEROUT TX, LCDBaud, [noparse][[/noparse]" pm "]
ELSE
SEROUT TX, LCDBaud, [noparse][[/noparse]" am "]
ENDIF
HIGH 0 for P0, how would you do it for X0 for the BS2p40
HIGH 0 ' main pin p0
AUXIO
TOGGLE 0 ' aux pin x0
MAINIO
LOW 0 ' main again
x = 1
IOTERM x ' aux
TOGGLE 0
This is all explained in the manual and also in the help facility included with the STAMPW program.
I don't know about the carrier board.
▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Tracy Allen
www.emesystems.com