One Hat Cyber Team

Your IP : 216.73.216.50

Server IP : 157.15.65.100

Server : Linux 157-15-65-100.cprapid.com 5.14.0-362.24.2.el9_3.x86_64 #1 SMP PREEMPT_DYNAMIC Sat Mar 30 14:11:54 EDT 2024 x86_64

Server Software : Apache

PHP Version : 8.2.28

Buat File | Buat Folder

Dir : ~/usr/share/enscript/hl/

Edit File: wmlscript.st

/**
 * Name: wmlscript
 * Description: WMLScript language.
 * Author: Markku Rossi <mtr@iki.fi>
 */

state wmlscript_string extends Highlight
{
  /\\\\./ {
    language_print ($0);
  }
  /[\']/ {
    language_print ($0);
    return;
  }
}

state wmlscript extends HighlightEntry
{
  /* Comments. */
  /\/\*/ {
    comment_face (true);
    language_print ($0);
    call (c_comment);
    comment_face (false);
  }
  /\/\// {
    comment_face (true);
    language_print ($0);
    call (eat_one_line);
    comment_face (false);
  }

/* String constants. */
  /\"/ {
    string_face (true);
    language_print ($0);
    call (c_string);
    string_face (false);
  }

/* '' strings. */
  /[\']/ {
    string_face (true);
    language_print ($0);
    call (wmlscript_string);
    string_face (false);
  }

/* Function definitions. */
  /\b(function)([ \t]+)([A-Za-z\$_][A-Za-z\$_0-9]*)([ \t]*\()/ {
    keyword_face (true);
    language_print ($1);
    keyword_face (false);

language_print ($2);

function_name_face (true);
    language_print ($3);
    function_name_face (false);

language_print ($4);
  }

/* This is actually punctuation.  We define it here so the `div'
     part won't get accidentally highlighted. */
  /\bdiv=/ {
    language_print($0);
  }

/* Keywords.
     (build-re '(access agent break case catch class const continue
     debugger default delete div do domain else enum equiv export
     extends extern false finally for function header http if import
     in invalid isvalid lib meta name new null path private public
     return sizeof struct super switch this throw true try typeof use
     user var void with ))
  */
  /\b(a(ccess|gent)|break|c(a(se|tch)|lass|on(st|tinue))\
|d(e(bugger|fault|lete)|iv|o(|main))\
|e(lse|num|quiv|x(port|te(nds|rn)))|f(alse|inally|or|unction)\
|h(eader|ttp)|i(f|mport|n(|valid)|svalid)|lib|meta|n(ame|ew|ull)\
|p(ath|rivate|ublic)|return|s(izeof|truct|uper|witch)\
|t(h(is|row)|r(ue|y)|ypeof)|use(|r)|v(ar|oid)|with)\b/ {
    keyword_face (true);
    language_print ($0);
    keyword_face (false);
  }

/* Built-in libraries.
     (build-re '(Lang Float String URL WmlBrowser Dialogs))
   */
  /\b(Dialogs|Float|Lang|String|URL|WmlBrowser)(\.)\
([a-zA-Z_][a-zA-Z_0-9]*)\b/ {
    builtin_face (true);
    language_print ($1);
    builtin_face (false);

language_print($2);

builtin_face (true);
    language_print ($3);
    builtin_face (false);
  }
}

/*
Local variables:
mode: c
End:
*/