Runtime evaluation: Difference between revisions

Content added Content deleted
(→‎GW-BASIC: corrected section name; added qbasic markup)
Line 102: Line 102:
There is no sandbox functionality in Bata BASIC or SAM BASIC.
There is no sandbox functionality in Bata BASIC or SAM BASIC.


=== GWBASIC ===
===GW-BASIC===
10 LINE INPUT "Type an expression: ",A$
<lang qbasic>10 LINE INPUT "Type an expression: ",A$
20 OPEN "CHAIN.TMP" FOR OUTPUT AS #1
20 OPEN "CHAIN.TMP" FOR OUTPUT AS #1
30 PRINT #1, "70 LET Y=("+A$+")"
30 PRINT #1, "70 LET Y=("+A$+")"
40 CLOSE #1
40 CLOSE #1
50 CHAIN MERGE "CHAIN.TMP",60,ALL
50 CHAIN MERGE "CHAIN.TMP",60,ALL
60 FOR X=0 TO 5
60 FOR X=0 TO 5
70 REM
70 REM
80 PRINT X,Y
80 PRINT X,Y
90 NEXT X
90 NEXT X
100 GOTO 10
100 GOTO 10</lang>


=={{header|Common Lisp}}==
=={{header|Common Lisp}}==