示例工程【免费下载链接】basic-computer-gamesAn updated version of the classic Basic Computer Games book, with well-written examples in a variety of common MEMORY SAFE, SCRIPTING programming languages. See https://coding-horror.github.io/basic-computer-games/项目地址https://gitcode.com/gh_mirrors/ba/basic-computer-games点击查看免费下载这篇技术指南围绕 00_Alternate_Languages/44_Hangman/MiniScript/ 目录下的 README.md 与 hangman.ms 展开完整讲解这款源自 20 世纪 70 年代《Basic Computer Games》的经典猜词游戏在MiniScript语言下如何在「命令行环境」与「Mini Micro 图形化环境」两种方式中安装运行并结合源码逐段剖析其词库、绞刑架绘制与游戏主循环的实现原理。读完本文你将掌握 MiniScript 程序的两类运行方式、本仓库 MiniScript 移植版的完整代码结构以及它与原版 BASIC 实现的对应关系可直接上手运行并二次修改词库。一、移植背景从 Vintage BASIC 到 MiniScriptHangman刽子手是《Basic Computer Games》书中的经典文字猜谜游戏计算机秘密挑选一个英文单词玩家逐字母猜测每猜错一次就向绞刑架上添一笔累计 10 次错误后小人被吊死游戏结束。在 00_Alternate_Languages/44_Hangman/ 目录下这一经典玩法以多种非 10 大主流语言的形式重新实现该目录专门收录不在约定 10 种语言之列、但内存安全或脚本化的补充移植用于教学目的详见 00_Alternate_Languages/README.md。其中 MiniScript 子目录即本次主题它的 README.md 明确说明该移植的原始代码下载自 Vintage Basic 站点随后被转换为MiniScript语言。MiniScript 是一门轻量、可嵌入的脚本语言既可作为命令行解释器运行.ms文件也可在名为Mini Micro的复古风格虚拟主机中运行。原版 BASIC 程序位于 00_Alternate_Languages/44_Hangman/hangman.bas全文约 80 行是理解本次 MiniScript 移植逻辑的最佳对照物详见下文第五节。二、两种运行环境与安装启动步骤README 核心操作这是 README.md 给出的完整运行指引也是本移植版最直接的上手手册。2.1 方式一命令行 MiniScriptCommand-Line MiniScript适合纯文本终端场景步骤为下载并安装命令行版 MiniScript前往 MiniScript 官网的 Command-Line 下载页面选择与你的操作系统Windows / macOS / Linux匹配的版本并完成安装。运行程序在终端进入包含hangman.ms的目录执行miniscript hangman.ms即可看到标题横幅 Hangman 与 Creative Computing Morristown, New Jersey对应 hangman.ms随后进入猜词循环。命令名miniscript即命令行解释器可执行文件的默认名称。2.2 方式二Mini Micro虚拟复古主机Mini Micro 是 MiniScript 官方提供的图形化运行环境带有虚拟磁盘与命令提示符步骤为下载并启动 Mini Micro从官网的 Mini Micro 页面获取对应系统的版本解压后启动。挂载游戏目录点击界面顶部的磁盘槽位top disk slot选择Mount Folder...在弹出的文件选择器中选中包含hangman.ms与本文 README 的目录即仓库中的 00_Alternate_Languages/44_Hangman/MiniScript/ 文件夹。加载并运行在 Mini Micro 的命令提示符中依次输入load hangman runload会从已挂载的磁盘目录中按文件名不区分.ms后缀加载脚本run启动游戏。相比命令行方式Mini Micro 还额外支持直接从系统词库文件读取单词详见第四节末尾的扩展说明。三、源码逐段解析hangman.ms 的核心实现hangman.ms 全文件共 127 行结构清晰先打印标题再初始化词库随后定义两个核心函数addToPic与doOneGame最后是再来一局主循环。下面按执行顺序展开。3.1 词库初始化与随机洗牌words [] words [gum,sin,for,cry,lug,bye,fly] words [ugly,each,from,work,talk,with,self] words [pizza,thing,feign,fiend,elbow,fault,dirty] words [budget,spirit,quaint,maiden,escort,pickax] words [example,tension,quinine,kidney,replica,sleeper] words [triangle,kangaroo,mahogany,sergeant,sequence] words [moustache,dangerous,scientist,different,quiescent] words [magistrate,erroneously,loudspeaker,phytotoxic] words [matrimonial,parasympathomimetic,thigmotropism]见 hangman.ms词库共 49 个单词按长度从 3 个字母gum、sin…到超长单词parasympathomimetic、thigmotropism分级排列与原版 BASIC 的DATA语句hangman.bas逐条对应。MiniScript 用直接向列表追加一组元素比 BASIC 的READ循环更简洁。随后一行words.shufflehangman.msshuffle是 MiniScript 列表的内置方法将全部单词随机打乱。这样游戏出题顺序完全随机且不需要像 BASIC 版那样用U(Q)1数组记录哪些词已经用过hangman.bas——MiniScript 版直接在游戏过程中用words.pull从列表末尾取出并移除单词天然避免重复。3.2 addToPic10 步渐进绘制绞刑架小人addToPic function(guessCount) if guessCount 1 then print First, we draw a head ps[3][6]-; ps[3][7]-; ps[3][8]-; ps[4][5](; ps[4][6]. ps[4][8].; ps[4][9]); ps[5][6]-; ps[5][7]-; ps[5][8]- else if guessCount 2 then print Now we draw a body. for i in range(6, 9); ps[i][7]x; end for else if guessCount 3 then print Next we draw an arm. for i in range(4, 7); ps[i][i-1]\; end for else if guessCount 4 then print This time its the other arm. ps[4][11]/; ps[5][10]/; ps[6][9]/; ps[7][8]/ else if guessCount 5 then print Now, lets draw the right leg. ps[10][6]/; ps[11][5]/ else if guessCount 6 then print This time we draw the left leg. ps[10][8]\; ps[11][9]\ else if guessCount 7 then print Now we put up a hand. ps[3][11]\ else if guessCount 8 then print Next the other hand. ps[3][3]/ else if guessCount 9 then print Now we draw one foot ps[12][10]\; ps[12][11]- else if guessCount 10 then print Heres the other foot -- youre hung!! ps[12][3]-; ps[12][4]/ end if for i in range(1, 12) print ps[i].join() end for print end function见 hangman.ms该函数以猜错次数guessCount1~10为输入每错一次向 12×12 的字符画布ps中写入一笔并打印一句旁白First, we draw a head、Now we draw a body. 等与原版 BASIC 第 415~460 行的输出完全一致。关键设计点画布模型ps是一个二维列表外层 13 行、内层 12 列通过ps[行][列] 字符直接赋值。这是对 BASIC 版DIM P$(12,12)字符串数组hangman.bas的忠实映射绘制顺序头第 1 错→ 身体第 2 错→ 左臂第 3 错→ 右臂第 4 错→ 右腿第 5 错→ 左腿第 6 错→ 左手第 7 错→ 右手第 8 错→ 左脚第 9 错→ 右脚第 10 错同时宣告 youre hung!!输出方式每次绘制后用ps[i].join()将每行字符数组拼接为字符串循环打印 1~12 行把当前完整画面刷新到终端。3.3 doOneGame单局游戏主逻辑doOneGame function usedLetters [] globals.ps [] for i in range(0, 12); ps.push [ ]*12; end for for i in range(1,12); ps[i][1] X; end for for i in range(1, 7); ps[1][i] X; end for; ps[2][7] X secretWord words.pull.upper //print (Secret word: secretWord ) visibleWord [-] * secretWord.len wrongGuesses 0 while true print Here are the letters you used: print usedLetters.join(,) print print visibleWord.join() print guess input(What is your guess? ).upper guess (guess )[0] if guess A or guess Z then continue if usedLetters.indexOf(guess) ! null then print You guessed that letter before! continue end if usedLetters.push guess for i in visibleWord.indexes if secretWord[i] guess then visibleWord[i] guess end for if visibleWord.indexOf(-) null then print You found the word! return true else if secretWord.indexOf(guess) ! null then print print visibleWord.join() print guess input(What is your guess for the word? ).upper if guess secretWord then print Right!! It took you usedLetters.len guesses! return true else print Wrong. Try another letter. end if print else print Sorry, that letter isnt in the word. wrongGuesses 1 addToPic wrongGuesses if wrongGuesses 9 then print Sorry, you lose. The word was secretWord return false end if end if end while end function见 hangman.msdoOneGame封装一局完整的游戏逐行解读如下局前状态初始化L60-L68清空usedLetters已猜字母列表重建globals.ps画布并填充空格再绘制固定不变的绞刑架骨架——左侧竖杆第 1 列X、顶部横杆第 1 行X与吊绳ps[2][7]这与 BASIC 版第 80~90 行的初始化逐字符对应。随后words.pull.upper从词库取出一个单词并转大写作为secretWordvisibleWord是等长的-占位数组wrongGuesses归零。第 66 行注释掉的调试语句//print (Secret word: ...)可取消注释以作弊查看答案。每轮猜测循环L69-L110先打印已用字母usedLetters.join(,)与当前猜测进度visibleWord.join()对应 BASIC 版第 170~200 行的输出input(What is your guess? )读取输入并转大写guess (guess )[0]巧妙地把任意输入截断为第一个字符即使玩家误敲了回车或输入整词也只取首字母输入校验if guess A or guess Z then continue过滤非字母字符usedLetters.indexOf(guess) ! null检测重复猜测重复时提示 You guessed that letter before! 并跳过本轮对应 BASIC 版第 220~240 行的查重逻辑更新揭示板遍历visibleWord.indexes凡是secretWord[i] guess的位置把占位符-替换为猜中的字母三种分支结果若visibleWord中已无-全部字母猜中打印 You found the word! 并return true若该字母确实存在于单词中但尚未全中BASIC 版特有的猜完整单词机会被保留程序打印当前进度追问What is your guess for the word?hangman.ms猜对则提示 Right!! It took you N guesses! 并获胜返回猜错则 Wrong. Try another letter. 继续否则字母不在词中wrongGuesses 1并调用addToPic绘制一笔一旦wrongGuesses 9即达到第 10 错打印 Sorry, you lose. The word was ... 并return false。3.4 顶层主循环再来一局与词库耗尽while true if not words then print You did all the words!! break end if won doOneGame if won then yn input(Want another word? ).upper else yn input(You missed that one. Do you want another word? ).upper end if if not yn or yn[0] ! Y then break end while print print Its been fun! Bye for now.见 hangman.ms主循环每次先检查words列表是否为空——因为words.pull会从列表中移除已用单词所以 49 个词全部猜完后打印 You did all the words!! 并结束对应 BASIC 版第 97 行的YOU DID ALL THE WORDS!!。否则调用doOneGame开始一局结束后根据胜负分别询问 Want another word? 或 You missed that one. Do you want another word?对应 BASIC 版第 370、610 行输入以Y开头yn[0] ! Y即再来一局否则打印 Its been fun! Bye for now. 退出。四、词库扩展如何更换或加载自定义单词本移植版的词库硬编码在 hangman.ms 的words列表中直接增删或修改列表元素即可定制词库。值得特别注意的是源码第 15~16 行的注释// Note: on Mini Micro, you could instead do: // words file.readLines(/sys/data/englishWords.txt)hangman.ms这提供了一个 Mini Micro 专属的进阶用法由于 Mini Micro 自带系统数据文件englishWords.txt只需把初始化代码替换为words file.readLines(/sys/data/englishWords.txt)即可从系统英文词库加载海量单词彻底摆脱内置 49 词的局限。这一用法依赖 Mini Micro 的文件系统 APIfile.readLines因此在纯命令行 MiniScript 环境下不可用——这也解释了为何它被保留为注释而不是默认代码。替换后建议保留words.shuffle的随机化调用。五、与原版 BASIC 的逐点对照MiniScript 移植版在玩法与输出上与原版 hangman.bas 保持高度一致可对照观察两门语言的表达差异功能点原版 BASIChangman.basMiniScript 移植hangman.ms词库定义DATA语句 READ按序号读取L100-L150, L71-L79字面量列表 words.shuffle随机洗牌L5-L18防重复出题U(Q)1数组记录已用序号L110-L115words.pull取出即移除L65画布声明DIM P$(12,12)二维字符串数组L30嵌套列表psglobals.ps声明为全局L61-L62猜错绘制ON M GOTO分支 逐格赋值L410-L570addToPic函数的else if分支L20-L52输入处理INPUT G$单字符L210input(...) 取首字符 字母范围校验L75-L77重复字母检测循环比对N$(I)L220-L240usedLetters.indexOf(guess)L78完整单词机会INPUT B$二次询问L330input(What is your guess for the word? )L93可以看出MiniScript 移植在保留原版玩法与全部提示文案的同时用列表内建方法shuffle、pull、indexOf、join和for/while结构化控制流消除了 BASIC 的GOTO跳转与ON M GOTO分支表可读性显著提升。同一游戏的另一份 C 语言移植00_Alternate_Languages/44_Hangman/C/main.c词库见 dictionary.txt也保留了相同的 10 笔绘制流程可作为跨语言对照的补充参考。六、小结本文完整覆盖了 MiniScript 版 Hangman 的 README 给出的两种运行方式命令行miniscript hangman.ms与 Mini Micro 的load hangmanrun并基于 hangman.ms 全量源码从词库初始化、10 步绞刑架绘制、单局猜测循环到再来一局主循环做了逐段解析同时给出了将其扩展为 Mini Micro 系统词库englishWords.txt的替换方法。这一移植版完整继承了《Basic Computer Games》原版 Hangman 的玩法、文案与绘制流程是学习 MiniScript 列表操作、字符串处理与终端字符画的良好示例也便于与同目录的 BASIC、C 版本进行跨语言对比阅读。赞分享示例工程【免费下载链接】basic-computer-gamesAn updated version of the classic Basic Computer Games book, with well-written examples in a variety of common MEMORY SAFE, SCRIPTING programming languages. See https://coding-horror.github.io/basic-computer-games/项目地址https://gitcode.com/gh_mirrors/ba/basic-computer-games点击查看免费下载相关推荐用 MiniScript 运行经典篮球模拟游戏《Basketball》命令行与 Mini Micro 双运行指南及源码解析用 MiniScript 运行经典篮球模拟游戏《Basketball》命令行与 Mini Micro 双运行指南及源码解析 导读 本文围绕 00_Altern示例工程Teable 如何修改 Prisma 数据库模型并创建、适用 migrationTeable 如何修改 Prisma 数据库模型并创建、适用 migration Teable 使用 Prisma 作为 ORM 管理数据库。当你需要在主数据示例工程basic-computer-games 之 Fur Trader MiniScript 移植版命令行与 Mini Micro 双环境运行全指南basic computer games 之 Fur Trader MiniScript 移植版命令行与 Mini Micro 双环境运行全指南 导读 本文围示例工程创作声明：本文部分内容由AI辅助生成（AIGC），仅供参考 经典 Hangman 游戏的 MiniScript 移植：命令行与 Mini Micro 双环境运行及源码解析
示例工程【免费下载链接】basic-computer-gamesAn updated version of the classic Basic Computer Games book, with well-written examples in a variety of common MEMORY SAFE, SCRIPTING programming languages. See https://coding-horror.github.io/basic-computer-games/项目地址https://gitcode.com/gh_mirrors/ba/basic-computer-games点击查看免费下载这篇技术指南围绕 00_Alternate_Languages/44_Hangman/MiniScript/ 目录下的 README.md 与 hangman.ms 展开完整讲解这款源自 20 世纪 70 年代《Basic Computer Games》的经典猜词游戏在MiniScript语言下如何在「命令行环境」与「Mini Micro 图形化环境」两种方式中安装运行并结合源码逐段剖析其词库、绞刑架绘制与游戏主循环的实现原理。读完本文你将掌握 MiniScript 程序的两类运行方式、本仓库 MiniScript 移植版的完整代码结构以及它与原版 BASIC 实现的对应关系可直接上手运行并二次修改词库。一、移植背景从 Vintage BASIC 到 MiniScriptHangman刽子手是《Basic Computer Games》书中的经典文字猜谜游戏计算机秘密挑选一个英文单词玩家逐字母猜测每猜错一次就向绞刑架上添一笔累计 10 次错误后小人被吊死游戏结束。在 00_Alternate_Languages/44_Hangman/ 目录下这一经典玩法以多种非 10 大主流语言的形式重新实现该目录专门收录不在约定 10 种语言之列、但内存安全或脚本化的补充移植用于教学目的详见 00_Alternate_Languages/README.md。其中 MiniScript 子目录即本次主题它的 README.md 明确说明该移植的原始代码下载自 Vintage Basic 站点随后被转换为MiniScript语言。MiniScript 是一门轻量、可嵌入的脚本语言既可作为命令行解释器运行.ms文件也可在名为Mini Micro的复古风格虚拟主机中运行。原版 BASIC 程序位于 00_Alternate_Languages/44_Hangman/hangman.bas全文约 80 行是理解本次 MiniScript 移植逻辑的最佳对照物详见下文第五节。二、两种运行环境与安装启动步骤README 核心操作这是 README.md 给出的完整运行指引也是本移植版最直接的上手手册。2.1 方式一命令行 MiniScriptCommand-Line MiniScript适合纯文本终端场景步骤为下载并安装命令行版 MiniScript前往 MiniScript 官网的 Command-Line 下载页面选择与你的操作系统Windows / macOS / Linux匹配的版本并完成安装。运行程序在终端进入包含hangman.ms的目录执行miniscript hangman.ms即可看到标题横幅 Hangman 与 Creative Computing Morristown, New Jersey对应 hangman.ms随后进入猜词循环。命令名miniscript即命令行解释器可执行文件的默认名称。2.2 方式二Mini Micro虚拟复古主机Mini Micro 是 MiniScript 官方提供的图形化运行环境带有虚拟磁盘与命令提示符步骤为下载并启动 Mini Micro从官网的 Mini Micro 页面获取对应系统的版本解压后启动。挂载游戏目录点击界面顶部的磁盘槽位top disk slot选择Mount Folder...在弹出的文件选择器中选中包含hangman.ms与本文 README 的目录即仓库中的 00_Alternate_Languages/44_Hangman/MiniScript/ 文件夹。加载并运行在 Mini Micro 的命令提示符中依次输入load hangman runload会从已挂载的磁盘目录中按文件名不区分.ms后缀加载脚本run启动游戏。相比命令行方式Mini Micro 还额外支持直接从系统词库文件读取单词详见第四节末尾的扩展说明。三、源码逐段解析hangman.ms 的核心实现hangman.ms 全文件共 127 行结构清晰先打印标题再初始化词库随后定义两个核心函数addToPic与doOneGame最后是再来一局主循环。下面按执行顺序展开。3.1 词库初始化与随机洗牌words [] words [gum,sin,for,cry,lug,bye,fly] words [ugly,each,from,work,talk,with,self] words [pizza,thing,feign,fiend,elbow,fault,dirty] words [budget,spirit,quaint,maiden,escort,pickax] words [example,tension,quinine,kidney,replica,sleeper] words [triangle,kangaroo,mahogany,sergeant,sequence] words [moustache,dangerous,scientist,different,quiescent] words [magistrate,erroneously,loudspeaker,phytotoxic] words [matrimonial,parasympathomimetic,thigmotropism]见 hangman.ms词库共 49 个单词按长度从 3 个字母gum、sin…到超长单词parasympathomimetic、thigmotropism分级排列与原版 BASIC 的DATA语句hangman.bas逐条对应。MiniScript 用直接向列表追加一组元素比 BASIC 的READ循环更简洁。随后一行words.shufflehangman.msshuffle是 MiniScript 列表的内置方法将全部单词随机打乱。这样游戏出题顺序完全随机且不需要像 BASIC 版那样用U(Q)1数组记录哪些词已经用过hangman.bas——MiniScript 版直接在游戏过程中用words.pull从列表末尾取出并移除单词天然避免重复。3.2 addToPic10 步渐进绘制绞刑架小人addToPic function(guessCount) if guessCount 1 then print First, we draw a head ps[3][6]-; ps[3][7]-; ps[3][8]-; ps[4][5](; ps[4][6]. ps[4][8].; ps[4][9]); ps[5][6]-; ps[5][7]-; ps[5][8]- else if guessCount 2 then print Now we draw a body. for i in range(6, 9); ps[i][7]x; end for else if guessCount 3 then print Next we draw an arm. for i in range(4, 7); ps[i][i-1]\; end for else if guessCount 4 then print This time its the other arm. ps[4][11]/; ps[5][10]/; ps[6][9]/; ps[7][8]/ else if guessCount 5 then print Now, lets draw the right leg. ps[10][6]/; ps[11][5]/ else if guessCount 6 then print This time we draw the left leg. ps[10][8]\; ps[11][9]\ else if guessCount 7 then print Now we put up a hand. ps[3][11]\ else if guessCount 8 then print Next the other hand. ps[3][3]/ else if guessCount 9 then print Now we draw one foot ps[12][10]\; ps[12][11]- else if guessCount 10 then print Heres the other foot -- youre hung!! ps[12][3]-; ps[12][4]/ end if for i in range(1, 12) print ps[i].join() end for print end function见 hangman.ms该函数以猜错次数guessCount1~10为输入每错一次向 12×12 的字符画布ps中写入一笔并打印一句旁白First, we draw a head、Now we draw a body. 等与原版 BASIC 第 415~460 行的输出完全一致。关键设计点画布模型ps是一个二维列表外层 13 行、内层 12 列通过ps[行][列] 字符直接赋值。这是对 BASIC 版DIM P$(12,12)字符串数组hangman.bas的忠实映射绘制顺序头第 1 错→ 身体第 2 错→ 左臂第 3 错→ 右臂第 4 错→ 右腿第 5 错→ 左腿第 6 错→ 左手第 7 错→ 右手第 8 错→ 左脚第 9 错→ 右脚第 10 错同时宣告 youre hung!!输出方式每次绘制后用ps[i].join()将每行字符数组拼接为字符串循环打印 1~12 行把当前完整画面刷新到终端。3.3 doOneGame单局游戏主逻辑doOneGame function usedLetters [] globals.ps [] for i in range(0, 12); ps.push [ ]*12; end for for i in range(1,12); ps[i][1] X; end for for i in range(1, 7); ps[1][i] X; end for; ps[2][7] X secretWord words.pull.upper //print (Secret word: secretWord ) visibleWord [-] * secretWord.len wrongGuesses 0 while true print Here are the letters you used: print usedLetters.join(,) print print visibleWord.join() print guess input(What is your guess? ).upper guess (guess )[0] if guess A or guess Z then continue if usedLetters.indexOf(guess) ! null then print You guessed that letter before! continue end if usedLetters.push guess for i in visibleWord.indexes if secretWord[i] guess then visibleWord[i] guess end for if visibleWord.indexOf(-) null then print You found the word! return true else if secretWord.indexOf(guess) ! null then print print visibleWord.join() print guess input(What is your guess for the word? ).upper if guess secretWord then print Right!! It took you usedLetters.len guesses! return true else print Wrong. Try another letter. end if print else print Sorry, that letter isnt in the word. wrongGuesses 1 addToPic wrongGuesses if wrongGuesses 9 then print Sorry, you lose. The word was secretWord return false end if end if end while end function见 hangman.msdoOneGame封装一局完整的游戏逐行解读如下局前状态初始化L60-L68清空usedLetters已猜字母列表重建globals.ps画布并填充空格再绘制固定不变的绞刑架骨架——左侧竖杆第 1 列X、顶部横杆第 1 行X与吊绳ps[2][7]这与 BASIC 版第 80~90 行的初始化逐字符对应。随后words.pull.upper从词库取出一个单词并转大写作为secretWordvisibleWord是等长的-占位数组wrongGuesses归零。第 66 行注释掉的调试语句//print (Secret word: ...)可取消注释以作弊查看答案。每轮猜测循环L69-L110先打印已用字母usedLetters.join(,)与当前猜测进度visibleWord.join()对应 BASIC 版第 170~200 行的输出input(What is your guess? )读取输入并转大写guess (guess )[0]巧妙地把任意输入截断为第一个字符即使玩家误敲了回车或输入整词也只取首字母输入校验if guess A or guess Z then continue过滤非字母字符usedLetters.indexOf(guess) ! null检测重复猜测重复时提示 You guessed that letter before! 并跳过本轮对应 BASIC 版第 220~240 行的查重逻辑更新揭示板遍历visibleWord.indexes凡是secretWord[i] guess的位置把占位符-替换为猜中的字母三种分支结果若visibleWord中已无-全部字母猜中打印 You found the word! 并return true若该字母确实存在于单词中但尚未全中BASIC 版特有的猜完整单词机会被保留程序打印当前进度追问What is your guess for the word?hangman.ms猜对则提示 Right!! It took you N guesses! 并获胜返回猜错则 Wrong. Try another letter. 继续否则字母不在词中wrongGuesses 1并调用addToPic绘制一笔一旦wrongGuesses 9即达到第 10 错打印 Sorry, you lose. The word was ... 并return false。3.4 顶层主循环再来一局与词库耗尽while true if not words then print You did all the words!! break end if won doOneGame if won then yn input(Want another word? ).upper else yn input(You missed that one. Do you want another word? ).upper end if if not yn or yn[0] ! Y then break end while print print Its been fun! Bye for now.见 hangman.ms主循环每次先检查words列表是否为空——因为words.pull会从列表中移除已用单词所以 49 个词全部猜完后打印 You did all the words!! 并结束对应 BASIC 版第 97 行的YOU DID ALL THE WORDS!!。否则调用doOneGame开始一局结束后根据胜负分别询问 Want another word? 或 You missed that one. Do you want another word?对应 BASIC 版第 370、610 行输入以Y开头yn[0] ! Y即再来一局否则打印 Its been fun! Bye for now. 退出。四、词库扩展如何更换或加载自定义单词本移植版的词库硬编码在 hangman.ms 的words列表中直接增删或修改列表元素即可定制词库。值得特别注意的是源码第 15~16 行的注释// Note: on Mini Micro, you could instead do: // words file.readLines(/sys/data/englishWords.txt)hangman.ms这提供了一个 Mini Micro 专属的进阶用法由于 Mini Micro 自带系统数据文件englishWords.txt只需把初始化代码替换为words file.readLines(/sys/data/englishWords.txt)即可从系统英文词库加载海量单词彻底摆脱内置 49 词的局限。这一用法依赖 Mini Micro 的文件系统 APIfile.readLines因此在纯命令行 MiniScript 环境下不可用——这也解释了为何它被保留为注释而不是默认代码。替换后建议保留words.shuffle的随机化调用。五、与原版 BASIC 的逐点对照MiniScript 移植版在玩法与输出上与原版 hangman.bas 保持高度一致可对照观察两门语言的表达差异功能点原版 BASIChangman.basMiniScript 移植hangman.ms词库定义DATA语句 READ按序号读取L100-L150, L71-L79字面量列表 words.shuffle随机洗牌L5-L18防重复出题U(Q)1数组记录已用序号L110-L115words.pull取出即移除L65画布声明DIM P$(12,12)二维字符串数组L30嵌套列表psglobals.ps声明为全局L61-L62猜错绘制ON M GOTO分支 逐格赋值L410-L570addToPic函数的else if分支L20-L52输入处理INPUT G$单字符L210input(...) 取首字符 字母范围校验L75-L77重复字母检测循环比对N$(I)L220-L240usedLetters.indexOf(guess)L78完整单词机会INPUT B$二次询问L330input(What is your guess for the word? )L93可以看出MiniScript 移植在保留原版玩法与全部提示文案的同时用列表内建方法shuffle、pull、indexOf、join和for/while结构化控制流消除了 BASIC 的GOTO跳转与ON M GOTO分支表可读性显著提升。同一游戏的另一份 C 语言移植00_Alternate_Languages/44_Hangman/C/main.c词库见 dictionary.txt也保留了相同的 10 笔绘制流程可作为跨语言对照的补充参考。六、小结本文完整覆盖了 MiniScript 版 Hangman 的 README 给出的两种运行方式命令行miniscript hangman.ms与 Mini Micro 的load hangmanrun并基于 hangman.ms 全量源码从词库初始化、10 步绞刑架绘制、单局猜测循环到再来一局主循环做了逐段解析同时给出了将其扩展为 Mini Micro 系统词库englishWords.txt的替换方法。这一移植版完整继承了《Basic Computer Games》原版 Hangman 的玩法、文案与绘制流程是学习 MiniScript 列表操作、字符串处理与终端字符画的良好示例也便于与同目录的 BASIC、C 版本进行跨语言对比阅读。赞分享示例工程【免费下载链接】basic-computer-gamesAn updated version of the classic Basic Computer Games book, with well-written examples in a variety of common MEMORY SAFE, SCRIPTING programming languages. See https://coding-horror.github.io/basic-computer-games/项目地址https://gitcode.com/gh_mirrors/ba/basic-computer-games点击查看免费下载相关推荐用 MiniScript 运行经典篮球模拟游戏《Basketball》命令行与 Mini Micro 双运行指南及源码解析用 MiniScript 运行经典篮球模拟游戏《Basketball》命令行与 Mini Micro 双运行指南及源码解析 导读 本文围绕 00_Altern示例工程Teable 如何修改 Prisma 数据库模型并创建、适用 migrationTeable 如何修改 Prisma 数据库模型并创建、适用 migration Teable 使用 Prisma 作为 ORM 管理数据库。当你需要在主数据示例工程basic-computer-games 之 Fur Trader MiniScript 移植版命令行与 Mini Micro 双环境运行全指南basic computer games 之 Fur Trader MiniScript 移植版命令行与 Mini Micro 双环境运行全指南 导读 本文围示例工程创作声明：本文部分内容由AI辅助生成（AIGC），仅供参考