Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- OPEN "program.txt" FOR INPUT AS #1
- OPEN "compile.txt" FOR OUTPUT AS #2
- DO WHILE NOT EOF(1)
- INPUT #1, line$
- IF LEFT$(line$, 7) = "include" THEN
- PRINT "Read command: "; line$
- PRINT "Performing Action..."
- include$ = MID$(line$, 9, LEN(line$))
- PRINT #2, "'$include: '" + include$ + "'"
- PRINT "Done..."
- ELSEIF LEFT$(line$, 7) = "display" THEN
- PRINT "Read command: "; line$
- PRINT "Performing Action..."
- PRINT #2, "PRINT " + MID$(line$, 9, LEN(line$))
- ELSE
- PRINT "Some other stuff found..."
- PRINT "Doing some processing..."
- PRINT #2, line$
- END IF
- LOOP
- CLOSE #1
- SHELL "qb64 -x compile.txt"
- SHELL "compile.exe"
Advertisement
Add Comment
Please, Sign In to add comment