Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2015-12-30, 14:49


Kradus







Wiek: 28
Na forum: 4310 dni
Posty: 100
Nick w MP: Salldan

Piwa: 78

Respekt: 50

addCommandHandler ( "przelej",  -----komenda jaka ma byc przeleana kasa
function ( player, cmd, nick, kwota )
    if nick and kwota then
        local aplayer = getPlayerFromName( nick )
   
        if aplayer then
            kwota = tonumber(kwota)
            if kwota <= getPlayerMoney ( player ) and kwota > 0 then
                takePlayerMoney ( player, kwota )  ----------player przelwajacy a player odbierajacy
                givePlayerMoney ( aplayer, kwota )
        outputChatBox ("Wys?a?e? " ..kwota.. " $ graczowi " ..nick, player, 255,50, 50 )  -----informacja ile przelaes komu
        outputChatBox ("Dosta?e? " ..kwota.. " $ od gracza" ..player, aplayer, 255,50, 50 )
            else
                outputChatBox ( "Nie masz tyle pieni?dzy lub podana kwota jest nieprawid?owa!", player, 255,50, 50 ) ---sprawdza czy masz tyle kasy lub jesli jej niemasz wyslwietli sie komunikat
            end
        else
            outputChatBox ( "Nie ma takiego gracza na serwerze!", player, 255,50, 50 )  ------sprawdza czy jest gracz na serwerze
        end
    else
        outputChatBox ( "U?yj /przelej [nick] [kwota]", player, 255, 50, 50 ) ------czy dobrze wpisales komende
    end
   
end
)


Nie pisze od kogo i ile dosta?e?. Nie wiem dlaczego. Daje :piwo: za szybkie poprawienie :D

Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-30, 14:59


Jurandovsky

Kurdebele






Wiek: 17
Na forum: 4979 dni
Posty: 915

Piwa: 2697

Respekt: 955,3
Respekt: 955,3Respekt: 955,3

addCommandHandler ( "przelej",  -----komenda jaka ma byc przeleana kasa
function ( player, cmd, nick, kwota )
    if nick and kwota then
        local aplayer = getPlayerFromName( nick )
   
        if aplayer then
            kwota = tonumber(kwota)
            if kwota <= getPlayerMoney ( player ) and kwota > 0 then
                takePlayerMoney ( player, kwota )  ----------player przelwajacy a player odbierajacy
                givePlayerMoney ( aplayer, kwota )
        outputChatBox ("Wys?a?e? " ..kwota.. " $ graczowi " ..getPlayerName(nick), player, 255,50, 50 )  -----informacja ile przelaes komu
        outputChatBox ("Dosta?e? " ..kwota.. " $ od gracza" ..getPlayerName(player), aplayer, 255,50, 50 )
            else
                outputChatBox ( "Nie masz tyle pieni?dzy lub podana kwota jest nieprawid?owa!", player, 255,50, 50 ) ---sprawdza czy masz tyle kasy lub jesli jej niemasz wyslwietli sie komunikat
            end
        else
            outputChatBox ( "Nie ma takiego gracza na serwerze!", player, 255,50, 50 )  ------sprawdza czy jest gracz na serwerze
        end
    else
        outputChatBox ( "U?yj /przelej [nick] [kwota]", player, 255, 50, 50 ) ------czy dobrze wpisales komende
    end
   
end
)


Podpis
Jedyny kontakt ze mną to PW forum

Kod:


local noobs = getElementsByTitle("player", "Programista LUA")
for k, v in ipairs(noobs) do
outputChatBox("Bez mózgu jest użytkownik o nicku: "..getPlayerName(v), root)
destroyElement(v)
end
Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-30, 15:10


Kradus







Wiek: 28
Na forum: 4310 dni
Posty: 100
Nick w MP: Salldan

Piwa: 78

Respekt: 50

Teraz si? nie wy?wietla nawet temu co przela?.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-30, 15:35


Toffiaaak.







Wiek: 23
Na forum: 4552 dni
Posty: 128
Nick w MP: Toffy.

Piwa: 1836

Respekt: 242
Respekt: 242Respekt: 242

addCommandHandler("przelej", function(l_1_0, l_1_1, l_1_2, l_1_3)
  if l_1_2 and l_1_3 then
    local l_1_4 = getPlayerFromName(l_1_2)
    if l_1_4 then
      l_1_3 = tonumber(l_1_3)
      if l_1_3 <= getPlayerMoney(l_1_0) and l_1_3 > 0 then
        takePlayerMoney(l_1_0, l_1_3)
        givePlayerMoney(l_1_4, l_1_3)
        outputChatBox("Przela?e? " .. l_1_3 .. " $ graczowi " .. l_1_2 .. ".", l_1_0, 255, 255, 255)
        outputChatBox("Dosta?e? " .. l_1_3 .. " $ od gracza " .. getPlayerName(l_1_0) .. ".", l_1_4, 255, 255, 255)
      else
        outputChatBox("Nie posiadasz tylu pieni?dzy.", l_1_0, 255, 255, 255)
      end
    else
      outputChatBox("Na serwerze nie ma takiego gracza.", l_1_0, 255, 255, 255)
    end
  else
    outputChatBox("U?yj /przelej [nick] [kwota]", l_1_0, 255, 255, 255)
  end
end
)

Licz? na piwko i reputacje+, testowane - powinno dzia?a?.

Podpis

Osiągnięcia:
- wygrana w konkursie LUA (kat. średnia) - 05.02.18
- 150 reputacji - 06.02.18
- 100 postów - 06.02.18

Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-30, 16:08


Kradus







Wiek: 28
Na forum: 4310 dni
Posty: 100
Nick w MP: Salldan

Piwa: 78

Respekt: 50

Dobra Wielkie thx. Polecia?o piwo i resp. Temat do zamkni?cia.

Postaw piwo autorowi tego posta
 

 
Tagi: przelewanie
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku