Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Have a look at this thread for some pics of how it's done.AtomSoft said:While im waiting for a reply on the above take a look at this. Does it make sense? I was trying to integrate the ICSP with a breadboard. What cha think?
Basically you jump from the board to the breadboard then jump the pins of the chip to the locations above. I might just make it like a a plug and play thing So you put chip on board and all is already connected to breadboard.
public function SayHi (TheName as string)
msgbox "Hi " & TheName & "!"
end function
LED macro x,y ; MACRO LED <PORTA>, <TRISA>
Public function LED(x, y) as long
LATA = x
TRISA = y
Delay();
End function
LED1 = LED ("00000001", "10111110")
LED macro x,y ; MACRO LED <PORTA>, <TRISA>
movlw x
movwf LATA ; LATA = x
movlw y
movwf TRISA ; TRISA = y
call Delay ; call the Delay subroutine
endm ; end macro
LED1 LED b'00000001', b'10111110'
LED macro x,y ; MACRO LED <PORTA>, <TRISA>
movlw x
movwf LATA ; LATA = x
movlw y
movwf TRISA ; TRISA = y
call Delay ; call the Delay subroutine
endm ; end macro
Count equ 0 ; delay loop counter
org 0 ; reset vector
bsf ADCON1, 0 ; make RA0 digital
0002 0E01 MOVLW 0x1 17: LED1 LED b'00000001', b'10111110' ; LED <PORTA>, <TRISA>
0004 6E89 MOVWF 0xf89, ACCESS
0006 0EBE MOVLW 0xbe
0008 6E92 MOVWF 0xf92, ACCESS
000A EC27 CALL 0x4e, 0
000E 0E40 MOVLW 0x40 18: LED2 LED b'01000000', b'10111110' ; LED <PORTA>, <TRISA>
0010 6E89 MOVWF 0xf89, ACCESS
0012 0EBE MOVLW 0xbe
0014 6E92 MOVWF 0xf92, ACCESS
0016 EC27 CALL 0x4e, 0
HIGHA macro x ; MACRO HIGHA <PORTA BIT>
BCF TRISA,x,0 ; Clear the TRISA.X to make it output
BSF LATA,x,0 ; Set LATA.X to High
endm ; end macro
HIGHA macro x ; MACRO HIGHA <PORTA BIT>
BCF TRISA,x,0 ; Clear the TRISA.X to make it output
;BTG PORTA x ; Toggle PortA.X or should i use
BSF LATA,x,0 ; BIT SET LATA.X
endm ; end macro
list p=18F1320
include <p18F1320.inc>
CONFIG OSC = INTIO2, WDT = OFF, LVP = OFF
HIGHA macro x ; MACRO HIGHA <PORTA BIT>
BCF TRISA,x ; Clear the TRISA.X to make it output
BSF LATA,x ; BIT SET LATA.X
call Delay
endm ; end macro
LOWA macro x ; OPPOSITE OF : MACRO HIGHA <PORTA BIT>
BCF TRISA,x ; Clear the TRISA bit
BCF LATA,x 'Clear the LATA bit
call Delay
endm ; end macro
Count equ 0
org 0
Start
movlw b'01111111' ;This is just to see what changed in SFR (7 has to be 0 in LATA )
movwf LATA ;set it the same
movwf TRISA ;set it the same
HIGHA 2
LOWA 2
goto Start
Delay
decfsz Count, f ; decrement Count and skip when zero
goto $-2 ; not zero? repeat
return ; return
END