当前位置:软件学习 > Director >>

Director Lingo 语言入门(12)

Director Lingo 语言入门
Lingo魔法书--变量,字符串和文本域

变量

  学过编程的同志都知道所有编程语言上来都先说变量.但是为了照顾大家的情绪,避免把这个教程显得太乏味.我们现在才来讨论变量. 什么是变量?变量好比一个房间,堆放你需要储存的东西.在实际编程中变量有着很重要的作用.同样我们也经常用变量来储存一些比较复杂的表达式.这样可以简化我们程序的编写.变量之所以叫做变量是因为它的值是可以变化的.下面我们先来看看变量的一些操作.

赋值,就是给变量以内容.可以这样写.

变量名=变量值或者表达式

  例如: a=1   a=3*5

变量的类型:在Lingo语言中不同于其他的一些高级语言,要声明变量的类型.Lingo的变量类型是由赋予的内容决定的.我们最常用的是字符和数字两种值.

比如:a=1 变量a的类型是数值型. a="1" 变量a的类型是字符型.注意这里虽然都是1.但是带上""的就是字符串.不带的就是数值.

  首先我们看些字符串的操作

& 表示字符串连接.执行 Put "ab"&"cd"得到的结果是 "abcd"

&& 表示字符串连接当中加上一个空格.执行 Put "ab"&&"cd"得到的结果是 "ab cd"

String(表达式) 将数值转换成为字符串 例如 put string(3*5) 结果为 "15"

put string(5)结果为 "5"

numtoChar(整数表达式) 将数值转换为字符串,这个数值为字符串的ASCII值.put numtoChar(65)的结果是大写的"A".

相反的Chartonum(字符串)就是把字符转换成为ASC码

选取字符串的长度 Length(字符串) .例如put length("abcd")结果为4.

删除字符串中的字符

取子字符串 chars(字符串表达式,第一个字符串,最后一个字符串)比如

put chars("Macintosh",2,4)
-- 结果为"aci"从第2个取到第4个.

这是一个假冒伪劣的计算器.因为他更本不能计算.只能显示数字和擦除数字.在这里要给大家展示的是文本域的操作Lingo.为了使得问题尽量的简单.我们来看一个按钮显示文本是如何做的.

  首先在舞台上用工具栏上的Field按钮在舞台上制作一个文本域.然后在属性面板里面填写上文本域的名字.我们这里取名"result".然后在舞台上画一个按钮.标题为1.整个时间轴这样安排.当然我们不能忘记适用帧脚本停住画面.Sprite 1是文本域 Sprite 2是按钮.Ok我们的基本动作好了.

  下面我们要安按钮给文本域写数字.Lingo语言是如何的呢?文本域中的值可以这样来给定.

put 变量或者表达式 into field "文本域名"

文本域名我们在例子中是"result".对于1 这个按钮可以这样编写程序

on mouseup

 put "1" into field "result"

end

如果大家想一个个给按钮写Put "X" into field "result"的话 那么我的教程是失败的.如果我有100个按钮的话一个个写过来不要写死?我们要用上次说的behavior行为的概念.

按钮全部放到流程线上以后我们可以发现.如果我们仔细观察的话我们可以发现这样一个规律.那就是按钮数和sprite数正好相差1."1"按钮是Sprite 2."2"按钮是Sprite 3.我们是否可以用这个特点做文章呢?

on mouseUp me
  buttonvalue=string(the currentspritenum-1)
  put buttonvalue into field "result"
end

下面就是我写的一个behavior,核心思想是取得当前sprite的编号,然后-1作为field的内容,关键的语句是the currentspritenum这个系统变量可以取得当前正在操作的sprite的号码,然后减1,再用String函数变换成为字符串赋值给buttonvalue变量.这样的话就可以实现按钮和值的统一.这里我们使用变量是为了让语句看起来更间洁不然我们写put string(the currentspritenum-1) into field "result"也可以,但是太长了可读性就差了.

[1] [2] 下一页  

[page_break]

  接下来我们又发现一个问题,那就是我们新按按钮之后原先的值就消失了.正常的计算器显然不是这样的.如何办呢?

on mouseUp me
  content=the text of member "result"  --取得当前文本域的值使用系统变量the text of member
  buttonvalue=string(the currentspritenum-1)
  put content&buttonvalue into field "result" --让当前文本域的值加上当前相加的值
end

OK我们的behavior写好了.然后一个个赋给所有的按钮.我们还剩下最后一个Back按钮没有制作.

on mouseUp me
  content=the text of field "result"
  stringlength=length(content)-1
  nowcontent=chars(content,1,stringlength) --这里我们取子串删除.取得除了最后一个字符以外的所有字符也就是删除最后一个字符.
  put nowcontent into field "result" --然后重新赋值给文本域.
end

Ok劣质计算器就做好了.

如果你想要在运行状态下在文本域中输入文字.可以使用sprite(编号).editable =true来设定.当然首先要将该Sprite 木偶化.

on beginsprite me

  puppetSprite 1, TRUE --将Sprite木偶化
  sprite(1).editable = TRUE --将sprite可编辑.

Ok我们到这里基本上到了入门教程的尾声,这里我们最后给大家一个技巧就是使用注释语句.很多时候我们在编写Lingo语言的时候,需要对一些语句进行注释.这样的好处是以便于以后自己看一下编程序的思路.不至于若干天之后自己也看不懂.注释在lingo中是不会被执行的.它的开头用 "--"表示.在Director中用红色表示.大家可以发现我在整个教程中已经反复用到了注释语句.同样.注释语句的还有一个好处就是调试程序的时候方便.有些语句我们暂时想禁止他看看会有什么效果.我们只要在前面加上"--"就可以让他暂时变成注释不起作用.下次需要的时候只要把"--"删除就可以了.在此要感谢Arky给我做了精彩的演示,让我体会了它的强大.最后想告诉大家的是,与其多看理论不如动手实践.自己做和看别人做是完全不一样的.会有很多意想不到的事情发生.这些将是你宝贵的经验.

作者后记:写到这里,我们的Lingo语言基础教程暂时告一个段落了.在编写的过程中,读者热情的催促是我完成它的动力.本来写这个教程的初衷是因为看到了国外的一片Lingo语言教程.觉得是我见过的少数Lingo语言教程之一.当时想把他翻译过来给大家欣赏.但是在照搬改组了前2篇之后登时发现教程的内容偏少.于是在左思右想之后决定重新编写.于是把老外的教程压缩进入第2篇,从第3篇开始全部重写.搬出了4本Lingo语言的书进行参照.由于工作繁忙加上要重起炉灶,所以教程进行特别缓慢.恳请大家谅解.上面的11篇还只是Lingo魔法书的第一页.我们将在以后的日子继续见面的.

(完)

上一页  [1] [2] 

<
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,