
Originally Posted by
jcleaver
using microstudio for boot loader but have tried no loader with the same results using a serial lcd from redbinary lcd is 2 * 16 it does display its strartup message so assume electrical is ok they onmly deal with c programing not much i know about that (nothing)
Here's your code with a couple of tweaks, have not tested it though:
Code:
'****************************************************************
'* Name : UNTITLED.BAS *
'* Author : JACK CLEAVER *
'* Notice : Copyright (c) 2007 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 2/17/2007 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
@MyConfig = _HS_OSC & _WDT_OFF & _PWRTE_ON & _LVP_ON
@MyConfig = MyConfig & _BODEN_OFF
@ __config MyConfig ; sets your programmer's "fuses"
TRISB = %11111110 ' ALL B AS INPUTS EXCEPT B.0
TRISA = %11111111 ' ALL a as inputs
INCLUDE "Modedefs.bas" ' This is a must have for serial communications using serout
CMCON = 7 ' turn off comparators
ADCON1 = 7 ' turn off a/d converter
DEFINE PIC16F877A
DEFINE OSC 20
DEFINE LOADER_USED 1 ' Boot-Loader is being used
DEFINE OSC 20 ' We're using a 20MHz oscillator
DEFINE CHAR_PACING 1000
x var byte
w1 var byte
w1 =0
Setup:
w1 = 1
pause 1400
Main:
for x = 1 to 6
SEROUT portb.0,6, ["ABCD", #w1] 'mode 6 = N9600 mode 2 = T9600
w1 = w1 + 1
PAUSE 250
next x
GOTO Main
END
Last edited by Archangel; - 20th February 2007 at 02:41.
If you do not believe in MAGIC, Consider how currency has value simply by printing it, and is then traded for real assets.
.
Gold is the money of kings, silver is the money of gentlemen, barter is the money of peasants - but debt is the money of slaves
.
There simply is no "Happy Spam" If you do it you will disappear from this forum.
Bookmarks