napa182 commented on a Page, 8ball  -  Aug 30, 2007

Oh heres another way to do it so it loads the txt file when you load the script and you still can add more answers to the txt file by right clicking in the channel. Just to give you an idea on diff ways.

on *:text:!8ball *:%8ballchan: {
  if (%8ball == on) {
    describe %8ballchan Shake\'s Up The 8ball!! 
    .timer 1 1 msg %8ballchan $read(8Ballmessages.txt)
  }
}
on *:load:{
  write 8Ballmessages.txt 7,1No 
  write 8Ballmessages.txt 7,1Yes
  write 8Ballmessages.txt 8,1Maybe 
  write 8Ballmessages.txt 8,1Lol No
  write 8Ballmessages.txt 8,1Are You Retarted Or Something
  write 8Ballmessages.txt 8,1Are You Serious..?
}
menu channel {
  .8Ball
  ..Set Chan:{ set %8ballchan $?\"Enter Channel\" | echo -a Channel Is Set To %8ballchan }
  ..Add Msg:{ write 8Ballmessages.txt $?\"Enter New 8Ball Message\" | echo -a 8Ball Message Has been set }
  ..ON:{ set %8Ball on | echo -a 8Ball Is ON }
  ..OFF:{ unset %8Ball | echo -a 8Ball Is OFF } 
}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.