Arena Points to Ticket

Thyr

Thyr

New member
Messages
78
Points
0
Github
warcraftfrozen
Hello anyone can help me get a exchanger that exchanges arena points to ticket? vise verssa here is the arena points farm script i use

If there is 1 Arena point is to 1 Ticket

Code: 
rebel_mt,215,170,4	script	Monster Arena	4_F_CRU,{

if(lifetime >= 1) goto LLT;
mes "[ Gate Keeper ]";
mes "What do you want to do?";
menu "Enter Monster Arena",-,"Exchange Arena Points",Lex,"Check Arena Points",Lcheck;
next;
mes "[ Gate Keeper ]";
mes "You can earn points by killing monster that are inside there, and the points you earn can be traded for cool stuffs.";
next;
mes "[ Gate Keeper ]";
mes "There are two kinds of Gate pass, the ^0000FFone-time ticket^000000 is for one entry which cost 1 Credit and there's a ^0000FFlife-time ticket^000000 that can give you access anytime which cost 10 Credits.";
mes "What entry do you want to go to?";
menu "One-Time Ticket",-,"Life-Time Ticket",Llife;
next;
if(countitem(20030) < 1) goto Lnen;
mes "[ Gate Keeper ]";
mes "Here you go! Come & Visit us again!";
mes "*Stamp Stamp*";
delitem 20030,1;
close2;
warp "bat_b02",312,225;
end;

OnInit:
	waitingroom "Monster Arena",0;
	end;
Llife:
if(countitem(20030) < 10) goto Lnen;
mes "[ Gate Keeper ]";
mes "Wow! you must be rich! Here you go! Come & Visit us again!";
mes "*Stamp Stamp*";
delitem 20030,10;
set lifetime,1;
close2;
warp "bat_b02",312,225;

Lnot:
next;
mes "[ Gate Keeper ]";
mes "Suit yourself!";
close;

Lnen:
next;
mes "[ Gate Keeper ]";
mes "Not enough Credits!";
close;

LLT:
mes "[ Gate Keeper ]";
mes "What do you want to do?";
menu "Enter Monster Arena",-,"Exchange Points",Lex,"Check Arena Points",Lcheck;
next;
mes "[ Gate Keeper ]";
mes "I see you have a life-time pass..";
mes "Do you want to enter the Monster Arena?";
menu "Yes",-,"No",Lnot;
next;
mes "[ Gate Keeper ]";
mes "Bye! Shazam !";
close2;
warp "bat_b02",312,225;
end;


Lnoep:
mes "[ Gate Keeper ]";
mes "Not Enough Points!";
close;

Lcheck:
next;
mes "[ Gate Keeper ]";
mes strcharinfo(0)+"'s Arena Points : ^0000FF"+arenapoint+"^000000 Point(s)";
close;

Lex:
next;
mes "[ Gate Keeper ]";
mes "Choose from the categories below :";
menu "Cards",-,"^0000ffEquips^000000",Leqp,"^FF00FFSupplies^000000",Lsupp;
next;
mes "[ Gate Keeper ]";
mes "Choose from my card album..";
menu "Atroce Card - 10,000",-,"Golden Thief Bug Card - 15,000",Lgtb,"Memory of Thanatos Card - 20,000",Lthana,"Fallen Bishop Card - 30,000",Lfbh,"Gloom Under Night Card - 30,000",Lgloom;

next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 10000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 4425,1;
set arenapoint,arenapoint-10000;
close;

Lgtb:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 15000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";;
getitem 4128,1;
set arenapoint,arenapoint-15000;
close;

Lthana:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 2000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 4399,1;
set arenapoint,arenapoint-20000;
close;

Lfbh:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 30000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 4441,1;
set arenapoint,arenapoint-30000;
close;

Lgloom:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 30000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 4408,1;
set arenapoint,arenapoint-30000;
close;

Leqp:
next;
mes "[ Gate Keeper ]";
mes "Choose from the available equipments..";
menu "Fusion Valkyrie Armor - 10,000",-,"Fusion Valkyrie Manteau - 10,000",Lfmant,"Fusion Valkyrie Shoes - 10,000",Lfshoe,"Fusion Valkyrie Shield - 10,000",Lfshld,"Flame Aura - 20,000",Lfaura,"Travelers Hat - 15,000",Ltrhat,"Kakashi Headprotector - 15,000",Lkakas,"Ensign Helm - 15,000",Lensi,"Cyclops Eye - 30,000",Lcycl,"Robo Ears - 10,000",Lrobo,"Devil Wings - 30,000",Ldevil;
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 10000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20042,1;
set arenapoint,arenapoint-10000;
close;

Lfmant:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 10000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20043,1;
set arenapoint,arenapoint-10000;
close;

Lfshoe:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 10000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20045,1;
set arenapoint,arenapoint-10000;
close;

Lfshld:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 10000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20044,1;
set arenapoint,arenapoint-10000;
close;

Lfaura:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 20000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20063,1;
set arenapoint,arenapoint-20000;
close;

Ltrhat:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 15000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20027,1;
set arenapoint,arenapoint-15000;
close;

Lkakas:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 15000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20026,1;
set arenapoint,arenapoint-15000;
close;

Lensi:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 15000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20028,1;
set arenapoint,arenapoint-15000;
close;

Lcycl:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 30000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 5135,1;
set arenapoint,arenapoint-30000;
close;

Lrobo:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 10000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20024,1;
set arenapoint,arenapoint-10000;
close;

Ldevil:
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 30000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 20056,1;
set arenapoint,arenapoint-30000;
close;



Lsupp:
next;
mes "[ Gate Keeper ]";
mes "Choose from the available supplies.";
menu "50 Box of Thunder - 100",-,"50 Yggdrasil Berry - 150",Lberry,"50 Yggdrasil Seed - 75",Lseed,"50 Poison Bottle - 500",Ledp,"50 Glistening Coat - 1000",Lgcoat,"50 Cursed Water - 100",Lcwater,"50 Wind Converter - 150",Lwconv,"50 Earth Converter - 150",Leconv,"50 Fire Converter - 150",Lfconv,"50 Frost Converter - 150",Lfrconv,"10 STR Food +10 - 500",Lsfood,"10 AGI Food +10 - 500",Lafood,"10 VIT Food +10 - 500",Lvfood,"10 INT Food +10 - 500",Lifood,"10 DEX Food +10 - 500",Ldfood,"10 LUK Food +10 - 500",Llfood;
next;
mes "[ Gate Keeper ]";
mes "....";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 100) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12028,50;
set arenapoint,arenapoint-100;
close;

Lberry:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF150^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 150) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 607,50;
set arenapoint,arenapoint-150;
close;

Lseed:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF75^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 75) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 608,50;
set arenapoint,arenapoint-75;
close;

Ledp:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 678,50;
set arenapoint,arenapoint-500;
close;

Lgcoat:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF1000^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 1000) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 7139,50;
set arenapoint,arenapoint-1000;
close;

Lcwater:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF100^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 100) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12020,50;
set arenapoint,arenapoint-100;
close;

Lwconv:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF150^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 150) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12117,50;
set arenapoint,arenapoint-150;
close;

Leconv:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF150^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 150) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12116,50;
set arenapoint,arenapoint-150;
close;

Lfconv:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF150^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 150) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12114,50;
set arenapoint,arenapoint-150;
close;

Lfrconv:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF150^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 150) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12115,50;
set arenapoint,arenapoint-150;
close;

Lconv:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF150^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 150) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12114,50;
set arenapoint,arenapoint-150;
close;

Lsfood:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12075,10;
set arenapoint,arenapoint-500;
close;

Lafood:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12090,10;
set arenapoint,arenapoint-500;
close;

Lvfood:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12085,10;
set arenapoint,arenapoint-500;
close;

Lifood:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12080,10;
set arenapoint,arenapoint-500;
close;

Ldfood:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12095,10;
set arenapoint,arenapoint-500;
close;

Llfood:
next;
mes "[ Gate Keeper ]";
mes "You can get these for ^FF00FF500^000000 Points, Do you still want it?";
menu "Yes",-,"Nevermind",Lnot;
next;
if(arenapoint < 500) goto Lnoep;
mes "[ Gate Keeper ]";
mes "Here you go!";
getitem 12100,10;
set arenapoint,arenapoint-500;
close;

}



-	script	monsterarena	FAKE_NPC,{

OnGuardianKill:
set arenapoint,arenapoint+1;
dispbottom "You earned 1 Arena Point";
end;

OnBowGuardianKill:
set arenapoint,arenapoint+2;
dispbottom "You earned 2 Arena Point";
end;

OnFlower1Kill:
set arenapoint,arenapoint+20;
dispbottom "You earned 20 Arena Points";
end;

OnFlower2Kill:
set arenapoint,arenapoint+20;
dispbottom "You earned 20 Arena Points";
end;

OnFlower3Kill:
set arenapoint,arenapoint+20;
dispbottom "You earned 20 Arena Points";
end;

OnPCDieEvent:
        if ( strcharinfo(3) == "bat_b02" ) {
            if ( death >= 0 ) {
                set arenapoint,arenapoint-3;
                dispbottom "You have lost 3 Arena Points. Your total is "+arenapoint+" Arena Points.";
                set death, 0;
            }
	}
}



bat_b02,0,0,0,0	monster	Wild Flower	2111,15,1,7200,monsterarena::OnFlower1Kill
bat_b02,0,0,0,0	monster	Wild Flower	2111,15,1,7200,monsterarena::OnFlower2Kill
bat_b02,0,0,0,0	monster	Wild Flower	2111,15,1,7200,monsterarena::OnFlower3Kill
bat_b02,0,0,0,0	monster	Arena Bow Guardian	2108,120,5,900,monsterarena::OnGuardianKill
bat_b02,0,0,0,0	monster	Arena Sword Guardian	2109,150,5,900,monsterarena::OnBowGuardianKill

///////////

bat_b02	mapflag	nowarp
bat_b02	mapflag	nosave
bat_b02	mapflag	pvp
bat_b02	mapflag	noteleport
bat_b02	mapflag	nowarpto
bat_b02	mapflag	noreturn
bat_b02	mapflag	nobranch
bat_b02	mapflag	noskill
 
You must log in or register to reply here.
Back
Top