《计算机是怎样跑起来的》优化使用VBScript语言编写的石头剪刀布游戏
今天在看失泽久雄先生著写的《计算机是怎样跑起来的》时,其中有一段使用VBScript编写的石头剪刀布游戏。由于自己是个小白,从来没听说过这种不是特别热门的脚本语言,一看用windows系统的记事本写的代码,保存后,竟然后缀名一改成.VBS就可以在Windows 98版本以上的Windows系统中运行,像这样
于是颇有兴致的实现了一番,并在网上学习了一些VBScript的语法,对书中的这个小程序做了进一步的优化。
由于是在windows系统自带的笔记本中进行编写,所以敲代码的时候非常容易出错,不过好在你可以双击.vbs的文件,如果语法什么的有错误,它会替你检查并报错。
书中小程序的源代码
优化VBScript编写的石头剪刀布游戏代码实现
'初始化表示手势的变量
Dim gesture(2)
gesture(0) = "石头"
gesture(1) = "剪刀"
gesture(2) = "布"'初始化对玩家获胜次数计数的变量
wins = 0'初始化随机数种子
Randomize'显示程序启动信息
MsgBox "破产版石头剪刀布游戏 Version-2.0 by HelloStars"'进行五轮比试
Dim Count:Count = 5
While Count <> 0
Count=5For i = 1 to 5'输入玩家的手势user = InputBox("游戏共进行5次,请输入手势所代表的数字(0:石头、1:剪刀、2:布)")'先判断玩家输入的手势是否超过选择的范围If not (IsNUmeric(user)) Thenmsgbox"您输入的不是数字,请重新开始游戏" Exit ForElseif user>=3 or user <0 Thenmsgbox"您输入的数字超出范围,请重新开始游戏" Exit ForElse'用随机数决定计算机的手势 dim max,minmax=2min=0computer = (Int((max-min+1)*Rnd+min))'生成提示双方出的手势的字符串s = "玩家:" & gesture(user) & "计算机:" & gesture(computer)End If'判定胜负,显示结果If CInt(user) = computer ThenMsgBox s & "---平局!"ElseIf computer = (user + 1) Mod 3 ThenMsgBox s & "---玩家获胜!"wins = wins + 1Else MsgBox s & "---计算机获胜!"End If Count = Count-1Next
Wend
'显示玩家的获胜次数
MsgBox "玩家获胜次数:" & wins
结果如下:有兴趣的朋友可以自己动手实践一下,
《计算机是怎样跑起来的》优化使用VBScript语言编写的石头剪刀布游戏相关推荐
- 《计算机是怎样跑起来的》学习笔记
<计算机是怎样跑起来的>学习笔记 前言 1 计算机的三大原则 2 试着制造一台计算机吧 3 体验一次手工编程 4 程序像河水一样流动着 5 与算法成为好朋友的七个要点 5.1 算法中解决问 ...
- 读书笔记 -- 《计算机是怎样跑起来的》
推荐语 这本书用通俗的语言讲解计算机相关组成,内容比较浅显易懂,适合初级程序员学习,中级程序员查漏补缺,不适合高级程序员. 给个四星级推荐(满分五星). 关注公众号<嵌入式小散修>,回复 ...
- 计算机算法对程序设计的作用,计算机编程中数学算法的优化策略
李钰 摘要:在计算机编程中,合理地运用数学算法所拥有的优势不但可以完好地针对所拥有的问题进行总结分类归纳,还可以将其归纳作为基础从而进行针对性的统一计算,并且能够将非常复杂的问题进行整体的简化并且将其 ...
- 计算机二级mysql工具_2020年全国计算机二级MySQL复习知识点:优化工具
[摘要] 即将参加全国计算机等级考试的考生们,考试即将到来,大家的备考工作进行得如何了?考必过为大家精心整理了2020年全国计算机二级MySQL复习知识点:优化工具,希望能够助力全国计算机等级考试,相 ...
- 计算机是怎样跑起来的
一直对「程序如何在计算机中跑起来的」很感兴趣,也看过一些相关的书籍和文章,前段时间在多看阅读上看到一本相关的书,用了几天时间看完后,觉得很不错,用简单易懂的语言,围绕计算机是怎样跑起来的,把相关的知识 ...
- 计算机是怎么跑起来的——简记
1 学习思路 其实不仅是计算机, 其他学问亦是如此. 首先要划出一个"知识的范围", 精通一门学问所必知必会的知识都在这个范围内. 其次是掌握该范围内每个知识点中"基础中 ...
- 计算机是如何跑起来的--读书笔记
计算机是怎样跑起来的 1.首先要划出一个"知识的范围",精通一门学问必知必会的知识都在这个范围之内.其次是掌握该范围内每个知识点中"基础中的基础知识".最后是能 ...
- 计算机是怎样跑起来的笔记摘要
文章摘抄于矢泽久雄的<计算机是怎样跑起来的>,用于个人学习,内容有不当或错误的地方请见谅.让我们一起学习,共同进步. 文章目录 第一章 计算机三大原则 1.1三个根本性基础 1.2计算机网 ...
- 计算机是怎样跑起来的(读书笔记)
计算机是怎样跑起来的 计算机的三大原则 计算机的三个根本性基础 输入.运算.输出是硬件的基础 软件是指令和数据的集合 计算机的处理方式和人们的思维习惯不同,对计算机来说什么都是数字 只要理解了三大原则 ...
最新文章
- [Bzoj2282]消防(二分答案+树的直径)
- Adb connection Error:远程主机强迫关闭了一个现有的连接
- Eclipse中要导出jar包中引用了第三方jar包怎么办
- P1720 月落乌啼算钱(斐波那契数列)--python3实现
- 比赛总结——atcoder beginner contest 109
- java 怎么启动线程_线程如何正确的启动
- 计算尖峰电流的目的_干货 | 谈谈RCD的计算方法
- Pandas处理缺失数据
- kuangbin带你飞系列目录与简介
- VSCode中值得推荐的11个摸鱼插件
- java 项目启动后页面乱码_idea java项目启动后访问html页面乱码
- postman安装报错 无法定位_接口测试工具postman安装及使用
- 个人博客网站添加文章搜索功能
- python语言的开题报告怎么写_开题报告怎么写
- 计算机图形学-五角星的画法(转)
- OCP认证培训学校哪家比较好?您知道怎么选OCP培训机构吗
- Android高手笔记 - 卡顿优化
- 原生js实现简易版消消乐
- 去看刘晓庆演的话剧《武则天》
- 深圳中学招聘太激烈,不是名校博士别想挤破头进去!
热门文章
- 明解C语言电子书pdf下载
- JavaScript高级第03天笔记
- 使用VBA如何将中文字符转换为区位码
- 数字SOC设计之低功耗设计入门(一)——低功耗设计目的与功耗的类型
- 【Selenium】stale element reference 问题解决方案
- 图片大小自适应垂直居中的方法
- uni-app学习笔记(一):HbuildX+uni-app搭建小程序项目
- E: dpkg was interrupted, you must manually run ‘dpkg –configure -a’ to correct the problem. 解决办法
- java windows 打印机_使用Java中的客户端计算机打印机(不是部署应用程序的服务器)进行打印...
- RJ45隔离变压器作用