Anonymous

on ^*:TEXT:*:*:{
  if ($nick == $readini(nicks.conf,$nick,Nickname)) { 
    if ($readini(nicks.conf,$nick,Prebot) == yes) {
      writeini -n rls.list PRE $strip($replace($replace($5,(, ),), )) $ctime
    }
    else {
      set %GETname $readini(nicks.conf,$nick,Sitename)
      set %GETnum $readini(nicks.conf,$nick,Sitenum)
      if ($readini(sites.conf,Site $+ %GETnum,SRB) == Source) { set %source $readini(sites.conf,Site $+ %GETnum,Name) }
      unset %GETname
      unset %GETnum
      if (DN isin $strip($2)) { halt }
      if (UP isin $strip($2)) { halt }
      if (passed isin $strip($1)) { halt }
      if (failed isin $strip($1)) { halt }
      if (invite isin $strip($1)) { halt }
      if (pre isin $strip($1)) { halt }
      if ($strip($1) == MONTH-RANK) { halt }
      if ($strip($1) == iD3) { halt }
      if ($strip($1) == NFO) { halt }
      if ($strip($1) == WIPE) { halt }
      if ($strip($1) == DELDIR) { halt }
      if ($strip($1) == RACE) { set %rls $strip($9) } 
      else { set %rls $strip($5) }
      set %sitenum 1
      set %SECnum 1
      while (%SECnum <= $readini(sections.conf,NumSecs,NumSecs)) {
        if ($readini(sections.conf,Sections,Section $+ %SECnum) isin $strip($3)) {
          while (%sitenum <= $readini(sites.conf,NumSites,NumSites)) {
            if ($readini(sites.conf,Site $+ %sitenum,Name) == %source) { inc %sitenum 1 }
            if ($readini(sites.conf,Site $+ %sitenum,R $+ $readini(sections.conf,Sections,Section $+ %SECnum)) == yes) { 
              set %sitelist %sites
              set %sitelist %source $+ %sites $+ ; $+ $readini(sites.conf,Site $+ %sitenum,Name)
              trade %source $readini(sites.conf,Site $+ %sitenum,Name) %rls $readini(sections.conf,Sections,Section $+ %SECnum) $calc($ctime - $readini(rls.list,PRE,%rls)) $strip($1)
              inc %sitenum 1
            }
            else { inc %sitenum 1 }
          }
        }
        inc %SECnum 1
      }
      ;unset %sitenum
      ;unset %SECnum
      ;unset %source
    }
  }
  if ($readini(main.conf,Config,Owner) == $nick) || if ($readini(users.conf,$nick,Nick) == $nick) {
    if ($1 == .site) {
      if ($2 == add) {
        msg # 10[15Initiating AddSite Sequence10]
        set %SECknow 1
        set %addSite 1
        set %addnick $nick
        writeini -n sites.conf NumSites NumSites $calc($readini(sites.conf,NumSites,NumSites) + 1)
        msg # 10[Question 1: 15What is the sites Name?10]
        halt
      }
      if ($2 == mod) {
        if ($4 == section) {
          if ($6 == allow) {
            if ($readini(sites.conf,$3,S0DAY) != $null) { writeini -n sites.conf $3 S $+ $5 YES }
            if ($readini(sites.conf,$3,R0DAY) != $null) { writeini -n sites.conf $3 R $+ $5 YES }
            msg # 10[15Modded Sucessfully10]
          }
        }
      }
    }
    if ($1 == .section) {
      if ($2 == add) {
        if ($3 == $null) { msg # 10[Message: 15ERROR10][Comment: 15.section add <SECTION NAME>10] }
        else {
          writeini -n sections.conf NumSecs NumSecs $calc($readini(sections.conf,NumSecs,NumSecs) + 1)
          writeini -n sections.conf Sections Section $+ $readini(sections.conf,NumSecs,NumSecs) $3
          msg # 10[Added Section:15 $3 $+ 10]
        }
      }
      else { halt }
    }
    if (%addSite == 1) {
      if ($nick == %addnick) {
        writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) Name $1
        set %STEname $1
        set %addSite 2
        msg # 10[Question 2: 15What is the sites Pretime? (in mins)10]
        halt
      }
    }
    if (%addSite == 2) {
      if ($nick == %addnick) {
        writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) PTime $calc($1 * 60)
        set %addSite 3
        msg # 10[Question 3: 15Sites Botnick?10]
        halt
      }
    }
    if (%addSite == 3) {
      if ($nick == %addnick) {
        writeini -n nicks.conf $1 Nickname $1
        writeini -n nicks.conf $1 Sitename %STEname
        writeini -n nicks.conf $1 Sitenum $readini(sites.conf,NumSites,NumSites)
        set %addSite 4
        msg # 10[Question 3: 15Is the site a Source site, Race site, or Both?10]
        halt
      }
    }
    if (%addSite == 4) {
      if ($nick == %addnick) {
        if ($1 == Source) {
          writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) SRB Source
          set %SRB S
          msg # 10[Question 4: 15Is this site a source for $readini(sections.conf,Sections,Section $+ %SECknow) $+ 10]
          set %addSite 5
          halt
        }
        if ($1 == Race) {
          writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) SRB Race
          msg # 10[Question 4: 15Are you racing $readini(sections.conf,Sections,Section $+ %SECknow) on this site?10]
          set %addSite 5
          set %SRB R
          halt
        }
        if ($1 == Both) {
          writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) SRB Both
          msg # 10[Question 4: 15Is this site a source for $readini(sections.conf,Sections,Section $+ %SECknow) $+ 10]
          set %addSite 5
          set %SRB B
          halt
        }
        else {
          msg # 10[Message: 15ERROR10][Comment: 15Reponce is Source, Race, or Both10]
          halt
        }
      } 
    }
    if (%addSite == 5) {
      if ($nick == %addnick) {
        while (%SECknow <= $readini(sections.conf,NumSecs,NumSecs)) {
          if (%SRB == B) {
            writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) S $+ $readini(sections.conf,Sections,Section $+ %SECknow) $1
            writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) R $+ $readini(sections.conf,Sections,Section $+ %SECknow) $1
            inc %SECknow 1
            if (%SECknow => $readini(sections.conf,NumSecs,NumSecs)) {
              msg # 10[Site Added, Have a nice day10]
              unset %addSite
              unset %SRB
              unset %SECknow
              halt
            }
            else {
              msg # 10[Question 4: 15Is this site a source/race destination for $readini(sections.conf,Sections,Section $+ %SECknow) $+ 10]
              halt
            }
          }
          else {
            writeini -n sites.conf Site $+ $readini(sites.conf,NumSites,NumSites) %SRB $+ $readini(sections.conf,Sections,Section $+ %SECknow) $1
            inc %SECknow 1
            if (%SECknow > $readini(sections.conf,NumSecs,NumSecs)) {
              msg # 10[Site Added, Have a nice day10]
              unset %addSite
              unset %SRB
              unset %SECknow
              unset %STEname
              unset %addnick
              halt
            }
            else {
              msg # 10[Question 4: 15Is this site a source for $readini(sections.conf,Sections,Section $+ %SECknow)10]
              halt
            }
          }
        }
      }
    }
    if ($1 == .user) {
      if ($2 == add) {
        writeini -n users.conf $3 Nick $3
        writeini -n users.conf $3 AllowALL yes
      }
    }
    if ($1 == .presend) {
      if ($2 == enable) {
        writeini -n main.conf Config PreSend yes
        msg # 10[PreSend: 15ENABLED10]
      }
      if ($2 == disable) {
        writeini -n main.conf Config PreSend no
        msg # 10[PreSend: 15DISABLED10]
      }
    }
  }
}

alias trade {
  if ($6 == NEW) {
    if ($readini(main.conf,Config,EnablePreSend) == yes) { 
      if (Sample isin $3) { halt }
      if (Subs isin $3) { halt }
      if ($5 <= $readini(sites.conf,$2,PTime)) {
        dll ufxpmirc.dll ufscript UF_FXPDIR(' $+ $1 $+ ',' $+ $4 $+ ',' $+ $2 $+ ',' $+ $4 $+ ',' $+ $strip($3) $+ ',-1) 
        aline -ap @Trade [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15Auto10][Source: 15 $+ $1 $+ 10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10][Pred: 15 $+ $duration($5) ago10]
        if ($readini(main.conf,Config,Channel) != None) { msg $readini(main.conf,Config,Channel) [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15Auto10][Source: 15 $+ $1 $+ 10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10][Pred: 15 $+ $duration($5) ago10] }
      }
      else { 
        writeini -n dontsend.lst $2 $3 DONTSEND
        aline -ap @Trade [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15None10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10][Reason: 15Out of site Pretime10][Pred: 15 $+ $duration($5) ago10]
        if ($readini(main.conf,Config,Channel) != None) { msg $readini(main.conf,Config,Channel) [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15None10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10][Reason: 15Out of site Pretime10][Pred: 15 $+ $duration($5) ago10] }
      }
    }
    else {
      if ($readini(dontsend.lst,$2,$3) == DONTSEND) { halt }
      else {
        dll ufxpmirc.dll ufscript UF_FXPDIR(' $+ $1 $+ ',' $+ $4 $+ ',' $+ $2 $+ ',' $+ $4 $+ ',' $+ $strip($3) $+ ',-1) 
        aline -ap @Trade [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15Auto10][Source: 15 $+ $1 $+ 10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10]
        if ($readini(main.conf,Config,Channel) != None) { msg $readini(main.conf,Config,Channel) [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15Auto10][Source: 15 $+ $1 $+ 10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10] }
      }
    }
  }
  else {
    dll ufxpmirc.dll ufscript UF_FXPDIR(' $+ $1 $+ ',' $+ $4 $+ ',' $+ $2 $+ ',' $+ $4 $+ ',' $+ $strip($3) $+ ',-1) 
    aline -ap @Trade [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15Auto10][Source: 15 $+ $1 $+ 10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10]
    if ($readini(main.conf,Config,Channel) != None) { msg $readini(main.conf,Config,Channel) [ $+ $date $time $+ ] 10[Type: 15Trade10][Trade: 15Auto10][Source: 15 $+ $1 $+ 10][Dest: 15 $+ $2 $+ 10][Cat: 15 $+ $4 $+ 10][Release: 15 $+ $3 $+ 10] }
  }
}