diff options
Diffstat (limited to 'components/script/dom/bindings/codegen/ply/example/BASIC/gcd.bas')
| -rw-r--r-- | components/script/dom/bindings/codegen/ply/example/BASIC/gcd.bas | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/components/script/dom/bindings/codegen/ply/example/BASIC/gcd.bas b/components/script/dom/bindings/codegen/ply/example/BASIC/gcd.bas deleted file mode 100644 index d0b77460894..00000000000 --- a/components/script/dom/bindings/codegen/ply/example/BASIC/gcd.bas +++ /dev/null @@ -1,22 +0,0 @@ -10 PRINT "A","B","C","GCD" -20 READ A,B,C -30 LET X = A -40 LET Y = B -50 GOSUB 200 -60 LET X = G -70 LET Y = C -80 GOSUB 200 -90 PRINT A, B, C, G -100 GOTO 20 -110 DATA 60, 90, 120 -120 DATA 38456, 64872, 98765 -130 DATA 32, 384, 72 -200 LET Q = INT(X/Y) -210 LET R = X - Q*Y -220 IF R = 0 THEN 300 -230 LET X = Y -240 LET Y = R -250 GOTO 200 -300 LET G = Y -310 RETURN -999 END |