rem "APcanadusFooter"
IFelem(isGenug)
#Yes
##Mess=Param(Y)
###Yes
####Goto Metka:Final
##Mess=Param(YN)
###Yes
####Goto Metka:FinalYN
##Goto Metka:Awost
Exit
Metka:Awost
ZonaSD(------)
Metka:Final
ZonaSD(.....+)
SetFaza(Final)
Exit
Metka:FinalYN
ZonaSD(---+++)
SetFaza(Low)
Exit
