[[
   "start",
  ["constant.numeric","120"],
  ["text"," "],
  ["entity.name","OPEN"],
  ["string","\"R\""],
  ["text"," #"],
  ["constant.numeric","1"],
  ["text"," "],
  ["string","\"INVEN.DAT\""],
  ["punctiation",","],
  ["constant.numeric","39"]
],[
   "start",
  ["constant.numeric","125"],
  ["text"," "],
  ["entity.name","FIELD"],
  ["text","#"],
  ["constant.numeric","1"],
  ["punctiation",","],
  ["constant.numeric","1"],
  ["text"," "],
  ["identifier","AS"],
  ["text"," "],
  ["identifier","F"],
  ["text","$"],
  ["punctiation",","],
  ["constant.numeric","30"],
  ["text"," "],
  ["identifier","AS"],
  ["text"," "],
  ["identifier","D"],
  ["text","$"],
  ["punctiation",","],
  ["text"," "],
  ["constant.numeric","2"],
  ["text"," "],
  ["identifier","AS"],
  ["text"," "],
  ["identifier","Q"],
  ["text","$"],
  ["punctiation",","],
  ["constant.numeric","2"],
  ["text"," "],
  ["identifier","AS"],
  ["text"," "],
  ["identifier","R"],
  ["text","$"],
  ["punctiation",","],
  ["constant.numeric","4"],
  ["text"," "],
  ["identifier","AS"],
  ["text"," "],
  ["identifier","PH"]
],[
   "start",
  ["constant.numeric","130"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text",":"],
  ["entity.name","PRINT"],
  ["text"," "],
  ["string","\"FUNCTIONS:\""],
  ["text",":"],
  ["entity.name","PRINT"]
],[
   "start",
  ["constant.numeric","135"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["constant.numeric","1"],
  ["punctiation",","],
  ["string","\"INITIALIZE FILE\""]
],[
   "start",
  ["constant.numeric","140"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["constant.numeric","2"],
  ["text"," "],
  ["string","\"CREATE A NEW ENTRY\""]
],[
   "start",
  ["constant.numeric","150"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["constant.numeric","3"],
  ["punctiation",","],
  ["string","\"DISPLAY INVENTORY FOR ONE PART\""]
],[
   "start",
  ["constant.numeric","160"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["constant.numeric","4"],
  ["text"," "],
  ["string","\"ADD TO STOCK\""]
],[
   "start",
  ["constant.numeric","170"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["constant.numeric","5"],
  ["punctiation",","],
  ["string","\"SUBTRACT FROM STOCK\""]
],[
   "start",
  ["constant.numeric","180"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["constant.numeric","6"],
  ["punctiation",","],
  ["string","\"DISPLAY ALL ITEMS BELOW REORDER LEVEL\""]
],[
   "start",
  ["constant.numeric","220"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text",":"],
  ["entity.name","PRINT"],
  ["text",":"],
  ["entity.name","INPUT"],
  ["string","\"FUNCTION\""],
  ["punctiation",";"],
  ["identifier","FUNCTION"]
],[
   "start",
  ["constant.numeric","225"],
  ["text"," "],
  ["keyword.control","IF"],
  ["text"," "],
  ["paren.lparen","("],
  ["identifier","FUNCTION"],
  ["keyword.operator","<"],
  ["constant.numeric","1"],
  ["paren.rparen",")"],
  ["keyword.operator","OR"],
  ["paren.lparen","("],
  ["identifier","FUNCTION"],
  ["keyword.operator",">"],
  ["constant.numeric","6"],
  ["paren.rparen",")"],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["string","\"BAD FUNCTION NUMBER\""],
  ["text",":"],
  ["keyword.control","GOTO"],
  ["text"," "],
  ["constant.numeric","130"]
],[
   "start",
  ["constant.numeric","230"],
  ["text"," "],
  ["keyword.control","ON"],
  ["text"," "],
  ["identifier","FUNCTION"],
  ["text"," "],
  ["keyword.control","GOSUB"],
  ["text"," "],
  ["constant.numeric","900"],
  ["punctiation",","],
  ["constant.numeric","250"],
  ["punctiation",","],
  ["constant.numeric","390"],
  ["punctiation",","],
  ["constant.numeric","480"],
  ["punctiation",","],
  ["constant.numeric","560"],
  ["punctiation",","],
  ["constant.numeric","680"]
],[
   "start",
  ["constant.numeric","240"],
  ["text"," "],
  ["keyword.control","GOTO"],
  ["text"," "],
  ["constant.numeric","220"]
],[
   "start",
  ["constant.numeric","560"],
  ["text"," "],
  ["comment","REM REMOVE FROM STOCK"]
],[
   "start",
  ["constant.numeric","570"],
  ["text"," "],
  ["keyword.control","GOSUB"],
  ["text"," "],
  ["constant.numeric","840"]
],[
   "start",
  ["constant.numeric","580"],
  ["text"," "],
  ["keyword.control","IF"],
  ["text"," "],
  ["support.function","ASC"],
  ["paren.lparen","("],
  ["identifier","F"],
  ["text","$"],
  ["paren.rparen",")"],
  ["keyword.operator","="],
  ["constant.numeric","255"],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["string","\"NULL ENTRY\""],
  ["text",":"],
  ["keyword.control","RETURN"]
],[
   "start",
  ["constant.numeric","590"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["identifier","DH"]
],[
   "start",
  ["constant.numeric","600"],
  ["text"," "],
  ["entity.name","INPUT"],
  ["text"," "],
  ["string","\"QUANTITY TO SUBTRACT\""],
  ["punctiation",";"],
  ["identifier","S"],
  ["text","%"]
],[
   "start",
  ["constant.numeric","610"],
  ["text"," "],
  ["variable","Q%"],
  ["keyword.operator","="],
  ["support.function","CVI"],
  ["paren.lparen","("],
  ["identifier","Q"],
  ["text","$"],
  ["paren.rparen",")"]
],[
   "start",
  ["constant.numeric","620"],
  ["text"," "],
  ["keyword.control","IF"],
  ["text"," "],
  ["paren.lparen","("],
  ["identifier","Q"],
  ["text","%"],
  ["keyword.operator","-"],
  ["identifier","S"],
  ["text","%"],
  ["paren.rparen",")"],
  ["keyword.operator","<"],
  ["constant.numeric","0"],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["string","\"ONIY\""],
  ["punctiation",";"],
  ["identifier","Q"],
  ["text","%"],
  ["punctiation",";"],
  ["text"," "],
  ["string","\"IN STOCK\""],
  ["text",":"],
  ["keyword.control","GOTO"],
  ["text"," "],
  ["constant.numeric","600"]
],[
   "start",
  ["constant.numeric","630"],
  ["text"," "],
  ["variable","Q%"],
  ["keyword.operator","="],
  ["identifier","Q"],
  ["text","%"],
  ["keyword.operator","-"],
  ["identifier","S"],
  ["text","%"]
],[
   "start",
  ["constant.numeric","640"],
  ["text"," "],
  ["keyword.control","IF"],
  ["text"," "],
  ["variable","Q%"],
  ["keyword.operator","=<"],
  ["identifier","CVT"],
  ["paren.lparen","("],
  ["identifier","R"],
  ["text","$"],
  ["paren.rparen",")"],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["string","\"QUANTITY NOW\""],
  ["punctiation",";"],
  ["identifier","Q"],
  ["text","%"],
  ["punctiation",";"]
],[
   "start",
  ["constant.numeric","44"],
  ["text"," "],
  ["identifier","REORDER"],
  ["text"," "],
  ["identifier","LEVEL"],
  ["text","\""],
  ["punctiation",";"],
  ["support.function","CVI"],
  ["paren.lparen","("],
  ["identifier","RH"],
  ["paren.rparen",")"]
],[
   "start",
  ["entity.name","LSET"],
  ["text"," "],
  ["variable","Q$"],
  ["keyword.operator","="],
  ["identifier","MKU"],
  ["paren.lparen","("],
  ["identifier","Q"],
  ["text","%"],
  ["paren.rparen",")"]
],[
   "start",
  ["entity.name","PUT"],
  ["text","#"],
  ["constant.numeric","1"],
  ["punctiation",","],
  ["identifier","PART"],
  ["text","%"]
],[
   "start",
  ["keyword.control","RETURN"]
],[
   "start",
  ["identifier","DISPLAY"],
  ["text"," "],
  ["identifier","ITEMS"],
  ["text"," "],
  ["identifier","BELOW"],
  ["text"," "],
  ["identifier","REORDER"],
  ["text"," "],
  ["identifier","LEVEL"]
],[
   "start",
  ["keyword.control","FOR"],
  ["text"," "],
  ["constant.numeric","1"],
  ["keyword.operator","="],
  ["constant.numeric","1"],
  ["text"," "],
  ["keyword.control","TO"],
  ["text"," "],
  ["constant.numeric","100"]
],[
   "start",
  ["entity.name","GET"],
  ["text","#"],
  ["constant.numeric","1"],
  ["identifier","J"]
],[
   "start",
  ["keyword.control","IF"],
  ["text"," "],
  ["identifier","OVI"],
  ["paren.lparen","("],
  ["identifier","tzH"],
  ["paren.rparen",")"],
  ["identifier","OVI"],
  ["paren.lparen","("],
  ["identifier","RH"],
  ["paren.rparen",")"],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["identifier","Dtz"],
  ["punctiation",";"],
  ["string","\" QUANTITY\""],
  ["punctiation",";"]
],[
   "start",
  ["identifier","OVI"],
  ["paren.lparen","("],
  ["identifier","Qtz"],
  ["paren.rparen",")"],
  ["text"," "],
  ["support.function","TAB"],
  ["paren.lparen","("],
  ["constant.numeric","50"],
  ["paren.rparen",")"],
  ["text"," "],
  ["string","\"REORDER LEVEL\""],
  ["punctiation",";"],
  ["support.function","CVI"],
  ["paren.lparen","("],
  ["identifier","R"],
  ["text","$"],
  ["paren.rparen",")"]
],[
   "start",
  ["keyword.control","NEXT"],
  ["text"," "],
  ["identifier","I"]
],[
   "start",
  ["keyword.control","RETURN"]
],[
   "start",
  ["entity.name","INPUT"],
  ["text"," "],
  ["string","\"PART NUMBER\""],
  ["punctiation",";"],
  ["identifier","PART"],
  ["text","%"]
],[
   "start",
  ["keyword.control","IF"],
  ["paren.lparen","("],
  ["identifier","PART"],
  ["text","%"],
  ["keyword.operator","<"],
  ["constant.numeric","1"],
  ["paren.rparen",")"],
  ["keyword.operator","OR"],
  ["paren.lparen","("],
  ["identifier","PART"],
  ["text","%"],
  ["keyword.operator",">"],
  ["constant.numeric","100"],
  ["paren.rparen",")"],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["entity.name","PRINT"],
  ["text"," "],
  ["string","\"BAD PART NUMBER\""],
  ["text",": "],
  ["keyword.control","GOTO"],
  ["text"," "],
  ["constant.numeric","840"],
  ["text"," "],
  ["keyword.control","ELSE"],
  ["text"," "],
  ["entity.name","GET"],
  ["text","#"],
  ["constant.numeric","1"],
  ["text"," "],
  ["identifier","J"],
  ["keyword.operator",">"],
  ["identifier","ART"],
  ["text","%:"],
  ["keyword.control","RETURN"]
],[
   "start",
  ["entity.name","END"]
],[
   "start",
  ["comment","REM INITIALIZE FILE"]
],[
   "start",
  ["entity.name","INPUT"],
  ["text"," "],
  ["string","\"ARE YOU SURE\""],
  ["punctiation",";"],
  ["identifier","B"],
  ["text","$:"],
  ["keyword.control","IF"],
  ["text"," "],
  ["identifier","B"],
  ["text","$"],
  ["keyword.operator","<="],
  ["string","\"Y\""],
  ["text"," "],
  ["keyword.control","THEN"],
  ["text"," "],
  ["keyword.control","RETURN"]
],[
   "start",
  ["entity.name","LSET"],
  ["text"," "],
  ["variable","F$"],
  ["keyword.operator","="],
  ["support.function","CHR$"],
  ["paren.lparen","("],
  ["constant.numeric","255"],
  ["paren.rparen",")"]
],[
   "start",
  ["keyword.control","FOR"],
  ["text"," "],
  ["variable","O"],
  ["keyword.operator","="],
  ["constant.numeric","1"],
  ["text"," "],
  ["keyword.control","TO"],
  ["text"," "],
  ["constant.numeric","100"]
],[
   "start",
  ["entity.name","PUT"],
  ["text","#"],
  ["constant.numeric","1"],
  ["identifier","J"]
],[
   "start",
  ["keyword.control","NEXT"],
  ["text"," "],
  ["identifier","I"]
],[
   "start",
  ["keyword.control","RETURN"]
],[
   "start"
]]