File: highlight_cubescript.cfg

package info (click to toggle)
kf6-syntax-highlighting 6.13.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 47,568 kB
  • sloc: xml: 197,750; cpp: 12,850; python: 3,023; sh: 955; perl: 546; ruby: 488; pascal: 393; javascript: 161; php: 150; jsp: 132; lisp: 131; haskell: 124; ada: 119; ansic: 107; makefile: 96; f90: 94; ml: 85; cobol: 81; yacc: 71; csh: 62; erlang: 54; sql: 51; java: 47; objc: 37; awk: 31; asm: 30; tcl: 29; fortran: 18; cs: 10
file content (34 lines) | stat: -rw-r--r-- 789 bytes parent folder | download | duplicates (4)
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
31
32
33
34
// kate: syntax CubeScript;
// CubeScript test

i = 0
rainbowchat = [
    out = ""
    loop k $numargs [
        word = $(format "arg%1" (+ $k 1))
        loop j (stringlen $word) [
            out = (format "%1^fz%2%3" $out (substring "rygcbvmr" $i 2) (substring $word $j 1)) 
            if (> $i 5) [i = 0 ] [i = (+ $i 1)]
        ]
        out = (format "%1 " $out)
    ]
    if (< (stringlen $out) 128) [
        say $out
    ] [
        echo (format "This message is %1 chars long - the usual limit is 127. Each letter takes up 5." (stringlen $out))
    ]
]

setcomplete rainbowchat 1
listcomplete rainbowchat [
    "BoOoM"
    "Good game!"
    "What the f*** was this?!?"
    "go for it!"
    "yeeeehaw!"
    "what a mess >_< "
]

// Line continuation escape
"string ^
    newline"