Guest User

Untitled

a guest
Jan 23rd, 2018
85
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.20 KB | None | 0 0
  1.  
  2. ;==BEGIN QUERY ACCEPT==
  3. on *:LOAD: {
  4. echo -a Welcome, Mazgula. Query blocker initialized!
  5. }
  6. ;==The above is really an unnecssary bit
  7. ;==it had originally said the creator of the
  8. ;==script and the script version
  9.  
  10. on *:OPEN:?: {
  11. msg $nick Waiting for user $me to accept Query...
  12. timer 1 0 acceptq $timestamp $nick
  13. }
  14. ;==That part was to make mIRC watch for a query
  15. ;==which is the fancy mIRC message box
  16.  
  17. alias acceptq {
  18. set %acc $input( $1 Accept Private Message Request from $+($2,?),yqdv,Accept Query )
  19. acceptqcheck $1 $2
  20. }
  21. ;==That part is creating a smaller script that
  22. ;==needs your imput, the part where you select
  23. ;==accepting the query or not
  24.  
  25. alias acceptqcheck {
  26. if ( %acc == $yes ) {
  27. msg $2 (Query Accepted)
  28. ;==you can change the part in the parenthsis
  29. ;==above to whatever you'd like
  30. window -a $2
  31. }
  32. if ( %acc == $no ) {
  33. msg $2 (Query Denied)
  34. ;==you can change the part in the parenthsis
  35. ;==above to whatever you'd like
  36. window -c $2
  37. }
  38. ;==That part is telling the script what to do when you
  39. ;==select yes or no
  40. unset %acc
  41. ;==That part is to unset the part where you selected
  42. ;==yes or no
  43. }
  44. ;==END QUERY ACCEPT==
Add Comment
Please, Sign In to add comment