zawsze tak robilem gdy chcialem przyciskami dodawac/odejmowac godziny, sekundy lub minuty:
wydaje mi sie to troche bezsensu, bo widac kawaleki kodu ktore sie powatrzaja np.
Moje pytanie: czy mozna to tak zrobic? (a jak nie to dlaczego, bo ja bym tak to napisale. Jednak w wiekszosci ksiazek kursow jest wczesniejszy przyklad pokazywany)
on timer1 1sekunda
do
If Pinb.1 = 0 Then
Waitms 45
If Pinb.1 = 0 Then
Incr Minuty
If Minuty = 60 Then Minuty = 0
End If
End If
loop
1sekunda:
Counter1 = Counter1 + costam
Incr Sekundy
If Sekundy = 60 Then
Sekundy = 0
Incr Minuty
If Minuty = 60 Then
Minuty = 0
Incr Godziny
If Godziny = 24 Then
Godziny = 0
End If
End If
End If
wydaje mi sie to troche bezsensu, bo widac kawaleki kodu ktore sie powatrzaja np.
if minuty=60 then minuty=0
Moje pytanie: czy mozna to tak zrobic? (a jak nie to dlaczego, bo ja bym tak to napisale. Jednak w wiekszosci ksiazek kursow jest wczesniejszy przyklad pokazywany)
on timer1 1sekunda
do
If Pinb.1 = 0 Then
Waitms 45
If Pinb.1 = 0 Then
gosub minuty_x
End If
End If
loop
1sekunda:
Counter1 = Counter1 + costam
Incr Sekundy
If Sekundy = 60 Then
Sekundy = 0
Incr Minuty
minuty_x:
If Minuty = 60 Then
Minuty = 0
Incr Godziny
If Godziny = 24 Then
Godziny = 0
End If
End If
End If