LSVคลังสมองออนไลน์ "ปีที่14"

คือผมต้องการให้ servo เคลื่อนที่โดยไม่ต้องกด สวิทต์ครับ  ท่านใดพอที่จะให้ความรู้ได้  รบกวนด้วยนะครับ  ภาษา เบสิกครับ
@ DEVICE PIC16F877A,HS_OSC,LVP_OFF,BOD_OFF,WDT_OFF
DEFINE OSC 20
define lcd_dreg portd
define lcd_dbit 4
define lcd_rsreg porte
define lcd_rsbit 2
define lcd_ereg portd
define lcd_ebit 1
s1 var porta.0
s2 var porta.1
s3 var porta.2

adcon1=7
trisa = %111111
TRISC = %00000000
PORTc=0
l con 1150
r con 350
c con 750
vv:  if(s1=0)and  (s2=1)and (s3=1)and  then lift
     if (s1=1)and (s2=0)and (s3=1)and  then right
     if (s1=1)and (s2=1)and (s3=0)and  then CENTER
   
     goto vv
RIGHT:   
    lcdout $fe,1
    lcdout $fe,$80,"RIGHT"
    PULSOUT PORTc.1,r
    pause 20:goto RIGHT
LIFT:
    lcdout $fe,1
    lcdout $fe,$80,"LIFT"
    pulsout portc.2,l
    pause 20
    goto lift
CENTER:
    lcdout $fe,1
    lcdout $fe,$80,"CENTER"
    pulsout portc.0,c
    pause 20
    goto CENTER

end

คือตัวนีมันจะเปลี่ยนทิศทางได้ก็ต่อเมื่อ กดสวิตท์ครับ และเมื่อจะต้องการเปลี่ยนตำแหน่งต้องกดปุ่ม Reset  ทุกครั้งครับ 
รบกวนด้วยนะครับ

 olleyes2