Anonymous

; TDF's SITE INVITE
; Run the script and edit with sites, type /invite.update and right click for the menu.
menu * {
  SITE INVITE
  .--- ALL ---:invite.inviteall $me
  .$submenu($invite.listsites($1))
}
alias invite.update {
  %sitelist = SITEA, SITEB, SITEC, SITED
}
alias invite.listsites { if ($1 != begin && $1 != end) return $+($gettok(%sitelist,$1,44),:,invite.invite $+ $chr(32),$gettok(%sitelist,$1,44)) | return }
alias invite.invite {
  /dll rushmirc.dll RushScript RushApp.FTP.RAW(' $+ $1 $+ ','site invite $me $+ ',RS_LOGIN or RS_LOGOUT)
}
alias invite.inviteall {
  var %num = $numtok(%sitelist,44) , %lcv = 1
  while (%lcv <= %num) {
    timer 1 %lcv invite.invite $gettok(%sitelist,%lcv,44)
    inc %lcv
  }
}