What's new

[7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Status
Not open for further replies.

Virtelio

Senior User
Joined
Jul 15, 2009
Messages
534
Reaction score
126
Age
28
Witam!
Wraz z Miziakiem postanowili?my za?o?y? taki temat,w kt?rym mogliby?my pomaga? ludziom tworz?c skrypty. Mo?ecie pisa? posty z pro?bami o skryptach,ale na pocz?tku przeczyajcie regulamin:
REGULAMIN TEMATU:
1.Maksymalnie 4 pro?by o skrypty,a potem nast?pne. Inaczej raport...
2.Nie ma przypominania autorom tematu, o potrzebnym skrypcie. Wiemy o nim,ale widocznie co? nas zatrzyma?o w szybkim odpowiedzeniu.
3.Ka?de posty typu"SUPER FAJNY SKRYPT !!!11!!oneoneone b?d? raportowane i warnowane...
4. Aby zasygnalizowa?, ?e skrypt nie dzia?a prosz? napisa? na PW,lub edytowa? post i napisa?, ?e ze skryptem jest problem.
5. Niema tu przerabiania skrypt?w,piszemy od zera.

Wz?r podania:
Code:
1.Silnik
2.Klient
3.Dzia?anie skryptu.
Okey. Nadmieni? jeszcze tylko, ?e mo?ecie prosi? o wszystkie skrypty tzn. Actions/TalkActions/Movements/NPC oraz, ?e mamy maksymalnie 3 dni na napisanie skryptu od daty zam?wienia.

Pozdrawiam. Virtelio&Miziak


Notka moderatorska:
Temat b?dzie pod moj? opiek? /Matre


Notka moderatorska:
Temat zamkni?ty na pro?b? Virtelio
 

Miziak

Advanced User
Joined
Sep 16, 2008
Messages
175
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Dok?adnie nic doda? nic uj??.

Pozdro,
Miziak ;)
 

damian_nec

Advanced User
Joined
Apr 22, 2008
Messages
287
Reaction score
11
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

1.Silnik - TFS 0.3.5pl1
2.Klient - 8.5
3.Dzia?anie skryptu:

Chcialbym npc ktory daje nam misje ze mamy zabic 20 monsterow to dostaniemy costam za to, tylko zeby nie byla to 1 misja ze po jej zakonczeniu niema innych tylko zeby mial ich wiecej ze mozna sobie wybrac co chce sie teraz zabijac a ja sobie pozmieniam pozniej co ma zabic itp.

Oraz npcta addonera zeby sprzedawal jak na rl

Dzieki
 

FreezyOts

Active User
Joined
Sep 9, 2009
Messages
87
Reaction score
6
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Witam.
1.Silnik The Forgotten Server, version 0.3.5 (Crying Damson)
2.Klient 8.5
3.Dzia?anie skryptu.
Stoi sobie posong w depo i ulecza graczy czarem exura gran mas res.
Dam+:thx:
 

FerN

Senior User
Joined
Apr 10, 2009
Messages
597
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

1.Silnik - TFS 0.3.4
2.Klient - 8.42
3.Dzia?anie skryptu:
1. Skrypt na elektryczne krzes?o, czyli po wpisaniu komendy !egzekucja "nick - teleportuje gracza na krzes?o elektryczne wysy?aj?c wszystkim wiadomo?? o egzekucji. Nast?pnie po u?yciu d?wigni, gracz ginie. Wy?wietla przy tym jaki? fajny efekt i napis nad cia?em.
By? ju? kiedy? taki skrypt, ale nie dzia?a on pod t? ver. tfsa.
 

ukiandoki

Active User
Joined
Apr 11, 2008
Messages
67
Reaction score
0
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

@EDIT
Ok to inaczej:


1.Silnik - TFS 0.3.4
2.Klient - 8.42
3.Dzia?anie skryptu:
1. Po wpisaniu Change jesli gracz posiada jab?ko i odpowiedni lewel, jablko znika, a na miejscu broni w eq pojawia si? fire sword kt?ry po 3 minutach sam zniknie i pojawi si? jab?ko, a je?li ktos go ?ciagnie i min? 3 minuty ta osoba ginie a tamten fire sword zamienia sie w rabbish.
 
Last edited:

Miziak

Advanced User
Joined
Sep 16, 2008
Messages
175
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

@ukiandoki
Samo pojawienie sie fs da sie zrobic bez problemu ale... zeby nie dalo sie sciagnac to niestety nie da rady bymajmiej w LUA.

@all
Reszte skryptow zrobie jak wr?ce do domu.

Pozdro,
Miziak ;)
 

zeroxin

Active User
Joined
Apr 17, 2009
Messages
122
Reaction score
2
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

1.Silnik - TFS 0.3.5pl1
2.Klient 8.5
3.Dzia?anie skryptu
skrypt przyznaje graczowi 3 punkt?w reputacji za zabicie gracza lecz gdy kto? zabije gracza o 10 leveli i wi?cej od siebie to zabiera mu 6 punkt?w reputacji
 
Joined
Aug 7, 2009
Messages
38
Reaction score
2
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Dobrze, to ja stawiam si? w kolejce:

Silnik: TFS 0.3.5
Klient: 8.5
Kod:

Code:
function onUse(cid, item, frompos, item2, topos)
if item.itemid == 9004 then
if (getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <=300) then
doSendAnimatedText(pos, "10mln exp!" , math.random(1, 255))
doPlayerAddExp(cid, 10000000)
doSendMagicEffect(fromPosition, CONST_ME_GIFT_WRAPS)
doPlayerRemoveItem(cid, 9004, 1)
return TRUE
end
if (getPlayerLevel(cid) >300) then
doPlayerRemoveItem(cid, 9004, 1)
end
end
end

Dzia?anie:
chcia?bym aby skrypt sprawdza?, czy przedmiot jest w eq gracza(w r?ce, w plecaku albo w miejscu na dodatkow? rzecz - np.strza?y), a je?li nie jest to aby przy u?yciu go zosta? usuni?ty. Je?li jest w eq to aby dodawa? expa jak w kodzie xd.
 

lol123

User
Joined
Apr 8, 2008
Messages
21
Reaction score
0
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

1.Silnik Evolution By aciek
2.Klient 8.10
3.Dzia?anie skryptu:
Taki specjalny zw?j kt?ry dzia?a na zasadzie "dodawania" arm'a w Jednym secie Np.
You see Nobless Armor 0% (arm 25)

A gdy u?yje tego zwoja to mam You see Nobless Armor 10% (arm 30)

Widzia?em to na pewnym serverze ,bardzo mi si? podoba?o,
Je?eli to co? pomo?e to dam ci IP tego OTS :p



By?bym bardzo wdzieczny !

@edit
Mam to,ale jest pod 8.40 + a ja potrzebuje na 8.1 by aciek ale... http://tibia.net.pl/actions/112046-8-4-ots-item-upgrade-system.html jak co? prosz? wykombinowanie czego? ; )
@edit 2
Ja to widzia?em na OTS'ie 8.10,wiec prosz? nie m?wi? ?e pod 8.31.
 
Last edited:

Boomer

Active User
Joined
Jun 6, 2008
Messages
136
Reaction score
0
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

1.Silnik: TFS 0.3.5pl1
2.Klient 8.50
3.Dzia?anie skryptu:
Klikamy na d?wigni?, znika kamie? o id 1304 na danej pozycji na 8 minut.
Klikamy drugi raz na d?wigni? kamie? si? pojawia na tej pozycji co zosta? skasowany.
Je?eli gracz kliknie na d?wigni? w przeci?gu (eventu) to nie pozwala mu postawi? kamienia i pisze: "Sorry not possible".
Pozycja: x=1234,y=5412,z=12
 

Virtelio

Senior User
Joined
Jul 15, 2009
Messages
534
Reaction score
126
Age
28
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

@FrezzyOTS.
Nie wysz?o dok?adnie tak jak chcia?e?, poniewa? NPC, ?e tak powiem "Nie umi? czarowa?".
Zrobi?em NPC kt?ry leczy gracza znajduj?cego si? g?ra 8kratek od niego,je?li gracz co? powie:
data/npc/script/leczenie.lua
Code:
focus = 0
talk_start = 0
target = 0
following = false
attacking = false
ileleczy = 500
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(cid, pos)
end
function onCreatureTurn(creature)
end
function msgcontains(txt, str)
     return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
function OnCreatureSay(cid, type, msg)
msg = string.lower(msg)
if (msg ~= '' or msg ~= ' ') and getDistanceToCreature(cid) < 8 then
 local player = getPlayerByName(getPlayerByName(cid))
 local playerpos = getPlayerPosition(player)
     doCreatureAddHealth(cid,ileleczy)
 doSendMagicEffect(playerpos,12)
   end
end
function onCreatureChangeOutfit(creature)
end
function onThink()
end
Do data/npc dodajemy Czarus Alchemik.xml
i wklejamy:
Code:
<?xml version="1.0"?>
<npc name="Czarus Alchemik" script="data/npc/scripts/leczenie.lua" access="3">
<look type="104" head="4" body="114" legs="132" feet="115"/>
</npc>
SKRYPT TESTOWANY!
 
Last edited:

FreezyOts

Active User
Joined
Sep 9, 2009
Messages
87
Reaction score
6
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

@up
Dzieki za skrypt ale mam jeden problem jak pisze byle co to w silniku pisze

[28/10/2009 20:55:01] Lua Script Error: [Npc interface]
[28/10/2009 20:55:01] data/npc/scripts/leczenie.lua:eek:nCreatureSay

[28/10/2009 20:55:01] data/npc/scripts/leczenie.lua:21: attempt to call global 'creatureGetName' (a nil value)
[28/10/2009 20:55:01] stack traceback:
[28/10/2009 20:55:01] data/npc/scripts/leczenie.lua:21: in function <data/npc/scripts/leczenie.lua:18>

Cos Zle Zrobilem?I tak masz +:thx:
 

Miziak

Advanced User
Joined
Sep 16, 2008
Messages
175
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

1.Silnik - TFS 0.3.4
2.Klient - 8.42
3.Dzia?anie skryptu:
1. Skrypt na elektryczne krzes?o, czyli po wpisaniu komendy !egzekucja "nick - teleportuje gracza na krzes?o elektryczne wysy?aj?c wszystkim wiadomo?? o egzekucji. Nast?pnie po u?yciu d?wigni, gracz ginie. Wy?wietla przy tym jaki? fajny efekt i napis nad cia?em.
By? ju? kiedy? taki skrypt, ale nie dzia?a on pod t? ver. tfsa.

talkactions:
Code:
function onSay(cid, words, param)
local miejsce = {x= , y= , z= } -- xyz miejsca w kt?rym ma byc zabijany
local pid = getPlayerByName(param)
	if(isPlayer(pid) == 1)then
		doTeleportThing(pid,miejsce)
		broadcastMessage("Na egzekucje zostal wyslany ".. param ..".",MESSAGE_STATUS_WARNING)
	end
end

talkactions.xml
Code:
<talkaction words="!egzekucja" script="egzekucja.lua"/>

actions:

Code:
function onUse(cid, item, frompos, item2, topos)
local player_pos = {x= , y= , z= , stackpos=253} -- xyz(miejsca w kt?rym jest zabijany) wpisz stackposa nie waz sie ruszac
local pid = getThingfromPos(player_pos)

if(pid > 0) then
	doSendMagicEffect(player_pos, 11)
	doPlayerAddHealth(pid, (getCreatureHealth(pid)+getCreatureMana(pid)+2))
	doSendAnimatedText(topos,'bzzzzzt', 89)
	if(item.itemid == 1945)then
		doTransformItem(item.uid,item.itemid+1)
	elseif(item.itemid == 1946)then
		doTransformItem(item.uid,item.itemid-1)
	end
else
	doPlayerSendTextMessage(cid,24,'Tam nikogo niema...')
end
end

actions.xml
<action uniqueid="XXXX" event="script" value="kill.lua"/>

XXXX - uniqe id zabijaj?cej wajchy

@ukiandoki
Ok to inaczej:
1.Silnik - TFS 0.3.4
2.Klient - 8.42
3.Dzia?anie skryptu:
1. Po wpisaniu Change jesli gracz posiada jab?ko i odpowiedni lewel, jablko znika, a na miejscu broni w eq pojawia si? fire sword kt?ry po 3 minutach sam zniknie i pojawi si? jab?ko, a je?li ktos go ?ciagnie i min? 3 minuty ta osoba ginie a tamten fire sword zamienia sie w rabbish.
?cignij mnie o to na gg pisz o gg pw

@zeroxin
To co kolega up

Xero Magican
Code:
function onUse(cid, item, frompos, item2, topos)
local reqitem = XXXX -- jaki item
local getitemc = getPlayerItemCount(cid,reqitem)

if item.itemid == 9004 then
	if(getitemc > 0)then
		doSendAnimatedText(pos, "10mln exp!" , math.random(1, 255))
		doPlayerAddExp(cid, 10000000)
		doSendMagicEffect(fromPosition, CONST_ME_GIFT_WRAPS)
		doPlayerRemoveItem(cid, reqitem, getitemc)
	else
		doPlayerRemoveItem(cid, reqitem, getitemc)
	end
end
end
O ile dobrze Ci? zrozumia?em to jest to

@lol123
W silnikach 8,31- nie ma odpowiednich funkcji

@Boomer
Zrobi? jutro dzis nie ma ju si?y

Pozdrawiam,
Miziak ;)
 
Last edited:

FerN

Senior User
Joined
Apr 10, 2009
Messages
597
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Miziak, nie dzia?a... Pisze !egzekucja "nick i nic si? nie dzieje. B??du w konsoli nie pokazuje.
btw. T? komend? mog? u?ywa? nawet zwykli gracze?
 

Virtelio

Senior User
Joined
Jul 15, 2009
Messages
534
Reaction score
126
Age
28
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

@Zeroxin
Nie do wykonania w lua,przynajmniej na moje do?wiadczenie.

Nad reszt? pomy?l?!
 

Miziak

Advanced User
Joined
Sep 16, 2008
Messages
175
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Poprawiam sorry all za niedzia?aj?ce porostu nie testowa?em bo zm?czony po sql wybaczcie co nie dzia?a m?wi? poprawi?.

@FerN
Code:
function onSay(cid, words, param)
local miejsce = {x= , y= , z= } -- miejsce
local pid = getPlayerByName(param)  -- lub getCreatureByName(param) zalezy od silnika
	if(getPlayerAccess(cid) >= 3)then
		doTeleportThing(pid,miejsce)
		broadcastMessage("Na egzekucje zostal wyslany ".. param ..".",MESSAGE_STATUS_WARNING)
	else
		doPlayerSendCancel(cid,"Nie jestes Game Masterem")
	end
end

jutro bd robi? all z testem za dzi? z g?ry przepraszam :(
 
Last edited:

FerN

Senior User
Joined
Apr 10, 2009
Messages
597
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Przy przesuni?ciu d?wigni wyskakuje w konsoli taki b??d:
PHP:
[28/10/2009 22:03:46] Lua Script Error: [Action Interface] 
[28/10/2009 22:03:46] data/actions/scripts/new/kill.lua:onUse

[28/10/2009 22:03:46] data/actions/scripts/new/kill.lua:4: attempt to compare number with table
[28/10/2009 22:03:46] stack traceback:
[28/10/2009 22:03:46] 	data/actions/scripts/new/kill.lua:4: in function <data/actions/scripts/new/kill.lua:1>

A i jeszcze jedno, m?g?by? zrobi? tak, ?e po wpisaniu komendy !egzekucja nick nie pokazuje graczom textu?
 

Miziak

Advanced User
Joined
Sep 16, 2008
Messages
175
Reaction score
27
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Nie chcesz txt usu? to
broadcastMessage("Na egzekucje zostal wyslany ".. param ..".",MESSAGE_STATUS_WARNING)

Code:
function onUse(cid, item, fromPosition, itemEx, toPosition)
local player_pos = {x = xxxx, y = yyyy, z = z, stackpos = 253} -- xyz(miejsca w kt?rym jest zabijany) wpisz stackposa nie waz sie ruszac
local pid = getThingfromPos(player_pos)
if(pid > 0) then
	doSendMagicEffect(player_pos, 11)
	doPlayerAddHealth(pid, (getCreatureHealth(pid)+getCreatureMana(pid)+2))
	doSendAnimatedText(topos,'bzzzzzt', 89)
	if(item.itemid == 1945)then
		doTransformItem(item.uid,item.itemid+1)
	elseif(item.itemid == 1946)then
		doTransformItem(item.uid,item.itemid-1)
	end
else
	doPlayerSendTextMessage(cid,24,'Tam nikogo niema...')
end
end

Dobra to tak nadal nie testowane bo tak mi si? spa? chce ze szok przepraszam all z g?ry ;)
Poprawi? skrypty jutro z testem tyle.

Pozdrawiam,
Miziak ;)
 

Dranzerpl

Advanced User
Joined
Jul 16, 2008
Messages
340
Reaction score
16
Odp: [7.x-8.x] Skrypty na zam?wienie by Virtelio&Miziak

Nie wiem kt?ry jestem w kolejce bo jest wielki bajzel wi?c napisz? tu wiadomo?? =)

1.Silnik Evo by Aciek
2.Klient 8.10
3.Dzia?anie skryptu.
Chc? by m?j stw?r zmienia? co 5 sekund outfit na r??ne Looktypy. Czyli na pocz?tku jest cz?owiekiem, p??niej Orc Riderer, P??niej np. Dragonem. Je?eli jest to mo?liwe to pom??cie pls!

z g?ry THX!
 
Status
Not open for further replies.
Top