Advertisement
Guest User

Untitled

a guest
Dec 16th, 2018
86
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.74 KB | None | 0 0
  1. on *:text:.search *:#: {
  2. var %cache.param $+(*,$replace($2-,$chr(32),*),*)
  3. if ($read(mp3.txt,w,$+(%cache.param,*))) || ($read(flac.txt,w,$+(%cache.param,*))) || ($read(tv.txt,w,$+(%cache.param,*))) {
  4. msg # 14Searching for $+(", $+ $2- $+ ,") in archived releases.
  5. var %search.start = 1
  6. var %search.cnt = 0
  7. while ($read(mp3.txt,w,%cache.param,%search.start)) {
  8. var %search.found = $ifmatch
  9. if (%search.cnt >= 5) {
  10. inc %search.cnt
  11. var %search.start = $calc($readn + 1) }
  12. else {
  13. msg # 14FOUND: %search.found - (9MP3)
  14. inc %search.cnt
  15. var %search.start = $calc($readn + 1) }
  16. }
  17. %search.start = 1
  18. while ($read(flac.txt,w,%cache.param,%search.start)) {
  19. var %search.found = $ifmatch
  20. if (%search.cnt >= 5) {
  21. inc %search.cnt
  22. var %search.start = $calc($readn + 1) }
  23. else {
  24. msg # 14FOUND: %search.found - (9FLAC)
  25. inc %search.cnt
  26. var %search.start = $calc($readn + 1) }
  27. }
  28. %search.start = 1
  29. while ($read(tv.txt,w,%cache.param,%search.start)) {
  30. var %search.found = $ifmatch
  31. if (%search.cnt >= 5) {
  32. inc %search.cnt
  33. var %search.start = $calc($readn + 1) }
  34. else {
  35. msg # 14FOUND: %search.found - (9TV)
  36. inc %search.cnt
  37. var %search.start = $calc($readn + 1) }
  38. }
  39. if (%search.cnt >= 5) {
  40. msg # 14Limit reached (5). Redefine your search.
  41. msg # 14Total Found: %search.cnt $+ / $+ $calc($lines(mp3.txt) + $lines(flac.txt) + $lines(tv.txt)) $+(", $+ $2- $+ ,") }
  42. else {
  43. msg # 14Total Found: %search.cnt $+ / $+ $calc($lines(mp3.txt) + $lines(flac.txt) + $lines(tv.txt)) $+(", $+ $2- $+ ,") }
  44. }
  45. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement