Places teleport

Status
Zamknięty.

Kowol

Senior User
Zarejestrowany
Dołączył
Kwiecień 9, 2008
Posty
1250
Liczba reakcji
156
Witam.
Przedstawiam wam skrypt, dzi?ki kt?remu mo?emy si? teleportowa? w wybrane miejsca. Ca?a konfiguracja znajduje si? w skrypcie.
Aby skorzysta? z owego skryptu nale?y wpisa? w grze komend? !teleport "miejsce. Mo?na r?wnie? sprawdzi? jakie aktualnie mamy miejsca do podr??y: !teleport "check.

Instalacja:

Przechodzimy do data/talkactions/scripts i tworzymy plik placestele.lua i wklejamy do niego to:

Kod:
--Script made by Kowol v. 0.3--

function onSay(cid, words, param)


--[[
Tutaj ustawiasz opcje teleportowania:
|co trzeba napisac| |pozycja| |wymagany level| |czy podroz jest platna| |ile kosztuje podroz (jezeli platna)| |czy mo?na teleportowa? sie z tzw. fightem|
przyk?ad: ["Temple"] = {{x=100, y=100, z=100},100, TRUE, 1000, TRUE}
]]--



-------------Config----------------


local places = {
["depo"] = {{x=160, y=49, z=6}, 1, FALSE, 2000, TRUE},
["temple"] = {{x=160, y=54, z=7}, 10, TRUE, 20, FALSE}
}


-------------/Config----------------


local place = places[param]

if (param == "check") then
	for name, pos in pairs(places) do
		text = "Name: "..name..";    Level need: "..pos[2]..";"

			if (pos[5] == TRUE) then
				text = text.."    Can be pz locked: YES;"
			else
				text = text.."    Can be pz locked: NO"
			end

			if (pos[3] == TRUE) then
				text = text..";    Cost: "..pos[4]..";"

			end
		doPlayerSendTextMessage(cid, 20, ""..text.."")
	end
return TRUE
end

if not(place) then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You can not teleport there.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if (getPlayerLevel(cid) <= place[2]) then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You dont have enought level. You need "..place[2].." level to teleport.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if (place[5] == TRUE) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You are in fight.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if (place[3] == TRUE) and (doPlayerRemoveMoney(cid, place[4]) == FALSE) then
		doPlayerSendTextMessage(cid, 22, "Sorry, but You dont have enought money. You need "..place[4].." gp to teleport.")
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end



doTeleportThing(cid, place[1])
doSendMagicEffect(place[1], CONST_ME_TELEPORT)
doPlayerSendTextMessage(cid, 22, "You are teleported to \n "..param..".")
return TRUE
end

nast?pnie wracamy do katalogu talkactions i otwieramy plik talkactions.xml.
Na ko?cu zawarto?ci owego pliku wklejamy t? linijk?:
Kod:
	<talkaction words="!teleport" hide="yes" event="script" value="placestele.lua"/>

Jak ju? napisa?em w skrypcie konfiguracja jest bardzo prosta:
["temple"] = {{x=100, y=100, z=100},100, TRUE, 1000, TRUE},
|nazwa miejsca| = |pozycja| |wymagany lvl| |czy podro? jest p?atna| |je?li p?atna to ile kosztuje| |czy mo?na si? teleportowa? z tzw. fightem|

Je?li spe?nimy wszystkie warunki zobaczymy takie co?:



Je?li nie mamy wystarczaj?co du?o pieni?dzy na podr?? ujrzymy:



Je?li mamy za ma?y lvl naszym oczom uka?e si?:



Je?li mamy pz:



Je?li jednak nie ma podanego przez nas miejsca to zobaczymy:




Je?li b?dzie chcieli sprawdzi? gdzie mo?emy podr??owa? ujrzymy:
2462miq.jpg


Je?li chcesz skopiowa? ten skrypt na inne forum nie mo?esz usun?? stopki.

LOG:
Kod:
[B]v. 0.1[/B]
- mo?liwo?? zabierania pieni?dzy za podr??,
- mo?liwo?? ustawienia minimalnego lvl'a dla teleportu,
[B]v. 0.2[/B]
- mo?liwo?? ustawienia, czy mo?na teleportowa? si? z tzw. fightem,
[B]v. 0.3[/B]
- mo?liwo?? sprawdzenia miejsc do podr??y ze szczeg??owymi informacjami.

Wszelkie bugi prosz? zg?asza? w tym temacie.
Regards,
Kowol

@Down
Faktycznie, nie pomy?la?em.
 
Odp: Places teleport

Na przysz?o?? du?o lepsze jest:
Kod:
local place = places[param]

Bardzo dobra robota!
 
Odp: Places teleport

Skrypt sam w sobie jest do?? dobry, mo?liwe i? b?d? go wykorzystywa?. Czy ten skrypt teleportuje te? gdy ma si? pz??
 
Odp: Places teleport

Bardzo dobre spostrze?enie, doda?em ju? to do skryptu.

Version 0.2

Kod:
--Script made by Kowol  v. 0.2--

function onSay(cid, words, param)


--[[
Tutaj ustawiasz opcje teleportowania:
|co trzeba napisac| |pozycja| |wymagany level| |czy podroz jest platna| |ile kosztuje podroz (jezeli platna)| czy mozna sie teleportowac z pz|
przyk?ad: ["temple"] = {{x=100, y=100, z=100},100, TRUE, 1000, TRUE}
]]--


local places = {
["depo"] = {{x=160, y=49, z=6}, 100, FALSE, 2000, TRUE},
["temple"] = {{x=160, y=54, z=7}, 10, TRUE, 20, FALSE}
}




if not(places[param]) then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You can not teleport there.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if getPlayerLevel(cid) <= places[param][2] then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You dont have enought level. You need "..places[param][2].." level to teleport.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end
if (places[param][5] == TRUE) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
	doPlayerSendTextMessage(cid, 22, "Sorry, buy You are pz locked.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end
if (places[param][3] == TRUE) and (doPlayerRemoveMoney(cid, places[param][4]) == FALSE) then
		doPlayerSendTextMessage(cid, 22, "Sorry, but You dont have enought money. You need "..places[param][4].." gp to teleport.")
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

doTeleportThing(cid, places[param][1])
doSendMagicEffect(places[param][1], CONST_ME_TELEPORT)
doPlayerSendTextMessage(cid, 22, "You are teleported to \n "..param..".")
return TRUE
end


A tutaj screen:



Dodatkowa opcja w konfiguracji:
["temple"] = {{x=100, y=100, z=100},100, TRUE, 1000, TRUE}

TRUE - nie mo?na teleportowa? si? maj?c pz,
FALSE - mo?na teleportowa? si? maj?c pz.
 
Ostatnia edycja:
Odp: Places teleport

Bardzo dobrze wykonany i opisany skrypt, ma du?o opcji. Na pewno si? przyda. 5/5.

Pozdrawiam, Damian.
 
Odp: Places teleport

Skrypt bardzo dobry na jakie? wary lub otsy z wi?kszym expem ( to jest moje zdanie).

Nie jestem skrypterem, nie znam si? na tym lecz my?l? ?e skrypt by? trudny do zrobienie :)

Jest taki skrypt na warots.net.pl wi?c dlatego my?l? ?e w?a?nie na takie otsy jest ten skrypt :)

Za starania i ch?ci = reput

9/10

Pozdrawiam
ADI_ADI
 
Odp: Places teleport

Kolejna nowo?? w skrypcie. Od teraz mo?emy sprawdzi? jakie mamy miejsca do podr??y.

Kod:
--Script made by Kowol v. 0.3--

function onSay(cid, words, param)


--[[
Tutaj ustawiasz opcje teleportowania:
|co trzeba napisac| |pozycja| |wymagany level| |czy podroz jest platna| |ile kosztuje podroz (jezeli platna)|
przyk?ad: ["Temple"] = {{x=100, y=100, z=100},100, TRUE, 1000}
]]--



-------------Config----------------


local places = {
["depo"] = {{x=160, y=49, z=6}, 1, FALSE, 2000, TRUE},
["temple"] = {{x=160, y=54, z=7}, 10, TRUE, 20, FALSE}
}


-------------/Config----------------


local place = places[param]

if (param == "check") then
	for name, pos in pairs(places) do
		text = "Name: "..name..";    Level need: "..pos[2]..";"

			if (pos[5] == TRUE) then
				text = text.."    Can be pz locked: YES;"
			else
				text = text.."    Can be pz locked: NO"
			end

			if (pos[3] == TRUE) then
				text = text..";    Cost: "..pos[4]..";"

			end
		doPlayerSendTextMessage(cid, 20, ""..text.."")
	end
return TRUE
end

if not(place) then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You can not teleport there.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if (getPlayerLevel(cid) <= place[2]) then
	doPlayerSendTextMessage(cid, 22, "Sorry, but You dont have enought level. You need "..place[2].." level to teleport.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if (place[5] == TRUE) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
	doPlayerSendTextMessage(cid, 22, "Sorry, buy You are pz locked.")
	doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end

if (place[3] == TRUE) and (doPlayerRemoveMoney(cid, place[4]) == FALSE) then
		doPlayerSendTextMessage(cid, 22, "Sorry, but You dont have enought money. You need "..place[4].." gp to teleport.")
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return TRUE
end



doTeleportThing(cid, place[1])
doSendMagicEffect(place[1], CONST_ME_TELEPORT)
doPlayerSendTextMessage(cid, 22, "You are teleported to \n "..param..".")
return TRUE
end

Aby u?y? nowej komendy nale?y w grze wpisa? !teleport "check, a o to rezultat:
2462miq.jpg


Regards,
Kowol
 
Odp: Places teleport

Dobry skrypt. Ca?kiem useful! Og?lnie bardzo ??dnie zbudowany.
 
Odp: Places teleport

dziala to komus na silniku innym niz pod 8.5? :|
 
Odp: Places teleport

Mi na 8.52 dzia?a, Silnik: The Forgotten Server, version 0.3.5 (Crying Damson)
 
Odp: Places teleport

A da sie tylko dla jednej wybranej profesji ??
 
Odp: Places teleport

Super Dzieki w?o?nie na war idealny skrypt ;] Dzia?? w 100%
Daje reputa ! Wi?cej takich dobrych prac ! ;] 9/10
Dobra robota.
 
Status
Zamknięty.
Back
Do góry