aboutsummaryrefslogtreecommitdiff
path: root/engines/director/lingo/tests/builtin.lingo
blob: 561ecd3659bdaae8b8d287e1c657fba16d42ec28 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
beep
beep 3
alert "Hi"
alert "Hi" && "there"

open "Hello"
open "Hello" with "Finder"
open "Hello" && "more" with "Finder"

puppetPalette "Rainbow"
puppetPalette "System",30
puppetPalette "custompal", 15,4

puppetSound "Air Lock Lock"
puppetSound 0
puppetSound midiStart
puppetSound midiSong, 3
puppetSound midisongPointer, 2, 120

puppetSprite 15, true

puppetTempo 30
puppetTransition 1
puppetTransition 2,4,20

move cast 1, cast 3
move cast 3
put findEmpty(cast 10)
pasteClipBoardInto cast 2
put the width of cast 3