by Richard Russell, October 2011
The code listed below reports whether the user is currently logged-in as an administrator or not:
SYS "IsUserAnAdmin" TO res% IF res% THEN PRINT "The current user is an administrator" ELSE PRINT "The current user is not an administrator" ENDIF