Brunobkr/llama.cpp_AlgMor24_github

1/*2Language: VBScript3Description: VBScript ("Microsoft Visual Basic Scripting Edition") is an Active Scripting language developed by Microsoft that is modeled on Visual Basic.4Author: Nikita Ledyaev <lenikita@yandex.ru>5Contributors: Michal Gabrukiewicz <mgabru@gmail.com>6Website: https://en.wikipedia.org/wiki/VBScript7Category: scripting8*/9 10/** @type LanguageFn */11function vbscript(hljs) {12  const regex = hljs.regex;13  const BUILT_IN_FUNCTIONS = [14    "lcase",15    "month",16    "vartype",17    "instrrev",18    "ubound",19    "setlocale",20    "getobject",21    "rgb",22    "getref",23    "string",24    "weekdayname",25    "rnd",26    "dateadd",27    "monthname",28    "now",29    "day",30    "minute",31    "isarray",32    "cbool",33    "round",34    "formatcurrency",35    "conversions",36    "csng",37    "timevalue",38    "second",39    "year",40    "space",41    "abs",42    "clng",43    "timeserial",44    "fixs",45    "len",46    "asc",47    "isempty",48    "maths",49    "dateserial",50    "atn",51    "timer",52    "isobject",53    "filter",54    "weekday",55    "datevalue",56    "ccur",57    "isdate",58    "instr",59    "datediff",60    "formatdatetime",61    "replace",62    "isnull",63    "right",64    "sgn",65    "array",66    "snumeric",67    "log",68    "cdbl",69    "hex",70    "chr",71    "lbound",72    "msgbox",73    "ucase",74    "getlocale",75    "cos",76    "cdate",77    "cbyte",78    "rtrim",79    "join",80    "hour",81    "oct",82    "typename",83    "trim",84    "strcomp",85    "int",86    "createobject",87    "loadpicture",88    "tan",89    "formatnumber",90    "mid",91    "split",92    "cint",93    "sin",94    "datepart",95    "ltrim",96    "sqr",97    "time",98    "derived",99    "eval",100    "date",101    "formatpercent",102    "exp",103    "inputbox",104    "left",105    "ascw",106    "chrw",107    "regexp",108    "cstr",109    "err"110  ];111  const BUILT_IN_OBJECTS = [112    "server",113    "response",114    "request",115    // take no arguments so can be called without ()116    "scriptengine",117    "scriptenginebuildversion",118    "scriptengineminorversion",119    "scriptenginemajorversion"120  ];121 122  const BUILT_IN_CALL = {123    begin: regex.concat(regex.either(...BUILT_IN_FUNCTIONS), "\\s*\\("),124    // relevance 0 because this is acting as a beginKeywords really125    relevance: 0,126    keywords: { built_in: BUILT_IN_FUNCTIONS }127  };128 129  const LITERALS = [130    "true",131    "false",132    "null",133    "nothing",134    "empty"135  ];136 137  const KEYWORDS = [138    "call",139    "class",140    "const",141    "dim",142    "do",143    "loop",144    "erase",145    "execute",146    "executeglobal",147    "exit",148    "for",149    "each",150    "next",151    "function",152    "if",153    "then",154    "else",155    "on",156    "error",157    "option",158    "explicit",159    "new",160    "private",161    "property",162    "let",163    "get",164    "public",165    "randomize",166    "redim",167    "rem",168    "select",169    "case",170    "set",171    "stop",172    "sub",173    "while",174    "wend",175    "with",176    "end",177    "to",178    "elseif",179    "is",180    "or",181    "xor",182    "and",183    "not",184    "class_initialize",185    "class_terminate",186    "default",187    "preserve",188    "in",189    "me",190    "byval",191    "byref",192    "step",193    "resume",194    "goto"195  ];196 197  return {198    name: 'VBScript',199    aliases: [ 'vbs' ],200    case_insensitive: true,201    keywords: {202      keyword: KEYWORDS,203      built_in: BUILT_IN_OBJECTS,204      literal: LITERALS205    },206    illegal: '//',207    contains: [208      BUILT_IN_CALL,209      hljs.inherit(hljs.QUOTE_STRING_MODE, { contains: [ { begin: '""' } ] }),210      hljs.COMMENT(211        /'/,212        /$/,213        { relevance: 0 }214      ),215      hljs.C_NUMBER_MODE216    ]217  };218}219 220export { vbscript as default };221