• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!

[Requesting/Support] Vip System by points,Lvl Square{Some square only X lvl can pass}

GeKirAh

Banned User
Joined
Feb 14, 2009
Messages
163
Reaction score
0
Location
Brazil !!!
Hello Guys,
Anyone please can give me some help with this scripts? :
-Advanced Vip System!
-Square Level System!


VIP System: By points!!!
-With Vip points player can buy:
*Vip Days {1 day = 3 points!}
*Vip Items {depends, tell me how configure PLEASE!}

-Vip Time By hour {1 day, 24hrs~ 60*60*24 = 1 day!}
-Vip Points can add by god {/addvip NAME, NR-of-days!}[ex. /addvip Full,30]
-Player no need to be online to receyve the points
-have a File with "LOGS" folder, Showing commands player have used
-GM have command to ADD vip points, and to remove!
-Player can buy items/days by points!
-Command to show how many points player have
[Player will use this command, and gm too! {command: !vipinfo}
(About command: Show how many points player have, "You have 30 vip points"}


-Vip system by storage value.
what for ? to doors only vip can pass, npcs only vip can talk, sqm only vip can walk etc~



ABOUT SQM LEVEL!

how I can configure one SQM to player level X+ can pass?

need for levels :
60,70,80,90,100



CAN PLEASE SOMEONE GIVE ME DETAILED HELP?!
Because I dont know to much about lua script!!!

I will tell only THANKS A LOT!!! AND GIVE SOME REPUTATION 4YOU ;}


I already have an vip system but have error with talkactions maybe anyone can help me to fix it? :eek:
Code:
dofile("./vip.lua")

function onSay(cid, words, param)
	local InitialPoints = VipInfo(getPlayerAccountId(cid)).Puntos
	local InitialDays = getPlayerVipDays(getCreatureName(cid))
	local myOutfit = getCreatureOutfit(cid).lookType
	if words == "/addpoints" then
		if getPlayerAccess(cid) >= ACCESS then
			if #param > 0 then
				local data = string.explode(param, ",")
				if not getPlayerByName(data[1]) then
					doPlayerSendCancel(cid, "Please write the name of the player.")
				elseif tonumber(data[2]) == nil then
					doPlayerSendCancel(cid, "Please write a valid number.")
				else
					local name, ptos = data[1], tonumber(data[2])
					doPlayerAddVipPoints(name, ptos)
					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You added " .. ptos .. " vip points to " .. name ..".")
				end
			else
				doPlayerSendCancel(cid, "Please write the info.")
			end
		else
			doPlayerSendCancel(cid, "Command only executable by Gms.")
		end
	elseif words == "/removepoints" then
		if getPlayerAccess(cid) >= ACCESS then
			if #param > 0 then
				local data = string.explode(param, ",")
				if not getPlayerByName(data[1]) then
					doPlayerSendCancel(cid, "Please write the name of the playerr.")
				elseif tonumber(data[2]) == nil then
					doPlayerSendCancel(cid, "Please write a valid number.")
				else
					local name, ptos = data[1], tonumber(data[2])
					if doPlayerRemoveVipPoints(name, ptos) == TRUE then
						doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You removed " .. ptos .. " vip points to " .. name ..".")
					else
						doPlayerSendCancel(cid, "The player ".. name .." does not have enough points.")
					end
				end
			else
				doPlayerSendCancel(cid, "Please write the info.")
			end
		else
			doPlayerSendCancel(cid, "Command only executable by Gms.")
		end
	elseif words == "/removedays" then
		if getPlayerAccess(cid) >= ACCESS then
			if #param > 0 then
				local data = string.explode(param, ",")
				if not getPlayerByName(data[1]) then
					doPlayerSendCancel(cid, "Please write the name of the playerr.")
				elseif tonumber(data[2]) == nil then
					doPlayerSendCancel(cid, "Please write a valid number.")
				else
					local name, days = data[1], tonumber(data[2])
					if doPlayerRemoveVipDays(name, days) == TRUE then
						doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Has removido " .. days .. " dias vip a "..name..".")
					else
						doPlayerSendCancel(cid, "The player "..name.." does not have enough vip days, removed all the time possible.")
					end
				end
			else
				doPlayerSendCancel(cid, "Please write the info.")
			end
		else
			doPlayerSendCancel(cid, "Command only executable by Gms.")
		end
	elseif words == "/adddays" then
		if getPlayerAccess(cid) >= ACCESS then
			if #param > 0 then
				local data = string.explode(param, ",")
				if not getPlayerByName(data[1]) then
					doPlayerSendCancel(cid, "Please write the name of the playerr.")
				elseif tonumber(data[2]) == nil then
					doPlayerSendCancel(cid, "Please write a valid number.")
				else
					local name, days = data[1], tonumber(data[2])
					doPlayerAddVipDays(name, days)
					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You added " .. days .. " vip days to "..name..".")
				end
			else
				doPlayerSendCancel(cid, "Please write the info.")
			end
		else
			doPlayerSendCancel(cid, "Command only executable by Gms.")
		end
	elseif words == "/getvipinfo" then
		if getPlayerAccess(cid) >= ACCESS then
			if param ~= "" then
				if not getPlayerByName(param) then
					doPlayerSendCancel(cid, "Please write the name of the playerr.")
				else
					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "The player "..param.." have " .. getPlayerVipDays(param) .. " vip days and "..getPlayerVipInfoByName(param).Puntos.." vip points.")
				end
			else
				doPlayerSendCancel(cid, "Please write the name of the playerr.")
			end
		else
			doPlayerSendCancel(cid, "Command only executable by Gms.")
		end
	--PLAYERS
	elseif words == "!vipinfo" then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have " .. getPlayerVipDays(getCreatureName(cid)) .. " vip days and "..getPlayerVipInfoByName(getCreatureName(cid)).Puntos.." vip points.")
	--SHOP VIP
	elseif words == "/buydays" then
		if param ~= "" then
			local days = tonumber(param)
			if not days then
				doPlayerSendCancel(cid, "Please write a number.")
			else
				local points = days * 2
				if doPlayerRemoveVipPoints(getCreatureName(cid), points) == TRUE then
					doPlayerAddVipDays(getCreatureName(cid), days)
					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You bought ".. days .." vip days for ".. points .." vip points.")
				else
					doPlayerSendCancel(cid, "You need ".. points .." vip points for buy ".. days .." vip days.")
				end
			end
		else
			doPlayerSendCancel(cid, "Please write a number.")
		end
	--[[
	elseif words == "/buy" then
		if param == "exp ring" then
			if doPlayerRemoveVipPoints(getCreatureName(cid), R_Ptos) == TRUE then
				local ring = doPlayerAddItem(cid, 2213, 1)
				doSetItemActionId(ring, R_Duration + 1000)
				setItemName(ring, getCreatureName(cid).."\´s Ring.")
				doSetItemSpecialDescription(ring, "Esta nuevo.")
			else
				doPlayerSendCancel(cid, "No tienes suficientes puntos.")
			end
		else
			doPlayerSendCancel(cid, "Item no valido.")
		end	
	elseif words == "/addon" then
		if #param > 0 then
			local addon = tonumber(param)
			if not addon then
				doPlayerSendCancel(cid, "Ingresa un numero valido.")
			elseif addon > 2 or addon < 1 then
				doPlayerSendCancel(cid, "El numero solo puede ser 1 o 2.")
			else
				local Stor = getOutfitStorage(myOutfit, addon)
				if getPlayerStorageValue(cid, Stor) ~= 1 then
					if doPlayerRemoveVipPoints(getCreatureName(cid), Addons_P) == TRUE then
						for q = 1, 2 do
							doPlayerAddOutfit(cid, Outfits[Stor].Outs[q], addon)
						end
						doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Has comprado el addon "..addon.." por "..Addons_P.." punto.")
						setPlayerStorageValue(cid, Stor, 1)
					else
						doPlayerSendCancel(cid, "No tienes suficientes puntos.")
					end
				else
					doPlayerSendCancel(cid, "Ya tienes este addon.")
				end
			end
		else
			doPlayerSendCancel(cid, "Ingresa el addons que deseas comprar.")
		end	
	]]
	end
	--Register all the commands ~
	if Registro.Registrar == TRUE then
	    local file = io.open(Registro.Carpeta .. Registro.archivo, "a") 
	    file:write("".. os.date("%d %B %Y %X ", os.time()) .." -->  "..getCreatureName(cid)..": "..words.." "..param.."  Info: Pts. Before = "..InitialPoints..", Pts. After = "..VipInfo(getPlayerAccountId(cid)).Puntos..", Days Before = "..InitialDays..", Days After = "..getPlayerVipDays(getCreatureName(cid))..", Outfit = "..myOutfit.."\n") 
	    file:close() 
	end
	return TRUE
end

And talkactions.Xml {ALL}:
Code:
<?xml version="1.0" encoding="UTF-8"?>
<talkactions>
	<!-- Gods -->
	<talkaction log="yes" words="/addskill" access="5" event="function" value="addSkill"/>
	<talkaction log="yes" words="/attr" access="5" event="function" value="changeThingProporties"/>
	<talkaction log="yes" words="/serverdiag" access="5" event="function" value="serverDiag"/>
	<talkaction log="yes" words="/closeserver" access="5" event="script" value="closeopen.lua"/>
	<talkaction log="yes" words="/openserver" access="5" event="script" value="closeopen.lua"/>
	<talkaction log="yes" access="5" words="/shutdown" event="script" value="shutdown.lua"/>
	<talkaction log="yes" access="5" words="/mode" event="script" value="mode.lua"/>
      <talkaction log="yes" words="/addpoints" access="5" event="function" value="vipE.lua"/>
	<talkaction log="yes" words="/removepoints" access="5" event="function" value="vipE.lua"/>
	<talkaction log="yes" words="/adddays" access="5" event="function" value="vipE.lua"/>
	<talkaction log="yes" words="/removedays" access="5" event="script" value="vipE.lua"/>
	<talkaction log="yes" words="/getvipEinfo" access="5" event="script" value="vipE.lua"/>
      <talkaction words="/addpoints" access="5" event="function" value="vipE.lua"/>
	<talkaction words="/removepoints" access="5" event="function" value="vipE.lua"/>
	<talkaction words="/adddays" access="5" event="function" value="vipE.lua"/>
	<talkaction words="/removedays" access="5" event="script" value="vipE.lua"/>
	<talkaction words="/getvipEinfo" access="5" event="script" value="vipE.lua"/>

	<!-- Community Managers -->
	<talkaction log="yes" words="/s" access="4" event="script" value="summon.lua"/>
	<talkaction log="yes" words="/n" access="4" event="script" value="creature.lua"/>
	<talkaction log="yes" words="/m" access="4" event="script" value="creature.lua"/>
	<talkaction log="yes" words="/reload" access="4" event="script" value="reload.lua"/>
	<talkaction log="yes" words="/raid" access="4" event="script" value="raid.lua"/>
	<talkaction log="yes" words="/newtype" access="4" event="script" value="newtype.lua"/>
	<talkaction log="yes" words="/r" access="4" event="script" value="remove.lua"/>
	<talkaction log="yes" words="/owner" access="4" event="script" value="owner.lua"/>
	<talkaction log="yes" words="/i" access="4" event="script" value="createitem.lua"/>
	<talkaction access="4" words="!z" event="script" value="magiceffect.lua"/>
	<talkaction access="4" words="!x" event="script" value="animationeffect.lua"/>
	<talkaction access="4" words="!y" event="script" value="animatedtext.lua"/>
	<talkaction log="yes" access="4" words="/bc" event="script" value="broadcastclass.lua"/>
	<talkaction log="yes" access="4" words="/mkick" event="script" value="masskick.lua"/>

	<!-- Gamemasters -->
	<talkaction log="yes" words="/ghost" access="3" event="function" value="ghost"/>
	<talkaction log="yes" words="/squelch" access="3" event="script" value="gamemaster.lua"/>
	<talkaction log="yes" words="/cliport" access="3" event="script" value="gamemaster.lua"/>
	<talkaction log="yes" words="/t" access="3" event="script" value="teleportmaster.lua"/>
	<talkaction log="yes" words="/c" access="3" event="script" value="teleporthere.lua"/>
	<talkaction log="yes" words="/goto" access="3" event="script" value="teleportto.lua"/>
	<talkaction log="yes" words="/a" access="3" event="script" value="teleporttiles.lua"/>
	<talkaction log="yes" words="/kick" access="3" event="script" value="kick.lua"/>
	<talkaction log="yes" words="/send" access="3" event="script" value="teleportsend.lua"/>
	<talkaction log="yes" words="/unban" access="3" event="script" value="unban.lua"/>
	<talkaction log="yes" words="/town" access="3" event="script" value="teleporttown.lua"/>
	<talkaction log="yes" words="/up" access="3" event="script" value="teleportfloor.lua"/>
	<talkaction log="yes" words="/down" access="3" event="script" value="teleportfloor.lua"/>
	<talkaction log="yes" access="3" words="/save" event="script" value="save.lua"/>
	<talkaction log="yes" access="3" words="/clean" event="script" value="clean.lua"/>
	<talkaction log="yes" access="3" words="/reports" event="script" value="reports.lua"/>
	<talkaction log="yes" access="3" words="/mc" event="script" value="multicheck.lua"/>

	<!-- Senior Tutors -->
	<talkaction log="yes" words="/notations" access="2" event="script" value="notations.lua"/>
	<talkaction log="yes" words="/info" access="2" event="script" value="playerinfo.lua"/>
	<talkaction log="yes" words="/gethouse" access="2" event="script" value="gethouse.lua"/>
	<talkaction log="yes" access="2" words="/b" event="script" value="broadcast.lua"/>

	<!-- Tutors -->
	<talkaction log="yes" words="/baninfo" access="1" event="function" value="showBanishmentInfo"/>
	<talkaction log="yes" access="1" words="!pos" event="script" value="position.lua"/>

	<!-- Players -->
	<talkaction words="!buyhouse" event="function" value="buyHouse"/>
	<talkaction words="!sellhouse" event="function" value="sellHouse"/>
	<talkaction words="!createguild" event="function" value="createGuild"/>
	<talkaction words="!joinguild" event="function" value="joinGuild"/>
	<talkaction words="!frags" event="script" value="frags.lua"/>
	<talkaction words="!buypremium" event="script" value="buypremium.lua"/>
	<talkaction words="!leavehouse" event="script" value="leavehouse.lua"/>
	<talkaction words="!online" event="script" value="online.lua"/>
	<talkaction words="!changender" event="script" value="changender.lua"/>
	<talkaction words="!uptime" event="script" value="uptime.lua"/>
	<talkaction words="!deathlist" event="script" value="deathlist.lua"/>
	<talkaction words="!pvp" event="script" value="pvp.lua"/>
	<talkaction words="!q" event="script" value="money.lua"/>
	<talkaction words="!serverinfo" event="script" value="serverinfo.lua"/>
	<talkaction words="!guild" event="script" value="register_woe.lua"/>
	<talkaction words="!woe" event="script" value="woe.lua"/>
	<talkaction words="!woestatus" event="script" value="woe.lua"/>
	<talkaction words="!recall" event="script" value="woe.lua"/>
	<talkaction words="/vipEinfo" event="script" value="vipE.lua"/>
	<talkaction words="/buydays" event="script" value="vipE.lua"/>


Anyone please know how to fix the vip ? The error are in talkactions, all are not working!!! :~~ please help me!
 
Back
Top