[[
   "start",
  ["identifier","myfilename"],
  ["text"," "],
  ["keyword.operator.asp","="],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","C:\\Wikipedia - VBScript - Example - Hello World.txt\""]
],[
   "start",
  ["identifier","MakeHelloWorldFile"],
  ["text"," "],
  ["identifier","myfilename"]
],[
   "state_4",
  ["meta.leading-space"," "]
],[
   "start",
  ["storage.type.function.asp","Sub"],
  ["text"," "],
  ["entity.name.function.asp","MakeHelloWorldFile"],
  ["text"," "],
  ["punctuation.definition.parameters.asp","("],
  ["variable.parameter.function.asp","FileName"],
  ["punctuation.definition.parameters.asp",")"]
],[
   "start",
  ["punctuation.definition.comment.asp","'"],
  ["comment.line.apostrophe.asp","Create a new file in C: drive or overwrite existing file"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["storage.type.asp","Set"],
  ["text"," "],
  ["identifier","FSO"],
  ["text"," "],
  ["keyword.operator.asp","="],
  ["text"," "],
  ["support.function.vb.asp","CreateObject"],
  ["text","("],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","Scripting.FileSystemObject\""],
  ["text",")"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["keyword.control.asp","If"],
  ["text"," "],
  ["identifier","FSO"],
  ["text","."],
  ["identifier","FileExists"],
  ["text","("],
  ["identifier","FileName"],
  ["text",") "],
  ["keyword.control.asp","Then"],
  ["text"," "]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["identifier","Answer"],
  ["text"," "],
  ["keyword.operator.asp","="],
  ["text"," "],
  ["support.function.vb.asp","MsgBox"],
  ["text"," ("],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","File \""],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["identifier","FileName"],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp"," exists ... OK to overwrite?\""],
  ["text",", "],
  ["support.type.vb.asp","vbOKCancel"],
  ["text",")"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["punctuation.definition.comment.asp","'"],
  ["comment.line.apostrophe.asp","If button selected is not OK, then quit now"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["punctuation.definition.comment.asp","'"],
  ["comment.line.apostrophe.asp","vbOK is a language constant"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["keyword.control.asp","If"],
  ["text"," "],
  ["identifier","Answer"],
  ["text"," "],
  ["keyword.operator.asp","<>"],
  ["text"," "],
  ["support.type.vb.asp","vbOK"],
  ["text"," "],
  ["keyword.control.asp","Then"],
  ["text"," "],
  ["keyword.control.asp","Exit"],
  ["text"," "],
  ["keyword.control.asp","Sub"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["keyword.control.asp","Else"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["punctuation.definition.comment.asp","'"],
  ["comment.line.apostrophe.asp","Confirm OK to create"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["identifier","Answer"],
  ["text"," "],
  ["keyword.operator.asp","="],
  ["text"," "],
  ["support.function.vb.asp","MsgBox"],
  ["text"," ("],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","File \""],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["identifier","FileName"],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp"," ... OK to create?\""],
  ["text",", "],
  ["support.type.vb.asp","vbOKCancel"],
  ["text",")"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.even-tab.spaces","  "],
  ["meta.odd-tab.spaces","  "],
  ["keyword.control.asp","If"],
  ["text"," "],
  ["identifier","Answer"],
  ["text"," "],
  ["keyword.operator.asp","<>"],
  ["text"," "],
  ["support.type.vb.asp","vbOK"],
  ["text"," "],
  ["keyword.control.asp","Then"],
  ["text"," "],
  ["keyword.control.asp","Exit"],
  ["text"," "],
  ["keyword.control.asp","Sub"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["keyword.control.asp","End"],
  ["text"," "],
  ["keyword.control.asp","If"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["punctuation.definition.comment.asp","'"],
  ["comment.line.apostrophe.asp","Create new file (or replace an existing file)"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["storage.type.asp","Set"],
  ["text"," "],
  ["identifier","FileObject"],
  ["text"," "],
  ["keyword.operator.asp","="],
  ["text"," "],
  ["identifier","FSO"],
  ["text","."],
  ["identifier","CreateTextFile"],
  ["text"," ("],
  ["identifier","FileName"],
  ["text",")"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["identifier","FileObject"],
  ["text","."],
  ["identifier","WriteLine"],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","Time ... \""],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["support.function.vb.asp","Now"],
  ["text","()"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["identifier","FileObject"],
  ["text","."],
  ["identifier","WriteLine"],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","Hello World\""]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["identifier","FileObject"],
  ["text","."],
  ["identifier","Close"],
  ["text","()"]
],[
   "start",
  ["meta.odd-tab.spaces","  "],
  ["meta.leading-space"," "],
  ["support.function.vb.asp","MsgBox"],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp","File \""],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["identifier","FileName"],
  ["text"," "],
  ["keyword.operator.asp","&"],
  ["text"," "],
  ["punctuation.definition.string.begin.asp","\""],
  ["string.quoted.double.asp"," ... updated.\""]
],[
   "start",
  ["keyword.control.asp","End"],
  ["text"," "],
  ["keyword.control.asp","Sub"]
]]