Guest User

Untitled

a guest
May 27th, 2018
113
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.89 KB | None | 0 0
  1.  
  2. Comments: 424
  3.  
  4. mIRC Snippet: Xdcc Search Bot Script 2.8
  5. Posted on Mar 5, 2006 10:32 am if you change your current on text event in this to:
  6. ---------
  7. on *:text:*:#: {
  8. ;# Checks if the channel is being indexed.
  9. if ( $istok($hget(searchbot.settings,indexchan),$chan,44) ) {
  10. ;# Checks if the line is an actual xdcc ad. And that it is from a voice or higher.
  11. if ( $chr(35) isin $strip($1-,burc)) && ( to request !isin $1- ) && ( xdcc send !isin $1- ) && ($nick($chan,$nick,vho~&)) && ($remove($strip($1,burc),$chr(35),$chr(60),$chr(62),$chr(171),$chr(187)) isnum ) {
  12. ;# Checks if the pack is #1
  13. if ( $+($chr(35),1,$chr(32)) isin $strip($1-,burc)) {
  14. ;# Checks if the channel's index is made.
  15. if ($hget($+(searchbot.,$chan))) {
  16. ;# Deletes all packs from a user when they list #1 to ensure old packs arent updated if they list fewer than before.
  17. hdel -w $+(searchbot.,$chan) $+($nick,.*)
  18. ;# Adds the new #1 pack.
  19. sb.addpack $chan $nick $strip($remove($wildtok($1-,*#*,1,32),$chr(91),$chr(93),$chr(171),$chr(187)),burc) $strip($1-,burc)
  20. }
  21. }
  22. else {
  23. ;# Adds all packs after #1 for a user.
  24. sb.addpack $chan $nick $strip($remove($wildtok($1-,*#*,1,32),$chr(91),$chr(93),$chr(171),$chr(187)),burc) $strip($1-,burc)
  25. }
  26. }
  27. }
  28. ;List the search channels seperated by spaces, as shown
  29. if ($istok(#channel1 #channel2 #channel3,$chan,32)) {
  30. ;# Search Events.
  31. If ( $hget(searchbot.settings,enable) == 1 ) {
  32. ;# Searches all packs
  33. if ( $istok($hget(searchbot.settings,trigger),$1,44) ) {
  34. if ($2) {
  35. sb.search all $nick $2-
  36. }
  37. else {
  38. .notice $nick Please Specify A Search String.
  39. }
  40. halt
  41. }
  42. ;# Searches offline packs
  43. elseif ( $1 == !offline ) {
  44. if ($2) {
  45. sb.search offline $nick $2-
  46. }
  47. else {
  48. .notice $nick Please Specify A Search String.
  49. }
  50. halt
  51. }
  52. ;# Searches online packs
  53. elseif ( $1 == !online ) {
  54. if ($2) {
  55. sb.search online $nick $2-
  56. }
  57. else {
  58. .notice $nick Please Specify A Search String.
  59. }
  60. halt
  61. }
  62. }
  63. }
  64. }
Add Comment
Please, Sign In to add comment