求易语言写小游戏的源码

求易语言写小游戏的源码

哇，C语言直接写屏小游戏，这样写屏比较累啊。

.版本 2

.程序集 窗口程序集1
.程序集变量 电脑得分, 整数型
.程序集变量 自己得分, 整数型
.程序集变量 电脑出, 整数型, , , 1剪刀2布3石头

.子程序 __启动窗口_创建完毕

置随机数种子 (取启动时间 ())
_启动窗口.获取焦点 ()

.子程序 _按钮石头_被单击

电脑出 ＝ 取随机数 (1, 3)
标签自己.标题 ＝ “石头”
.如果 (电脑出 ＝ 3)
标签对手.标题 ＝ “石头”
信息框 (“平了！”, 0, )
.否则
.如果 (电脑出 ＝ 1)
标签对手.标题 ＝ “剪刀”
信息框 (“赢了！”, 0, )
自己得分 ＝ 自己得分 ＋ 1
.否则
标签对手.标题 ＝ “布”
信息框 (“输了！”, 0, )
...哇，C语言直接写屏小游戏，这样写屏比较累啊。

.版本 2

.程序集 窗口程序集1
.程序集变量 电脑得分, 整数型
.程序集变量 自己得分, 整数型
.程序集变量 电脑出, 整数型, , , 1剪刀2布3石头

.子程序 __启动窗口_创建完毕

置随机数种子 (取启动时间 ())
_启动窗口.获取焦点 ()

.子程序 _按钮石头_被单击

电脑出 ＝ 取随机数 (1, 3)
标签自己.标题 ＝ “石头”
.如果 (电脑出 ＝ 3)
标签对手.标题 ＝ “石头”
信息框 (“平了！”, 0, )
.否则
.如果 (电脑出 ＝ 1)
标签对手.标题 ＝ “剪刀”
信息框 (“赢了！”, 0, )
自己得分 ＝ 自己得分 ＋ 1
.否则
标签对手.标题 ＝ “布”
信息框 (“输了！”, 0, )
电脑得分 ＝ 电脑得分 ＋ 1
.如果结束

.如果结束
标签分.标题 ＝ “比分 ： ” ＋ 到文本 (电脑得分) ＋ “-” ＋ 到文本 (自己得分)
标签自己.标题 ＝ “”
标签对手.标题 ＝ “”
_启动窗口.获取焦点 ()

.子程序 _按钮剪刀_被单击

电脑出 ＝ 取随机数 (1, 3)
标签自己.标题 ＝ “剪刀”
.如果 (电脑出 ＝ 3)
标签对手.标题 ＝ “石头”
信息框 (“输了！”, 0, )
电脑得分 ＝ 电脑得分 ＋ 1
.否则
.如果 (电脑出 ＝ 1)
标签对手.标题 ＝ “剪刀”
信息框 (“平了！”, 0, )
.否则
标签对手.标题 ＝ “布”
信息框 (“赢了！”, 0, )
自己得分 ＝ 自己得分 ＋ 1
.如果结束

.如果结束
标签分.标题 ＝ “比分 ： ” ＋ 到文本 (电脑得分) ＋ “-” ＋ 到文本 (自己得分)
标签自己.标题 ＝ “”
标签对手.标题 ＝ “”
_启动窗口.获取焦点 ()

.子程序 _按钮布_被单击

电脑出 ＝ 取随机数 (1, 3)
标签自己.标题 ＝ “布”
.如果 (电脑出 ＝ 3)
标签对手.标题 ＝ “石头”
信息框 (“赢了！”, 0, )
自己得分 ＝ 自己得分 ＋ 1
.否则
.如果 (电脑出 ＝ 1)
标签对手.标题 ＝ “剪刀”
信息框 (“输了！”, 0, )
电脑得分 ＝ 电脑得分 ＋ 1
.否则
标签对手.标题 ＝ “布”
信息框 (“平了！”, 0, )
.如果结束

.如果结束
标签分.标题 ＝ “比分 ： ” ＋ 到文本 (电脑得分) ＋ “-” ＋ 到文本 (自己得分)
标签自己.标题 ＝ “”
标签对手.标题 ＝ “”
_启动窗口.获取焦点 ()

.子程序 __启动窗口_放开某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.判断开始 (键代码 ＝ #Z键)
_按钮石头_被单击 ()
.判断 (键代码 ＝ #X键)
_按钮剪刀_被单击 ()
.判断 (键代码 ＝ #C键)
_按钮布_被单击 ()
.默认

.判断结束

官方完整版自带好几个小游戏源代码呢…

去百。。度搜索1下 易语言小游戏源码多得要命呢。呵呵希望采纳！

度和 接板 长度不能改 所以比较难玩 #include "graphics.h" #include "stdio.h" #include "conio.h" int on; static int score; int open() { setviewport(100,100,500,380,1); setcolor(4); rectangle(0,0,399,279); setfillstyle(SOLID_FILL,7); floodfill(50,50,4); setcolor(8); settextstyle(0,0,9); ...度和 接板 长度不能改 所以比较难玩 #include "graphics.h" #include "stdio.h" #include "conio.h" int on; static int score; int open() { setviewport(100,100,500,380,1); setcolor(4); rectangle(0,0,399,279); setfillstyle(SOLID_FILL,7); floodfill(50,50,4); setcolor(8); settextstyle(0,0,9); outtextxy(90,80,"BALL"); settextstyle(0,0,1); outtextxy(110,180,"version 1.0"); outtextxy(110,190,"made by ddt"); setcolor(128); settextstyle(0,0,1); outtextxy(120,240,"Press any key to continue......"); } int quitwindow() { char s[100]; setviewport(100,150,540,420,1); setcolor(YELLOW); rectangle(0,0,439,279); setfillstyle(SOLID_FILL,7); floodfill(50,50,14); setcolor(12); settextstyle(0,0,8); outtextxy(120,80,"End"); settextstyle(0,0,2); outtextxy(120,200,"quit? Y/N"); sprintf(s,"Your score is:%d",score); outtextxy(120,180,s); on=1; } main() { int gdriver,gmode; gdriver=DETECT; gmode=0; registerbgidriver(EGAVGA_driver); initgraph(&gdriver,&gmode,""); setbkcolor(14); open(); getch(); while(1) { int driver,mode,l=320,t=400,r,a,b,dl=5,n,x=200,y=400,r1=10,dx=-2,dy=-2; int left[100],top[100],right[100],bottom[100],i,j,k,off=1,m,num[100][100]; static int pp; static int phrase; int oop=15; pp=1; score=0; driver=DETECT; mode=VGA; registerbgidriver(EGAVGA_driver); initgraph(&driver,&mode,""); setbkcolor(10); cleardevice(); clearviewport(); b=t+6; r=l+60; setcolor(1); rectangle(0,0,639,479); setcolor(4); rectangle(l,t,r,b); setfillstyle(SOLID_FILL,1); floodfill(l+2,t+2,4); for(i=0,k=0;i<=6;i++) { top[i]=k; bottom[i]=top[i]+20; k=k+21; oop--; for(j=0,m=0;j<=7;j++) { left[j]=m; right[j]=left[j]+80; m=m+81; setcolor(4); rectangle(left[j],top[i],right[j],bottom[i]); setfillstyle(SOLID_FILL,j+oop); floodfill(left[j]+1,top[i]+1,4); num[i][j]=pp++; } } while(1) { while(!kbhit()) { x=x+dx; y=y+dy; if(x+r1>r||x+r1=l) { if(y=t&&phrase==1) {dy=-dy;y=t-1-r1;} } if(off==0) continue; for(i=0;i<=6;i++) for(j=0;j<=7;j++) { if((x+r1<=right[j]&&x+r1>=left[j])||(x-r1<=right[j]&&x-r1>=left[j])) { if(( y-r1>top[i]&&y-r1<=bottom[i])||(y+r1>=top[i]&&y+r1<=bottom[i] )) { if(num[i][j]==0) {continue; } setcolor(10); rectangle(left[j],top[i],right[j],bottom[i]); setfillstyle(SOLID_FILL,10); floodfill(left[j]+1,top[i]+1,10); dy=-dy; num[i][j]=0; score=score+10; printf("%d\b\b\b",score); } } if((y+r1>=top[i]&&y+r1<=bottom[i])||(y-r1>=top[i]&&y-r1<=bottom[i])) { if((x+r1>=left[j]&&x+r1left[j])) { if(num[i][j]==0) { continue;} setcolor(10); rectangle(left[j],top[i],right[j],bottom[i]); setfillstyle(SOLID_FILL,10); floodfill(left[j]+1,top[i]+1,10); dx=-dx; num[i][j]=0; score=score+10; printf("%d\b\b\b",score); } } } if(x+r1>639) {dx=-dx;x=638-r1;} if(x<=r1) {dx=-dx;x=r1+1;} if(y+r1>=479) {off=0;quitwindow();break;} if(y<=r1) {dy=-dy;y=r1+1;} if(score==560) {off=0;quitwindow();break;} setcolor(6); circle(x,y,r1); setfillstyle(SOLID_FILL,14); floodfill(x,y,6); delay(1000); setcolor(10); circle(x,y,r1); setfillstyle(SOLID_FILL,10); floodfill(x,y,10); } a=getch(); setcolor(10); rectangle(l,t,r,b); setfillstyle(SOLID_FILL,10); floodfill(l+2,t+2,10); if(a==77&&l<=565) {dl=20;l=l+dl;} if(a==75&&l>=15) {dl=-20;l=l+dl;} if(a=='y'&&on==1) break; if(a=='n'&&on==1) break; if(a==27) {quitwindow();off=0;} r=l+60; setcolor(4); rectangle(l,t,r,b); setfillstyle(SOLID_FILL,1); floodfill(l+5,t+5,4); delay(100); } if(a=='y'&&on==1) {break;} if(a=='n'&&on==1) { continue;} } closegraph(); }

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息