The AFI or AGFile Interface allows the user to see all information stored on a script without having to type anything. To see the console, simply right-click on the IRC window after installation. To install, simply load into your remotes and allow initialization (or restart IRC) and type /install afi

Please note, you must have the AGFile script before you try to install this which can be found here: http://www.hawkee.com/snippet/8236/

Current Version: 1.1.0.0

;AGFile Interaface;

alias afiperm {
  If ($1 == version) { return 1.1.0.0 }
  If ($1 == title) { return AGFile_Interface }
  If ($1 == author) { return The_Almighty_Duelist }
  If ($1 == description) { return Interface addon for the AGFile script registration system. }
  If ($1 == product_id) { return A001-1100 }
  If ($1 == updateroot) { www.hawkee.com }
  If ($1 == updatepath) { /snippet/8237/ }
}

on *:LOAD: {
  echo 2 -a AGFile Interface Addon (C) $+ $asctime(yyyy) DJ Bill Enterprizes
  If ($readini(agfile.ini,afi,installed) != yes) {
    agfile register afi $afiperm(version) $afiperm(title) $afiperm(author) yes $afiperm(updateroot) $afiperm(updatepath) $afiperm(description)
    echo 2 -a Please type /install afi to install the AGFile Interface addon.
  }
  Else {
    If ($agversion(afi) != $afiperm(version)) {
      agfile update afi $afiperm(version) $afiperm(title) $afiperm(product_id) $afiperm(author) yes $afiperm(updateroot) $afiperm(updatepath) $afiperm(description)
      exit -nr
    }
  }
}

on *:START: {
  echo 2 -a AGFile Interface Addon (C) $+ $asctime(yyyy) DJ Bill Enterprizes
  If ($readini(agfile.ini,afi,installed) != yes) {
    agfile register afi $afiperm(version) $afiperm(title) $afiperm(author) yes $afiperm(updateroot) $afiperm(updatepath) $afiperm(description)
    echo 2 -a Please type /install afi to install the AGFile Interface addon.
  }
  Else {
    If ($agversion(afi) != $afiperm(version)) {
      agfile update afi $afiperm(version) $afiperm(title) $afiperm(product_id) $afiperm(author) yes $afiperm(updateroot) $afiperm(updatepath) $afiperm(description)
      exit -nr
    }
  }
}

alias afi {
  If (!$1) { dialog -md afi afi }
  If ($1 == install) {
    agfile install afi $afiperm(product_id)
    writeini agfile.ini status installing no
  }
  If ($1 == update) {
    agfile update afi $afiperm(version) $afiperm(title) $afiperm(product_id) $afiperm(author) yes $afiperm(updateroot) $afiperm(updatepath) $afiperm(description)
    writeini agfile.ini status updating no
  }
  If ($1 == uninstall) {
    agfile uninstall afi
    echo -a Uninstallation complete!
  }
  If ($1 == register) {
    agfile register afi $afiperm(version) $afiperm(title) $afiperm(author) yes $afiperm(description)
    echo -a Registration complete! You may now type /install afi
  }
}

dialog afi {
  title AGFile Interface
  option dbu
  size -1 -1 201 143
  text "Select", 1, 1 1 20 10
  combo 2, 21 1 179 10, drop
  text "", 3, 1 11 200 10
  text "Description", 4, 1 22 200 10
  text "", 5, 1 33 200 10
  text "", 6, 1 44 200 10
  text "Author", 7, 1 55 200 10
  text "", 8, 1 66 200 10
  text "Installed On", 9, 1 77 30 10
  text "", 10, 31 77 80 10
  text "Install Time", 11, 112 77 30 10
  text "", 12, 142 77 57 10
  text "Updated On", 13, 1 88 30 10
  text "", 14, 31 88 80 10
  text "Update Time", 15, 112 88 30 10
  text "", 16, 142 88 57 10
  text "Product ID", 17, 1 99 99 10
  text "", 18, 100 99 99 10
  text "Installation ID", 19, 1 110 99 10
  text "", 20, 100 110 99 10
  button "Update", 21, 1 121 199 10
  button "Uninstall", 22, 1 132 199 10
}

on *:DIALOG:afi:*:*: {
  If ($devent == init) {
    If ($readini(agfile.ini,afi,installed) != yes) {
      dialog -x afi
      echo -a AGFile Interface Addon not installed! Please type /install afi first!
      halt
    }
    var %temp.1 1
    While (%temp.1 <= $lines(agfile.txt)) {
      did -a $dname 2 $read(agfile.txt, %temp.1)
      inc %temp.1
    }
  }
  If ($devent == sclick) {
    If ($did == 2) {
      If (!$did(2).seltext) { halt }
      did -ra $dname 3 $readini(agfile.ini,$did(2).seltext,title)
      did -ra $dname 5 $left($readini(agfile.ini,$did(2).seltext,description),75)
      did -ra $dname 6 $right($readini(agfile.ini,$did(2).seltext,description),-75)
      did -ra $dname 8 $readini(agfile.ini,$did(2).seltext,author)
      did -ra $dname 10 $readini(agfile.ini,$did(2).seltext,installed_date)
      did -ra $dname 12 $readini(agfile.ini,$did(2).seltext,installed_time)
      did -ra $dname 14 $readini(agfile.ini,$did(2).seltext,updated_date)
      did -ra $dname 16 $readini(agfile.ini,$did(2).seltext,updated_time)
      did -ra $dname 18 $readini(agfile.ini,$did(2).seltext,product_id)
      did -ra $dname 20 $readini(agfile.ini,$did(2).seltext,installation_id)
    }
    If ($did == 21) {
      If (!$did(2).seltext) { halt }
      update $did(2).seltext
      dialog -x afi
    }
    If ($did == 22) {
      If (!$did(2).seltext) { halt }
      $did(2).seltext uninstall
      dialog -x afi
      dialog -md afi afi
    }
  }
}

menu * {
  -
  AGFile Interface: /dialog $iif($dialog(afi) == afi,-v,-md) afi afi
}