Movie setnow and setnext

Platform: mIRC

Published May 16, 2012

Updated May 16, 2012

325 9

Thanks to killler x for making this for me i know others will get use from it works like a charm.
in the channel as op type
!setnow "Then the movie" then when others come in and and type !now it shows "now playing whatever the movie is".
!setnext "Then the movie" then when others come in and and type !next it shows "next playing whatever the movie is".

on *:TEXT:!setnow*:#:{ 

if ($nick == $remove(#,$chr(35))) { set %now. [ $+ [ $chan ] ] $2- | msg # now playing set to: $2- 

} 

else { msg # You can't do that. You aren't allowed. } 

} 

on *:TEXT:!setnext*:#:{ 

if ($nick == $remove(#,$chr(35))) { set %next. [ $+ [ $chan ] ] $2- | msg # next playing set to: $2- 

} 

else { msg # You can't do that. You aren't allowed. } 

} 

On *:TEXT:!next:#:{ msg # %next. [ $+ [ $chan ] ] } 

On *:TEXT:!now:#:{ msg # %now. [ $+ [ $chan ] ] }

Comments

worldwide7477 - Jul 08, 2012

I'm trying a new one but can't get my idea in place of what i'm trying to do but the same idea that napa did when you set the now playing it will automatically give you the imdb plot this will eliminate doing imdb command all together also if anyone comes into the channel and type !now it will give the movie that is playing followed by the plot as for the !setnext this will remain the same when it swap to now playing ....this will be the only time imdb plot will show ....I think this will be the king of kings movie setup if i can or anyone else can accomplish yes my idea but action and thanks does go to the one that can do it. and it must stay in this forum of script as above for bot.

Note: All commands stay the same just adding imdb plot to !now which should show name of movie that you have set plus imdb plot !!
great idea if i must say so ...lol and i think this will take over all other imdb's plus setting movies.

Respond

worldwide7477 - May 28, 2012

Crewgy this is done by a bot on justin.tv and allot of other forums of scritpting is hard to get it to work with justin so this is the best way.

Respond

crewgy20 - May 28, 2012

let me ask a question... why are you uploading a script given in forums :/

Respond

m40295 - May 23, 2012

this looks awesome

i would love to be able to get it to read the playlist from a file or webpage
is there a way to have a script read line one after x amout of time move to line 2

Respond

worldwide7477 - May 16, 2012

napa it worked like a charm much thanks!!!

Respond

worldwide7477 - May 16, 2012

napa your the best i will test it later for sure i can't right now cause i'm getting ready to go live but i really thank you for all that you did.

forget that i just put it in napa i'll let you know how it worked when i go off line later....i just could not stand to see it seat here lol.

Respond

napa182 - May 16, 2012

um a small/fast edit to include a timer an i took out that you can't do that message as it is annoying, an i made it say if nothing is set for !now or !next it will now say Nothing set.
As for the timer you will have to put in the amount of seconds for it to change example !swap 30 for 30 seconds an !swap 3600 for an hour

		Code 			
on $*:TEXT:/^!(setn(ow|ext)|swap)\s(.+)$|^!(now|next)$/iS:#:{ 
  if ($nick = $remove(#,$chr(35))) { 
    if ($regml(1) = swap && $regml(2) isnum) { 
      .timermovie1 1 $regml(2) set $+(%,now.,#) $($+(%,next.,#),2) 
      .timermovie2 1 $calc($regml(2) + 1) unset $+(%,next.,#)
      msg # movie in next will swap to now in $regml(2) seconds
    }
    if ($regml(3)) {
      set $+(%,$iif($regml(1) = setnow,now,next),.,#) $regml(3) 
      msg # $iif($regml(1) = setnow,now,next) playing set to: $regml(3) 
    }
  }
  if ($istok(now|next,$regml(1),124) && !%f) { inc -u5 %f
    msg # $iif($($+(%,$regml(1),.,#),2),$v1,Nothing set)
  } 
}	

Respond

worldwide7477 - May 16, 2012

thanks napa i would love to see someone put another trigger on this like !swap with a timer,which would switch the next to now and leave the next empty for the next show so its revolving that would be the ultimate movie setup but ill leave all the scripting to the professionals my head would explode its hurting just thinking about it.
and if anyone would like to edit this be my guess.

Respond

napa182 - May 16, 2012

Maybe make it all under one text event, and add a flood pro to the !now an !next trigger so others don't flood the room with it.
Been awhile in coding msl but maybe something like this..
Example:

		Code 			
on $*:TEXT:/^!(setn(ow|ext))\s(.+)|^!(now|next)/iS:#:{ 
  if ($regml(3)) {
    if ($nick = $remove(#,$chr(35))) {
      set $+(%,$iif($regml(1) = setnow,now,next),.,#) $regml(3) 
      msg # $iif($regml(1) = setnow,now,next) playing set to: $regml(3) 
    }
    else { msg # You can't do that. You aren't allowed. }
  }
  if ($istok(now|next,$regml(1),124) && !%f) { inc -u5 %f
    msg # $($+(%,$regml(1),.,#),2)
  } 
}	

Respond