Calendar: Difference between revisions
Content added Content deleted
Line 9,573: | Line 9,573: | ||
function center (s,n) x=n-len(s):center=space(x\2+(x and 1))& s & space(x\2):end function |
function center (s,n) x=n-len(s):center=space(x\2+(x and 1))& s & space(x\2):end function |
||
sub print(x) wscript.stdout.writeline x : end sub |
sub print(x) wscript.stdout.writeline x : end sub |
||
function iif(a,b,c) :if a then iif=b else iif =c end if : end function |
function iif(a,b,c) :if a then iif=b else iif =c end if : end function |
||
sub docal (yr,nmonth,sloc) |
sub docal (yr,nmonth,sloc) |
||
Line 9,647: | Line 9,643: | ||
print string(ncols,"=") |
print string(ncols,"=") |
||
end sub |
end sub |
||
</lang> |
</lang> |
||
output |
output |