SC4 .
, , . . - . .
. , .
;
;
;
.
ENTRY.
, - , - , .
. . ,
/B1:5~/1:5~
. ( \ \ - ). ~ . - ", , .
,
/Blank,al:a2
:
"/B1:2~.
. , , :
1:1 ;
1;
>0, b1 *0.25, 1 *.\*0.25.
:
| \ | /Bal:cl | - 1:1 | |
| {Getnumber "x=",al} | 1 | ||
| {if al>0} {Branch \b} | , \b | ||
| (Branch \c} | \ | ||
| \b | {let blal *0.25} | b1=1*0.25 | |
| \ | {letclal*al*0.25} | 1=*1*0.25 | |
\, \b, \ . \ b2:b5, \b b7, \ b9. ENTRY. , LEARN DIRECT. LEARN LEARN ,
//Macro,Learn, .
Alt+F4. ( - .) , , . DIRECT ( -Alt+F6, - ) ENTRY LEARN.
|
|
|
\ . : Alt+A \, Alt+B - \b ..
( ) ,
- /Name, Labels, Right, A.
, .
/Sav, ,11.
, ASCII.
//Macro,Write.
.xqt . , , . {Macro}. SC
//.ut..
SC
//Macro,Read.
