mám dotaz či existuje nejaký konvertor z .bas do .ino ? V basicu nemám problém napísať program , ktorý funguje tak ako chcem no pri všetkých pokusoch to neviem prinútiť fungovať v arduine ?! Jedná sa o sledovanie stavu dvoch tlačítok s určitou sekvenciou a čo je hlavné pri zmene stavu tlačítka z HIGH do LOW okamžite zrušiť sekvenciu a pri opätovnom stlačení začať odznova.
Kód: Vybrat vše
Basic:
Start:
if pinC.4 = 1 and pinC.3 = 0 then gosub defuse_slow
if pinC.4 = 1 and pinC.3 = 1 then gosub defuse_fast
if pinC.4 = 0 then low B.0,B.1,B.2,B.3,B.4,B.5 endif
goto start
defuse_slow:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.0
pause 300
low B.0
pause 900 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_slow2
return
defuse_slow2:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.1
pause 300
low B.1
pause 900 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_slow3
return
defuse_slow3:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.2
pause 300
low B.2
pause 900 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_slow4
return
defuse_slow4:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.2
pause 300
low B.2
pause 900 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_slow5
return
defuse_slow5:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.3
pause 300
low B.3
pause 900 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_slow6
return
defuse_slow6:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.4
pause 300
low B.4
pause 900 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_slow7
return
defuse_slow7:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.5
pause 300
low B.5
pause 2000 endif
return
defuse_fast:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.0
pause 200
low B.0
pause 200 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_fast2
return
defuse_fast2:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.1
pause 200
low B.1
pause 200 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_fast3
return
defuse_fast3:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.2
pause 200
low B.2
pause 200 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_fast4
return
defuse_fast4:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.2
pause 200
low B.2
pause 200 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_fast5
return
defuse_fast5:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.3
pause 200
low B.3
pause 200 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_fast6
return
defuse_fast6:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.4
pause 200
low B.4
pause 200 endif
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then gosub defuse_fast7
return
defuse_fast7:
pause 100
if pinC.4 = 0 then gosub storno
pause 100
if pinC.4 = 1 then high B.5
pause 300
low B.5
pause 2000 endif
return
storno:
pause 300
high C.0
low B.0,B.1,B.2,B.3,B.4,B.5
pause 300
low C.0
return