aboutsummaryrefslogtreecommitdiff
path: root/engines/director/lingo/tests/strings.lingo
blob: 38f1e5514254d13f27bf91d70c867ca065271ffa (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
set z = "foo bar baz"
set z1 = z & " meow"
set z1 = z1 && "woof"
put z
put z1
put chars("Macromedia", 6, 6)
put chars("Macromedia", 6, 10)
put chars("Macromedia", -1, 15)
if z1 contains "Me�W" then
	put "Contains"
else
	put "Doesn't contain"
end if

put "That is the last line of the file." & return & "Click Done to exit." && return && "foo"

if the key = Return then
	dontPassEvent
end if