← Back to branch summary

~ubuntu-branches/ubuntu/trusty/redeclipse-data/trusty

« back to all changes in this revision

Viewing changes to data/voice.cfg

  • Committer: Package Import Robot
  • Author(s): Martin Erik Werner
  • Date: 2012-09-01 21:11:53 UTC
  • mfrom: (1.1.1)
  • Revision ID: package-import@ubuntu.com-20120901211153-8913lu8fs7qukj6y
Tags: 1.3.1-1
* New upstream development snapshot
* XZ compression for orig tarball
* Standards-Version 3.9.3
  - Set final DEP-5 Format: link

Show diffs side-by-side

added added

removed removed

Lines of Context:
data/voice.cfg
3
3
voices = 0
4
4
addvoice = [
5
5
    voices = (+ $voices 1)
6
 
    alias (format "voice%1str" $voices) $arg1
7
 
    alias (format "voice%1snd" $voices) (registersound $arg2 255 512 8 $arg3)
 
6
    [voice@[voices]str] = $arg1
 
7
    [voice@[voices]snd] = (registersound $arg2 255 512 8 $arg3)
8
8
]
9
9
 
10
10
addvoice "argh"         "voice/argh"        2
29
29
 
30
30
on_text = [
31
31
    id = 0
32
 
    reg = (format "%1~" (filter $arg4)) // the ~ allows absolute matching, like in yes/no/etc
 
32
    reg = [@(filter $arg4)~] // the ~ allows absolute matching, like in yes/no/etc
33
33
    loopwhile i $voices [= $id 0] [
34
 
        str = (getalias (format "voice%1str" (+ $i 1)))
 
34
        str = $[voice@(+ $i 1)str]
35
35
        if (strncasecmp $str $reg (strlen $str)) [ id = (+ $i 1) ]
36
36
    ]
37
 
    result (getalias (format "voice%1snd" $id))
 
37
    result (getalias [voice@[id]snd])
38
38
]