Muutluerkek a dit :

paste.moepl den dolayı linkler artık çalışmaz haldeler site bir zaman sonra içeri atılan yazıları siliyor malesef

Shelcuk a dit :

Muutluerkek a dit :VoirMasquer

paste.moepl den dolayı linkler artık çalışmaz haldeler site bir zaman sonra içeri atılan yazıları siliyor malesef

Databaseleri kıymetli demek ki adamların :)

Muutluerkek a dit :

Shelcuk a dit :VoirMasquer

Muutluerkek a dit :VoirMasquer

paste.moepl den dolayı linkler artık çalışmaz haldeler site bir zaman sonra içeri atılan yazıları siliyor malesef

Databaseleri kıymetli demek ki adamların :)

data baseleri değilde bant genişligi önemli heralde cnk data baseden degilde .txt olarak kaydediyordur + işleme gerek yok cünkü databasede sadece gizli şeyler saklanması için vardır işe yaramayacaksa kullanmaz mantıken buda sadece yazı kaydediyirosun yani bir database oldugunu sanmıyorum

Muco a dit :

Oyga Eski arkadaşım arşivde vardı kodlar buraya bırakıyorum

Market:

Spoiler

x={cheese=function(n) tfm.exec.giveCheese(n) end}
p={}
shop=[[<BV><p align='center'><B><TI>Market</TI></B></p><B><J>Peynir <BV>50 <N><a href='event:buy cheese 50'>[Satın Al]</a></B>]]

function eventNewPlayer(n)
p[n]={coin=60}
end

for n in pairs (tfm.get.room.playerList) do
eventNewPlayer(n)
end

function eventPlayerWon(n)
p[n].coin=p[n].coin+10
ui.updateTextArea(2,"<TI><B><N>Paranız: <BV>"..p[n].coin,n)
end

function eventChatCommand(n,cmd)
if cmd:lower()=="market" then
o={x=5,y=27,w=300,h=150}
ui.addTextArea(0,shop,n,o.x,o.y,o.w,o.h,1,1,0.8,true)
ui.addTextArea(1,"<TI><B><R><a href='event:close'>[Kapat]",n,o.x+o.w-70,o.y+o.h-25,nil,nil,1,1,0,true)
ui.addTextArea(2,"<TI><B>Paranız: <BV>"..p[n].coin,n,o.x,o.y+o.h-25,nil,nil,1,1,0,true)
end
end

function eventTextAreaCallback(id,n,cb)
args={}
for arg in cb:gmatch("%S+") do
table.insert(args,arg)
end
if cb=="close" then
ui.removeTextArea(0,n)
ui.removeTextArea(1,n)
ui.removeTextArea(2,n)
end
if args[1]=="buy" and p[n].coin >= tonumber(args[3]) then
p[n].coin=p[n].coin-args[3]
ui.updateTextArea(2,"<TI><B><N>Paranız: <BV>"..p[n].coin,n)
if args[2]=="cheese" then
x.cheese(n)
end
end
end

SüperMeep:

Spoiler

for n in pairs(tfm.get.room.playerList) do
tfm.exec.bindKeyboard(n,32,true,true)
end

function eventKeyboard(n,k,d,x,y)
if k==32 then
tfm.exec.explosion(x,y,30,50,false)
tfm.exec.displayParticle(12,x,y,0,0,0,0,nil)
tfm.exec.displayParticle(20,x,y,0,0,0,0,nil)
end
end

Profil:

Spoiler

p={}
firstS=true

function eventNewPlayer(n)
if not p[n] then
p[n]={died=0,win=0,first=0,mode=nil,normal=0,hard=0,divine=0}
end
end

for n in pairs (tfm.get.room.playerList) do
eventNewPlayer(n)
end

function eventPlayerWon(n)
p[n].win=p[n].win+1
if firstS then
p[n].first=p[n].first+1
firstS=false
end
end

function eventPlayerDied(n)
p[n].died=p[n].died+1
end

function eventLoop()
for n in pairs (tfm.get.room.playerList) do
local s=tfm.get.room.playerList[n]
if s.inHardMode==0 then
p[n].mode="<V>Normal"
elseif s.inHardMode==1 then
p[n].mode="<J>Hard"
elseif s.inHardMode==2 then
p[n].mode="<R>Divine"
end
end
end

function eventNewGame()
firstS=true
for n in pairs (tfm.get.room.playerList) do
local s=tfm.get.room.playerList[n]
if s.inHardMode==0 then
p[n].normal=p[n].normal+1
elseif s.inHardMode==1 then
p[n].hard=p[n].hard+1
elseif s.inHardMode==2 then
p[n].divine=p[n].divine+1
end
end
end

function eventChatCommand(n,cmd)
local a={}
for arg in cmd:gmatch('%S+') do
table.insert(a,arg)
end
if a[1]:lower()=="p" or a[1]:lower()=="profil" then
o={x=5,y=27,w=250,h=150}
local profile=[[
<J><B>Fare</B>
<VP>• <N><B>Ölüm:</B> <BV>%d
<VP>• <N><B>Yuvaya Girme:</B> <BV>%d
<VP>• <N><B>Birincilik:</B> <BV>%d

<J><B>Şaman</B>
<VP>• <N><B>Şaman Olma:</B> <V>%d <G>/ <J>%d <G>/ <R>%d
<VP>• <N><B>Şaman Modu:</B> ]]
if a[2] and tfm.get.room.playerList[a[2]] then
profile=profile:format(p[a[2]].died,p[a[2]].win,p[a[2]].first,p[a[2]].normal,p[a[2]].hard,p[a[2]].divine)
ui.addTextArea(0,"<V><p align='center'><B><TI>"..a[2].."</TI></B></p>"..profile..p[a[2]].mode,n,o.x,o.y,o.w,o.h,1,1,0.8,true)
else
profile=profile:format(p[n].died,p[n].win,p[n].first,p[n].normal,p[n].hard,p[n].divine)
ui.addTextArea(0,"<V><p align='center'><B><TI>"..n.."</TI></B></p>"..profile..p[n].mode,n,o.x,o.y,o.w,o.h,1,1,0.8,true)
end
ui.addTextArea(1,"<TI><B><R><a href='event:close'>[Kapat]",n,o.x+o.w-70,o.y+o.h-25,nil,nil,1,1,0,true)
end
end

function eventTextAreaCallback(id,n,cb)
args={}
for arg in cb:gmatch("%S+") do
table.insert(args,arg)
end
if cb=="close" then
ui.removeTextArea(0,n)
ui.removeTextArea(1,n)
end
end

İşinize Yaradıysa Kalp atın :)

Mutluerkek a dit :

profil kodundaki şaman zorluğu olayı hoşuma gitti ben yeni gördüm onu