autotests/input/highlight_cubescript.cfg

0001 // kate: syntax CubeScript;
0002 // CubeScript test
0003
0004 i = 0
0005 rainbowchat = [
0006     out = ""
0007     loop k $numargs [
0008         word = $(format "arg%1" (+ $k 1))
0009         loop j (stringlen $word) [
0010             out = (format "%1^fz%2%3" $out (substring "rygcbvmr" $i 2) (substring $word $j 1))
0011             if (> $i 5) [i = 0 ] [i = (+ $i 1)]
0012         ]
0013         out = (format "%1 " $out)
0014     ]
0015     if (< (stringlen $out) 128) [
0016         say $out
0017     ] [
0018         echo (format "This message is %1 chars long - the usual limit is 127. Each letter takes up 5." (stringlen $out))
0019     ]
0020 ]
0021
0022 setcomplete rainbowchat 1
0023 listcomplete rainbowchat [
0024     "BoOoM"
0025     "Good game!"
0026     "What the f*** was this?!?"
0027     "go for it!"
0028     "yeeeehaw!"
0029     "what a mess >_< "
0030 ]
0031
0032 // Line continuation escape
0033 "string ^
0034     newline"