Something

function animtest(ply,cmd,args)
	local anim=args[1]
	local inc=args[2]
	if inc=="0" then
		NPCAnim.CitizenMaleAnim[anim]=NPCAnim.CitizenMaleAnim[anim]-1
	elseif inc=="1" then
		NPCAnim.CitizenMaleAnim[anim]=NPCAnim.CitizenMaleAnim[anim]+1
	end
MsgN(NPCAnim.CitizenMaleAnim[anim])
end
concommand.Add("animtest",animtest)