/******************************/
/**     CRAZY STATS V1.0     **/
/**           bY:            **/
/** PARANOID / VANITY&HUMANE **/
/******************************/

parse arg node
nodeid = "AERexxControl"node
address value nodeid

options results
 
WHITE  = ""
RED    = ""
GREEN  = ""
YELLOW = ""
BLUE   = ""
PURPLE = ""
CYAN   = ""
BLACK  = ""       
CLS = d2c(12)


GETUSER 100 ;handle   = result
GETUSER 102 ;location = result
GETUSER 117 ;byteup   = result
GETUSER 118 ;leech    = result
GETUSER 121 ;expert   = result
GETUSER 107 ;ratio    = result
GETUSER 105 ;access   = result
GETUSER 104 ;slot     = result
GETUSER 112 ;calls    = result
GETUSER 109 ;messy    = result
GETUSER  12 ;sysop    = result
GETUSER 142 ;flag     = result
GETUSER  11 ;board    = result
GETUSER 149 ;node     = result
GETUSER 505 ;baud     = result
GETUSER 152 ;vers     = result
GETUSER 103 ;phone    = result
GETUSER 120 ;dayl     = result
GETUSER 115 ;secs     = result
time = secs%60

	     encrypt  ="eNcRyPteD"
	     gap      = 29
	     gap2     = 27
IF ratio = 0 THEN ratio = "dIsAbLeD!"
IF expert = X THEN expert = "oN!"
IF expert = N THEN expert = "Off..LAMER!"
IF flag = "ON" THEN flag = "ChAtAbLe!"
IF flag = "OFF" THEN flag = "AsLeeP!"

IF byteup > leech THEN rating = "ELiTE!"
IF leech > byteup THEN rating = "LEEChER!"
IF byteup = leech THEN rating = "NEW USER?"

IF messy > 100 THEN messys = "MEGA-POSTER!"
IF messy < 100 THEN messys = "GooD MaIL DuDE!"
IF messy < 50 THEN messys = "COULD bE BETTER!"
IF messy < 10 THEN messys  = "ANTi-SOCiAL!!"

SENDMESSAGE CLS
TRANSMIT "                                                                 "
TRANSMIT "        +---------------------------------------------------------------+"
TRANSMIT "        |  CRAZY STATS V1.0 CODED BY PARANOID/vAnItY^HuMaNe iN 1994!    |"
TRANSMIT "        |---------------------------------------------------------------|"
TRANSMIT "        34m|    YoUr hAnDlE: "left(handle,length(handle))""right("  LoCaTiON: ",gap-length(handle))left(location,length(location))right("|",gap2-length(location))
TRANSMIT "        |                                                               |"
TRANSMIT "        34m| ByTeS UpLoAdEd: "left(byteup,length(byteup))""right("eXpErT mOdE: ",gap-length(byteup))left(expert,length(expert))right("|",gap2-length(expert))
TRANSMIT "        |                                                               |"
TRANSMIT "        | ByTeS lEeChEd!: "left(leech,length(leech))""right("       SySOp: ",gap-length(leech))left(sysop,length(sysop))right("|",gap2-length(sysop))
TRANSMIT "        |                                                               |"
TRANSMIT "        |  YoUr rAtIo iS: "left(ratio,length(ratio))""right("SySoP sTaTuS: ",gap-length(ratio))left(flag,length(flag))right("|",gap2-length(flag))
TRANSMIT "        |                                                               |"
TRANSMIT "        |    YoUr AcCeSS: "left(access,length(access))""right("       bBs: ",gap-length(access))left(board,length(board))right("|",gap2-length(board))
TRANSMIT "        |                                                               |"
TRANSMIT "        |   yOu ArE uSeR: "left(slot,length(slot))""right("       oN nOdE: ",gap-length(slot))left(node,length(node))right("|",gap2-length(node))
TRANSMIT "        |                                                               |"
TRANSMIT "        |   No. oF cALLS: "left(calls,length(calls))""right("  yOuR SpEeD: ",gap-length(calls))left(baud,length(baud))right("|",gap2-length(baud))
TRANSMIT "        |                                                               |"
TRANSMIT "        |  yOuR pAsSwOrD: "left(encrypt,length(encrypt))""right("/X VERSiON: ",gap-length(encrypt))left(vers,length(vers))right("|",gap2-length(vers))
TRANSMIT "        |                                                               |"
TRANSMIT "        |       mEssAgEs: "left(messy,length(messy))""right("  yOuR pHoNE: ",gap-length(messy))left(phone,length(phone))right("|",gap2-length(phone))
TRANSMIT "        |                                                               |"
TRANSMIT "        |   lEeChEd 2dAy: "left(dayl,length(dayl))""right("     TiMeLiMiT: ",gap-length(dayl))left(time,length(time))right("|",gap2-length(time))
TRANSMIT "        |---------------------------------------------------------------|"
TRANSMIT "        |   YoUr rAtInG = "left(rating,length(rating))" "right("MeSsAgE rAtIng = ",29-length(rating))left(messys,length(messys))right("|",22-length(messys))
TRANSMIT "        +---------------------------------------------------------------+"
TRANSMIT ""
SHUTDOWN