RT，这么好的活动，为神马不参加？？？？？

这是qbasic4.5运行情况，支技内存操作。。。。。

。。。。。很多，不一一列举，要的留邮箱 晚上统一发。

我这儿里有很我教程，有需要的同学可以Q我 7552169

Qbasic函数&语句一览表 LET （赋值语句） 格式：[LET] 变量=表达式 功能：先计算右边表达式，然后将结果赋给左边的变量 SWAP （变量值交换语句） 格式：SWAP 变量1，变量2 功能：将变量1和变量2的值进行交换 PRING （显示或输出语句） 格式：PRING [表达式表][，|；] 功能：将指定的数据显示在屏幕上 LPRING （打印语句） 格式：LPRINT [表达式表][，|；] 功能：将指定的数据用打印机打印出来 REM （注释语句） 格式1：REM 注释内容 格式2：’ 注释内容 功能：在

大家以接龙+讨论的形式，在这个帖子里编写“吧规”吧！

CLS INPUT n DIM a(n, n) p$ = STRING$(LEN(STR$(n * n)), "#") x = 1: y = 1: m = 1 a(x, y) = m DO IF x + 1 <= n THEN    x = x + 1: GOSUB pin ELSE    IF y + 1 <= n THEN y = y + 1: GOSUB pin END IF WHILE x - 1 >= 1 AND y + 1 <= n x = x - 1: y = y + 1: GOSUB pin WEND IF y + 1 <= n THEN    y = y + 1: GOSUB pin ELSE    IF x + 1 <= n THEN x = x + 1: GOSUB pin END IF WHILE x + 1 <= n AND y - 1 >= 1    x = x + 1: y = y - 1: GOSUB pin WEND LOOP WHILE x <> n OR y <> n FOR i = 1 TO n FOR j = 1 TO n     PRINT

要开启大写锁定，按a d 移动左右，按w是跳（必须走三步才可以跳而且第一次跳还得按三下w），程序还出有很多差错（因为才完成%5），程序如下：CLS LOCA

希望对QBASIC感兴趣的、也希望制作自己小游戏的朋友光临BASIC游戏吧！我们一起学习，一起进步吧！

用了一上午的时间用QB写了一个DOS弹球游戏， 已经调试过了，没问题。源代码如下： '弹球游戏 '2键左移 6键右移 0键退出(^_^) SCREEN 12 type

qbasic游戏是可以实现的。利用图象，函数以及其他一些语句，就可以编出一些游戏。我以前也用qbasic编过一些游戏，像贪食蛇，射击之类的。我觉得如果每个人只要想干一些事，就一定可以干成。 我将在5月内编出一个小游戏，请大家指导。 谢谢！

先给一个样板: dirb0=%11100000 dirb1=%11110000 pinb0=0 pinb1=0 pin10=1 pin11=1 panduan: if pin12=0 or pin13=0 then miehuo i

有相关软件的同仁请共享一下啊，谢谢

for x=1 to 9 for y=1 to 9 for z=1 to 9 if 100*x+10*y+z=x^3+y^3+z^3 then n=n+1:print x;y;z,"成立" next z,y,x 在循环语句中的if语句判断错

给十个数排序除了“冒泡法”之外还有什么方法？望大侠们指教，最好能将程序告诉我 qq:395838063

帮帮忙

QB已经不列为考试的语言了，如果为了考试而学就不必了，所以很多人听到这个消息就说QB被淘汰了！实际上是不考试了 ！ 学QB的好处 １ qb能让你掌握算