Lista scripturilor By Nihatsune

Status
Hilo no abierto para más respuestas.
1. Setează numele unei mape
Code:
tfm.exec.setUIMapName("Numele Mapei")
tfm.exec.setUIShamanName("Numele Șamanului")
2.Ninsoare
Code:
tfm.exec.snow()

local loopCount = 0
function eventLoop()
if loopCount == 0 then
tfm.exec.snow()
tfm.exec.snow()
end
loopCount = (loopCount + 1) % 100
end
3.Zbor din tasta space

Code:
function eventNewPlayer(name)
tfm.exec.bindKeyboard(name,32,true,true)
end

for name,player in pairs(tfm.get.room.playerList) do
eventNewPlayer(name)
end

function eventKeyboard(name,key,down,x,y)
if key==32 then
tfm.exec.movePlayer(name,0,0,true,0,-50,false)
end
end
4.Alege un jucător la întâmplare ca vampir
Code:
players = {}
for name,player in pairs(tfm.get.room.playerList) do
table.insert(players,name)
end
tfm.exec.setVampirePlayer(players[math.random(#players)])
5. Fă toți jucătorii vampiri

Code:
for name,player in pairs(tfm.get.room.playerList) do
tfm.exec.setVampirePlayer(name)
end
6. Fake ban

Code:
-- Bot messagens v1.1
-- Script creeat de Adrian
-- Tables
nomedobot="~BAN";
cmm="ES";
mensagens={
["boasvindas"]="În 3 minute veți fii banat PERMANENT MUAHAHHAH!";
["minijuegos"]="Todos ls minigames: EDITAR";
["reglas"]="Las reglas son: Editar";
["novedades"]="La tribu ahora tiene un bot #";
}
-- Inicio del script
print("<VP>[Bot messagens]:<V> inciado!")
ui.addTextArea(0,"<font color='#E88F4F'>> [".. cmm.."] [".. nomedobot.."] ".. mensagens.boasvindas.."</font>",NIL,6,368,478,30,0x1C3C41,0x1C3C41,0.9,true)
-- Nuevo jugador entra en casa de tribu
function eventNewPlayer(player)
ui.addTextArea(0,"<font color='#E88F4F'>> [".. cmm.."] [".. nomedobot.."] ".. mensagens.boasvindas.."</font>",NIL,6,368,478,30,0x1C3C41,0x1C3C41,0.9,true)
end
-- Comandos
function eventChatCommand(player,cm)
if cm == "minijuegos" then
ui.updateTextArea(0,"<font color='#E88F4F'>> [".. cmm.."] [".. nomedobot.."] ".. mensagens.minijuegos.."</font>",player)
end
if cm == "reglas" then
ui.updateTextArea(0,"<font color='#E88F4F'>> [".. cmm.."] [".. nomedobot.."] ".. mensagens.reglas.."</font>",player)
end
if cm == "novedades" then
ui.updateTextArea(0,"<font color='#E88F4F'>> [".. cmm.."] [".. nomedobot.."] ".. mensagens.novedades.."</font>",player)
end
system.disableChatCommandDisplay(cm, true)
end
Script vânt și ploaie :

Code:
tfm.exec.disableAutoShaman(true)

tfm.exec.disableAfkDeath(true)



tfm.exec.newGame('CODUL MAPEI (XML)')


tfm.exec.disableAutoNewGame(true)

tfm.exec.setUIMapName("furtuna<BV> - @NUMELE MAPEI")


function eventNewPlayer(player)
tfm.exec.respawnPlayer(name)
end


function eventPlayerDied(player)
tfm.exec.respawnPlayer(player)
end

function eventPlayerWon(player)
tfm.exec.respawnPlayer(player)
end

lights={"26","27","28"}
pAtOnce=50

function eventLoop(ct,tr)
for i=1,pAtOnce do
tfm.exec.displayParticle(lights[math.random(#lights)],math.random(0,3200),math.random(0,230),0,0,0,0,nil)
end
end
Acest script îți face o explozie de inimioare

Code:
-- eventLoop      
tfm.exec.setUIMapName("Script by <ROSE>Nihatsune")  
fireworks = true
gameTime = 0
pumpkin = nil
nbPumpkins = 0
ySpawn = 50
function eventLoop(a, b)
if gameTime%2 == 0 and fireworks == false then
if pumpkin ~= nil then
pumpkinObject = tfm.get.room.objectList[pumpkin]
   if pumpkinObject.y < 325 then
      tfm.exec.displayParticle(16, 400, 200, 0, 0, 0, -0.05, nil)
tfm.exec.setPlayerScore(player, 10, true)
ySpawn = ySpawn + 5
else
for i=0, 5 do
tfm.exec.displayParticle(6, pumpkinObject.x, pumpkinObject.y, math.random(-1,1)*math.random()*math.random(), -math.random()*math.random(), 0, 0, nil)
end
end
tfm.exec.removeObject(pumpkin)
end
if tfm.get.room.playerList[player].score + 10 >= 250 then
system.bindMouse(player, false)
   tfm.exec.removeObject(trampoline)
     tfm.exec.setPlayerScore(player, nbPumpkins, false)
fireworks = true
else
xRandom = math.random(35, 765)
for i=0, 5 do
     tfm.exec.displayParticle(3, xRandom, ySpawn, math.random(-1,1)*math.random(), math.random(-1,1)*math.random(), 0, 0, nil)
end
pumpkin = tfm.exec.addShamanObject(89, xRandom, ySpawn, 0, math.random(-1,1), math.random(0,10), false)
    nbPumpkins = nbPumpkins + 1
end
elseif fireworks == true then
xFeu = math.random(50,750)
yFeu = math.random(50,350)
kMax = math.random(20,50)
for k=0,kMax do
  tfm.exec.displayParticle(5,xFeu,yFeu,math.random(-3,3)*math.random(),math.random(-3,3)*math.random(),0,0,nil)
tfm.exec.displayParticle(5,xFeu,yFeu,math.random(-3,3)*math.random(),math.random(-3,3)*math.random(),0,0,nil)
   tfm.exec.displayParticle(5,xFeu,yFeu,math.random(-3,3)*math.random(),math.random(-3,3)*math.random(),0,0,nil)
     tfm.exec.displayParticle(5,xFeu,yFeu,math.random(-3,3)*math.random(),math.random(-3,3)*math.random(),0,0,nil)
end
end
gameTime = gameTime + 0.5
end
Cu acest script îți setează mapele care vrei să urmeze

Code:
tfm.exec.disableAutoNewGame(true)
maps={0,1,2,3,4,5,6,7,8,9,10}

function eventLoop(time,remaining)
  if remaining<=0 then
tfm.exec.newGame(maps[math.random(#maps)])
end
end

function eventPlayerDied()
  local i=0
for n,player in pairs(tfm.get.room.playerList) do
  if not player.isDead then
i=i+1
end
end
if i==0 then
tfm.exec.newGame(maps[math.random(#maps)])
end
end
Aici ai scriptul la Deathmatch ;D

Code:
tfm.exec.disableAutoNewGame(true)
   tfm.exec.disableAutoShaman(true)
      players={}
        toDespawn={}
maps={1,2,3,4,5,6,7,8,}

   function eventNewPlayer(name)
  for i,key in ipairs({32,40,83}) do
tfm.exec.bindKeyboard(name,key,true,true)
end
   players[name]={
timestamp=os.time(),
      offsets={x=2, y=10}
}
end

   function eventKeyboard(name,key,down,x,y)
if (key==32 or key==40 or key==83) and not tfm.get.room.playerList[name].isDead and started then
   if players[name].timestamp < os.time()-1000 then
  local id=tfm.exec.addShamanObject(17, x+(tfm.get.room.playerList[name].isFacingRight and players[name].offsets.x or -players[name].offsets.x), y+players[name].offsets.y, tfm.get.room.playerList[name].isFacingRight and 90 or 270)
   players[name].timestamp=os.time()
table.insert(toDespawn,{os.time(),id})
end
end
end

  function eventChatCommand(name,command)
    local arg={}
for argument in command:gmatch("[^%s]+") do
  table.insert(arg,argument)
end
  if arg[1]=="off" then
if tonumber(arg[2]) and tonumber(arg[3]) then
  players[name].offsets.x=tonumber(arg[2])
    players[name].offsets.y=tonumber(arg[3])
else
  players[name].offsets.x=2
   players[name].offsets.y=10
end
tfm.exec.chatMessage("Offsets changed to X:"..players[name].offsets.x.." Y:"..players[name].offsets.y,name)
end
end

  function eventNewGame()
   started=false
end

   function eventLoop(time,remaining)
  if time >= 3000 and not started then
    started=true
end
  if remaining<=0 then
    tfm.exec.newGame(maps[math.random(#maps)])
end
   for i,cannon in ipairs(toDespawn) do
     if cannon[1] <= os.time()-3000 then
  tfm.exec.removeObject(cannon[2])
    table.remove(toDespawn,i)
end
end
end

  function eventPlayerDied(name)
    local i=0
  local n
    for pname,player in pairs(tfm.get.room.playerList) do
  if not player.isDead then
i=i+1
  n=pname
end
end
  if i==0 then
  tfm.exec.newGame(maps[math.random(#maps)])
  elseif i==1 then
tfm.exec.giveCheese(n)
    tfm.exec.playerVictory(n)
       tfm.exec.setGameTime(5)
end
end

for name,player in pairs(tfm.get.room.playerList) do
    eventNewPlayer(name)
end

tfm.exec.newGame(maps[math.random(#maps)])
Bătaie cu bulgări

Code:
players={}
tfm.exec.setUIMapName("Script By <ROSE>Nihatsune")
      tfm.exec.disableAutoShaman(true)

    function eventNewPlayer(playerName)
       system.bindKeyboard(playerName,69,true,true)
   system.bindKeyboard(playerName,0,true,true)
      system.bindKeyboard(playerName,2,true,true)
         players[playerName]={time=0;z=1}
end

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

     function eventKeyboard(n, k, down, x, y)
        if k==69 then
     z=players[n].z
        if players[n].time<=os.time()-300 then
                tfm.exec.addShamanObject(34,x+12*z,y-7,0,17*z,-2,false)
        players[n].time=os.time()
end
                  elseif k==0 then
                             players[n].z=-1
     elseif k==2 then
                   players[n].z=1
end
end

-- script by Nihatsune
-- Credite Nihatsune
Scriptul acesta îți creează echipe : Roșu și Albastru

Code:
red={}
blue={}
    function makeTeams()
local playerList={}
    for name,player in pairs(tfm.get.room.playerList) do
     table.insert(playerList,name)
end
     for i=1,#playerList,1 do
   local index=math.random(#playerList)
local name=playerList[index]
      if i%2==0 then
    table.insert(red,name)
         tfm.exec.setNameColor(name,0xFF0000)
else
            table.insert(blue,name)
              tfm.exec.setNameColor(name,0x0000FF)
end
     table.remove(playerList,index)
end
end

makeTeams()
 
Last edited:
Următorul script îți v-a pune un mic shop
Code:
players={} notices={notice=""}

 ui.addTextArea(10,"<p align='center'><font face='arial'><a href='event:open'><j><b>Magazin</a></font></p>",name,300,28,50,18,0x00001,0xEB1D51,0.9,true)

   function eventTextAreaCallback(id, name, callback)

   ui.addTextArea(0,"<p align='center'><a href='event:Clonare'>Clonare</a></p>",name,270,57,50,20,0x00001,0xCB546B,0.9,true)
 ui.addTextArea(1,"<p align='center'><a href='event:Mov'>Mov</a></p>",name,328,57,50,20,0x00001,0xCB546B,0.9,true)
  ui.addTextArea(2,"<p align='center'><a href='event:Vampir'>Vampir</a></p>",name,270,87,50,20,0x00001,0xCB546B,0.9,true)
 ui.addTextArea(3,"<p align='center'><a href='event:Alb'>Alb</a></p>",name,328,87,50,20,0x0001,0xCB546B,0.9,true)
   ui.addTextArea(4,"<p align='center'><a href='event:Rosu'>Rosu</a></p>",name,270,117,50,20,0x0001,0xCB546B,0.9,true)
 ui.addTextArea(5,"<p align='center'><a href='event:Gaura'>Gaura</a></p>",name, 328,117,50,20,0x0001,0xCB546B,0.9,true)
   ui.addTextArea(6,"<p align='center'><a href='event:Verde'>Verde</a></p>",name, 386,117,50,20,0x0001,0xCB546B,0.9,true)
     ui.addTextArea(7,"<p align='center'><a href='event:Zapada'>Zapada</a></p>",name,270,147,50,20,0x00001,0xCB546B,0.9,true)
 ui.addTextArea(8,"<p align='center'><a href='event:Mort'>Mort</a></p>",name,328,147,50,20,0x00001,0xCB546B,0.9,true)
          ui.addTextArea(9,"<p align='center'><a href='event:Blue'>Blue</a></p>",name,386,147,50,20,0x00001,0xCB546B,0.9,true)
      ui.addTextArea(10,"<p align='center'><a href='event:Meep'>Meep</a></p>",name,385,57,50,20,0x00001,0xCB546B,0.9,true)
        ui.addTextArea(11,"<p align='center'><a href='event:Maro'>Maro</a></p>",name,385,87,50,20,0x00001,0xCB546B,0.9,true)

if callback=="Clonare" then
tfm.exec.respawnPlayer(name)
end

if callback=="Vampir" then
tfm.exec.setVampirePlayer(name)
end

if callback=="Alb" then
tfm.exec.setNameColor(name, 0xFFFCFA)
end

if callback=="Rosu" then
tfm.exec.setNameColor(name, 0xCB546B)
end

if callback=="Verde" then
tfm.exec.setNameColor(name, 0x30BA76)
end

if callback=="Gaura" then
tfm.exec.playerVictory(name)
end

if callback=="Zapada" then
tfm.exec.snow()
end

if callback=="Mort" then
tfm.exec.killPlayer(name)
end

if callback=="Meep" then
tfm.exec.giveMeep(name)
end

if callback=="Maro" then
tfm.exec.setNameColor(name, 0x251501)
end

if callback=="Mov" then
tfm.exec.setNameColor(name, 0xD900FF)
end

if callback=="Blue" then
tfm.exec.setNameColor(name, 0x2E72CB)
end
end
Controlează-ți prietenii
îî poți controla pe I , J, K , L

Code:
-- Pune numele victimii tale! "papusa"
doll = "Numele cuiva"

-- Pune numele tau aici
god = "Numele tău"
-- Atat a fost tot!

-- Editarea urmatorului cod va duce la eliminarea scriptului!

-- Binding the keyboard for god(you)
-- 73 is I, the key for Up.
-- 75 is K, the key for Down
-- 74 is J, the key for Left.
-- 76 is L, the key for Right.

for name in pairs(tfm.get.room.playerList) do
-- Instead of binding each key seperately, we put them all in a group.
    for keys, k in pairs({73, 74, 75, 76}) do
--And now the keys are binded!
        tfm.exec.bindKeyboard(god, k, true, true)
    end
end
 
-- Listening for keyboard events.
-- You'll notice that move values are different because it makes the doll easier to control.

function eventKeyboard(god, key, down, x, y)
    if key == 73 then
--Moves the player Up by 50 pixels
        tfm.exec.movePlayer(doll, 0, 0, true, 0, -50, false)
    elseif key == 75 then
-- Moves the player Down by 40 pixels
        tfm.exec.movePlayer(doll, 0, 0, true, 0, 40, false)
    elseif key == 74 then
-- Moves the player Left by 40 pixels
        tfm.exec.movePlayer(doll, 0, 0, true, -40, 0, false)               
    elseif key == 76 then
-- Moves the player Right by 40 pixels
        tfm.exec.movePlayer(doll, 0, 0, true, 40, 0, false)                       
    end
end

-- Prints out your doll's name only to you.

print("<font color='#FFFF00'>"..doll.."<font color='#FFFF00'> este acum papusa ta!")
Un mic ghid despre lua și ce sunt dispus să fac eu

Code:
----------------------------------
--  MiceForce script By Adrifrumi
--  @author     Adrifrumi
--  @version    0.0.1
--  @date       16/5/2017
----------------------------------

twf = { -- Start the package.
    ui = {  -- Start the ui part of the Framework.
        
        popups = {},

        -- Start of popups section.
        createPopup = function (id, title, content, targetPlayer, buttons, closable, x, y, width, height, backgroundColor, borderColor, backgroundAlpha, fixedPos) -- Define the var as a function.
            ui.addTextArea(9 ..id.. 36 .. 21, "<font color='white'>"..content.."</font", targetPlayer, x, y + 25, width, height, backgroundColor, borderColor, backgroundAlpha, fixedPos);
            ui.addTextArea(9 ..id.. 36 .. 22, "<b><font size='14' color='#009D9D'>"..title.."</font></b>", targetPlayer, x - 10, y, width + 20, 20, "0x1c3c41", borderColor, backgroundAlpha, fixedPos);
          
            if closable then
                ui.addTextArea(9 ..id.. 36 .. 23, "<a href='event:closeTWFPopup_".. 9 ..id.. 36 .."'><font face='serif' color='#2b2b2b' size='12'><b>&#10005;</b></font></a>", targetPlayer, x + width - 8, y + 2, 16, 16, "0x009D9D", "0x009D9D", backgroundAlpha, fixedPos);
            end;

            twf.ui.popups[tostring("9"..id.."36")] = 9 ..id.. 36;

        end,
        
        removePopup = function (id, targetPlayer) -- Define the var as a function.
            ui.removeTextArea(twf.ui.popups[id] .. 21, targetPlayer);
            ui.removeTextArea(twf.ui.popups[id] .. 22, targetPlayer);
            ui.removeTextArea(twf.ui.popups[id] .. 23, targetPlayer);
        end,
        -- End of popups section.
        
        -- Start of labels section.
        createLabel = function (id, text, targetPlayer, x, y)
           ui.addTextArea(9 ..id.. 72 .. 22, "<font color='#000000' size='14'>"..text.."</font>", targetPlayer, x - 1, y, 600, 20, nil, nil, 0.0, true);
           ui.addTextArea(9 ..id.. 72 .. 22, "<font color='#000000' size='14'>"..text.."</font>", targetPlayer, x + 1, y, 600, 20, nil, nil, 0.0, true);
           ui.addTextArea(9 ..id.. 72 .. 22, "<font color='#000000' size='14'>"..text.."</font>", targetPlayer, x, y - 1, 600, 20, nil, nil, 0.0, true);
           ui.addTextArea(9 ..id.. 72 .. 22, "<font color='#000000' size='14'>"..text.."</font>", targetPlayer, x, y + 1, 600, 20, nil, nil, 0.0, true);
           ui.addTextArea(9 ..id.. 72 .. 21, "<font color='#ffffff' size='14'>"..text.."</font>", targetPlayer, x, y, 600, 20, nil, nil, 0.0, true);
        end;
        -- End of labels section.
    },
    trigger = {
        popupClose = function (popupId, playerName, callback)
            if string.sub(callback, 0, 14) == "closeTWFPopup_"  then
                print("A închis "..popupId.." "..playerName.." ("..callback..")");
                twf.ui.removePopup(callback:sub(15), playerName);
            end
        end;
    }
}

-- Implementation :
function eventTextAreaCallback (textAreaId, playerName, callback)
   twf.trigger.popupClose(textAreaId, playerName, callback);
end;

-- Usable for now :
buttonsArray = "";
twf.ui.createPopup(1, "<font color='#30BA76'>•</font> <font color='#009D9D'>Lua</font>", "Lua este un limbaj de programare", nil, buttonsArray, true, 500, 100, 250, 200, "0x324650", "0x1c3c41", 1.0, true);
twf.ui.createPopup(2, "<font color='#30BA76'>•</font> <font color='#009D9D'>Scripteri</font>", "Dacă dorești un script sau mă rog alte chestii care ține legătura între Lua și MiceForce mă poți ocntacta <font color='#A4FF00'>/c Adrifrumi</font>", nil, buttonsArray, true, 50, 100, 250, 200, "0x324650", "0x1c3c41", 1.0, true);
twf.ui.createPopup(3, "<font color='#30BA76'>•</font> <font color='#009D9D'>Ajuți?</font>", "Ajut orice playeri în legătură cu LUA<br><br>", nil, buttonsArray, true, 325, 150, 150, 100, "0x324650", "0x1c3c41", 1.0, true);
twf.ui.createLabel(1, "Version: 0.0.1", nil, 690, 375);
script facut de plictiseala ( puuteti adauga voi mai multe chestii in el)

Code:
ui.addTextArea(401,"<p align='center'><a href='event:roomsay'><b>EDIT</b></a></p>",nil,110,20,53,16,0x00FF33,0x005110,0.6,nil,true)

t=0

function eventTextAreaCallback(id,name,callback)
if callback=="roomsay" then
ui.addPopup(0,2,"<p align='center'></b></font><font size='15'>Write a message:",name,200,300,400)
end
end

function eventPopupAnswer(idpopup, playerName, answer)
if idpopup==0 then
t=0
ui.addTextArea(2,"<V><B>["..playerName.."]</B><N> "..answer.."",nil,6,380,x,20,0x4F2B18,0x26140B,1,true)
end
end


ui.addTextArea(1,"<a href='event:help'><b> EDIT</b>",nil,50,20,53,16,0x00FF33,0x005110,0.6,nil)

function eventTextAreaCallback(id,n,cb)
if cb=="help" then
ui.addPopup(2,0,"EDIT",n,250,270,nil,nil)
end
end
Stiai că în propriul tău module îți poți creea rankuri de tip Admin cu prorpiile comenzi?

Ei bine cu scriptul următor când vei scrie !re Vei reânvia

Code:
admin = {Numele tău = true}

function eventChatCommand(nume, comanda)
if admin[nume] == true then
if comanda == "re" then
tfm.exec.respawnPlayer(nume)
end
end
end
Acest script îți v-a face : Dacă rămâi ultimul în viață intrii automat în gaură
Code:
function eventPlayerDied(name)
local i,alive = 0, ""
for name,player in pairs(tfm.get.room.playerList) do
if not player.isDead then
i = i + 1
alive = name
end
end
if i == 1 then
tfm.exec.giveCheese(alive)
end
end

tfm.exec.setUIMapName("Script by <ROSE><b><u>Adrifrumi</u></b>")
Știți că în MiceForce deocamdată comanda /mort nu mai există?
Folosiți următorul script
Code:
function eventChatCommand(name,c)
if(c=='mort') then
tfm.exec.killPlayer(name)
end
end
 
Script calculator virusat
Code:
letters={"000000000000000000"}
tfm.exec.newGame('<C><P /><Z><S><S X="551" o="0" L="3000" Y="351" c="4" H="3000" P="0,0,0.3,0.2,0,0,0,0" T="12" /><S X="667" o="0" L="3000" Y="543" H="373" P="0,0,0.3,0.2,0,0,0,0" T="12" /></S><D /><O /></Z></C>')

tfm.exec.setUIMapName("<R>Compiuterul tău este infectat..")
tfm.exec.setGameTime(9999)
tfm.exec.disableAutoNewGame(true)
countdown = math.random(20)
timeleft = 100000
color=1
function eventLoop(timeRemaining,timeRemaining)

countdown = countdown / .9
color = color * 20
timeleft = timeleft - 0.5

ui.addTextArea(2,"<br><br><font size='50'><align='center'>"..countdown.."\n",nil,-900,-900,9000,9000,0x000001,0x000001,1,true)
ui.addTextArea(1,"<font face='Calibri'><R><font size='20'><u>VIRUS DE LA Nihatsune</u><br><br><font size='15'><align='center'>Your computer is infected.<br><br>Se instalează un Malware în PC TĂU.MUAHHAHAH.<br><br><font size='20px'><u>Cum îl pot scoate?</u><br><font size='15'>NO NO NO.VIRUSUL V-A RĂMÂNE PERMANENT ÎN PC-UL TĂU :3.<br><font size='11'><align='center'><br><br><br>Se încarcă virusul...<br><br><br>"..countdown.."\n",nil,200,60,400,nil,0xFFFFFF,0x000001,1,true)
ui.addTextArea(3,"<font face='Calibri'><N><font size='15'>TIME LEFT: <br><br><br>"..timeleft,nil,120,100,45,100,0xFF0000,0x000000,1,true)

ui.addTextArea(4,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(5,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(6,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(7,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(8,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(9,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(10,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)
ui.addTextArea(11,"<VP><font face='Calibri'><font size='15'><br><br><br>"..letters[math.random(#letters)],nil,math.random(700),300,45,100,0x000001,0x000001,0,true)

end


messages={"Your computers are infected.","You're computers are all being attacked","You will never be able to use your computer by tomorrow","We will hack and take over your accounts"}

function eventChatMessage(m,n)
if n=="virus" or n=="infection" or n=="hack" then
tfm.exec.chatMessage("<R>"..messages[math.random(#messages)])

end
end

Code:
local id = 0

function generateGrounds(y)
    for x=0,800,50 do
        tfm.exec.addPhysicObject (id, x, y, {type=0,restitution=0.4,friction=0.4,width=50,height=100,groundCollision=true})
        id = id + 1
    end
end

for y=0,400,60 do
    generateGrounds(y)
end

Code:
admin = "Nihatsune"
cash = {}
countdown = 6
item = {}
maps = {5}
players = {}

tfm.exec.disableAutoNewGame()
tfm.exec.disableAutoShaman()

tfm.exec.newGame(maps[math.random(#maps)])

function eventNewGame()
  countdown = 6
  started = false
  tfm.exec.setUIMapName("<J>"..countdown.."...\n")
end

function eventNewPlayer(pN)
  item[pN] = 0
  players[pN] = {timestamp = os.time()}
  tfm.exec.bindKeyboard(pN, 32, true, true)
  for n, kC in pairs({40}) do
    tfm.exec.bindKeyboard(pN, kC, true, true)
  end
  system.bindMouse(pN, true)
    if pN == admin then
      cash[pN] = 888888
    else
      cash[pN] = 0
    end
    ui.addTextArea(0, "Tu ai "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    ui.addTextArea(1, "<a href = 'event:derollshop'>Shop! ˇ", pN, 9, 28, 100, 20, 0x111111, 0x111111, 1, true)
end

function eventLoop(eT, rT)
  if eT >= 6000 and not started then
    started = true
  end
  countdown = countdown - 1
  tfm.exec.setUIMapName("<J>"..countdown.."...\n")
  if countdown <= 0 then
    tfm.exec.setUIMapName("<J>LUPTATI!\n")
  end
  for pN in pairs(tfm.get.room.playerList) do
    cash[pN] = cash[pN] + 1
    ui.updateTextArea(0, "Tu ai "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
  end
end

function eventKeyboard(pN, kC, down, x, y)
  if kC == 32 then
    tfm.exec.movePlayer(pN, 0, 0, true, 0, -50, false)
  elseif kC == 40 and item[pN] == 0 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(17, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  elseif kC == 40 and item[pN] == 1 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(1701, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  elseif kC == 40 and item[pN] == 2 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(1703, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  elseif kC == 40 and item[pN] == 3 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(1702, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  elseif kC == 40 and item[pN] == 4 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(1704, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  elseif kC == 40 and item[pN] == 5 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(1705, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  elseif kC == 40 and item[pN] == 6 and players[pN].timestamp < os.time() - 750 then
    tfm.exec.addShamanObject(1706, x, y, tfm.get.room.playerList[pN].isFacingRight and 90 or 270)
    players[pN].timestamp = os.time()
  end
end

function eventPlayerDied(pN)
  local aM = 0
  local pN2
  for n, p in pairs(tfm.get.room.playerList) do
    if not p.isDead then
      aM = aM + 1
      pN2 = n
    end
  end
  if aM == 1 then
    tfm.exec.giveCheese(pN2)
    tfm.exec.playerVictory(pN2)
    tfm.exec.setGameTime(5)
    tfm.exec.newGame(maps[math.random(#maps)])
  end
end

function eventTextAreaCallback(id, pN, answer)
  if answer == "derollshop" then
    ui.addTextArea(1, "<a href = 'event:rollshop'>Shop! ^</a>\n-> <a href = 'event:glassed'>Bilă din Sticlă - 250 coins</a>\n-> <a href = 'event:ornament'>Bilă de tip Glob - 250 coins</a>\n-> <a href = 'event:lollipop'>Bilă acadea - 300 coins</a>\n-> <a href = 'event:angel'>Bilă divină - 350 coins</a>\n-> <a href = 'event:apple'>Bilă de măr - 350 coins</a>\n-> <a href = 'event:watermelon'>Bilă Pepene - 500 coins</a>", pN, 9, 27, 205, 100, 0x111111, 0x111111, 1, true)
  elseif answer == "rollshop" then
    ui.addTextArea(1, "<a href = 'event:derollshop'>Shop! ˇ", pN, 9, 28, 100, 20, 0x111111, 0x111111, 1, true)
  elseif answer == "glassed" then
    if cash[pN] >= 250 then
      item[pN] = 1
      cash[pN] = cash[pN] - 250
      ui.updateTextArea(0, "You have "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    end
  elseif answer == "ornament" then
    if cash[pN] >= 250 then
      item[pN] = 2
      cash[pN] = cash[pN] - 250
      ui.updateTextArea(0, "You have "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    end
  elseif answer == "lollipop" then
    if cash[pN] >= 300 then
      item[pN] = 3
      cash[pN] = cash[pN] - 300
      ui.updateTextArea(0, "You have "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    end
  elseif answer == "angel" then
    if cash[pN] >= 350 then
      item[pN] = 4
      cash[pN] = cash[pN] - 350
      ui.updateTextArea(0, "You have "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    end
  elseif answer == "apple" then
    if cash[pN] >= 350 then
      item[pN] = 5
      cash[pN] = cash[pN] - 350
      ui.updateTextArea(0, "You have "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    end
  elseif answer == "watermelon" then
    if cash[pN] >= 500 then
      item[pN] = 6
      cash[pN] = cash[pN] - 500
      ui.updateTextArea(0, "You have "..cash[pN].." cash!", pN, 638, 28, 155, 20, 0x111111, 0x111111, 1, true)
    end
  end
end

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

Code:
local profile = {}

function eventNewPlayer(playerName)
    --totalCheese - times you got the cheese (with or without getting inside the hole)
    profile[playerName] = {
                            wins = 0,
                            totalCheese = 0,
                            deaths = 0,
                            displayed = 0
                            }
    ui.addTextArea(0, "<a href='event:profile'>Profil (by Nihatsune)</a>", playerName, 5, 25, nil, nil, nil, nil, 1, false)
end

function eventTextAreaCallback(textAreaId, playerName, eventName)
    if eventName == "profile" then
        profile[playerName].displayed = profile[playerName].displayed * (-1) + 1
        if profile[playerName].displayed == 1 then
            ui.updateTextArea(0, "<a href='event:profile'>Profil (by Nihatsune)</a>\n\nWins: " .. profile[playerName].wins .. ";\nTotal cheese: " .. profile[playerName].totalCheese .. ";\nDeaths: " .. profile[playerName].deaths .. ".", playerName)
        else
            ui.updateTextArea(0, "<a href='event:profile'>Profil (by Nihatsune)</a>", playerName)
        end
    end
end

function eventPlayerGetCheese(playerName)
    profile[playerName].totalCheese = profile[playerName].totalCheese + 1
end

function eventPlayerWon(playerName)
    profile[playerName].wins = profile[playerName].wins + 1
end

function eventPlayerDied(playerName)
    profile[playerName].deaths = profile[playerName].deaths + 1
end

for name, player in pairs(tfm.get.room.playerList) do
    eventNewPlayer(name)
end

Code:
name="Nihatsune"
active=true;omo=""system.bindMouse(name,true)system.disableChatCommandDisplay("omo")function eventChatCommand(a,b)if b:match("omo")and a==name then active=true;omo=b:sub(4)end end;function eventMouse(a,c,d)if active then ui.addTextArea(0,"<font size='40'>"..omo,nil,c,d,400,0,0x0,0x0,0,false)active=false
end
end

function eventLoop()
tfm.exec.addShamanObject(28, math.random(800), math.random(400),0, 0, 0, false)
end
 
Last edited:
Code:
c = {0,1,2,3,4,5,6,7,8,9,'a','b','c','d','e','f'}
color = {}
colorall = ""
final = 0
system.disableChatCommandDisplay("color",true)

function eventChatCommand(playerName, commande)
if commande=="color" then
color = {}

for i = 0, 30 do
final = c[math.random(1,#c)]..c[math.random(1,#c)]..c[math.random(1,#c)]..c[math.random(1,#c)]..c[math.random(1,#c)]..c[math.random(1,#c)]
table.insert(color, "<a href='event:0x"..final.."'><font color='#"..final.."'>[•]</font></a>")
end  

colorall = table.concat(color)
ui.addTextArea(1, "<p align='center'><br>"..colorall.."</p>", playerName, 10, 30, 770,50,nil,nil,nil,true)
end
end

function eventTextAreaCallback(id,name,callback)
tfm.exec.setNameColor(name, callback)
end
tfm.exec.chatMessage(" • <ROSE> [Color Plus] This is Version Demo of Color Plus by</ROSE> <v>Adrifrumi</v>")
Code:
s={"Deve kuşunun kaç dişi vardir?(rakamla)","Şilinin para birimi nedir?","Itri kaç tllik para biriminde mevcuttur?(Sayiyla)"," Futbolda penalti noktasi kaleye kaç metre mesafededir?","Erzurum hangi taşiyla ünlüdür?","Sümele manastiri hangi ilimizdedir?","Ünlü şairimiz Orhan Veli nin soyadi nedir?","Cumhurbaşkani kaç yilda bir seçilir?","Tür devleti bir Cumhuriyettir sözü Anayasamizin kaçinci maddesindedir?","Bir pusulada N harfi nereyi gösterir","Google un kuruluş tarihi(yil olarak)","Facebook un kuruluş tarihi(yil olarak)","Doctor Whonun 10. doktoru kimdir?","Hary potter filminde kaç affedilmeyen lanet türü vardir?(rakamla)"}
c={"0","Pezo","100","11","Oltu","Trabzon","Kanik","5","1","Kuzey","1998","2004","David Tennant","3"}
ca={"Sifir","pezo","Yüz","On bir","oltu","trabzon","kanik","Beş","Bir","kuzey","Bin dokuzyüz doksan sekiz","Ikibin dört","David","Üç"}
ss=nil
players = {}
trasd = 0
k = 0
tpks = 0
zmn = 0
m = 0
puanlar = {isim="",puan="",kazanma="",olum=""}
tfm.exec.disableAutoNewGame(true)
tfm.exec.disableAutoShaman(true)
tfm.exec.newGame(4972815)
function eventNewGame()
tfm.exec.newGame(4972815)
end
function eventNewPlayer(name)
ui.addTextArea(1,"<p align='center'><font size='15'>EDIT",nil,5,20,790,50)
players[name]={peynir=0,olum=0,kazanma=0,scor=0,yan=false}
end
for name,i in pairs(tfm.get.room.playerList) do
eventNewPlayer(name)
end
function inchidere()
ss = math.random(1,#s)
ui.addPopup(1,2,s[ss],nil,520,100,200)
for name,i in pairs(tfm.get.room.playerList) do
players[name].yan = false
end
zmn = os.time()
end
function scor()
local gecicitablo = {}
adri = "" adri1 = "" adri2 = "" adri3 = "" trasd=0
for n, p in pairs(players) do
table.insert(gecicitablo, { n=n, p=p })
end
table.sort(gecicitablo, function(x,y)
return x.p.kazanma > y.p.kazanma
end)
for i,t in ipairs(gecicitablo) do
trasd=trasd+1
adri = adri .. "\n" .. "<p align='left'><J>"..trasd.." <V><p align='right'>" .. t.n
adri1 = adri1 .. "\n" .. players[t.n].scor
adri3 = adri3 .. "\n" .. players[t.n].olum
adri2 = adri2 .. "\n" .. players[t.n].kazanma
end
ui.addTextArea(545,"<p align='center'><font size='28'><b>LeaderBoard</b></font>",nil,5,100,500,40,0x324650,0x324650)
ui.addTextArea(546,"<J><p align='left'># Name"..adri.."",nil,5,140,125,nil,0x324650,0x324650)
ui.addTextArea(547,"<J><p align='center'>Your edit here.<BL>"..adri3.."",nil,130,140,125,nil,0x324650,0x324650)
ui.addTextArea(548,"<J><p align='center'>Your Edit Here<BL>"..adri2.."",nil,255,140,125,nil,0x324650,0x324650)
ui.addTextArea(549,"<J><p align='center'>Your edit here<BL>"..adri1.."",nil,380,140,125,nil,0x324650,0x324650)
end
function eventPopupAnswer(id,n,cvp)
if cvp == ""..c[ss].."" or cvp == ""..ca[ss].."" then
players[n].kazanma = players[n].kazanma+1
players[n].scor = players[n].scor+10
scor()
zmn = os.time()-50000
m=10
else
players[n].olum = players[n].olum+1
players[n].scor = players[n].scor-5
players[n].yan = true
k = 0
tpks = 0
scor()
for name,i in pairs(tfm.get.room.playerList) do
tpks = tpks+1
if players[name].yan then
k = k+1
end
end
if k >= tpks/2 then
inchidere()
end
end
end
inchidere()
function eventLoop()
m = (os.time() - zmn) / 1000
if math.floor(60-m) >= 0 then
ui.addTextArea(5,"<p align='center'>Mai sunt <r>"..math.floor(60-m).."<N> de secunde",nil,5,380,790,20)
end
if zmn <= os.time()-60000 then
inchidere()
end
end
scor()
 
Last edited:

Danutzu

Little Mouse
De ce îmi pare copiat de pe transformice? o:
PS (pentu cei care cauta scripturi fab pentru lua): Transformice are propria secțiune pentru aceste scripturi și unele mult mai fab decat astea.
 
Status
Hilo no abierto para más respuestas.
Top
"Dev-TR" theme by Soulzone