游戏开发论坛

 找回密码
 立即注册
搜索
查看: 9589|回复: 31

我的RPG的脚本语言,大家看看

[复制链接]

187

主题

6490

帖子

6491

积分

论坛元老

团长

Rank: 8Rank: 8

积分
6491
发表于 2006-10-14 18:31:00 | 显示全部楼层 |阅读模式
MsgBox(内容,延迟)
OpenMap(地图,Tile,之前按键请求,之后发送按键)
Sleep(延迟[单位:秒])
SetPos(精灵,X坐标,y坐标)
SetSpiritVisable(精灵,是否显示)
SetSpiritDirection(精灵,方向)
Go(精灵,步数)
Tip(精灵)
SetActor(新精灵名字)
Music.Set(音乐名)
Music.Play
Music.Stop
Menu(项目数,宽度,项目内容与转向[格式:内容n@转向标号/...],显示内容,屏幕位置)
Goto 标号
:标号
Save(保存内容)
Exit(保存内容)
IfSaveGoto(保存内容,是否保存,转向)
DeleteSave(保存内容)
PaintImage(图片名,延迟)
Cls
Draw
Dim 变量1,变量2, .. ,变量n
SaveValue(位置,变量名)
GetValue(位置,变量名)
SetValue(变量名,变量值)
Readln(变量名,显示内容,默认值)
If 表达式 Then Goto 转向
Game.Save
Game.Load
Game.LoadState
Game.Over

引用变量:/'变量名'/
逻辑运算符:
= :等于
< :小于
> :大于
<= :小于等于
>= :大于等于
== :等于(字符串)
!! :不等于(字符串)

187

主题

6490

帖子

6491

积分

论坛元老

团长

Rank: 8Rank: 8

积分
6491
 楼主| 发表于 2006-10-14 18:33:00 | 显示全部楼层

开场菜单的代码是这样的

Dim PlayerName,PlayerSex,DefaultName
Game.LoadState
GetValue(PlayerName,PlayerName)
GetValue(PlayerSex,PlayerSex)
SetSpiritVisable(Lead,False)
:Start
Cls
PaintImage(splash,100)
IfSaveGoto(#StateExist,True,0)
Menu(2,10,新游戏@20/更新设定@30/,,)
:0
Menu(3,10,继续@10/新游戏@20/更新设定@30/,,)
:10
If /'PlayerSex'/==Boy Then Goto 40
If /'PlayerSex'/==Girl Then Goto 50
:40
SetActor(Rebooto.Gif)
Goto SkipGetSex
:50
SetActor(Kyouko.gif)
:SkipGetSex
SetSpiritVisable(Lead,True)
Game.Load
Goto EndMenu
:20
Cls
PaintImage(Introduction01,0)
Cls
PaintImage(Introduction02,0)
Cls
PaintImage(Introduction03,0)
Cls
PaintImage(Introduction04,0)
Cls
PaintImage(Introduction05,0)
Cls
MsgBox(啊。久违久违!#欢迎来到这个世界!,0)
MsgBox(你是....?,0)
Menu(2,4,男@ChoseBoy/女@ChoseGirl/,男孩?#还是女孩?,)
:ChoseBoy
SetValue(PlayerSex,Boy)
SetActor(Rebooto.gif)
SetValue(DefaultName,优树)
MsgBox(你是男孩啊。,0)
Goto SkipSex
:ChoseGirl
SetValue(PlayerSex,Girl)
SetActor(Kyouko.gif)
SetValue(DefaultName,甜甜)
MsgBox(你是女孩啊。,0)
:SkipSex
SaveValue(PlayerSex,PlayerSex)
:ReadyName
Readln(PlayerName,那么#你的名字是....,/'DefaultName'/)
Menu(2,4,是@YesName/否@ReadyName/,啊...是叫/'PlayerName'/啊!,,)
:YesName
SaveValue(PlayerName,PlayerName)
MsgBox(/'PlayerName'/!,0)
MsgBox(好了#你的故事开始了!,0)
MsgBox(幻想与冒险的#世界!,0)
MsgBox(开始前进!,1000)
SetSpiritVisable(Lead,True)
OpenMap(home2f,72,N,N)
Goto EndMenu
:30
MsgBox(不能进行设置,0)
Goto Start
:EndMenu

187

主题

6490

帖子

6491

积分

论坛元老

团长

Rank: 8Rank: 8

积分
6491
 楼主| 发表于 2006-10-14 18:35:00 | 显示全部楼层

Re:我的RPG的脚本语言,大家看看

这些语句的功能都很容易从名字看得出来的。
有什么缺漏的,需要增加的,或是有什么这方面的资料,大家帮忙多提意见,谢谢。

89

主题

4036

帖子

4132

积分

论坛元老

Rank: 8Rank: 8

积分
4132
发表于 2006-10-14 18:55:00 | 显示全部楼层

Re:我的RPG的脚本语言,大家看看

自己写个脚本语言?

187

主题

6490

帖子

6491

积分

论坛元老

团长

Rank: 8Rank: 8

积分
6491
 楼主| 发表于 2006-10-14 19:02:00 | 显示全部楼层

Re:我的RPG的脚本语言,大家看看

哦,是啊,是给我的游戏用的。

89

主题

4036

帖子

4132

积分

论坛元老

Rank: 8Rank: 8

积分
4132
发表于 2006-10-14 20:04:00 | 显示全部楼层

Re:我的RPG的脚本语言,大家看看

个人比较 js 和 angelscript。 都是C风格的。不需要再学别的语言了。
js的vm可以用mozilla的spidermonkey。
angelscript去google一下就可以了。

15

主题

2093

帖子

2093

积分

金牌会员

Rank: 6Rank: 6

积分
2093
发表于 2006-10-15 19:39:00 | 显示全部楼层

Re:我的RPG的脚本语言,大家看看

不错不错

270

主题

6442

帖子

6446

积分

论坛元老

Rank: 8Rank: 8

积分
6446
发表于 2006-10-15 21:17:00 | 显示全部楼层

Re: Re:我的RPG的脚本语言,大家看看

psic: Re:我的RPG的脚本语言,大家看看

不错不错


臭味相投!

15

主题

2093

帖子

2093

积分

金牌会员

Rank: 6Rank: 6

积分
2093
发表于 2006-10-15 23:08:00 | 显示全部楼层

Re: Re: Re:我的RPG的脚本语言,大家看看

游戏之家站长: Re: Re:我的RPG的脚本语言,大家看看



臭味相投!


大师真香

22

主题

371

帖子

387

积分

中级会员

Rank: 3Rank: 3

积分
387
发表于 2006-10-16 10:39:00 | 显示全部楼层

Re:我的RPG的脚本语言,大家看看

大师不懂什么叫脚本的,他的全流程都是硬编码在程序里面的...
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

作品发布|文章投稿|广告合作|关于本站|游戏开发论坛 ( 闽ICP备17032699号-3 )

GMT+8, 2026-1-26 15:44

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表