File: highlight.pb.ref

package info (click to toggle)
kf6-syntax-highlighting 6.18.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 49,060 kB
  • sloc: xml: 203,100; cpp: 12,878; python: 3,055; sh: 965; perl: 814; ruby: 494; 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; exp: 61; erlang: 54; sql: 51; java: 47; sed: 45; objc: 37; tcl: 36; awk: 31; asm: 30; fortran: 18; cs: 10
file content (87 lines) | stat: -rw-r--r-- 8,965 bytes parent folder | download | duplicates (6) 
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
 
<Comment>; This is a test file for kate's PureBasic highlighting.</Comment><br/>
<Normal Text></Normal Text><br/>
<Comment>; BMP2x Converter by Sven Langenkamp</Comment><br/>
<Normal Text></Normal Text><br/>
<Functions>UseJPEGImageEncoder</Functions><Separator>()</Separator><br/>
<Functions>UsePNGImageEncoder</Functions><Separator>()</Separator><br/>
<Normal Text></Normal Text><br/>
<Keyword>Declare</Keyword><Normal Text> Convert</Normal Text><Separator>(</Separator><Normal Text>JPEG</Normal Text><Separator>)</Separator><br/>
<Normal Text></Normal Text><br/>
<Keyword>Enumeration </Keyword><Number>1</Number><br/>
<Normal Text>    </Normal Text><Constant>#JPEG</Constant><br/>
<Normal Text>    </Normal Text><Constant>#PNG</Constant><br/>
<Keyword>EndEnumeration</Keyword><br/>
<Normal Text></Normal Text><br/>
<Region Marker>; BEGIN section</Region Marker><br/>
<Normal Text></Normal Text><br/>
<Normal Text></Normal Text><br/>
<Region Marker>; END</Region Marker><br/>
<Normal Text></Normal Text><br/>
<Keyword>Global</Keyword><Normal Text> Count</Normal Text><br/>
<Keyword>Global</Keyword><Normal Text> file</Normal Text><Separator>.</Separator><Normal Text>s</Normal Text><br/>
<Keyword>Global</Keyword><Normal Text> filename</Normal Text><Separator>.</Separator><Normal Text>s</Normal Text><br/>
<Keyword>Global</Keyword><Normal Text> fileext</Normal Text><Separator>.</Separator><Normal Text>s</Normal Text><br/>
<Keyword>Global</Keyword><Normal Text> OutputFormat</Normal Text><br/>
<Keyword>Global</Keyword><Normal Text> JPEGQuality</Normal Text><br/>
<Normal Text></Normal Text><br/>
<Normal Text>Count        </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Number>0</Number><br/>
<Normal Text>OutputFormat </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Number>1</Number><br/>
<Normal Text>JPEGQuality  </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Operator>-</Operator><Number>1</Number><br/>
<Normal Text></Normal Text><br/>
<Comment>; MAIN PROGRAM------------------------------------------------------------------</Comment><br/>
<Normal Text></Normal Text><br/>
<Comment>;Request Options</Comment><br/>
<Functions>PrintN</Functions><Separator>(</Separator><String>"Output Format"</String><Separator>)</Separator><br/>
<Functions>PrintN</Functions><Separator>(</Separator><String>"  [1] JPEG"</String><Separator>)</Separator><br/>
<Functions>PrintN</Functions><Separator>(</Separator><String>"  [2] PNG"</String><Separator>)</Separator><br/>
<Functions>Print</Functions><Normal Text> </Normal Text><Separator>(</Separator><String>"> "</String><Separator>)</Separator><br/>
<Normal Text>OutputFormat </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Functions>Int</Functions><Separator>(</Separator><Functions>Input</Functions><Separator>())</Separator><br/>
<Normal Text></Normal Text><br/>
<Keyword>Select </Keyword><Normal Text>OutputFormat</Normal Text><br/>
<Normal Text>    </Normal Text><Keyword>Case</Keyword><Normal Text> </Normal Text><Constant>#JPEG</Constant><Separator>:</Separator><br/>
<Normal Text>        fileext </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><String>".jpg"</String><br/>
<Normal Text>        </Normal Text><Comment>;Request JPEG Quality</Comment><br/>
<Normal Text>        </Normal Text><Functions>PrintN</Functions><Separator>(</Separator><String>""</String><Separator>)</Separator><br/>
<Normal Text>        </Normal Text><Functions>PrintN</Functions><Separator>(</Separator><String>"JPEG Quality"</String><Separator>)</Separator><br/>
<Normal Text>        </Normal Text><Functions>PrintN</Functions><Separator>(</Separator><String>"  [0-10]"</String><Separator>)</Separator><br/>
<Normal Text>        </Normal Text><Functions>Print</Functions><Normal Text> </Normal Text><Separator>(</Separator><String>"> "</String><Separator>)</Separator><br/>
<Normal Text>        JPEGQuality </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Functions>Int</Functions><Separator>(</Separator><Functions>Input</Functions><Separator>())</Separator><br/>
<Normal Text>    </Normal Text><br/>
<Normal Text>    </Normal Text><Keyword>Case</Keyword><Normal Text> </Normal Text><Constant>#PNG</Constant><Separator>:</Separator><br/>
<Normal Text>        fileext </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><String>".png"</String><br/>
<Keyword>EndSelect</Keyword><br/>
<Normal Text></Normal Text><br/>
<Comment>;Convert all BMP files in the current directory</Comment><br/>
<Functions>ExamineDirectory</Functions><Separator>(</Separator><Number>0</Number><Separator>,</Separator><Normal Text> </Normal Text><String>""</String><Separator>,</Separator><Normal Text> </Normal Text><String>"*.bmp"</String><Separator>)</Separator><br/>
<Keyword>While </Keyword><Functions>NextDirectoryEntry</Functions><Separator>()</Separator><Normal Text>   </Normal Text><br/>
<Normal Text>    file     </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Functions>DirectoryEntryName</Functions><Separator>()</Separator><br/>
<Normal Text>    filename </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Functions>GetFilePart</Functions><Separator>(</Separator><Normal Text>file</Normal Text><Separator>)</Separator><br/>
<Normal Text>    </Normal Text><br/>
<Normal Text>    </Normal Text><Keyword>If </Keyword><Functions>LoadImage</Functions><Separator>(</Separator><Number>0</Number><Separator>,</Separator><Normal Text> file</Normal Text><Separator>)</Separator><br/>
<Normal Text>        </Normal Text><Keyword>Select </Keyword><Normal Text>OutputFormat</Normal Text><br/>
<Normal Text>	    </Normal Text><Keyword>Case</Keyword><Normal Text> </Normal Text><Constant>#JPEG</Constant><Separator>:</Separator><br/>
<Normal Text>	      Convert</Normal Text><Separator>(</Separator><Normal Text>JPEGQuality</Normal Text><Separator>)</Separator><br/>
<Normal Text>	      </Normal Text><br/>
<Normal Text>	    </Normal Text><Keyword>Case</Keyword><Normal Text> </Normal Text><Constant>#PNG</Constant><Separator>:</Separator><br/>
<Normal Text>	        Convert</Normal Text><Separator>(</Separator><Operator>-</Operator><Number>1</Number><Separator>)</Separator><br/>
<Normal Text>	</Normal Text><Keyword>EndSelect</Keyword><br/>
<Normal Text>	Count </Normal Text><Operator>=</Operator><Normal Text> Count </Normal Text><Operator>+</Operator><Number>1</Number><br/>
<Normal Text>    </Normal Text><Keyword>EndIf</Keyword><br/>
<Normal Text>    </Normal Text><br/>
<Keyword>Wend</Keyword><br/>
<Normal Text></Normal Text><br/>
<Functions>PrintN</Functions><Separator>(</Separator><Functions>Str</Functions><Separator>(</Separator><Normal Text>Count</Normal Text><Separator>)</Separator><Normal Text> </Normal Text><Operator>+</Operator><Normal Text> </Normal Text><String>" files converted"</String><Separator>)</Separator><br/>
<Functions>CloseConsole</Functions><Separator>()</Separator><br/>
<Normal Text></Normal Text><br/>
<Comment>; PROCUDURES--------------------------------------------------------------------</Comment><br/>
<Normal Text></Normal Text><br/>
<Keyword>Procedure </Keyword><Normal Text>Convert</Normal Text><Separator>(</Separator><Normal Text>JPEG</Normal Text><Separator>)</Separator><br/>
<Normal Text>    </Normal Text><Keyword>Shared</Keyword><Normal Text> filename</Normal Text><Separator>,</Separator><Normal Text> fileext</Normal Text><br/>
<Normal Text>    </Normal Text><br/>
<Normal Text>    </Normal Text><Keyword>If </Keyword><Normal Text>JPEG </Normal Text><Operator>></Operator><Normal Text> </Normal Text><Operator>-</Operator><Number>1</Number><br/>
<Normal Text>        </Normal Text><Functions>SaveImage</Functions><Separator>(</Separator><Number>0</Number><Separator>,</Separator><Normal Text> filename </Normal Text><Operator>+</Operator><Normal Text> fileext</Normal Text><Separator>,</Separator><Normal Text> </Normal Text><Constant>#PB_ImagePlugin_JPEG</Constant><Separator>,</Separator><Normal Text> JPEG</Normal Text><Separator>)</Separator><br/>
<Normal Text>    </Normal Text><Keyword>Else</Keyword><br/>
<Normal Text>        </Normal Text><Functions>SaveImage</Functions><Separator>(</Separator><Number>0</Number><Separator>,</Separator><Normal Text> filename </Normal Text><Operator>+</Operator><Normal Text> fileext</Normal Text><Separator>,</Separator><Normal Text> </Normal Text><Constant>#PB_ImagePlugin_PNG</Constant><Separator>)</Separator><Normal Text>    </Normal Text><br/>
<Normal Text>    </Normal Text><Keyword>EndIf</Keyword><br/>
<Normal Text>    </Normal Text><Functions>PrintN</Functions><Separator>(</Separator><Normal Text>file </Normal Text><Operator>+</Operator><Normal Text> </Normal Text><String>" converted to "</String><Normal Text> </Normal Text><Operator>+</Operator><Normal Text> filename </Normal Text><Operator>+</Operator><Normal Text> fileext</Normal Text><Separator>)</Separator><br/>
<Keyword>EndProcedure</Keyword><br/>