aboutsummaryrefslogtreecommitdiff
path: root/engines/director/lingo/tests/strings.lingo
diff options
context:
space:
mode:
Diffstat (limited to 'engines/director/lingo/tests/strings.lingo')
-rw-r--r--engines/director/lingo/tests/strings.lingo13
1 files changed, 13 insertions, 0 deletions
diff --git a/engines/director/lingo/tests/strings.lingo b/engines/director/lingo/tests/strings.lingo
new file mode 100644
index 0000000000..568eb74640
--- /dev/null
+++ b/engines/director/lingo/tests/strings.lingo
@@ -0,0 +1,13 @@
+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