不要消灭星星 Pascal小游戏 Chaobs改编自pascal吧控制台小游戏嘛,就当是练习一下结构化的写法。program wxtw;uses crt;type zbdy=record x,y:integer; end;var n,i,x,y,t,sjs:integer; ml:char;zb: ...
分类:
其他好文 时间:
2014-07-16 19:37:07
阅读次数:
294
一个很经典的井字棋游戏 Pascal源码Chaobs奉上注意:1.有的FP版本不支持汉语,将会出现乱码。2.别想赢电脑了,平手不错了。井字过三关:program TicTacToe;uses crt;vara:Array [1..3] of Array [1..3] of char;b:Array ...
分类:
其他好文 时间:
2014-07-16 19:34:37
阅读次数:
353
俄罗斯方块已经成为了和“Hello World”一样的程序了吧?不要直接复制,可能需要事先 Format.program cube;uses crt,graph,dos;var gd,gm:smallint;fillin:fillpatterntype;board:array[0..26,0..26...
分类:
其他好文 时间:
2014-07-16 19:33:58
阅读次数:
221
-----From wxwidgets Docs 3.1Functions and Macros by CategoryDetailed DescriptionWrappers of CRT functionsFunctions and Macros by Category Detailed Des...
分类:
移动开发 时间:
2014-07-16 19:16:55
阅读次数:
400
//将字符串反转,但单词不倒置。Right here waiting for you! -> you! for waiting here Right#define _CRT_SECURE_NO_WARNINGS#include #include int main() { char str[25...
分类:
其他好文 时间:
2014-07-14 19:42:46
阅读次数:
278
一个双人的游戏 Pascal源码附上只要俩人不脑残,一下午玩不完。。。又是控制台游戏中的一朵奇葩。Free Pascal 射击游戏Program shooting_game;uses crt;const cz:array[1..4,1..2] of -1..1=((0,1),(1,0),(0,-1)...
分类:
其他好文 时间:
2014-07-14 10:19:56
阅读次数:
322
大富翁MUD Pascal源码 Chaobs改编自百度网友作品此源码非Chaobs原创,但转载时请仍注明出处。估计90后以后就没有孩子知道MUD了。program wxtw;uses crt;type zbdy=record x,y:integer; end;var n,i,x,y,t,sjs:in...
分类:
其他好文 时间:
2014-07-14 10:07:03
阅读次数:
166
一段未完成的Pascal贪吃蛇说这段代码未完成其实是没有源代码格式化,FP中一行最多只有255字符宽。uses crt;const screenwidth=50;screenheight=24; wallchar='#'; snakechar='*'; ; type point=record x,y...
分类:
其他好文 时间:
2014-07-13 12:34:00
阅读次数:
348
#define _CRT_SECURE_NO_WARNINGS#include#includeint main(){ char str1[255], str2[255]; int num1[255] = { 0 }, num2[255] = { 0 };//用于存放减数和被减数,且较短者...
分类:
其他好文 时间:
2014-07-12 13:15:53
阅读次数:
209
#define _CRT_SECURE_NO_WARNINGS#include#includeint main(){ void add(int a[], int length1, int b[], int length2); char str1[255], str2[255]; int num1[2...
分类:
其他好文 时间:
2014-07-11 10:08:10
阅读次数:
213