' Name : HELLOX4.pbp ' Compiler : PICBASIC PRO Compiler 2.6 ' Assembler : PM or MPASM ' Target PIC : 8-pin PIC12F675 or similar types ' Hardware : Lab-X4 board ' Oscillator : 4MHz internal ' Keywords : SEROUT ' Description : PICBASIC PRO program to send "Hello World" on serial port (and LCD) ' Include "modedefs.bas" ' Mode definitions for Serout Define OSCCAL_1K 1 ' Calibrate internal oscillator TX Var GPIO.1 ANSEL = 0 ' Set all digital CMCON = 7 ' Analog comparators off mainloop: Serout TX, T2400, ["Hello", 10, 13] ' Display "Hello", next line Pause 500 ' Wait .5 second Serout TX, T2400, ["World", 10, 13, 10, 13] ' Display "World", skip a line Pause 500 ' Wait .5 second Goto mainloop ' Do it forever End