Praznjenje komore za zagrijavanje
math
0|0
7
Eprazni3
Tkazan[3].knivo	Eif((vrijemezagrijavanja=10)and(kazan[3].knivo>0),kazan[3].knivo-25)
Tpakuj	Eif((vrijemezagrijavanja=10)and(kazan[3].knivo>0), pakuj+25)
Tpakuj	Eif((kazan[3].knivo=0),0)
T	E
Tventil3	Eif(kazan[3].knivo=0, 0)
Tvrijemebacve	Eif(kazan[3].knivo=0, not vrijemebacve)
T	Ewait(3000)
