Geordie

Geordiehc · Jan 18, 2008

Oma Captain Reality Fix

Code:

;Geo-OmaCaptain
;;; @ReloadMonAi OmaCaptain "MonAi_def\OmaCaptain.txt"
[@OmaCaptain, STATUS, 0]
#IF
Near   3
LOWHP  10
HIGHHP 5
#ACT
Say "You come here to destroy us, we will never die."
Jump 10
Spell [3] HEALING 100 (23) SELF Delay 3000
break
#IF
Near   8
LOWHP  100
HIGHHP 40
#ACT
RUNAWAY
break
#IF
Near   12
#ACT
hit [0]
Spell [0] FIREBOMB 200 () ENEMY 9
break
#IF
Random 1  10
Near   12
#ACT
Power RATE 250
hit [0]
Spell [0] FIREBOMB 250 (9) ENEMY 9 Delay 500
break
#IF
Random 1  8
Near   12
#ACT
Say "Your buffs are nothing against me!"
Spell [3] Clearstatus 0 (26) ENEMY 11 Delay 2000
;;Geo-OmaCaptain

Only a quick 5 minute fix but gives oma captain the right spells and the right looks while hes doing them without going invisible.

Geordiehc · Jan 18, 2008

Very easy script to play a random horse racing game, the first of its type i wrote so very amateurish but shows you how the outcome of random numbers can be used as fun.

Code:

[@GeoHorse]
#IF
checkgold 100000
#Say
Hi There <$USERNAME>\
Would you like to bet on a horse?\
This will cost 100,000 gold.\
< [EMAIL="Yes/@yes1%3E\"]Yes/@yes1>\[/EMAIL]
< [EMAIL="No/@exit%3E\\"]No/@exit>\\[/EMAIL]
#ELSESAY
Sorry you need 100,000 to play this game\\
<[EMAIL="O.K/@Exit%3E\\"]O.K/@Exit>\\[/EMAIL]
[@yes1]
#ACT
movr D0 9
goto @takinbet
[@takinbet]
#SAY
Which Horse Would You like to bet on?\
<[EMAIL="RedRum/@H1"]RedRum/@H1[/EMAIL]> - <[EMAIL="BlackBeauty/@H2"]BlackBeauty/@H2[/EMAIL]> - <[EMAIL="Snowflake/@H3%3E\"]Snowflake/@H3>\[/EMAIL]
<[EMAIL="ChocolateLips/@H4"]ChocolateLips/@H4[/EMAIL]> - <[EMAIL="IgglePiggle/@H5"]IgglePiggle/@H5[/EMAIL]> - <[EMAIL="Daisy/@H6%3E\"]Daisy/@H6>\[/EMAIL]
<[EMAIL="ManFriday/@H7"]ManFriday/@H7[/EMAIL]> - <[EMAIL="Mrs.Bucket/@H8"]Mrs.Bucket/@H8[/EMAIL]> - <[EMAIL="KennyLives/@H9%3E\\"]KennyLives/@H9>\\[/EMAIL]
#ACT
take gold 100000
[@H1]
#ACT
DELAYgoto [local] 2 @H11
#SAY
And there off!!!........
[@h11]
#IF
Equal D0 1
#ACT
give gold 1000000
#SAY
Congratulations, RedRum won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, RedRum did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H2]
#ACT
DELAYgoto [local] 2 @H21
#SAY
And there off!!!........
[@H21]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, BlackBeauty won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, BlackBeauty did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H3]
#ACT
DELAYgoto [local] 2 @H31
#SAY
And there off!!!........
[@H31]
#IF
Equal D0 3
#ACT
give gold 1000000
#SAY
Congratulations, SnowFlake won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, SnowFlake did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H4]
#ACT
DELAYgoto [local] 2 @H41
#SAY
And there off!!!........
[@H41]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, ChocolateLips won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, ChocolateLips did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H5]
#ACT
DELAYgoto [local] 2 @H51
#SAY
And there off!!!........
[@H51]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, IgglePiggle won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, IgglePiggle did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H6]
#ACT
DELAYgoto [local] 2 @H61
#SAY
And there off!!!........
[@H61]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, Daisy won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, Daisy did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H7]
#ACT
DELAYgoto [local] 2 @H71
#SAY
And there off!!!........
[@H71]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, ManFriday won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, ManFriday did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H8]
#ACT
DELAYgoto [local] 2 @H81
#SAY
And there off!!!........
[@H81]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, Mrs.Bucket won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, Mrs.Bucket did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@H9]
#ACT
DELAYgoto [local] 2 @H91
#SAY
And there off!!!........
[@H91]
#IF
Equal D0 2
#ACT
give gold 1000000
#SAY
Congratulations, KennyLives won the race!\
Here is your reward!\\
#ELSESAY
Sorry you lost, KennyLives did not win the race.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]

Geordiehc · Jan 18, 2008

Bit more advanced but still easy script this time for Hi-Lo game, 6 cards numbers are chosen at random and you have to guess if the next card will be higher or lower than your current card, simple!
Still a bit messy scripting but again shows you how multiple random numbers can be scripted.

Code:

;;;;;;;;;;Geo Hi-Lo;;;;;;;;;;
[@HiLo]
#IF
checkgold 100000
#Say
Press Deal to deal you first card\ \
< [EMAIL="Deal/@yes%3E\"]Deal/@yes>\[/EMAIL]
< [EMAIL="No/@exit%3E\"]No/@exit>\[/EMAIL]
#ELSESAY
Sorry you need 100,000 to play this game\\
<[EMAIL="O.K/@Exit%3E\"]O.K/@Exit>\[/EMAIL]
[@yes]
#ACT
movr D0 11
movr D1 11
movr D2 11
movr D3 11
movr D4 11
movr D5 11
goto @yes22
[@yes22]
#ACT
INC D0
INC D1
INC D2
INC D3
INC D4
INC D5
goto @Firstdeal
[@Firstdeal]
#SAY
Your first card is {FCOLOR/9}<$OUTPUT(D0)>{FCOLOR/14}\
Would you like to go higher or lower?\
<[EMAIL="Higher/@deal1h"]Higher/@deal1h[/EMAIL]> - <[EMAIL="lower/@deal1l%3E\\"]lower/@deal1l>\\[/EMAIL]
#ACT
take gold 100000
[@deal1h]
#ACT
DELAYgoto [local] 2 @deal1ha
#SAY
Dealing.........
[@deal1ha]
#ACT
#IF
ELARGE D1 %D0
#SAY
<[EMAIL="Next/@deal2%3E\\"]Next/@deal2>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D1)> {FCOLOR/14}please try again.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@deal1l]
#ACT
DELAYgoto [local] 2 @deal1la
#SAY
Dealing.........
[@deal1la]
#IF
ESMALL D1 %D0
#SAY
The second card is {FCOLOR/9}<$OUTPUT(D1)>{FCOLOR/14}\
<[EMAIL="Next/@deal2%3E\\"]Next/@deal2>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D1)> {FCOLOR/14}please try again.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@deal2]
#SAY
Congratualtions,But can you do it again?!\
Remember your current card is {FCOLOR/9}<$OUTPUT(D1)>{FCOLOR/14}\
<[EMAIL="Higher/@deal2h"]Higher/@deal2h[/EMAIL]> - <[EMAIL="Lower/@deal2l%3E\\"]Lower/@deal2l>\\[/EMAIL]
[@deal2h]
#ACT
DELAYgoto [local] 2 @deal2ha
#SAY
Dealing.........
[@deal2ha]
#IF
ELARGE D2 %D1
#SAY
The third card is {FCOLOR/9}<$OUTPUT(D2)>{FCOLOR/14}\
<[EMAIL="Next/@deal3%3E\\"]Next/@deal3>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D2)> {FCOLOR/14}please try again.\
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit%3E\\"]Exit/@Exit>\\[/EMAIL]
[@deal2l]
#ACT
DELAYgoto [local] 2 @deal2la
#SAY
Dealing.........
[@deal2la]
#IF
ESMALL D2 %D1
#SAY
The third card is {FCOLOR/9}<$OUTPUT(D2)>{FCOLOR/14}\
<[EMAIL="Next/@deal3%3E\\"]Next/@deal3>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D2)> {FCOLOR/14}please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal3]
#SAY
Congratualtions,But can you do it again?\
Remember your current card is {FCOLOR/9}<$OUTPUT(D2)>{FCOLOR/14}\
<[EMAIL="Higher/@deal3h"]Higher/@deal3h[/EMAIL]> - <[EMAIL="Lower/@deal3l%3E\\"]Lower/@deal3l>\\[/EMAIL]
[@deal3h]
#ACT
DELAYgoto [local] 2 @deal3ha
#SAY
Dealing.........
[@deal3ha]
#IF
ELARGE D3 %D2
#SAY
The third card is {FCOLOR/9}<$OUTPUT(D3)>{FCOLOR/14}\
<[EMAIL="Next/@deal4%3E\\"]Next/@deal4>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D3)>{FCOLOR/14} please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal3l]
#ACT
DELAYgoto [local] 2 @deal3la
#SAY
Dealing.........
[@deal3la]
#IF
ESMALL D3 %D2
#SAY
The third card is <$OUTPUT(D3)>\
<[EMAIL="Next/@deal4%3E\\"]Next/@deal4>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D3)> {FCOLOR/14}please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal4]
#SAY
Congratualations, Now can you do it again?!\
Remember your current card is {FCOLOR/9}<$OUTPUT(D3)> {FCOLOR/14}\
<[EMAIL="Higher/@deal4h"]Higher/@deal4h[/EMAIL]> - <[EMAIL="Lower/@deal4l%3E\\"]Lower/@deal4l>\\[/EMAIL]
[@deal4h]
#ACT
DELAYgoto [local] 2 @deal4ha
#SAY
Dealing.........
[@deal4ha]
#IF
ELARGE D4 %D3
#SAY
The fourth card is {FCOLOR/9}<$OUTPUT(D4)>{FCOLOR/14}\
<[EMAIL="Next/@deal5%3E\\"]Next/@deal5>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D4)>{FCOLOR/14} please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal4l]
#ACT
DELAYgoto [local] 2 @deal4la
#SAY
Dealing.........
[@deal4la]
#IF
ESMALL D4 %D3
#SAY
The fourth card is {FCOLOR/9}<$OUTPUT(D4)>{FCOLOR/14}\
<[EMAIL="Next/@deal5%3E\\"]Next/@deal5>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D4)>{FCOLOR/14} please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal5]
#SAY
Congratualtions!! But Can You do it again?\
Remember your current card is {FCOLOR/9}<$OUTPUT(D4)>{FCOLOR/14}\
<[EMAIL="Higher/@deal5h"]Higher/@deal5h[/EMAIL]> - <[EMAIL="Lower/@deal5l%3E\\"]Lower/@deal5l>\\[/EMAIL]
[@deal5h]
#ACT
DELAYgoto [local] 2 @deal5ha
#SAY
Dealing.........
[@deal5ha]
#IF
ELARGE D5 %D4
#SAY
The fifth card is {FCOLOR/9}<$OUTPUT(D5)>{FCOLOR/14}\
<[EMAIL="Next/@deal6%3E\\"]Next/@deal6>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D5)>{FCOLOR/14} please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal5l]
#ACT
DELAYgoto [local] 2 @deal5la
#SAY
Dealing.........
[@deal5la]
#IF
ESMALL D5 %D4
#SAY
The fifth card is {FCOLOR/9}<$OUTPUT(D5)>{FCOLOR/14}\
<[EMAIL="Next/@deal6%3E\\"]Next/@deal6>\\[/EMAIL]
#ELSESAY
Sorry you lost, the card is {FCOLOR/9}<$OUTPUT(D5)>{FCOLOR/14} please try again.\ \
<Try [EMAIL="Again/@main"]Again/@main[/EMAIL]> - <[EMAIL="Exit/@Exit"]Exit/@Exit[/EMAIL]>
[@deal6]
#SAY
Congratualtions!! You won the JackPot of 500,000 Gold!!\
<Take 500,000 [EMAIL="gold/@takeJP%3E\\"]gold/@takeJP>\\[/EMAIL]
[@takeJP]
#ACT
give gold 500000
#SAY
Thanks for playing Hi-Lo!!\
<[EMAIL="Exit/@exit"]Exit/@exit[/EMAIL]>

Geordiehc · May 5, 2008

Iron Silver & Gold Horses

Server GM's:
if you use horse 1, 2 and 4 you will have to change it back to use horse 1,2,3.

http://files.filefront.com/Horsewil/;10139152;/fileinfo.html -.wil
http://files.filefront.com/Horsewix/;10139158;/fileinfo.html -.wix

Players:
Download horse.wil and horse.wix and overwrite into your data folder. </B>

Geordiehc · May 15, 2008

Alot of people still don't have and can't get a hold of the Ice patch to be able to see Ice mobs so heres the download:

http://files.filefront.com/IcePatchrar/;8337659;/fileinfo.html

You will need to extract the folder then overwrite the files inside into your data folder, do not just extract the folder straight into it.

Search

Search

Geordie

Geordiehc

Mad Dog Geo

Geordiehc

Mad Dog Geo

Geordiehc

Mad Dog Geo

Geordiehc

Mad Dog Geo

Geordiehc

Mad Dog Geo