Barons 8Ball Random Message Script

[Baron]

THIS SCRIPT AND ALL DERIVATIVE WORKS ARE COPYRIGHT OF REDEEMER GAME STUDIOS UNLESS THEY ARE USING ECLIPSE ENGINES. ITS USE IS OPEN TO ALL USERS OF ECLIPSE ENGINES ALONG WITH THE RIGHT TO EDIT IT FREELY. ANY OTHER ENGINES / GAMES REQUIRE APPROVAL FOR USE. THIS MAY NOT BE POSTED ON OTHER BOARDS.

Used to call random messages from a .ini file. Follow the instructions cant go wrong.

Add this above the line
Case "/bell"

Case"/8ball"
Call random(index)
Exit Sub

Change this to the /command you want players to type to use your script. You can also call random.ini by using scripted tiles etc.

At the very bottom of your main.txt, add this

Sub random(index)
Dim randomiser
Dim max
Dim message

max = Getvar("random.ini", "index", "total_messages")

randomiser = Int((Int(max) + 1) * Rnd) + 0

If randomiser = 0 Then
randomiser = 1
End If

message = Getvar("random.ini", "messages", Int(randomiser) )

Call Playermsg(index, message, 10)

End Sub

Change this to the name of your .ini you will be drawing messages from

Create your random.ini and add inside it:

[INDEX]
total_messages=5

[MESSAGES]
1=No
2=Maybe
3=Yes
4=Perhaps
5=Dance like a chicken while juggling midgets

This number is your total number of messages starting at 1

These are the possible responses it can give.

Hope you enjoy the 8ball random message script. enjoy.

[The Wise Fool]

I was trying to do something similar to that, but rather than it being a message, I wanted to give a random item, once.  Thanks Baron :D

[Anonymous]

Hrmmmm would be a fairly simple matter to modify this scripts framework to get it to give random items, give it a try

[Pickle]

More useless yet entertaining scripts from Baron

[n0madic0debc]

the fun part about scripting having fun with it. Im looking for a way to do the random item thing.  :lol:

[Anonymous]

Guest is Baron here

The random item would need a few more fields in your ini for each entry :

ie

1_num:
1_val:
1_dur:
1_cur:

and the script would just give the item the same way it calls a message only loading from those four fields, you should also add checks for free inventory space though.

[mmaatteeoo2003]

how do you do this with scipted tile

[Baron]

put the line

Call random(index)

under a new case in your sub scriptedtile(index,script)

[mmaatteeoo2003]

put the line

Call random(index)

under a new case in your sub scriptedtile(index,script)

k i wasn't sure if you had to do diffent commands i am thinking of doing a fontun telling tabel and you knoe that thing.

[Baron]

well, if you want it to play messages other then those in the 8ball.ini you'd need to change the way the script handles certain stuff

just changing all the 8ball.ini references to something different would work though i think.

[IrunoHatake]

how would you go about the random item thing but making only like once a day? that would probably need timers and stuff and i almost never keep my server up for more than a hour so it would be kinda hard. any ideas?

also why is it that now i like always talk in old posts? ???