Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; /*************************/
- ; /*** ShoutCast Spammer ***/
- ; /*************************/
- ; Snippet By MakiMaki
- ; Coded for Phreik.NET & FireFM
- ; Just Edit your account or remove the sockbot part and set the spammer to your msg alias.
- ; YOU DO NOT NEED: DLLS, WINAMP, MEDIA PLAYER, OR BE TUNED IN
- ; A big Thankyou && Shout Out to:
- ; pania aka serapHim - My Angel I love you
- ; Paul aka extremity - Bro you rock thanks for every thing.
- ; Leah aka Granny - One in a million type of friend and I was blessed to have ya
- ; Christian - thanks for the support
- ; Vipes -Though your music kills me at times, still awesome bro
- ; Peppa thanks for saving us from Vipes play list:P
- ;Alias - Edit these to your needs
- alias radio {
- if ($1 == START) { sockclose radio | sockopen radio 72.20.32.21 6667 | fire }
- elseif ($1 == CLOSE) { sockclose radio | sockclose firefm }
- elseif ($1 == JOIN || $1 == PART) { rwrite $1 # }
- elseif ($1 == HOP) { rwrite PART $+(#,$crlf,JOIN) # }
- }
- alias fire { sockclose FireFM | SockOpen firefm www.soundzunlimited.net 80 | .timerFM 1 30 fire }
- alias rwrite { sockwrite -n radio $1- }
- alias rall {
- var %i $numtok(%radiotok, 32)
- while (%i) {
- if ($1 == Song) { rwrite privmsg $gettok(%radiotok, %i, 32) * Now Playing $remove(%fire,:FireFM </marquee>) - FireFM }
- if ($1 == DJ) { rwrite privmsg $gettok(%radiotok, %i, 32) Current DJ - (8) DJ $2 (8) Live Stream - Tune in Http://Www.FireFmz.Tk FireFM Where the music is hotter!!! }
- if ($1 == Rjoin) { rwrite JOIN $gettok(%radiotok, %i, 32) }
- dec %i
- }
- }
- ;Sockets - ONLY EDIT IF YOU KNOW WHAT YOUR DOING!!!
- ;Sockets Open......
- on *:sockopen:firefm:{
- sockwrite -nt $sockname GET /makimaki/data.php HTTP/1.1
- sockwrite $sockname Host: www.soundzunlimited.net $+ $crlf $+ $crlf
- }
- on *:sockopen:radio:{
- rwrite USER FireFM * * $+(:,FLASH3)
- rwrite account %radiobot
- rall Rjoin
- }
- ;Sock Reads.....
- on *:sockread:firefm:{
- var %a | sockread %a
- tokenize 32 %a
- if (DJ isin $1-) {
- if (%DJ != $3) { set %DJ $3 | rall DJ $3 }
- elseif (%fire != $5-) { set %fire $5- | rall song }
- }
- }
- on *:sockread:radio:{
- if ($sockerr) { return }
- sockread %sd | if (!%sd) { return } | tokenize 32 %sd
- if ($1 == PING) { sockwrite -tn radio PONG $2- }
- }
- on *:sockclose:radio:{ .timerFM off | radio start }
- ;Menu - Add edit to your liking
- menu Channel {
- -
- Radio Spammer
- .$style($iif($istok(%radiotok, #, 32),1)) Spam Radio in # : set %radiotok $iif($istok(%radiotok, #, 32), $remtok(%radiotok, #, 32), $addtok(%radiotok, #, 32))
- .-
- .Set Account : set %radiobot $$?="Enter Account Cookie:"
- .-
- .Connect/Reset Bot: radio start
- .Join #: radio join
- .Part #: radio part
- .Close Bot: radio close | .timerFM off
- -
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement