mkrefcsv.bas

rem
remgeneratesbasic_ref.csv
rem

tload"reference.json",s,1
ref=array(s)
counter=0
constmaxHelp=120

funccmpfunc(a,b)
localkeyword=iff(a.keyword==b.keyword,0,iff(a.keyword<b.keyword,-1,1))
returniff(a.type==b.type,keyword,iff(a.type<b.type,-1,1))
end

subout(s)
prints
end

mk_ref("Console")
mk_ref("Data")
mk_ref("Date")
mk_ref("File")
mk_ref("Graphics")
mk_ref("Language")
mk_ref("Math")
mk_ref("String")
mk_ref("System")

submk_ref(package)
locali,fileName,buffer,item,row,signature,help
localnum_items=len(ref[package])-1

sortref[package]usecmpfunc(x,y)
fori=0tonum_items
item=ref[package][i]

fileName="reference/"+item.nodeID+"-"+lower(package)+"-"+lower(translate(item.keyword," ",""))+".markdown"
try
tloadfileName,buffer,0
'# TICKS
'
'> TICKS
'
'Returns the number of milliseconds that have elapsed since start of the operating system.
'
' ====>
'
'Console,command,AT,521,"AT x, y","Moves the console cursor to the specified position. x,y are in pixels."
'
signature=translate(translate(mid(buffer[2],3),"\"", "\"\""), "`", "")
help=translate(translate(buffer[4],"\"", "\"\""), "`", "")
forh=5tomin(15,len(buffer)-5)
help=help+" "+translate(translate(translate(translate(buffer[h],"\"", "\"\""), "`", ""), "-", ""), "~", "")
next
if(len(help)>maxHelp)then
help=left(help,maxHelp)+" ..."
endif
row=package+","+item.type+","+item.keyword+","+item.nodeID+",\"" + signature + "\",\"" + help + "\""
outrow
catche
printfileName
throwe
endtry
nexti
end