evice = 18F1320
clock = 8 // 8MHz clock
config OSC = INTIO2, WDT = OFF, LVP = OFF
// import modules...
include "USART.bas"
include "Convert.bas"
include "Utils.bas" '<--------------------added
const ConstArray(2) as byte = (100, 200)
dim Index as byte
SetAllDigital '<--------------------added
// display value to terminal program, include
// CR and LF
USART.SetBaudrate(br9600)
for Index = 0 to bound(ConstArray)
USART.Write(DecToStr(ConstArray(Index)), 13, 10)
next