Hello
Actually i have this code for display the value on a LCD. Now i want the value of 0 to be 1mS puls and 255 to be 2mS puls.
Se attached drawing.
Code:
' Name : ServoTester.pbp
' Compiler : PICBASIC PRO Compiler 2.6
' Assembler : PM or MPASM
' Target PIC : PIC16F690 or similar type compatible with LAB-X20 board
' Hardware : LAB-X20 Experimenter Board
' Oscillator : 4MHz external crystal
' Keywords : ADCIN, LCDOUT
' Description : PICBASIC PRO program to read pot and display on LCD.
' FUNKAR ROR EJ
' Define LCD pins
Define LCD_DREG PORTC 'LCD data port
Define LCD_DBIT 0 'LCD data starting bit 0 or 4
Define LCD_RSREG PORTC 'LCD register select port
Define LCD_RSBIT 4 'LCD register select bit
Define LCD_EREG PORTC 'LCD enable port
Define LCD_EBIT 5 'LCD enable bit
' Allocate variables
x Var Byte
ANSEL = %00000100 ' Set PORTA.2 analog, rest digital
ANSELH = %00000000
Pause 100 ' Wait for LCD to start
mainloop:
Adcin 2, x ' Read ADC value on AN2 (PORTA.2)
Lcdout $fe, 1, "Pot1 = ", #x ' Send value to LCD
Pause 50 ' Do it about 10 times a second
Goto mainloop ' Do it forever
End[/I][/I]
Hope this help
Thronborg
Servo Tester.pdf
Bookmarks