Jump to content
Forumu Destekleyenlere Katılın ×
Paticik Forumları
2000 lerden beri faal olan, çok şukela bir paylaşım platformuyuz. Hoşgeldiniz.

Sos Bottle


Öne çıkan mesajlar

Mesaj tarihi:
[spo1=Al]//Allanthya's Fishing System v3.0 by Melen
//http://uo.allanthya.org
//email: [email protected]
//for sphere 55R3rc3
// This is the result of many peoples hard work (including mine)
// The sextant coordinate function is written by Kell (GREAT JOB!,
// thanks to Swindler and Rastaf also!).
// Thanks to syn for doing some OSI research.
// Just put this into a file named spherefishing.scp and edit spheretables.scp
// and under resources, put spherefishing.scp right before sphere_region.scp.
// Change the RESOURCES for the t_water definitions in sphereregion.scp to:
// RESOURCES=22.5 mr_nothing
// RESOURCES=25.0 mr_fish1
// RESOURCES=25.0 mr_fish2
// RESOURCES=25.0 mr_fish3
// RESOURCES=25.0 mr_fish4
// RESOURCES=0.3 mr_fish5
// RESOURCES=0.3 mr_fish6
// RESOURCES=0.3 mr_fish7
// RESOURCES=0.3 mr_fish8
// RESOURCES=0.3 mr_bottle_empty
// RESOURCES=0.3 mr_boots_calf
// RESOURCES=0.3 mr_sandals
// RESOURCES=0.3 mr_shoes_plain
// RESOURCES=0.3 mr_boots_thigh
// RESOURCES=0.1 mr_sos_bottle
// RESOURCES=0.8 mr_fishing_net
// Special thanks to IceDragon from the sphereserver.com forums for doing some additional
// research
// Changes in v2.0:
// - Added new NPC - Deep Sea Serpent
// - Changed loot_deep_sea_serpent to include randomly sos bottles and/or special fishing nets
//
// - Modified fishing pole, small chance of fishing up a sea serpent (if fishing from land) or a
// deep sea serpent (if fishing from boat)
// - Modified the fishing nets:
// a) Added home and homedist to each spawn to prevent them from wandering the world
// b) Added a timer memory item to remove them after 4 hours (people were filling my
// world up with net spawns, and the krakens would gravitate towards towns - NOT GOOD heh)
// c) Added deep sea serpent as a possible spawn
// d) Varied how many spawned (minimum 1 monster, max 3, rather than JUST 3 all the time)
// - Modified kraken loot to randomly include sos bottles
//
// - Modified krakens to automatically attack the thrower of the net (actually a modification of the net)
// - Added some other semi-rare sos loot such as pillows, etc...
// Changes in v3.0:
// - Too many to list, I'll hit on the major points
// - Modified code of Kell's mining fix removed as not needed
// - Changed all code that temporarily relocated the player (such as
// for spawning monsters) so that the player is never relocated (no
// "rubberbanding", even if you fish on a moving boat :p)
// - Redesigned the fishing net spawns using a function, much less code
// - Removed the isonwater functions that were made by Swindler, I believe, as
// they are no longer needed

[FUNCTION sextant]
VAR.LAT = - 1624) * 360 * 60) / 4096)>
VAR.LNG = - 1323) * 360 * 60) / 5120)>

VAR.LATd = /60)>
VAR.LATm = - (*60))>

VAR.LNGd = /60)>
VAR.LNGm = - (*60))>

ABSVAL VAR.LATd
ABSVAL VAR.LATm
ABSVAL VAR.LNGd
ABSVAL VAR.LNGm

VAR.LATc = "N"
if ( > 0 )
VAR.LATc = "S"
endif

VAR.LNGc = "W"
if ( > 0 )
VAR.LNGc = "E"
endif

LINK.TAG.COORDS=>o>', >o>'

[FUNCTION ABSVAL]
if ( <> < 0 )
TRY = > )>
endif

[itemdef i_sos_bottle]
NAME=message in a bottle
id=099f
VALUE=20000
SKILLMAKE=MINING 98.0

on=@create
ATTR=attr_decay
TIMER=0

on=@dclick
if (&010) || (&08000)
src.sysmessage You cant use this while its locked down.
return 1
else
if ( < 975)
src.sysmessage You can't figure out how to get the message out of the bottle!
else
src.newitem=i_sos_message
src.act.timer=0
src.act.bounce
REMOVE
endif
return 1
endif

[itemdef i_sos_tile]
ID=i_water
type=t_script

on=@create
ATTR=attr_decay
TIMER=0

[FUNCTION f_generate_coords]
var.coords=,
// Only generate coords in deep sea
if ().type> != t_water)
var.coords=
f_generate_coords
else
tag.sextantp=,255
var.coords=
endif

[itemdef i_sos_message]
NAME=waterstained SOS
id=014ed
TYPE=t_script
VALUE=20000

on=@create
ATTR=attr_decay
TIMER=0

on=@dclick
if (&010) || (&08000)
src.sysmessage You cant use this while its locked down.
return 1
endif
if (!>)
f_generate_coords
newitem=i_sos_tile
new.link=
link=
new.attr=attr_static|attr_move_never
new.p=
new.sextant
new.fix
endif

src.tag.sextantcoords=
dialog d_sos_message
return 1

[DIALOG d_sos_message]
0, 0
PAGE 0
resizepic 63 62 2520 317 319
resizepic 91 103 3500 256 189
text 122 114 0 0
text 104 130 0 1
text 112 147 0 2
text 113 165 0 3
t
Mesaj tarihi:
Çok güzel bi sistem hazine olayı ya.[signature][hline]Yoktur üstüne senin, Güzeli çirkin yapmakta... Suçuysa dünyaya atmakta...

Neyin bildinki değerini? Benimkini bileceksin , Bunuda tabi mahvedeceksin...
×
×
  • Yeni Oluştur...