I'm new to scripting and I'd like to present my first script ever: The !8ball script.
I know there are a lot of 8ball scripts on Hawkee, but I need to make a start somewhere, do I?
Have fun grabbing the script.
on *:TEXT:!8ball*:#:{
{ describe # 14,1s15,1ilently 14,1s15,1hakes 14,1u15,1p 14,1t15,1he14,1 815,1ball... }
/set %8ball $rand(1,8)
if (%8ball == 1) { msg # 14,1Y15,1es. }
if (%8ball == 2) { msg # 14,1N15,1o. }
if (%8ball == 3) { msg # 14,1A15,1lways! }
if (%8ball == 4) { msg # 14,1N15,1ever! }
if (%8ball == 5) { msg # 14,1A15,1bsolutely! }
if (%8ball == 6) { msg # 14,1O15,1fcourse not. }
if (%8ball == 7) { msg # 14,1H15,1ELL YEAH!! }
if (%8ball == 8) { msg # 14,1H15,1ELL NO!! }
}
Dan i was talking about the 8ball he has in his DefianceBot http://www.hawkee.com/snippet/4410/
this is the one from that
on *:TEXT:`8ball*:#:{
{ describe # shakes up the 8ball... }
/set %8ball $rand(1,8)
if (%8ball == 1) { msg # Yes. }
if (%8ball == 2) { msg # No. }
if (%8ball == 3) { msg # Always! }
if (%8ball == 4) { msg # Never! }
if (%8ball == 5) { msg # Absolutely! }
if (%8ball == 6) { msg # Ofcourse not. }
if (%8ball == 7) { msg # HELL YEAH!! }
if (%8ball == 8) { msg # HELL NO!! }
}
Umm the dude who posted a code rite before you ..look on the main page next to your name.And he\'s referring to this snippet http://www.hawkee.com/snippet/4336/ .
on *:TEXT:-8ball-*:#:{
/set %a8b $rand(1,8)
if (%a8b == 1) { describe # 0,1shakes up the ball... | msg # 1,0Yes }
if (%a8b == 2) { describe # 0,1shakes up the ball... | msg # 1,0No }
if (%a8b == 3) { describe # 0,1shakes up the ball... | msg # 1,0Absolutely }
if (%a8b == 4) { describe # 0,1shakes up the ball... | msg # 1,0Never }
if (%a8b == 5) { describe # 0,1shakes up the ball... | msg # 1,0Yep }
if (%a8b == 6) { describe # 0,1shakes up the ball... | msg # 1,0Nope }
if (%a8b == 7) { describe # 0,1shakes up the ball... | msg # 1,0Ofcourse }
if (%a8b == 8) { describe # 0,1shakes up the ball... | msg # 1,0Nah }
}
Similar no?
you could have done it a bit diff
on *:TEXT:!8ball*:#:{
describe # 14,1s15,1ilently 14,1s15,1hakes 14,1u15,1p 14,1t15,1he 14,1 $chr(56) $+ 15,1ball...
var %8ball 14,1Y15,1es.|14,1N15,1o.|14,1A15,1lways!|14,1N15,1ever!|14,1A15,1bsolutely!|14,1O15,1fcourse not.|14,1H15,1ELL YEAH!!|14,1H15,1ELL NO!!
.timer 1 1 msg # $gettok(%8ball,$r(1,8),124)
}