All pastes #514788 Raw Edit

Untitled

public text v1 · immutable
#514788 ·published 2007-05-27 22:17 UTC
rendered paste body
on *:text:!track:#: {
  if (!$readini(requests.ini,$nick,status)) {
    notice $nick There are no requests to track for you.
    halt
  }
  notice $nick Ticket Request: $($+($chr(35),$readini(requests.ini,$nick,ticketid)))
  notice $nick Date added: $readini(requests.ini,$nick,dateadd)
  notice $nick Date closed: $iif($readini(requests.ini,$nick,status) == pending, Request not yet processed., $readini(requests.ini,$nick,dateclose)))  
  notice $nick Status: $readini(requests.ini,$nick,status)
  notice $nick $iif(!$readini(requests.ini,$nick,resdeni), $iif($readini(requests.ini,$nick,status) == pending, Your request is pending., The script you requested has been created for you $+ $chr(44) please follow the pastebin link below for details.), The reason of denial is because: $readini(requests.ini,$nick,resdeni))
  notice $nick $iif($readini(requests.ini,$nick,status) == complete, PasteBin Link: $readini(requests.ini,$nick,pbl), No more information is available at this time.)
} 
on *:text:!request*:#: {
  if ($readini(requests.ini,$nick,status) != $null) {
    notice $nick You can only request the maximum of one script at a time.
    halt
  }
  if (!$2-) {
    notice $nick Please enter a description of the requested script. (eg. !request I want a script that will auto-voice everyone who joins my channel)
    notice $nick Please be detailed, or your request will take longer to process.
    halt
  }
  set %i $($+($rand(1,9),$rand(a,z),$rand(2,5),$rand(a,u)))
  set %x $($+($rand(a,z),$rand(6,9),$rand(g,z)))
  set %c $($+(%x,%i))
  notice $nick Processing . . . please wait.
  writeini requests.ini $nick ticketid %c
  writeini requests.ini $nick status pending
  writeini requests.ini $nick dateadd $date
  writeini requests.ini $nick desc $2-
  writeini requests.ini id %c $nick
  write requests.txt %c - Requested by $nick  - !info %c for more details
  timer 1 2 notice $nick Your request has been added to our database. To view status of your request, type !track
  timer 1 2 notice $nick Requests using basic membership takes no more than 7 days, if you upgrade to our premium membership for free, you should know the status of your script within 3 days. Contact Syntax for more information.
  timer 1 3 notice $nick If you requested in error, please type !remreq
  timer 1 5 unset %i,%c,%x
}
on *:text:!info*:#: {
  if ($nick !ishop $chan) && ($nick != Syntax) {
    notice $nick Access denied.
    halt
  }
  if (!$2) {
    notice $nick Please specify a valid ticket ID. Type !vreq to finish requests and find the ticket ID.
    halt
  }
  if (!$readini(requests.ini,id,$2)) {
    notice $nick Invalid ticket ID.
    halt
  }
  notice $nick Hello, $($+($nick,.)) You are viewing request $2 requested by $readini(requests.ini,id,$2) $+ .
  notice $nick Description: $readini(requests.ini,$readini(requests.ini,id,$2),desc)
  notice $nick Date added: $readini(requests.ini,$readini(requests.ini,id,$2),dateadd)
  notice $nick If you have finished the script to fill this request, please type !fill $2 pastebinLINK
}
on *:text:!deny*:#mircstaff: {
  if (!$2) {
    notice $nick Please add a ticket ID to your fill. (eg. !fill d8105k http://www.pastebin.ca/)
    halt
  }
  if (!$readini(requests.ini,id,$2)) {
    notice $nick Invalid ticket ID.
    halt
  }
  if ($readini(requests.ini,$readini(requests.ini,id,$2),status) != pending) {
    notice $nick This request has already been filled. Sorry!
    halt
  }
  if (!$3-) {
    notice $nick Please enter a reason! (eg. !deny sj249ak4 Flooder)
    halt
  }
  writeini requests.ini $readini(requests.ini,id,$2) resdeni $3-
  writeini requests.ini $readini(requests.ini,id,$2) status denied
  writeini requests.ini $readini(requests.ini,id,$2) dateclose $date 
  notice $nick Request $2 has been denied.
  write -ds $+ $2 requests.txt
  notice $nick This has been logged.
}
on *:text:!fill*:#: {
  if ($nick !ishop $chan) && ($nick != Syntax) {
    notice $nick Access denied.
    halt
  }
  if (!$2) {
    notice $nick Please add a ticket ID to your fill. (eg. !fill d8105k http://www.pastebin.ca/)
    halt
  }
  if (!$readini(requests.ini,id,$2)) {
    notice $nick Invalid ticket ID.
    halt
  }
  if ($readini(requests.ini,$readini(requests.ini,id,$2),status) != pending) {
    notice $nick This request has already been filled. Sorry!
    halt
  }
  if (!$3) {
    notice $nick Please add the PasteBin link to your script. To clarify, paste the made script into this recommended pastebin, http://pastebin.ca and then type in the link. (eg. d8105k http://www.pastebin.ca/)
    halt
  }
  notice $nick Processing . . .
  notice $nick Please note that this has been logged.
  writeini requests.ini $readini(requests.ini,id,$2) status complete
  writeini requests.ini $readini(requests.ini,id,$2) pbl $3
  writeini requests.ini $readini(requests.ini,id,$2) dateclose $date
  write -ds $+ $2 requests.txt
  timer 1 2 notice $nick Request filled.
}
on *:text:!vreq:#: {
  if ($nick !ishop $chan) && ($nick != Syntax) {
    notice $nick Access denied.
    halt
  }
  notice $nick Type !info ticketid for more information on a request. (Ticket ID is the first word that consists of numbers and letters on each request below)
  notice $nick Type !deny ticketid reason to deny a request.
  timer 1 2 play -n $nick requests.txt
}
on *:text:!remreq:#: {
  if (!$readini(requests.ini,$nick,status)) {
    notice $nick There are no requests to remove for you.
    halt
  }
  notice $nick Removing your request, please wait . . .
  remini requests.ini $nick
  timer 1 2 notice $nick Your request has been removed, feel free to request any time.
}
on *:join:#mirc: {
  if (!$readini(mircchan.ini,stopjoin,$nick)) {
    timer 1 1 notice $nick Please keep in mind; people with a voice (+) are considered very important people, half operators ( $+ $chr(37) $+ ) are considered mIRC scripters. Contact Syntax for more information on mIRC scripters ( $+ $chr(37) $+ ). The channel operators (@ and &) are the people you'd want to contact for channel problems or SPAM/Flood or any other rule broken.
    timer 1 1 notice $nick Keep in mind also, that our owners & founders (~) have some sort of control over this network and will be able to help you with network-related problems, as well as channel-related and script-related.
    timer 1 2 notice $nick This is a one-time response. To view this message again type !s_info
    writeini mircchan.ini stopjoin $nick active
  }
}
on *:text:!commands:#mircstaff: {
  notice $nick !vreq (information on !deny, !fill and !info there also)
  notice $nick Those are all the commands for now; !vreq, !info, !fill, !deny.
}
on *:text:!s_info:#mirc: {
  timer 1 1 notice $nick Please keep in mind; people with a voice (+) are considered very important people, half operators ( $+ $chr(37) $+ ) are considered mIRC scripters. Contact Syntax for more information on mIRC scripters ( $+ $chr(37) $+ ). The channel operators (@ and &) are the people you'd want to contact for channel problems or SPAM/Flood or any other rule broken.
  timer 1 1 notice $nick Keep in mind also, that our owners & founders (~) have some sort of control over this network and will be able to help you with network-related problems, as well as channel-related and script-related.
  timer 1 2 notice $nick To view this message again, type !s_info
}
on *:text:!ircsc*:#: {
  if ($nick != Syntax) {
    halt
  }
  cs hop #mIRC add $2
  mode #mIRC +h $2
  invite $2 #mIRCStaff
}