https://github.com/rathena/rathena/blob/27c0586d797ac7bf284eb0c82728e9dcec676719/npc/custom/warper.txt#L38
else
set .@price,2000;
if(Zeny<.@price){mes "I'm sorry you don't have enought Zeny to warp, please try again later."; close;}
set Zeny,Zeny-.@price;
warp lastwarp$,lastwarpx,lastwarpy;
end;
https://github.com/rathena/rathena/blob/27c0586d797ac7bf284eb0c82728e9dcec676719/npc/custom/warper.txt#L65
function Go {
set .@price,2000;
if(Zeny<.@price){mes "I'm sorry you don't have enought Zeny to warp, please try again later."; close;}
set Zeny,Zeny-.@price;
https://github.com/rathena/rathena/blob/27c0586d797ac7bf284eb0c82728e9dcec676719/npc/custom/warper.txt#L82
function Pick {
set .@price,2000;
if(Zeny<.@price){mes "I'm sorry you don't have enought Zeny to warp, please try again later."; close;}
set Zeny,Zeny-.@price;