dos - 如何修复此 BASIC 编译错误?

标签 dos basic

我在编译用 BASIC 编写的程序时遇到问题。这是我制作的一个 DOS 模拟器,试图看看是否可以完全用 BASIC 编写操作系统。每次我尝试编译时,我都会收到以下消息:

!SYNTAX ERROR IN LINE 15, COLUMN 50
 UNEXPECTED E
 EXPECTING : OR END OF LINE

我需要改变什么来解决这个问题?

10 PRINT 
11 PRINT "Starting..."
12 PRINT 
13 PRINT 
14 INPUT "Type the location of the Command Interpretter:"; I$
15 IF I$ = "C:\WINDOWS\COMMAND.COM" THEN GOTO 14 ELSE GOTO 13
16 INPUT "C:\>"; D$
17 IF D$ = "FORMAT" GOTO 25
18 IF D$ = "FDISK" GOTO 47
19 IF D$ = "HELP" GOTO 16
20 IF D$ = "DIR" GOTO 16
21 IF D$ = "MKDIR" GOTO 16
22 IF D$ = "WIN" GOTO 16
23 IF D$ = "CD" GOTO 16
24 IF D$ = "DEL" GOTO 16
25 PRINT "WARNING, ALL DATA ON REMOVABLE DISK"
27 PRINT "DRIVE A: WILL BE LOST!"
28 INPUT "Proceed with Format (Y/N)"; F$
29 IF F$ = "Y" THEN GOTO 28
30 IF F$ = "N" THEN GOTO 16
31 PRINT 
32 PRINT 
33 PRINT 
34 PRINT "Fotmatting 1.44MB"
35 PRINT "Format complete."
36 PRINT "Writing out file allocation table"
37 PRINT "Complete."
38 PRINT "Calculating free space (this may take several minutes)...................."
39 PRINT "Complete."
40 PRINT 
41 INPUT "Volume Label (11 charchters, ENTER for none)"
42 PRINT 
43 PRINT "              1,440MB total disk space"
44 PRINT "              1,440MB available on disk"
45 PRINT 
46 PRINT "                       512 bytes in each allocation unit."
47 PRINT "                  32,624 allocation units available on disk."
48 PRINT "Volume Serial Number is 326A-1312"
49 GOTO 16
50 PRINT "Incorrect DOS Version"
51 PRINT 
52 GOTO 16

我使用 Vintage BASIC 1.0.1 作为编译器。有人知道发生了什么事吗? Windows NT

最佳答案

我认为 vintage basic 中没有 ELSE 关键字,这就是您收到意外“E” 错误的原因。

我假设老式BASIC非结构化BASIC,您可以引用维基百科文章作为示例: http://en.wikipedia.org/wiki/BASIC_programming_language

此外,26 和 27 的行号有一些重复,这解释了其他错误。

关于dos - 如何修复此 BASIC 编译错误?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/3302512/

相关文章:

有人可以解释这个函数指针语法吗?

command-line-arguments - Findstr -- 排除文件类型 -- 仅搜索 ascii

function - Commodore 64 BASIC 中的多行功能

basic - 如何在 BASIC V2 中处理 'manipulate' 字符串?

linux - PureBasic - 我如何模拟按下 F1 或 F2 键盘按钮?

dos - DOS 中的递归目录列表

dos - 批处理文件中的昨天日期

visual-studio-2015 - 如何使用 Visual Basic 从 url 文件获取文本数据

syntax - 未知的 GW-BASIC 函数/语法 : Q(var) = var

linux - 在 Perl 中添加默认系统换行符