Hello everyone,
Well I haven't had to much time to play but I am playing.
Anyway I had thought I would have picked this up a little quicker but at least I think I am starting to get it.
So just playing around for the most part I modified Bill's demo swordfish program a little. Instead of going one way it now goes back and forth.
I am sure their is a better way to do this but I haven't figured it out yet so please feel free to drop me clues, by the way I'm pretty dense.
My next step is an adjustable chase rate using VR1 on the Junebug however I'm still learning and not quite sure where to look for that information. So if you could point me to where I can gain that knowledge I would be most grateful!
Thanks in advance and please feel free to let me know where I may be able to clean the posted code up a bit as well so I can be more effective.
Ted
Well I haven't had to much time to play but I am playing.
Anyway I had thought I would have picked this up a little quicker but at least I think I am starting to get it.
So just playing around for the most part I modified Bill's demo swordfish program a little. Instead of going one way it now goes back and forth.
I am sure their is a better way to do this but I haven't figured it out yet so please feel free to drop me clues, by the way I'm pretty dense.
Code:
// Name : BLINK_1.BAS
Device = 18F1320
Clock = 4 // 4MHz clock
Include "junebug.bas"
Dim Count As Byte
OSCCON = $62 // select 4MHz internal clock
ADCON1 = %11110101 // digital I/O except RA1 & RA3
While True
Count = 1
While Count < 6
LED(Count) // light LED(1..6) or none LED(0)
DelayMS(100) // delay in 1000s of a second
inc(Count)
Wend
While Count > 1
LED(Count) // light LED(1..6) or none LED(0)
DelayMS(100) // delay in 1000s of a second
dec(Count)
Wend
Wend
End
My next step is an adjustable chase rate using VR1 on the Junebug however I'm still learning and not quite sure where to look for that information. So if you could point me to where I can gain that knowledge I would be most grateful!
Thanks in advance and please feel free to let me know where I may be able to clean the posted code up a bit as well so I can be more effective.
Ted