《校园风云录》改版建议征集

hhj123

如果改成LAVA版的，可能表现力会更强。

一捧米

对，变成LAVA的ARPG~~~

sargehsy

先巩固好BAS，然后弄LAVA。

统治西方

挖塞 哪里来的6000用户啊?

sargehsy

7500 CLSOCATE 3,3RINT "第一章  纯  真":I$=INKEY$
7501 CLSRINT "玛莉(老师):韩思阳,你跑1000m又不及格,在这里练!给你10袋小当家":I$=INKEY$
7502 CLSRINT "玛莉:升到3级才能出去":I$=INKEY$:BA=10
7503 CLS:PRINT "韩思阳:唉,大家和我一起练吧!":I$=INKEY$EST=1:GOTO 200
7504 CLS:PRINT "何龙:哈哈,好久不见,我到你们学校来玩玩,来过过招吧!":I$=INKEY$
7505 RR=10:VN$(10)="何龙":VF$(10)="??":ZG(10)=80:ZQ(10)=100:ZX(10)=2000:ZP(10)=1
7506 ZMONEY(10)=100:GOTO 1997
7507 CLS:PRINT "韩思阳:什么破学校,刚开学还要军训,郁闷啊":I$=INKEY$
7508 CLS:PRINT "齐彬蔚:借本《心理学》给你看，解解闷":I$=INKEY$:FFD=30EST=3:GOTO 200
7509 CLSOCATE 3,3:PRINT "第二章  叛  逆":I$=INKEY$
7510 CLS:PRINT "韩思阳:你怎么还不走?":I$=INKEY$
7511 CLS:PRINT "何龙:看你们军训啊,你脸色看上去不好啊":I$=INKEY$
7512 CLS:PRINT "韩思阳:恩,都是这军训搞出来的":I$=INKEY$
7513 CLS:PRINT "何龙:想不想K那些老师一顿,我帮":I$=INKEY$
7514 CLS:PRINT "韩思阳:好啊,怎么K?":I$=INKEY$
7515 CLS:PRINT "何龙:晚上去,他们就认不出你了"EST=4:I$=INKEY$:GOTO 200
7516 CLS:PRINT "冯书记:干什么?":I$=INKEY$
7517 RR=10:VN$(10)="冯书记":VF$(10)="??":ZG(10)=200:ZQ(10)=300:ZX(10)=2000
7518 ZP(10)=10:ZMONEY(10)=200:GOTO 1997
7519 CLS:PRINT "历主任:干什么?":I$=INKEY$
7520 RR=10:VN$(10)="历主任":VF$(10)="??":ZG(10)=300:ZQ(10)=200:ZX(10)=5000
7521 ZP(10)=50:ZMONEY(10)=300:GOTO 1997
7522 CLS:PRINT "周校长:干什么?":I$=INKEY$
7523 RR=10:VN$(10)="周校长":VF$(10)="??":ZG(10)=50:ZQ(10)=200:ZX(10)=8000
7524 ZP(10)=80:ZMONEY(10)=500:GOTO 1997
7525 CLS:PRINT "韩思阳:爽不爽,谁让他们来弄些应试教育":I$=INKEY$
7526 CLS:PRINT "冯明飞:爽,对谁让他们来弄些应试教育":I$=INKEY$
7527 CLS:PRINT "周宇明:5555555你们太过分了,连我大伯也打":I$=INKEY$
7528 CLS:PRINT "何龙:现在去哪?":I$=INKEY$
7529 CLS:PRINT "于洋:去把锦中的老师也K一顿":I$=INKEY$:DEST=8:GOTO 200
7530 CLS:PRINT "韩思阳:你是谁?":I$=INKEY$
7531 CLS:PRINT "鬼:我是鬼,你看我没有脚":I$=INKEY$
7532 CLS:PRINT "刘圆圆:我好怕噢!":I$=INKEY$
7533 CLS:PRINT "韩思阳:怕什么!":I$=INKEY$
7534 CLS:PRINT "刘圆圆:他真的没有脚呢!":I$=INKEY$
7535 CLS:PRINT "韩思阳:没有脚怕什么,我们班的刘迪还没有胸部呢!":I$=INKEY$
7536 CLS:PRINT "陈明亮:真不爽,把那个鬼也K一顿":I$=INKEY$
7537 RR=10:VN$(10)="鬼 ":VF$(10)="⊙":ZG(10)=50:ZQ(10)=1000:ZX(10)=2000
7538 ZP(10)=200:ZMONEY(10)=0:GOTO 1997
7539 CLS:PRINT "警察:你们这么晚了在这里干什么?":I$=INKEY$
7540 CLS:PRINT "韩思阳:糟了1.逃跑2.K他":I$=INKEY$
7541 IF I$="b" THEN DEST=10:GOTO 200
7542 RR=10:VN$(10)="警察叔叔":VF$(10)="??":ZG(10)=300:ZQ(10)=400:ZX(10)=12000
7543 ZP(10)=300:ZMONEY(10)=1000:GOTO 1997
7544 CLS:PRINT "韩思阳:咋了,哥们让人给阉了,来本葵花宝典吧":I$=INKEY$
7545 CLS:PRINT "张腾飞:别提了,都是军训,把我弄成这么黑":I$=INKEY$:DEST=11:GOTO 200
7546 CLS:PRINT "赵一平:来打会球吧":I$=INKEY$
7547 CLS:PRINT "王麒然:不了打人要紧":I$=INKEY$
7548 CLS:PRINT "赵一平:就你这块料还打人,我看是找打吧!":I$=INKEY$
7549 CLS:PRINT "王麒然:你欠揍啊":I$=INKEY$
7550 RR=10:VN$(10)="赵一平 ":VF$(10)="??":ZG(10)=400:ZQ(10)=50:ZX(10)=12000
7551 ZP(10)=300:ZMONEY(10)=20:GOTO 1997
7552 RR=10:VN$(10)="锦中老师":VF$(10)="??":ZG(10)=300:ZQ(10)=300:ZX(10)=8000
7553 ZP(10)=200:ZMONEY(10)=50:GOTO 1997
7554 RR=10:VN$(10)="锦中老师":VF$(10)="??":ZG(10)=300:ZQ(10)=300:ZX(10)=8000
7555 ZP(10)=200:ZMONEY(10)=50:GOTO 1997
7556 RR=10:VN$(10)="锦中老师":VF$(10)="??":ZG(10)=300:ZQ(10)=300:ZX(10)=8000
7557 ZP(10)=200:ZMONEY(10)=50:GOTO 1997
7558 RR=10:VN$(10)="锦中老师":VF$(10)="??":ZG(10)=300:ZQ(10)=300:ZX(10)=8000
7559 ZP(10)=200:ZMONEY(10)=50:GOTO 1997
7560 CLS:PRINT "陈明亮:花前月下你们在干什么":I$=INKEY$
7561 CLS:PRINT "邱业明:啊!玲儿我们被发现了":I$=INKEY$
7562 CLS:PRINT "崔煜乾:噢原来是一对啊":I$=INKEY$
7563 CLS:PRINT "韩思阳:刚才看见张腾飞被晒得黑不溜秋的":I$=INKEY$
7564 CLS:PRINT "邱业明:正好你们帮我去K他一顿":I$=INKEY$
7565 CLS:PRINT "韩思阳:为什么啊":I$=INKEY$
7566 CLS:PRINT "邱业明:看不出来?他也喜欢吉玲的嘛":I$=INKEY$
7567 CLS:PRINT "韩思阳:你叫我K我就K岂不太没面子了":I$=INKEY$
7568 CLS:PRINT "邱业明:这样吧,我这还有一个汉堡你拿去吧":I$=INKEY$:BD=BD+1
7569 DEST=17:GOTO 200
7570 CLS:PRINT "张腾飞:?":I$=INKEY$
7571 RR=10:VN$(10)="张腾飞 ":VF$(10)="??":ZG(10)=300:ZQ(10)=300:ZX(10)=8000
7572 ZP(10)=200:ZMONEY(10)=20:GOTO 1997
7573 CLS:PRINT "张腾飞:你们打我干什么啊":I$=INKEY$
7574 CLS:PRINT "陈明亮:有人付钱请我们的":I$=INKEY$
7575 CLS:PRINT "张腾飞:一定是邱业明那个骚驴,我也付钱100块,去揍他":I$=INKEY$
7576 MONEY=MONEY+100:DEST=19:GOTO 200
7578 CLS:PRINT "陈明亮:这次轮到你了  ":I$=INKEY$
7579 RR=10:VN$(10)="邱业明 ":VF$(10)="??":ZG(10)=200:ZQ(10)=300:ZX(10)=3000
7580 ZP(10)=100:ZMONEY(10)=20:GOTO 1997
7581 CLS:PRINT "吉玲:陈明亮,不要这么粗鲁嘛":I$=INKEY$:DEST=21
7582 CLS:PRINT "韩思阳:我们也该走了吧":I$=INKEY$
7583 CLS:PRINT "陈明亮:我也跟着再去玩几天":I$=INKEY$:GOTO 200
7584 CLS:PRINT "警察:你们几个,刚才…站住":I$=INKEY$
7585 RR=10:VN$(10)="警察叔叔":VF$(10)="??":ZG(10)=400:ZQ(10)=400:ZX(10)=12000
7586 ZP(10)=300:ZMONEY(10)=1000:GOTO 1997
7587 CLS:PRINT "鬼:大爷饶命,小的不识泰山":I$=INKEY$:DEST=23:GOTO 200
7588 CLS:PRINT "徐子傲:噢,是韩思阳啊,刘老师在政教处等你":I$=INKEY$:DEST=24:GOTO 200
7589 CLS:PRINT "刘予明:思阳啊,从这次你写的作文看来,你很讨厌应试嘛":I$=INKEY$
7590 CLS:PRINT "刘予明:你要服从实际啊,韩寒他是有气没处发才写文章的":I$=INKEY$
7591 CLS:PRINT "刘予明:最近报纸上说,矿山街有个鬼,吓了好几个学生":I$=INKEY$
7592 CLS:PRINT "刘予明:小心一点啊":I$=INKEY$
7593 CLS:PRINT "韩思阳:知道了!":I$=INKEY$:DEST=25:GOTO 200
7594 CLS:PRINT "鬼:不是我想出来啊！都是你那个叫《火以》的游戏害的啊":I$=INKEY$
7595 CLS:PRINT "鬼:你编《火以》的结局是阿波罗死了,之后鬼就多了起来":I$=INKEY$
7596 CLS:PRINT "鬼:我就没地方住了":I$=INKEY$
7597 CLS:PRINT "鬼:入口就在锦中操场":I$=INKEY$:DEST=26:GOTO 200
7599 CLSOCATE 3,3:PRINT "第三章众神的眼泪":I$=INKEY$
7600 CLS:PRINT "村民:村子被毁了,众神在那边呢!":I$=INKEY$:DEST=27:GOTO 200
7601 CLS:PRINT "雅典纳:快救救阿波罗吧!去东南方打败哈德斯":I$=INKEY$:DEST=28:GOTO 200
7602 CLS:PRINT "波塞东:前面的那片森林很容易迷路的,小心啊":I$=INKEY$:DEST=29:GOTO 200
7603 CLS:PRINT "波赫耳墨斯,赫拉,宙斯:我们也迷路了":I$=INKEY$:DEST=30:GOTO 200
7604 CLS:PRINT "哈德斯杀手:等你们很久了":I$=INKEY$
7605 RR=10:VN$(10)="哈德斯杀手":VF$(10)="??":ZG(10)=1200:ZQ(10)=1000:ZX(10)=30000
7606 ZP(10)=3000:ZMONEY(10)=5000:GOTO 1997
7607 CLS:PRINT "哈德斯:终于还是来了啊,我可不会让你破坏我的计划":I$=INKEY$
7608 CLS:PRINT "哈德斯:自从阿波罗死后,我的冥界一直括张到了这":I$=INKEY$
7609 CLS:PRINT "哈德斯:阻止我?死了这条心吧":I$=INKEY$
7610 RR=10:VN$(10)="哈德斯":VF$(10)="??":ZG(10)=2000:ZQ(10)=2000:ZX(10)=50000
7611 ZP(10)=10000:ZMONEY(10)=10000:GOTO 1997
7612 CLS:PRINT "阿波罗:真是太感谢你们了,快回去吧":I$=INKEY$:DEST=33:GOTO 200
7613 CLS:PRINT "聂聪:你怎么还不回去呢?":I$=INKEY$
7614 CLS:PRINT "鬼:哈德斯虽然死了,但尸体还在,还不能回去":I$=INKEY$
7615 CLS:PRINT "韩思阳:也就是说还要再去一次":I$=INKEY$
7616 CLS:PRINT "鬼:恩":I$=INKEY$:DEST=34:GOTO 200
7617 CLS:PRINT "韩思阳:这家伙的尸体怎么不烂,烧了吧":I$=INKEY$:DEST=35:GOTO 200
7618 CLS:PRINT "鬼:太感谢你了,现在我可以回去了88":I$=INKEY$:DEST=36:GOTO 200
7621 CLS:LOCATE 3,3:PRINT "第四章   恨":I$=INKEY$
7622 CLS:PRINT "韩思阳:怎么了，看你这么郁闷":I$=INKEY$
7623 CLS:PRINT "张大千:……":I$=INKEY$
7628 CLS:PRINT "韩思阳:唉,其实我也一样":I$=INKEY$:DEST=37:GOTO 200
7629 CLS:PRINT "韩露:是韩思阳啊,陈老师叫你去,他操场等你":I$=INKEY$:DEST=38:GOTO 200
7630 CLS:PRINT "玛莉:韩思阳啊,跑一圈给我看看":I$=INKEY$:DEST=39:GOTO 200
7631 CLS:PRINT "玛莉:果然有长进,这样吧,我推荐你去学生会":I$=INKEY$:DEST=40:IF RYZ<700 THEN RYZ=700:GOTO 200
7632 CLS:PRINT "于洋:学生会的丁老师找你":I$=INKEY$:DEST=41:GOTO 200
7633 CLS:PRINT "丁红军:学校要组织乒乓球赛,你搞一下吧":I$=INKEY$:DEST=42:GOTO 200
7634 CLS:PRINT "韩露:这么慢,部长都在等你呢":I$=INKEY$:DEST=43:GOTO 200
7635 CLS:PRINT "赵涛:比赛好后,把名次给我":I$=INKEY$:DEST=44:GOTO 200
7636 CLS:PRINT "韩露:好了,名次拿去吧":I$=INKEY$:DEST=45:GOTO 200
7637 CLS:PRINT "赵涛:噢,我现在就把它交给神丁":I$=INKEY$:DEST=46:GOTO 200
7638 CLS:PRINT "陈勇强:哈哈":I$=INKEY$
7639 CLS:PRINT "韩思阳:笑什么呢?":I$=INKEY$
7640 CLS:PRINT "陈勇强:黄鹏那个呆子,把整只螃蟹都吃了":I$=INKEY$
7641 CLS:PRINT "陈勇强:现在还在树林里吐呢":I$=INKEY$:DEST=47:GOTO 200
7642 CLS:PRINT "韩思阳:我靠,你会不会吃蟹啊,脸这么红":I$=INKEY$
7643 CLS:PRINT "韩思阳:在练关羽的飞龙在天啊":I$=INKEY$
7644 CLS:PRINT "崔煜乾:看你不爽,欠揍啊":I$=INKEY$
7645 RR=10:VN$(10)="黄鹏 ":VF$(10)="??":ZG(10)=200:ZQ(10)=500:ZX(10)=50000
7646 ZP(10)=100:ZMONEY(10)=100:GOTO 1997
7647 CLS:PRINT "丁红军:韩思阳啊,帮我把这个交给锦中校长":I$=INKEY$:DEST=49:GOTO 200
7648 CLS:PRINT "锦中校长:噢,谢谢":I$=INKEY$:DEST=50:GOTO 200
7649 CLS:PRINT "丁红军:噢,任务完成得很好":I$=INKEY$:DEST=51:GOTO 200
7650 CLS:PRINT "于龙:阿弥陀佛":I$=INKEY$
7651 CLS:PRINT "韩思阳:水哥,念经呢,高一追你的那个妖怪怎么没吃你?":I$=INKEY$
7652 CLS:PRINT "于龙:她说我太瘦了,先放几天":I$=INKEY$:DEST=52:GOTO 200
7653 CLS:PRINT "于龙:学校的南门通了,去玩玩吧":I$=INKEY$:DEST=53:GOTO 200
7654 CLS:PRINT "冯明飞:你们来了啊":I$=INKEY$
7655 CLS:PRINT "韩思阳:你在这里啊":I$=INKEY$
7656 CLS:PRINT "冯明飞:是啊,徐枫也来了啊":I$=INKEY$
7657 CLS:PRINT "徐子傲:别叫我以前的名字":I$=INKEY$
7658 CLS:PRINT "冯明飞:上回你们赶走了鬼,了不得":I$=INKEY$
7659 CLS:PRINT "韩思阳:我们随便走走":I$=INKEY$:DEST=54:GOTO 200
7660 CLS:PRINT "黄鹏:学校艺术节开设在电影院,去看看":I$=INKEY$:DEST=55:GOTO 200
7661 CLS:PRINT "同学:节目就要开始了":I$=INKEY$:DEST=56:GOTO 200
7662 CLS:PRINT "丁红军:韩思阳,你等会和陈明亮一起拉幕":I$=INKEY$:DEST=57:GOTO 200
7663 CLS:PRINT "陈明亮:就要结束了,我们走吧":I$=INKEY$:DEST=58:GOTO 200
7664 CLS:PRINT "黄鹏:艺术节把我头都弄晕了":I$=INKEY$:DEST=59:GOTO 200
7665 CLS:PRINT "聂聪:帮我去看看锦中的刘华峰和我谁重":I$=INKEY$:DEST=60:GOTO 200
7666 CLS:PRINT "刘华峰:聂大丸想和我比还早10年呢":I$=INKEY$:DEST=61:GOTO 200
7667 CLS:PRINT "聂聪:啊,气死我了":I$=INKEY$:DEST=62:GOTO 200
7668 CLS:PRINT "刘青帝:冯明飞打来电话说找你有事":I$=INKEY$:DEST=63:GOTO 200
7669 CLS:PRINT "冯明飞:你们上回赶走的鬼又回来了啊":I$=INKEY$:DEST=64:GOTO 200
7670 CLS:PRINT "鬼:谢谢你们让我回家，为了报答，告诉你们天使的位置":I$=INKEY$
7671 CLS:PRINT "鬼:就在锦中网球场上":I$=INKEY$:DEST=65:GOTO 200
7672 CLS:LOCATE 3,3:PRINT "第五章  蒸  发":I$=INKEY$
7673 CLS:PRINT "天使:我可以帮助你们除去身上邪恶的部分":I$=INKEY$
7674 CLS:PRINT "天使:糟了,失败,邪恶扩散了,快去除去邪恶":I$=INKEY$:DEST=66:GOTO 200
7675 CLS:PRINT "马书明A:怎么这个人和我这么像啊":I$=INKEY$
7676 CLS:PRINT "马书明B:＾＿＾":I$=INKEY$
7677 CLS:PRINT "韩思阳:我知道的,这个是你邪恶的一面,干了他":I$=INKEY$
7678 CLS:PRINT "韩思阳:在我们之中,他属性最低,应该很好解决":I$=INKEY$
7679 RR=10:VN$(10)="马书明":VF$(10)="??":ZG(10)=3000:ZQ(10)=1000:ZX(10)=20000
7680 ZP(10)=100000:ZMONEY(10)=10:GOTO 1997
7681 CLS:PRINT "韩思阳:第二个是陈明亮,智力是高,但是变成怪物不会用魔法":I$=INKEY$
7682 RR=10:VN$(10)="陈明亮":VF$(10)="??":ZG(10)=3000:ZQ(10)=1500:ZX(10)=20000
7683 ZP(10)=100000:ZMONEY(10)=100:GOTO 1997
7684 CLS:PRINT "韩思阳:第三个是冯石,反应偏低":I$=INKEY$
7685 RR=10:VN$(10)="冯石 ":VF$(10)="??":ZG(10)=4000:ZQ(10)=1500:ZX(10)=40000
7686 ZP(10)=300000:ZMONEY(10)=300:GOTO 1997
7687 CLS:PRINT "韩思阳:第四个是聂聪,反应很低,攻击生命超高":I$=INKEY$
7688 RR=10:VN$(10)="聂聪 ":VF$(10)="??":ZG(10)=6000:ZQ(10)=500:ZX(10)=200000
7689 ZP(10)=500000:ZMONEY(10)=500:GOTO 1997
7690 CLS:PRINT "韩思阳:第五个是罗勖,和陈明亮一样的弱点":I$=INKEY$
7691 RR=10:VN$(10)="罗勖 ":VF$(10)="??":ZG(10)=5000:ZQ(10)=5000:ZX(10)=100000
7692 ZP(10)=600000:ZMONEY(10)=500:GOTO 1997
7693 CLS:PRINT "韩思阳:第六个是徐子傲,只剩最后二个了,恨得很深":I$=INKEY$
7694 CLS:PRINT "韩思阳:恨得越深,越强":I$=INKEY$
7695 RR=10:VN$(10)="徐子傲":VF$(10)="??":ZG(10)=5000:ZQ(10)=5000:ZX(10)=200000
7696 ZP(10)=800000:ZMONEY(10)=800:GOTO 1997
7697 CLS:PRINT "韩思阳:终于到我了":I$=INKEY$
7698 RR=10:VN$(10)="韩思阳":VF$(10)="??":ZG(10)=6000:ZQ(10)=6000:ZX(10)=300000
7699 ZP(10)=1000000:ZMONEY(10)=8000:GOTO 1997
7700 CLS:PRINT "韩思阳A:你怎么……":I$=INKEY$
7701 CLS:PRINT "韩思阳B:我有这么轻易得消失吗?":I$=INKEY$
7702 CLS:PRINT "张大千:还要打吗,我们没体力了啊":I$=INKEY$
7703 CLS:PRINT "韩思阳A:先退回去再说":I$=INKEY$:DEST=74:GOTO 200
7704 CLS:PRINT "韩思阳A:让我想想我有什么弱点":I$=INKEY$
7705 CLS:PRINT "张钊涵:恨得这么深还会有什么弱点":I$=INKEY$
7706 CLS:PRINT "韩思阳A:对,恨就是弱点":I$=INKEY$
7707 CLS:PRINT "韩思阳A:去铁路中学,杨帆,你去请她":I$=INKEY$:DEST=75:GOTO 200
7708 CLS:PRINT "杨帆:……":I$=INKEY$
7709 CLS:PRINT "ИВАН:好吧,我去":I$=INKEY$:DEST=76:GOTO 200
7710 CLS:PRINT "韩思阳B:这回又多来了一个":I$=INKEY$
7711 CLS:PRINT "韩思阳A:你看清楚来的人是谁":I$=INKEY$
7712 CLS:PRINT "韩思阳B:……是……И":I$=INKEY$
7715 CLS:PRINT "韩思阳A:好,趁现在":I$=INKEY$
7716 RR=10:VN$(10)="韩思阳":VF$(10)="??":ZG(10)=6000:ZQ(10)=6000:ZX(10)=300000
7717 ZP(10)=1000000:ZMONEY(10)=8000:GOTO 1997
7718 CLS:PRINT "韩思阳:他正因为听到了这些话,才无怨消失了":I$=INKEY$
7719 CLS:PRINT "韩思阳:再见??":DEST=78:GOTO 200
7720 CLS:PRINT "天使:恭喜你们修成正果":I$=INKEY$
7721 CLS:PRINT "罗勖:时候不早了,我们回去吧":DEST=79:I$=INKEY$:GOTO 200
7722 CLS:LOCATE 3,3:PRINT "第六章最後的生机":I$=INKEY$
7723 CLS:PRINT "周宇明:韩思阳啊,校长正找你呢":I$=INKEY$:DEST=80:GOTO 200
7724 CLS:PRINT "周校长:思阳啊,上面来了有关减员增效的文件,派你去通知他们":I$=INKEY$
7725 CLS:PRINT "周校长:炒掉的几个老师脾气都不太好,你可要小心哪":I$=INKEY$:DEST=81:GOTO 200
7727 CLS:PRINT "韩思阳:玛老师…":I$=INKEY$
7728 CLS:PRINT "玛莉（陈洪雷）:啥?我姓啥?":I$=INKEY$
7729 CLS:PRINT "赵一平:陈老师,很抱歉,您被裁掉了":I$=INKEY$
7730 CLS:PRINT "玛莉:韩思阳,当初可是我保你进的学生会,你这忘恩负义的东西!":I$=INKEY$
7731 CLS:PRINT "赵一平:您要做什么":I$=INKEY$
7732 RR=10:VN$(10)="玛莉":VF$(10)="??":ZG(10)=6000:ZQ(10)=5000:ZX(10)=400000
7733 ZP(10)=1000000:ZMONEY(10)=8000:GOTO 1997
7734 CLS:PRINT "玛莉:打不起嘛我,我还躲不起吗我?":I$=INKEY$
7735 CLS:PRINT "孙腾龙:总觉得有点不对劲":I$=INKEY$
7736 CLS:PRINT "冯石:啊,我的钱包!":I$=INKEY$:MONEY=0
7737 CLS:PRINT "周江龙:看来是追不上了":I$=INKEY$:DEST=83:GOTO 200
7738 CLS:PRINT "高鹏:陆老师，很抱歉的告诉您，您被解雇了…":I$=INKEY$
7739 CLS:PRINT "陆喜江:我的饭碗……不行":I$=INKEY$
7740 CLS:PRINT "陆喜江:冯石啊,你愁眉苦脸的,不愿意我走吗?":I$=INKEY$
7741 CLS:PRINT "冯石:唉,钱包丢了…":I$=INKEY$
7742 CLS:PRINT "陆喜江:我这有5000块,你们拿去吧…只要能保住我的铁饭碗,以后还会有好处的":I$=INKEY$:MONEY=MONEY+5000
7743 CLS:PRINT "韩思阳:我帮您说说看,行不行可不保准":I$=INKEY$:DEST=84:GOTO 200
7744 CLS:PRINT "周校长:事情办好了?":I$=INKEY$
7745 CLS:PRINT "韩思阳:陆老师他…":I$=INKEY$
7746 CLS:PRINT "周校长:饭桶,我要开除你!":I$=INKEY$
7747 CLS:PRINT "杨柏:别呀":I$=INKEY$
7748 CLS:PRINT "周校长:你?小样,我就给你个机会…你若打得过我,就只给你个处分":I$=INKEY$
7749 RR=10:VN$(10)="周校长":VF$(10)="??":ZG(10)=100:ZQ(10)=400:ZX(10)=8000
7750 ZP(10)=80:ZMONEY(10)=500:GOTO 1997
7751 CLS:PRINT "周校长:呜啊,我要开除你!":I$=INKEY$
7752 CLS:PRINT "历主任:校长可不能言而无信啊":I$=INKEY$
7753 CLS:PRINT "得到警告处分,荣誉-200":I$=INKEY$:RYZ=RYZ-200:DEST=86
7754 CLS:PRINT "周校长:快去通知外教Ice.Chan吧":I$=INKEY$:GOTO 200
7755 CLS:PRINT "韩思阳:Miss Ice,I&#39;m so sorry to tell you that you have dismissed.":I$=INKEY$
7756 CLS:PRINT "Ice.Chan:Oh!I can&#39;t believe!":I$=INKEY$
7757 CLS:PRINT "李想:55555…我不想让您走…":I$=INKEY$
7758 CLS:PRINT "刘小龙:都这时候了,哭有什么用":I$=INKEY$
7759 CLS:PRINT "Ice.Chan:Let&#39;s go and see the headmaster.It mustn&#39;t be ture!":I$=INKEY$:DEST=87:GOTO 200
7760 CLS:PRINT "周校长:这不是我的意思啊,要不你们去找教育局长,他在文化宫":I$=INKEY$:DEST=88:GOTO 200
7761 CLS:PRINT "局长:有事吗?":I$=INKEY$
7762 CLS:PRINT "刘小龙:你为什么解雇Miss Ice!":I$=INKEY$
7763 CLS:PRINT "局长:这也是你管的吗?":I$=INKEY$
7764 CLS:PRINT "黄铮:不放Miss Ice,我咬死你!":I$=INKEY$
7765 RR=10:VN$(10)="沈局长":VF$(10)="??":ZG(10)=4000:ZQ(10)=4000:ZX(10)=800000
7766 ZP(10)=80000:ZMONEY(10)=8800:GOTO 1997
7767 CLS:PRINT "局长:我错了,你们饶了我吧":I$=INKEY$
7768 CLS:PRINT "女秘书:要不要叫保安?":I$=INKEY$
7769 CLS:PRINT "陈颜宇:把门堵住,别教她出去":I$=INKEY$
7770 CLS:PRINT "韩思阳:你为什么解雇Miss Ice?从实招来":I$=INKEY$
7771 CLS:PRINT "局长:我贪污公款,被她看到了,所以…":I$=INKEY$
7772 CLS:PRINT "韩思阳:多少?":I$=INKEY$
7773 CLS:PRINT "局长:不多,800万":I$=INKEY$
7774 CLS:PRINT "冯石:钱呢?把卡交出来":I$=INKEY$:MONEY=MONEY+8000000
7775 CLS:PRINT "周江龙:狗官,我踢死你!":I$=INKEY$
7776 CLS:PRINT "韩思阳:是非之地,不可久留,我们快走吧":I$=INKEY$:DEST=90:GOTO 200
7777 CLS:PRINT "周校长:哦?回来了?小Chan,你很厉害啊":I$=INKEY$
7778 CLS:PRINT "Ice.Chan:哪里？都是孩子们的功劳":I$=INKEY$
7779 CLS:PRINT "电话:喂,老周吗?立刻开除冯石他们":I$=INKEY$
7780 CLS:PRINT "冯石:校长,这是300万支票,先别开除我们":I$=INKEY$:MONEY=MONEY-3000000
7781 CLS:PRINT "孙腾龙:我就觉得他不会放过我们,不如先发制人":I$=INKEY$
7782 CLS:PRINT "韩思阳:马上去找警察":I$=INKEY$:DEST=91:GOTO 200
7783 CLS:PRINT "警察:哦?又是你们.记得前年我们打过一架":I$=INKEY$
7784 CLS:PRINT "邹帅:叔叔,这200万支票您收下,算是赔款":I$=INKEY$:MONEY=MONEY-2000000
7785 CLS:PRINT "警察:难道…你们偷的建设银行":I$=INKEY$
7786 CLS:PRINT "韩思阳:不,这是沈局长派我们送来的,告诉你们局,不要抓他":I$=INKEY$
7787 CLS:PRINT "警察:笑话!200万就想办事?我马上通知局里收缴赃款":I$=INKEY$
7788 CLS:PRINT "韩思阳:那…我们先去找局长,再送点钱来":I$=INKEY$
7789 CLS:PRINT "警察:告诉他,不交500万给我们局,休想没事":I$=INKEY$:DEST=92:GOTO 200
7790 CLS:PRINT "贾明昊:大家快来看报纸啊,沈局长被抓了啊":I$=INKEY$
7791 CLS:PRINT "丁红军:大家肃静,祝贺我们周校长当选新局长,以后我就是大家的校长了":I$=INKEY$:DEST=93:GOTO 200
7792 CLS:PRINT "王龙:师傅,我们手里的300万怎么办?早晚是事啊":I$=INKEY$
7793 CLS:PRINT "韩思阳:咱班同学一人一台A2000,剩下的钱以丁校长名义捐赠贫困山区":I$=INKEY$
7794 CLS:PRINT "王龙:好嘛":I$=INKEY$:DEST=94:GOTO 200
7795 CLS:LOCATE 3,3:PRINT "第七章黑色星期五":I$=INKEY$
7796 CLS:PRINT "李洋:嘿,出去打会球吧":I$=INKEY$
7797 CLS:PRINT "王晨:唉,不了.眼瞅就要高考了.我爹娘可说了,考不上清华就不要我了":I$=INKEY$
7798 CLS:PRINT "刑博:话不能这么说,我要是考上清华,还不要他们俩呐!":I$=INKEY$
7799 CLS:PRINT "韩思阳:这年头谁也闲不了,专家呀,你也多学习学习吧!":I$=INKEY$
7800 CLS:PRINT "李雅:你们都别吵了行不?":I$=INKEY$
7801 CLS:PRINT "张帆:唉,拿本书上厕所学去":I$=INKEY$
7802 CLS:PRINT "李洋:……":I$=INKEY$:DEST=95:GOTO 200
7803 CLS:PRINT "刘青帝:韩思阳啊,最近矿山街那个鬼可又回来了,对付它可就数你最有经验了":I$=INKEY$
7804 CLS:PRINT "韩思阳:唉,烦人!早不来,晚不来,偏偏这个时候来":I$=INKEY$:DEST=96:GOTO 200
7805 CLS:PRINT "韩思阳:你来干甚么!":I$=INKEY$
7806 CLS:PRINT "鬼:恩人息怒,小的今天来有要事相告":I$=INKEY$
7807 CLS:PRINT "韩思阳:还有什么比我现在复习更重要的吗":I$=INKEY$
7808 CLS:PRINT "鬼:当然有啦,我要告诉您一个好消息和一个坏消息……":I$=INKEY$
7809 CLS:PRINT "鬼:好消息是小的得到了成为天才的秘诀…":I$=INKEY$
7810 CLS:PRINT "鬼:可这坏消息,它竟被哈德斯给抢走了":I$=INKEY$
7811 CLS:PRINT "聂聪:他不是前年就被我们杀了吗?":I$=INKEY$
7812 CLS:PRINT "鬼:我的天!您就是用鼻子也能想的出,他是死神,怎么可能死呢?":I$=INKEY$
7813 CLS:PRINT "陈明亮:废话少说!带我们去找哈德斯":I$=INKEY$:DEST=97:GOTO 200
7814 CLS:PRINT "哈德斯:想不到,等了两年,你们还是来了……":I$=INKEY$
7815 CLS:PRINT "刘圆圆:想不到他真的还活着,太可怕了":I$=INKEY$
7816 CLS:PRINT "哈德斯:当初我堂堂死神竟被你们这群毛孩子烧了…真是奇耻大辱…我要报仇!!!":I$=INKEY$
7817 RR=10:VN$(10)="哈德斯":VF$(10)="??":ZG(10)=10000:ZQ(10)=10000:ZX(10)=1000000
7818 ZP(10)=100000:ZMONEY(10)=10000:GOTO 1997
7819 CLS:PRINT "陈明:快起来,接着打!":I$=INKEY$
7820 CLS:PRINT "韩思阳:还要报仇吗?这可又是个奇耻大辱啊":I$=INKEY$
7821 CLS:PRINT "哈德斯:不,不了…":I$=INKEY$
7822 CLS:PRINT "张帆:如果我没猜错,您应该只有三条命":I$=INKEY$
7823 CLS:PRINT "哈德斯:啊!你…太可怕了.不过…既然你们已经知道了我的绝密…就留你们不得!":I$=INKEY$
7824 RR=10:VN$(10)="哈德斯":VF$(10)="??":ZG(10)=10000:ZQ(10)=10000:ZX(10)=10000000
7825 ZP(10)=100000:ZMONEY(10)=10000:GOTO 1997
7826 CLS:PRINT "哈德斯:你们…竟能…能够杀…杀死…死神,你们是天…天才,我觉得……辣啊!!!":I$=INKEY$
7827 CLS:PRINT "韩思阳:好吧,让我们为这伟大的神默哀片刻……我们该回去了":I$=INKEY$
7828 CLS:PRINT "韩思阳:真难想象,一个没有死神的世界将是什么样子……":I$=INKEY$:DEST=100:GOTO 200
7829 CLS:PRINT "公元2007年6月8日,星期五,晴":I$=INKEY$
7830 CLS:PRINT "天才们全数以难以想象的优异成绩考入各自满意的大学……":I$=INKEY$
7831 CLS:PRINT "不久,又纷纷获得Nobell奖.并且取代了它……那就是……Sarge杯!":I$=INKEY$
7832 CLS:LOCATE 3,5:PRINT "全  书  完":I$=INKEY$:DEST=0:GOTO 200

oncefly

剧情，多多的。
不过 CLS 和 INKEY$太多了,有没有更好的优化方法?比如用 DATA.

sargehsy

DATA在剧情对话上不好加工啊，因为每次对话长度不同，而且有时还要触发别的引擎。

liuzhe1117

我玩的时候就是觉得速度太慢，要1秒钟才反应，而且释放的文件太多

sargehsy

大家帮忙想想剧情，力争成为“我的世界”第二。

emkf

支持!!!!!

天天蓝天

提一点建议，
这个游戏应该做成滚屏式的，这样才有创意
另外，我觉得战斗画面和系统应该更好一些，应该有华丽的魔法画面

sargehsy

用BAS做滚屏不太可能.不过未来的LAVA作品可以考虑.
魔法动画可以进一步优化(霸王传说等),但占的字节相对就多了.
纯BAS的能力已经达到极限,我汇编学了半本书了.目前尚未实践.

platescp

后续的内容将由我参与开发.

天天蓝天

如果我能帮得上忙得话，我也像实施

platescp

校园风云录v5.9版有诸多bug
1.在附中操场可以穿越栅栏
2.想起来再告诉你

platescp

强烈建议师傅修改一下

sargehsy

你别老用我的号发帖行不?

sargehsy

  校园风云录是我的出道之作。
在GGV和EMAX总计赢得了6000下载量。
当时菜菜的我还只能是借用别人（李晋）的引擎。
他遗留近两年的乱码问题最终被我于去年7月1日攻克。
我不能迷信前人的经验，小J的能力还是十分有限的。
现在看一眼当年的代码，只是些简单语句的堆砌。
我当时的思路是把游戏做的越大越好，所以没有太多的优化引擎。
（为了加入新剧情，我已经把原来的代码缩减了至少16KB）。
现在我觉得BAS技术能力已经积累到新的高度了，所以决定重写全部代码，估计能省出近1/3的空间。（比如GOSUB、RETURN、DATA、READ、RANDOM。）
这样，就又可以加入新的剧情、装备、魔法、地图等。
我已经将近一年没有大的动作了。
这个工程将在6月9日开工，现在征集大家的意见和建议。
我不会辜负这6000用户的期待，和EMAX星迷们11月末的评选。