pıc basıc sorun yardım

[yılmaz]

slm arkadaşlar bir sorum olucak porta.0 girişi butondan örneğin 4 defa 1 olduğunda portb.0 çıkış yapsın bir türlü yapamadım kafam durdu yardım ederseniz sevinirim pıcbasıc ile yazıyorum

 

[tyildizak]

Şunu bir deneyin:

      i = 0
start:
      if porta.0 = 1 then
         i = i + 1
              if i = 4 then
                 i = 0
                 portb.0 = 1
                 else
                 portb.0 = 0
               endif
       endif
       pause 250
       goto start

 

[kudretuzuner]

Merhaba
pbp pek bilmiyorum.Daha doğrusu yazılımında hata yaparım diye size asm kodunu yazdım.Mantık çok basit şöyle diyelim porta'ya basıldı mı hayır ise porta.0 dön.Basıldı ise ikinci bir test yazılımı kurup porta,0 basıldı mı.Hayır ise burada kritik mantık başa değil ikinci kurulan test yazılımına dön.Dödüncü test yazılımında istenilen eylem yazılır.Kolay gelsin.

 

[mustafa6106]

s=0
basla:
ıf porta=1 then saydır
goto basla
saydır:
s=s+1
ıf s=4 then portb=0
goto basla
end

 

[tyildizak]

s=0
basla:
ıf porta=1 then saydır
goto basla
saydır:
s=s+1
ıf s=4 then portb=0
goto basla
end

• ıf s=4 then portb=0 ;yerine
  if s = 4 then portb.0 = 1 ;olmalı
  
  
  
• "ıf s=4 then portb=0
  goto basla"
  sonrasında "s değişkenini sıfırlamalısınız
  
  
  
• buton arkı için gecikme koymazsanız, "s" değişkeni bir basışta 4 oluverir

selamlar

 

[yılmaz]

çok sağolun aklınıza sağlık

 

[mustafa6106]

pardon yanlıs yapmsım