%%HP: T(1)A(D)F(,);
«
  WHILE '1==1'
  REPEAT
"V=S/T  S=T*V  T=S/V"
1 DISP
"SVETLOBNI CUREK-SNOP†"
2 DISP
"ZRCALO-NAVIDEZNA"
3 DISP
"ŽZBIRALNAŤ ŤRAZPRSILNŽ"
4 DISP
"f-GORISC.RAZD F-GORIS."
5 DISP
"S.ZBIRALNE=OBRNJ.,PRA."
6 DISP
"OKO=POMANJSANA,OBRNJEN"
7 DISP
  END
»