[es] - mikro kontroler 16f877

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

^{08.02.2012. u 17:04 - pre 148 meseci}

jer ovo bolje?

Code:
define osc 4
symbol pumpa1 = porta.0
symbol pumpa2 = porta.1
symbol pumpa3 = porta.2
symbol pumpa4 = porta.3
symbol pobuda= porte.2
symbol taster = porte.1
symbol pumpa5 = portd.7
symbol pumpa6 = portd.6
symbol pumpa7 = portd.5
symbol pumpa8 = portd.4
symbol pumpa9 = portd.3
symbol pumpa10 = portd.2
symbol pumpa11 = portd.1
symbol pumpa12 = portd.0
symbol pumpa13 = portc.7
symbol pumpa14 = portc.6
symbol pumpa15 = portc.5
symbol pumpa16 = portc.4
symbol pumpa17 = portc.3
symbol pumpa18 = portc.2
symbol pumpa19 = portc.1
symbol pumpa20 = portc.0
input taster
output pobuda
output pumpa1
output pumpa2
output pumpa3
output pumpa4
output pumpa5
output pumpa6
output pumpa7
output pumpa8
output pumpa9
output pumpa10
output pumpa11
output pumpa12
output pumpa13
output pumpa14
output pumpa15
output pumpa16
output pumpa17
output pumpa18
output pumpa19
output pumpa20
blok var byte
blok = 1
pritisak var byte
pritisak = 0
low pumpa1 : low pumpa2 : low pumpa3 : low pumpa4 : low pumpa5 : low pumpa6 :
low pumpa7 : low pumpa8 : low pumpa10 : low pumpa11 : low pumpa12: low pumpa13:
low pumpa14 : low pumpa15 : low pumpa16 :low pumpa17 : low pumpa18 :low pumpa19:
low pumpa20 :low pobuda

pocetak:
if taster = 0 then
pause 200
pritisak = pritisak + 1
if pritisak = 3 then pritisak = 1
if pritisak = 2 then blok = blok + 1
endif
program:
select case blok

case 1
end select

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa4
gosub pocetak
return
low pumpa4
high pumpa5
gosub pocetak

return
low pumpa5
high pumpa6
gosub pocetak
return
low pumpa6
high pumpa7
gosub pocetak
return
low pumpa7
high pumpa8
gosub pocetak
return
low pumpa9
high pumpa10
gosub pocetak
return
low pumpa3 :low pumpa10
high pumpa4 : high pumpa5
gosub pocetak
return
low pumpa5
high pumpa6
gosub pocetak
return
low pumpa6
high pumpa7
gosub pocetak
return
low pumpa7
high pumpa8
gosub pocetak
return
low pumpa8
high pumpa9
gosub pocetak
return
low pumpa9
high pumpa10
gosub pocetak
return

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4543

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..

+530 Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 17:06 - pre 148 meseci}

Kod koji si napisao nema sanse da radi, evo ti sa malecnim izmenama i malko komentara.

Code:
define osc 4
cmcon = 7

' Aliasi za bitove portA
symbol pumpa1 = porta.0
symbol pumpa2 = porta.1
symbol pumpa3 = porta.2
symbol pumpa4 = porta.3

' Aliasi za bitove portE
symbol pobuda= porte.2
symbol taster = porte.1

' Aliasi za bitove portD
symbol pumpa5 = portd.7
symbol pumpa6 = portd.6
symbol pumpa7 = portd.5
symbol pumpa8 = portd.4
symbol pumpa9 = portd.3
symbol pumpa10 = portd.2
symbol pumpa11 = portd.1
symbol pumpa12 = portd.0

' Aliasi za bitove portC
symbol pumpa13 = portc.7
symbol pumpa14 = portc.6
symbol pumpa15 = portc.5
symbol pumpa16 = portc.4
symbol pumpa17 = portc.3
symbol pumpa18 = portc.2
symbol pumpa19 = portc.1
symbol pumpa20 = portc.0

input taster
output pobuda

'output pumpa1
'output pumpa2
'output pumpa3
'output pumpa4
'output pumpa5
'output pumpa6
'output pumpa7
'output pumpa8
'output pumpa9
'output pumpa10
'output pumpa11
'output pumpa12
'output pumpa13
'output pumpa14
'output pumpa15
'output pumpa16
'output pumpa17
'output pumpa18
'output pumpa19
'output pumpa20

output porta
output portc
output portd

blok var byte
pritisak var byte

blok = 1
pritisak = 0

'low pumpa1 : low pumpa2 : low pumpa3 : low pumpa4 : low pumpa5 : low pumpa6 :
'low pumpa7 : low pumpa8 : low pumpa10 : low pumpa11 : low pumpa12: low pumpa13:
'low pumpa14 : low pumpa15 : low pumpa16 :low pumpa17 : low pumpa18 :low pumpa19:
'low pumpa20 :low pobuda

porta = 0
portc = 0
portd = 0
low pobuda

'****************************************************************
'* Podprogrami                                                  *
'****************************************************************
pocetak:
if taster = 0 then
    pause 200
    pritisak = pritisak + 1
    if pritisak = 2 then
        blok = blok + 1
    elseif pritisak = 3 then
        pritisak = 1
    endif
'    if pritisak = 3 then pritisak = 1
'    if pritisak = 2 then blok = blok + 1
endif
return

'****************************************************************
'* Glavna programska petlja                                     *
'****************************************************************
program:
select case blok
    case 1 ' kada je 'blok' = 1 izvrsice se sve do kraja programa :)
    porta = %00001111
'    high pumpa1 : high pumpa2 : high pumpa3 : high pumpa4
    gosub pocetak
    low pumpa4
    high pumpa5
    gosub pocetak
    low pumpa5
    high pumpa6
    gosub pocetak
    low pumpa6
    high pumpa7
    gosub pocetak
    low pumpa7
    high pumpa8
    gosub pocetak
    low pumpa9
    high pumpa10
    gosub pocetak
    low pumpa3 :low pumpa10
    high pumpa4 : high pumpa5
    gosub pocetak
    low pumpa5
    high pumpa6
    gosub pocetak
    low pumpa6
    high pumpa7
    gosub pocetak
    low pumpa7
    high pumpa8
    gosub pocetak
    low pumpa8
    high pumpa9
    gosub pocetak
    low pumpa9
    high pumpa10
    gosub pocetak
end select

' Gde su ti ostali CASE uslovi?

--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 17:10 - pre 148 meseci}

pa mesto case sam ubacio gosub rekao si da komanda case uzima puno mesta,zato uvek sa gosubom vracam na case 1 jer ne znam sa kojom drugom komandom da uradim proveru tastera

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 17:23 - pre 148 meseci}

Cekaj zorane ja dosta promena imam dali meni kombinacije paljenje,tj gasenje uzima dosta mesta ili case provere?
ako kombinacije uzimaju puno mesta napravicu posto portovi nisu mesoviti mogu kroz ceo port binarnim brojem da napravim jedno paljenje,dali bi to stalo u pic,kolko promena mogu tako proveriti?

goran_68

Član broj: 89012
Poruke: 932
*.dynamic.isp.telekom.rs.

+81 Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 17:48 - pre 148 meseci}

Moj predlog. Neka mu neko pokaze kako se rade nizovi u bejziku pa da onda napuca tu tabelu u programsku memoriju i zove vrednosti za svaki port na osnovu indeksa (blok). Taman ce da nauci i nizove.

gorankg

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4543

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..

+530 Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 18:16 - pre 148 meseci}

Tvoj PODPROGRAM koji se zove "pocetak:" izmedju svoga "imena" i povratka u glavni program -> "return" nece uraditi nista ukoliko nisi pritisnuo taster pa ce se svaki put posle povratka u glavni program izvrsavati sledeca naredba i sve tako redom do kraja.

Evo ti kako bi izgledalo, nekako, to sto predpostavljam da si zamislio.

Code:
define osc 4
cmcon = 7

' Aliasi za bitove portA
symbol Pumpa1 = porta.0
symbol Pumpa2 = porta.1
symbol Pumpa3 = porta.2
symbol Pumpa4 = porta.3

' Aliasi za bitove portE
symbol Pobuda= porte.2
symbol Taster = porte.1

' Aliasi za bitove portD
symbol Pumpa5 = portd.7
symbol Pumpa6 = portd.6
symbol Pumpa7 = portd.5
symbol Pumpa8 = portd.4
symbol Pumpa9 = portd.3
symbol Pumpa10 = portd.2
symbol Pumpa11 = portd.1
symbol Pumpa12 = portd.0

' Aliasi za bitove portC
symbol Pumpa13 = portc.7
symbol Pumpa14 = portc.6
symbol Pumpa15 = portc.5
symbol Pumpa16 = portc.4
symbol Pumpa17 = portc.3
symbol Pumpa18 = portc.2
symbol Pumpa19 = portc.1
symbol Pumpa20 = portc.0

' Definisanje ulaznih pinova
input taster

' Definisanje izlaznih pinova
output porta
output portc
output portd
output pobuda

porta = 0
portc = 0
portd = 0
low pobuda

goto program
'****************************************************************
'* Podprogrami                                                  *
'****************************************************************
Pocetak:
'    Cekanje na pritisak na taster
    while taster = 1
        pause 50
    wend

'    Ako je taster i dalje pritisnut, ceka se njegovo otpustanje
    while taster = 0
        pause 50
    wend
return

'****************************************************************
'* Glavna programska petlja                                     *
'****************************************************************
Program:
porta = %00001111
gosub pocetak
low pumpa4
high pumpa5

gosub pocetak
low pumpa5
high pumpa6

gosub pocetak
low pumpa6
high pumpa7

gosub pocetak
low pumpa7
high pumpa8

gosub pocetak
low pumpa9
high pumpa10

gosub pocetak
low pumpa3
low pumpa10
high pumpa4
high pumpa5

gosub pocetak
low pumpa5
high pumpa6

gosub pocetak
low pumpa6
high pumpa7

gosub pocetak
low pumpa7
high pumpa8

gosub pocetak
low pumpa8
high pumpa9

gosub pocetak
low pumpa9
high pumpa10

gosub pocetak
goto program

end

--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 19:09 - pre 148 meseci}

zorane meni treba kada dobije impuls da predje na druge pumpe,a dok nedobije impuls da stoji

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 19:13 - pre 148 meseci}

Ja tek sada pocinjem da shvatam binarne brojeve...kako radi

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 19:22 - pre 148 meseci}

ja tek sada pocinem da shvatam vasu pricu,zasto nebi nasao 10 bitni kontroler i u njega kucao red po red u binarnim brojevima sad sam vas ukapirao!!!jeeeeeeeee

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 19:30 - pre 148 meseci}

znaci ovaj kod koji je zoran odkucao radi program ide sve dok de ne stisne taster,kad se stisne taster program stoji,kada se taster odpusti program nastavlja dalje odande gde je stao ako je tako to je tooooooooooo

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4543

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..

+530 Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 20:41 - pre 148 meseci}

Lose si skapirao.

Program u startu ukljuci prve cetiri pumpe

Code:
porta = %00001111

zatim skoci u Pod Program "Pocetak"

Code:
Gosub Pocetak

u kome ceka da pritirnes i otpustis taster da bi izvrsio deo programa do sledeceg skoka u podprogram "Pocetak" i tako redom

...

da bi na kraju sve pocelo iz pocetka

Code:
Goto Program

--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 21:48 - pre 148 meseci}

da da to mi treba al izbaci jednu gresku u kompailiranju sad cu okaciti

Prikačeni fajlovi

eror.jpg - 329.14k

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 22:15 - pre 148 meseci}

jao zoki uf al u pod programu dok je taster stisnit treba da se upali pobuda a taj signal treba da traje mozda pola secunde ili secundu koja daje signal modulu da je upalio druge pumpe to sam napisao a nisam ponavljao e meni veceras nema spavanja ima da ga iskucam Puno ti HVALA,po tebi video si tabelu oce kod biti veci od 8mb oce stati u pik?

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4543

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..

+530 Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 22:53 - pre 148 meseci}

Nece biti veci od 8Mb, to ti GARANTUJEM.

--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 22:59 - pre 148 meseci}

a kako da dodam onaj rele za pobudu,i dali smem napraviti jos jedan pod program dobro sam razmislio kako cu da iskombinujem sve,i sta je ovaj eror

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{08.02.2012. u 23:34 - pre 148 meseci}

zoki jer mi mozes dopisati jos to pa da krenem da ga kuckam

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{09.02.2012. u 00:53 - pre 148 meseci}

zasto non stop izbacuje greskuu kad se kompajlira ovu:

Prikačeni fajlovi

eror.jpg - 329.14k

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{09.02.2012. u 03:51 - pre 148 meseci}

zorane pa jer on ima 8mb?

dzigi021
nikola kenic
szr start
novi sad

Član broj: 234217
Poruke: 130
*.dynamic.sbb.rs.

Profil

Re: mikro kontroler 16f877

^{09.02.2012. u 04:46 - pre 148 meseci}

ovo je 8 kb a kanda tolko mesta ima sta sada?

Code:
define osc 4
adcon1 = 7

' Aliasi za bitove portA
symbol Pumpa1 = porta.0
symbol Pumpa2 = porta.1
symbol Pumpa3 = porta.2
symbol Pumpa4 = porta.3

' Aliasi za bitove portE
symbol Pobuda= porte.2
symbol Taster = porte.1

' Aliasi za bitove portD
symbol Pumpa5 = portd.7
symbol Pumpa6 = portd.6
symbol Pumpa7 = portd.5
symbol Pumpa8 = portd.4
symbol Pumpa9 = portd.3
symbol Pumpa10 = portd.2
symbol Pumpa11 = portd.1
symbol Pumpa12 = portd.0

' Aliasi za bitove portC
symbol Pumpa13 = portc.7
symbol Pumpa14 = portc.6
symbol Pumpa15 = portc.5
symbol Pumpa16 = portc.4
symbol Pumpa17 = portc.3
symbol Pumpa18 = portc.2
symbol Pumpa19 = portc.1
symbol Pumpa20 = portc.0

' Definisanje ulaznih pinova
input taster

' Definisanje izlaznih pinova
output porta
output portc
output portd
output pobuda

goto program
'****************************************************************
'* Podprogrami                                                  *
'****************************************************************
Pocetak:
'    Cekanje na pritisak na taster
    while taster = 1
        pause 50
    wend
pobuda = 1
pause 1000
pobuda = 0
'    Ako je taster i dalje pritisnut, ceka se njegovo otpustanje
    while taster = 0
        pause 50
    wend
return

'****************************************************************
'* Glavna programska petlja                                     *
'****************************************************************
Program:
high pumpa1 : high pumpa2 : high pumpa3 : high pumpa4
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa4

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa5
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa5

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa6
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa6

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa7

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa8

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa9

high pumpa1 : high pumpa2 : high pumpa3 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa3 : low pumpa10

high pumpa1 : high pumpa2 : high pumpa4 : high pumpa5
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa4 : low pumpa5

high pumpa1 : high pumpa2 : high pumpa4 : high pumpa6
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa4 : low pumpa6

high pumpa1 : high pumpa2 : high pumpa4 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa4 : low pumpa7

high pumpa1 : high pumpa2 : high pumpa4 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa4 : low pumpa8

high pumpa1 : high pumpa2 : high pumpa4 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa4 : low pumpa9

high pumpa1 : high pumpa2 : high pumpa4 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa4 : low pumpa10

high pumpa1 : high pumpa2 : high pumpa5 : high pumpa6
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa5 : low pumpa6

high pumpa1 : high pumpa2 : high pumpa5 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa5 : low pumpa7

high pumpa1 : high pumpa2 : high pumpa5 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa5 : low pumpa8

high pumpa1 : high pumpa2 : high pumpa5 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa5 : low pumpa9

high pumpa1 : high pumpa2 : high pumpa5 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa5 : low pumpa10

high pumpa1 : high pumpa2 : high pumpa6 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa6 : low pumpa7

high pumpa1 : high pumpa2 : high pumpa6 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa6 : low pumpa8

high pumpa1 : high pumpa2 : high pumpa6 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa6 : low pumpa9

high pumpa1 : high pumpa2 : high pumpa6 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa6 : low pumpa10

high pumpa1 : high pumpa2 : high pumpa7 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa7 : low pumpa8

high pumpa1 : high pumpa2 : high pumpa7 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa7 : low pumpa9

high pumpa1 : high pumpa2 : high pumpa7 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa7 : low pumpa10

high pumpa1 : high pumpa2 : high pumpa8 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa8 : low pumpa9

high pumpa1 : high pumpa2 : high pumpa8 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa8 : low pumpa10

high pumpa1 : high pumpa2 : high pumpa9 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa2 : low pumpa9 : low pumpa10

high pumpa1 : high pumpa3 : high pumpa4 : high pumpa5
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa4 : low pumpa5

high pumpa1 : high pumpa3 : high pumpa4 : high pumpa6
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa4 : low pumpa6

high pumpa1 : high pumpa3 : high pumpa4 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa4 : low pumpa7

high pumpa1 : high pumpa3 : high pumpa4 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa4 : low pumpa8

high pumpa1 : high pumpa3 : high pumpa4 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa4 : low pumpa9

high pumpa1 : high pumpa3 : high pumpa4 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa4 : low pumpa10

high pumpa1 : high pumpa3 : high pumpa5 : high pumpa6
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa5 : low pumpa6

high pumpa1 : high pumpa3 : high pumpa5 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa5 : low pumpa7

high pumpa1 : high pumpa3 : high pumpa5 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa5 : low pumpa8

high pumpa1 : high pumpa3 : high pumpa5 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa5 : low pumpa9

high pumpa1 : high pumpa3 : high pumpa5 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa5 : low pumpa10

high pumpa1 : high pumpa3 : high pumpa6 : high pumpa7
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa6 : low pumpa7

high pumpa1 : high pumpa3 : high pumpa6 : high pumpa8
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa6 : low pumpa8

high pumpa1 : high pumpa3 : high pumpa6 : high pumpa9
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa6 : low pumpa9

high pumpa1 : high pumpa3 : high pumpa6 : high pumpa10
gosub pocetak
low pumpa1 :low pumpa3 : low pumpa6 : low pumpa10