- 注册时间
- 2004-12-27
- 最后登录
- 1970-1-1
|
发表于 2006-8-29 19:25:15
|
显示全部楼层
谁说GVbasic不如Gvmaker!
马上要要开学了,这可能是我在编程论坛里法的最后一张帖,毕竟学习是最重要的。
时光流逝,自从有了Gvmaker,GVbasic从此不再是一些编程高手探究的内容,其中一个原因就是效果太差,不过你们想想最早的lava游戏"just fly"的简装版,效果还不如basic,你们可以做一下对比:
这是我的ski滑雪游戏
10 X=80 : SP=5
20 GRAPH
25 LINE 40,0,40,80,1 : BOX 42,0,43,80,1,1 INE 120,0,120,80,1 : BOX 118,0,117,80,1,1
30 LOCATE 5,1 : PRINT SC;
40 IF A=0 AND B=0 THEN 80
60 CIRCLE A,B,6,1,0
61 B=B+SP
62 IF B>=80 THE A=0:B=0 ELSE SC=SC+SP:90
80 A=INT(RND(1)*75)+50:B=0
90 CIRCLE A,B,6,1,1
100 IF PEEK(199)>128 THEN JA=ASC( INKEY$ ) =1 =1
110 IF JA=23 THEN CIRCLE X,74,5,1,0 :X=X-5
120 IF JA=22 THEN CIRCLE X,74,5,1,0 :X=X+5
121 IF JA=21 AND SP>3 AND Q=1 THEN SP=SP-1 =0
122 IF JA=20 AND SP<12 AND P=1 THEN SP=SP+1 =0
130 SC=SC+SP
140 IF X>=A-8 AND X<=A+8 AND B>=68 THEN CLS : PRINT "GAME OVER!" :END
145 IF X<=42 OR X>=118 CLS : PRINT "GAME OVER!": END
150 CIRCLE X,74,5,1,1:FOR I=1 TO 100 : NEXT
160 GOTO 25
这个游戏的效果应该算不错,应该可以和just fly 相提并论,也可以说是火箭车的浓缩版
GVbasic上的缺点可以修改(如:写小字比较困难),但是可以升级
但是,热爱GVbasic的心是永恒不变的!!! |
|