pic programlama hakkında yardım

[SnowMan]

öncelikle herkese slm lar ben elektrik lise son öğrencisiyim pic programlama hakkında birkaç şey biliorum o bildiklerimle bazı şeyler yapmaya çalışıyorm ama biyerde takıldım dielm ki,
------------------
basla:
portb.1=0
pause 500
portb.1=1
pause 5oo
goto basla
--------------------
gibi bi döngü var ben bu döngü olurken 1 butona basıldığında başka bi alt programa dallanmasını istiyorum ama bu döngünün herhangibiyerinde,
---------------
if porta.0=0 then altprogram
----------------
komutunu kullandığımda arada pause ler olduğundan bu komutu görmüo yani butona bastığımda başka bi prg. a dallanmıo
acaba bunun gibi bi programın başında yazıldığında prg. süresince hep geçerli olacak bi komut varmıdır(benm yapmak istediğim program bundan birazdaha uzun ama bu şekilde)yardım ederseniz çok memnun olucam şimdiden teşekkürler

[UykUsUz]

uzun süredir basic de program yazmıyorum bunu bir dene istersen olmazsa yardımcı olurum yine

sure var byte ; böyle bir kaydedici tanımla
sure=0

basla:
portb.1=0
call bekle
portb.1=1
call bekle
goto basla

bekle:
for sure=1 to 50
if porta.0=0 then alt_program
pause 10
next sure
sure=0
return

[SnowMan]

çok tşk. ederm bunu denicem ama şehir dışındayım bayramdan sora bakabilirm ancak deneyince buraya tekrar yazarm olp olmadığını tekrar tşk ederm bu arada herkezin kurban bayramını kutlrım...