sleep(1) to 1khz i nie zamula nawet kompa z Prockiem 1.6ghz sprawdź to sobie

nie czaje o co ci biega z tą logiką



A tak wygląda ubogie ale poprawne makro na to co chce właściciel tematu

Można tu jak najbardziej dodać obsługę błędu przystawki na podstawie np 2 krótkich impulsów po 50 czy 100 ms świadczących o awaria przystawki czy co tam właściciel tematu sobie uroi

Można dodać np jakiś parametr konfiguracyjny parametry w środku makra z g codu np M12 P100 Q300 R4 niema problemu hulaj dusza

Const x = Output1 'tu wpisać output
Const y = Input1 'tu wpisac input lub Oemtrig
Const delay = 10 'dopuszczalny czas pracy przystawki <<<<<<<"w sekundach "
Const ImpSTART = 200 'czast trwania impulsu startu przystawki <<<"w ms"

Dim curenttime As Single

'--------------------------------------------------------------------------------------------------

Sub Main

ActivateSignal(x)
Sleep(ImpulsSTART)
DeActivateSignal(x)



curenttime = Timer

Do Until isActive(y)


If Timer > curenttime + delay Then
If Not GetOEMLed(800) Then
DoOEMButton(1021)
Sleep(150)
End If

Message"Przekroczono czas pracy przystawki"
End
End If

Sleep(1)
Loop

Message"Komunikacja OK"

End Sub

niestety forum nie obsługuje tabulatorów i brzydko to wygląda , dlatego dodaje plik makra m12

QQAZ zgadza sie ze pusta petla muli komp przekonalem sie o tym

Poprostu procek nie wyrabia i nie potrafi odswierzyc portow w lpt i wychodzi kupa

Dlatego trzeba pisac tak

Do Until isActive(oemtrig1)

(tu kontrola przekroczenia czqsu)
sleep(1)
Loop

To daje 1khz odczytu portu i 0%obciazenia procka

Kamar 1 nigdy pauza , bo i po co , gdy wykonuje sie makro to mach czeka na zakonczenie go i niema zlituj

A co do wieszania sie macha3 na makrach a raczej calego kompa to wina zle napisanych skryptow tzn na skruty lub gdy autor nie jest swiadom do konca co robi.

Sam odebralem kilia razy taka lekcje.

Nie trzeba dopisywac funkcje po trochu i za karzdym razem z zacisnietymi zebami komplikować makro bo moze jakis blad wyskoczy.

Mozna z rzmachem walnac fajne makro i z sensowna komunikacja z mikro kontrolerem na 2 portach, dlatego prosze o cierpliwosc wruce do domu wytrzezwieje to pomoge bo impreza trwa

Ps brain calkowicie sie ni nadaje do tych zabaw, wajne to narzedzie ale raczej do obrubki danych itp

Haha ogulnie dobrze panowie mysla i nawet bedzie to dzialalo.
Tylko trzeba dodac jeszcze jedna zecz mianowicie zabespieczeni czasowe pracy przystawki.
Chodzi o to aby makro nasluchiwalo w petli stanu pinu i jednoczesnie odmierzalo czas.
Jesli zostanie on przekroczony zatrzymujemy maszyne.

A po co to bo jesli cos sie stanie z przystawkq to makro bedzie tkwilo w petli a to niebespiexzne

Jak mowilem po nowym roku zrobie to makro koledze z bajerkami , bo aktualnie jestem u rodziny i niemam dostepu do kompa

Napsz po nwym roku to ci to napisze bez problemu tylko nie z1 ale na m kodzie