Thread: Sphere Scripts
View Single Post
 
Reply
Posted 2002-06-08, 08:53 AM in reply to Randuin's post "Sphere Scripts"
Ever thought of playing command and conquer on UO? well here's your chance with your own... CANON

[itemdef i_cannon_n_1]

ID=3723

Name=Cannon (North)

TYPE=t_script



On=@Create

ATTR=08010



On=@Dclick

IF (<SRC.RESTEST 1 i_cannon_ball> && <SRC.RESTEST 50 i_reag_sulfur_ash>)

SRC.SAY Who would you like to shoot?

TARGET Who would you like to shoot?

ELSE

SRC.SAY You do not have the supplies to load the cannon.

ENDIF



On=@Targon_Char

IF (<TIMER>==-1)

SRC.CONSUME=1 i_cannon_ball

SRC.CONSUME=50 i_reag_sulfur_ash

SRC.TARG.EFFECT 0,0e73,15,0,0 //makes a canon ball fly to the target

SRC.TARG.DAMAGE={70 95}

SRC.SOUND=011e

TIMER=25

ELSE

SRC.SAY You can not fire the cannon again yet.

ENDIF



On=@Timer

TIMER=-1



[itemdef i_cannon_s_1]

ID=0e93

Name=Cannon (South)

TYPE=t_script



On=@Create

ATTR=08010



On=@Dclick

IF (<SRC.RESTEST 1 i_cannon_ball> && <SRC.RESTEST 50 i_reag_sulfur_ash>)

SRC.SAY Who would you like to shoot?

TARGET Who would you like to shoot?

ELSE

SRC.SAY You do not have the supplies to load the cannon.

ENDIF



On=@Targon_Char

IF (<TIMER>==-1)

SRC.CONSUME=1 i_cannon_ball

SRC.CONSUME=50 i_reag_sulfur_ash

SRC.TARG.EFFECT 0,0e73,15,0,0 //makes a canon ball fly to the target

SRC.TARG.DAMAGE={70 95}

SRC.SOUND=011e

TIMER=25

ELSE

SRC.SAY You can not fire the cannon again yet.

ENDIF



On=@Timer

TIMER=-1



[itemdef i_cannon_w_1]

ID=0e90

Name=Cannon (West)

TYPE=t_script



On=@Create

ATTR=08010



On=@Dclick

IF (<SRC.RESTEST 1 i_cannon_ball> && <SRC.RESTEST 50 i_reag_sulfur_ash>)

SRC.SAY Who would you like to shoot?

TARGET Who would you like to shoot?

ELSE

SRC.SAY You do not have the supplies to load the cannon.

ENDIF



On=@Targon_Char

IF (<TIMER>==-1)

SRC.CONSUME=1 i_cannon_ball

SRC.CONSUME=50 i_reag_sulfur_ash

SRC.TARG.EFFECT 0,0e73,15,0,0 //makes a canon ball fly to the target

SRC.TARG.DAMAGE={70 95}

SRC.SOUND=011e

TIMER=25

ELSE

SRC.SAY You can not fire the cannon again yet.

ENDIF



On=@Timer

TIMER=-1



[itemdef i_cannon_e_1]

ID=0e94

Name=Cannon (East)

TYPE=t_script



On=@Create

ATTR=08010



On=@Dclick

IF (<SRC.RESTEST 1 i_cannon_ball> && <SRC.RESTEST 50 i_reag_sulfur_ash>)

SRC.SAY Who would you like to shoot?

TARGET Who would you like to shoot?

ELSE

SRC.SAY You do not have the supplies to load the cannon.

ENDIF



On=@Targon_Char

IF (<TIMER>==-1)

SRC.CONSUME=1 i_cannon_ball

SRC.CONSUME=50 i_reag_sulfur_ash

SRC.TARG.EFFECT 0,0e73,15,0,0 //makes a canon ball fly to the target

SRC.TARG.DAMAGE={70 95}

SRC.SOUND=011e

TIMER=25

ELSE

SRC.SAY You can not fire the cannon again yet.

ENDIF



On=@Timer

TIMER=-1



[itemdef i_deed_cannon_north]

NAME=Cannon Deed (North)

ID=014ef

TYPE=t_cannon_n



CATEGORY=Custom

SUBSECTION=Cannon Deeds

DESCRIPTION=Cannon Deed (North)



[itemdef i_deed_cannon_south]

NAME=Cannon Deed (South)

ID=014ef

TYPE=t_cannon_s



CATEGORY=Custom

SUBSECTION=Cannon Deeds

DESCRIPTION=Cannon Deed (South)



[itemdef i_deed_cannon_west]

NAME=Cannon Deed (West)

ID=014ef

TYPE=t_cannon_w



CATEGORY=Custom

SUBSECTION=Cannon Deeds

DESCRIPTION=Cannon Deed (West)



[itemdef i_deed_cannon_east]

NAME=Cannon Deed (East)

ID=014ef

TYPE=t_cannon_e



CATEGORY=Custom

SUBSECTION=Cannon Deeds

DESCRIPTION=Cannon Deed (East)



[typedef t_cannon_s]

ON=@DCLICK

MOREP=<SRC.P>

SRC.HOME=<MOREP>

SRC.NEWITEM=i_cannon_s_1

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

SOUND f7



MOREP=<SRC.P>

MOREY=<MOREY> + 1

SRC.HOME=<MOREP>

SRC.NEWITEM=0e92

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>



MOREP=<SRC.P>

MOREY=<MOREY> + 2

SRC.HOME=<MOREP>

SRC.NEWITEM=0e91

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

REMOVE

RETURN 1



[typedef t_cannon_n]

ON=@DCLICK

MOREP=<SRC.P>

SRC.HOME=<MOREP>

SRC.NEWITEM=i_cannon_n_1

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

SOUND f7



MOREP=<SRC.P>

MOREY=<MOREY> - 1

SRC.HOME=<MOREP>

SRC.NEWITEM=0e8c

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>



MOREP=<SRC.P>

MOREY=<MOREY> - 2

SRC.HOME=<MOREP>

SRC.NEWITEM=0e8d

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

REMOVE

RETURN 1



[typedef t_cannon_w]

ON=@DCLICK

MOREP=<SRC.P>

SRC.HOME=<MOREP>

SRC.NEWITEM=i_cannon_w_1

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

SOUND f7



MOREP=<SRC.P>

MOREX=<MOREX> - 1

SRC.HOME=<MOREP>

SRC.NEWITEM=0e8f

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>



MOREP=<SRC.P>

MOREX=<MOREX> - 2

SRC.HOME=<MOREP>

SRC.NEWITEM=0e8e

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

REMOVE

RETURN 1



[typedef t_cannon_e]

ON=@DCLICK

MOREP=<SRC.P>

SRC.HOME=<MOREP>

SRC.NEWITEM=0e96

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

SOUND f7



MOREP=<SRC.P>

MOREX=<MOREX> - 1

SRC.HOME=<MOREP>

SRC.NEWITEM=0e95

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>



MOREP=<SRC.P>

MOREX=<MOREX> - 2

SRC.HOME=<MOREP>

SRC.NEWITEM=i_cannon_e_1

SRC.ACT.ATTR=08010

SRC.ACT.P=<SRC.HOME>

REMOVE

RETURN 1



[EOF]


have fun!
Old
Profile PM WWW Search
Randuin is neither ape nor machine; has so far settled for the in-between
 
 
Randuin