Készfüggöny

eljárás függöny :sor :oszlop :méret
ism :oszlop [név 0 "számolj
tl tv! 5 j 90 e :méret*4 h :méret*2 b 90 tv! 1
ism :sor [növel "számolj ha maradék :számolj 2 =1 [tl j 90 h :méret/2 b 90 tsz! "fekete pontméret :méret tsz! "piros pontméret :méret-2 tsz! "fekete pontméret :méret/2 tsz! "fehér pontméret :méret/2-2 tf b 90 h :méret/2 j 90 tl tsz! "fekete tl h :méret*2] ha maradék :számolj 2 =0 [ tf j 90 e :méret/2 b 90 tl tsz! "fekete pontméret :méret tsz! "piros pontméret :méret-2 tsz! "fekete pontméret :méret/2 tsz! "fehér pontméret :méret/2-2 tf j 90 h :méret/2 b 90 tl tsz! "fekete tl h :méret*2]]
ism :sor [e :méret*2]]
vége

Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License