mirror of
https://github.com/filebrowser/filebrowser.git
synced 2025-05-10 04:02:57 +00:00
0afb9e732c
Former-commit-id: bdede6ed1b6f578f2ef046c338caf02d0b29d453 [formerly 7187de361b53e9c8ec121df379b762f2db736ea2] Former-commit-id: 447d58460fbbfd05ffe08428a1288e392637561d
24 lines
401 B
Plaintext
24 lines
401 B
Plaintext
## ## () ## ^^ ## ## ## ##
|
|
## H1 C2 S1 <> S2 H2 DN ##
|
|
## %U <> %D *2 %L IZ .. ##
|
|
## ## ## .. ## DN *3 ## ##
|
|
## ## ## %R C1 IZ () ## ##
|
|
## ## ## ## >/ *1
|
|
## () *3 *1 %L ()
|
|
|
|
|
|
// Set divisor and dividend
|
|
S1-> = 9
|
|
S2-> = 24
|
|
|
|
// Holding cells
|
|
H1-> IF *1 THEN %R ELSE %N
|
|
H2-> IF *2 THEN %R ELSE %N
|
|
|
|
// Arithmetic
|
|
DN-> -= 1
|
|
IZ-> IF <= 0 THEN %D ELSE %U
|
|
|
|
C1-> IF *3 THEN %D ELSE %R
|
|
C2-> IF *3 THEN %U ELSE %D
|