Hello all! Plug this into your runbox and see if you can get any
results past July. I've tried everything; what am I doing wront?
win.debug(.t...@monthconvertor("August", 0))
;0=return Month
;1=return Mon
;2=return MON
;3=return Number like 1, 2, or 12
function MonthConvertor(enterthis, returnhow)
if (enterthis == "")do
messagebox("warning","MonthConvertor has nothing to convert!")
endif
enterthis = case("lower", enterthis)
local m=vec.create2D(12,3) ;;column1=Months, column2=MON
m[0,0]="january"
m[1,0]="february"
m[2,0]="march"
m[3,0]="april"
m[4,0]="may"
m[5,0]="june"
m[6,0]="july"
m[7,0]="august"
m[8,0]="september"
m[9,0]="october"
m[10,0]="november"
m[11,0]="december"
m[0,1]="jan"
m[1,1]="feb"
m[2,1]="mar"
m[3,1]="apr"
m[4,1]="may"
m[5,1]="jun"
m[6,1]="jul"
m[7,1]="aug"
m[8,1]="sep"
m[9,1]="oct"
m[10,1]="nov"
m[11,1]="dec"
m[0,2]="1"
m[1,2]="2"
m[2,2]="3"
m[3,2]="4"
m[4,2]="5"
m[5,2]="6"
m[6,2]="7"
m[7,2]="8"
m[8,2]="9"
m[9,2]="10"
m[10,2]="11"
m[11,2]="12"
if (returnhow==0) or (returnhow=="")do ;;return Month
local c=0 ;;c is the column to return values from
elseif (returnhow==1) or (returnhow==2)do ;;return MON or Mon
local c=1
elseif (returnhow==3)do ;;return Number
local c=2
EndIf
for (local i=0; i<m[0].length; i++)
if(enterthis==m[i,0]) or (enterthis==m[i,2]) or
(enterthis==m[i,1])do
local result = m[i,c]
endif
endfor
if(returnhow==0) or (returnhow=="") or (returnhow==1)do ;;convert
MON to Mon
result=case("sentence", result)
elseif (returnhow==2)do ;;make all caps
result=case("upper", result)
Endif
quit(result)
