水暖软管标准:PASCAL程序

来源:百度文库 编辑:神马品牌网 时间:2024/04/28 02:47:53
1、扑克牌发牌
2、打出图片
2 、3、 5、 7
37、41、47、11
31、57、53、13
29、23、19、17
所有的都是质数
注意:要完整的程序

这是我去年编的一个显示扑克牌的程序。很久以前编的一个扑克牌游戏,可惜源程序由于硬盘出了问题被破坏了。没有时间再去编游戏了,这里只是给出扑克牌显示的示范。
windows下显示扑克牌可以说小菜一碟,但是dos下显示扑克牌,而且是用pascal来编的,没有见过吧?呵呵!有兴趣的网友可以看看。
因为以前这里没有上传文件服务,所以一直传不上来。现在能传文件了,所以传上来给大家看看。下载网址:

http://www.programfan.net/upload/cards.zip

使用方法:
(1)新建一个文件夹,例如:C:\TEMP
解压文件cards.zip里的所有文件,到C:\TEMP

(2)
进入Turbo pascal 7.0 ,用主菜单file > Change dir...把当前路径设置为C:\TEMP
(这一步很重要噢!)

(3)用主菜单file > Open打开Card.pas运行。

看看,这是pascal编出来的,你信吗?

顺便说一句,如果CRT没打补丁,运行时除零出错,记得要打补丁噢!

允许你自己编扑克牌游戏时,调用到这个压缩包里的部分或者全部牌面文件;也允许你复制这个程序的函数和过程。可是如果游戏编成了,可别忘了我jtchang的功劳噢!弄这些牌面我花了不少时间!