addCommandHandler("parakes", function(oyuncu, _, kesilcek, miktar, sebep)
	local hesapismi = getAccountName(getPlayerAccount(oyuncu))
	if isObjectInACLGroup("user." ..hesapismi, aclGetGroup("Admin")) then
		if kesilcek then
			local kesilcekOyuncu = isimdenOyuncuBul(kesilcek)
			if kesilcekOyuncu then
				if miktar and type(tonumber(miktar)) == "number" then
					if sebep then sebep = "Sebep: #CC0000"..sebep else sebep = "" end
					local oyuncuPara = getPlayerMoney(kesilcekOyuncu)
					setPlayerMoney(kesilcekOyuncu, oyuncuPara-miktar)
					outputChatBox(getPlayerName(oyuncu).." #FFFFFFTarafından "..getPlayerName(kesilcekOyuncu).." #FFFFFFisimli oyuncudan #CC0000"..miktar.."#2aff00$ #FFFFFFpara kesildi. "..sebep, root, 255,0,0,true)
				else
					outputChatBox("Lütfen geçerli bir miktar giriniz.", oyuncu, 255,0,0)
				end
			else
				outputChatBox("Oyuncu bulunamadı.", oyuncu, 255,0,0)
			end
		else
			outputChatBox("Lütfen parasını kesmek istediğiniz oyuncu ismi giriniz.", oyuncu, 255,0,0)
			outputChatBox("Kullanımı: /parakes nick miktar sebep", oyuncu, 255,0,0)
		end	
	else
		outputChatBox("Bu komutu kullanmak için yetkin yok.", oyuncu, 255,0,0)
	end
end)

function isimdenOyuncuBul(name)
    local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil
    if name then
        for _, player in ipairs(getElementsByType("player")) do
            local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower()
            if name_:find(name, 1, true) then
                return player
            end
        end
    end
end