Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 10/21/12 in Posts

  1. Apa khabar semua. Kita akan kepupusan pusat setoran sprite. Satu persatu pemaju sprite dan map melangkah meninggalkan dunia RO. Saya mencadangkan agar anda semua menyerahkan / menderma sprite kepada saya untuk setoran. Mungkin anda akan kembali bergiat di masa akan datang.
    1 point
  2. Script Name: FluxCP V4P NPC Description: This is the npc script for my FluxCP V4P. Version: 1.0 Function: add_item(ITEMID,QUANTITY,VOTEPOINTS,"CATEGORY"); REQUIREMENTS: You must have this: http://rathena.org/b...ote-for-points/ Parameters(should be in order): ITEMID - the itemid to give QUANTITY - how many will be given VOTEPOINTS - how many points needed CATEGORY - on what category you want it to be belong rAthena Version: //==================================================================================== //Script Name: Vote For Points NPC Script for FluxCP //SVN: Tested in rAthena r156513 //Developed By: JayPee Mateo //Version: 1.0 //Requirement(s): FluxCP V4P Addon //Description: This is a npc script for FluxCP Vote for points in order for the players //to claim their vote points //==================================================================================== royal_room3,80,136,5 script VoteForPoints 89,{ //Function Prototypes function garbagecol;//Garbage collection for the Character variables garbagecol(); function add_item; //Syntanx: add_item(ITEMID,QUANTITY,POINTS,CATEGORY); function makeCategory;//This will return a list of the categories function getItemsByCat;//This will return the list of items associated to the particular category function getItemDetails;//This will return the details of the item function getPoints;//This will return the points of the player stored in the database function updatePoints;//This will updates the points of the player stored in the database //NPC Name set .npcname$,"[ Vote For Points ]"; //Initialization of the Rewards add_item(555,1,100,"Hello"); add_item(556,2,101,"Hello"); add_item(557,3,101,"Hello1"); //Script Start mes .npcname$; mes "Hi! Do you want to exchange your vote points?:"; switch(select("Yes, I want to exchange my points:See my points")) { case 1: next; mes .npcname$; mes "Please choose a category:"; set .@selected,select(makeCategory())-1; next; mes .npcname$; mes "Please the item you want:"; set .@selected,select(getItemsByCat(@listCat$[.@selected]))-1; next; mes .npcname$; set .@ritemid,getItemDetails(@itemKeys[.@selected],"itemid"); set .@rquantity,getItemDetails(@itemKeys[.@selected],"quantity"); set .@rpoints,getItemDetails(@itemKeys[.@selected],"points"); mes "Item ID:"+.@ritemid; mes "Item Name: "+getitemname(.@ritemid); mes "Item Quantity: "+.@rquantity+" pc(s)."; mes "Required Points: "+.@rpoints+" pt(s)."; mes "n"; mes "Do you want to this item?"; if(select("Yes:No")==1) { set .@points,getPoints(getcharid(3)); if(.@points>=.@rpoints) { next; mes .npcname$; updatePoints(getcharid(3),.@rpoints); getitem .@ritemid,.@rquantity; mes "Here you go!. Thank you for voting. Don't forget to vote again. "; } else mes "Sorry, you do not have enough points for this item."; } else { next; mes .npcname$; mes "Okay bye!"; } garbagecol(); close; case 2: next; mes .npcname$; set .@points,getPoints(getcharid(3)); mes "You currently have "+.@points+" pt(s)."; garbagecol(); close; } end; //Functions Bodies function updatePoints { set .@account_id,getarg(0); set .@usedPoints,getarg(1); query_sql("UPDATE `cp_v4p_voters` SET points=(points-"+.@usedPoints+") WHERE account_id='"+.@account_id+"'"); return; } function getPoints { set .@account_id,getarg(0); query_sql("SELECT `points` FROM `cp_v4p_voters` WHERE account_id="+.@account_id+" LIMIT 1",.@points); if(getarraysize(.@points)==0) return 0; return .@points[0]; } function getItemDetails { set .@key,getarg(0); //Key set .@detail$,getarg(1); //What details to return such as ItemID, Points, Quantity, Category if(strtolower(.@detail$) == strtolower("ItemID")) return @itemID[.@key]; else if(strtolower(.@detail$) == strtolower("Quantity")) return @itemQ[.@key]; else if(strtolower(.@detail$) == strtolower("Points")) return @points[.@key]; else if(strtolower(.@detail$) == strtolower("Category")) return @category$[.@key]; } function getItemsByCat { set .@selectedCat$,getarg(0); set .@make_string$,""; set .@x,0; for(set .@i,0; .@i<getarraysize(@category$); set .@i,.@i+1) { if(strtolower(.@selectedCat$) == strtolower(@category$[.@i])) { setarray @itemKeys[.@x],.@i; if(.@make_string$ == "") set .@make_string$,getitemname(@itemID[.@i]); else set .@make_string$,.@make_string$+":"+getitemname(@itemID[.@i]); set .@x,.@x+1; } } return .@make_string$; } function makeCategory { set .@make_string$,""; for(set .@i,0; .@i<getarraysize(@category$); set .@i,.@i+1) { if(.@make_string$ == "") { setarray @listCat$[getarraysize(@listCat$)],@category$[.@i]; set .@make_string$,@category$[.@i]; } else { if(compare(.@make_string$,@category$[.@i])==0) { setarray @listCat$[getarraysize(@listCat$)],@category$[.@i]; set .@make_string$,.@make_string$+":"+@category$[.@i]; } } } return .@make_string$; } function add_item { set .@itemID,getarg(0,-1); //IteID set .@itemQ,getarg(1,-1); //Item Quantity set .@points,getarg(2,-1); set .@cat$,getarg(3,"Uncategorized"); //Category if(.@itemID == -1) { debugmes "Invalid Item ID. Script not completely loaded."; end; } else if(.@itemQ == -1) { debugmes "Invalid Item Quantity. Script not completely loaded."; end; } else if(.@points == -1) { debugmes "Points assignment error. Script not completely loaded."; end; } set .@key,getarraysize(@itemID); setarray @itemID[.@key],.@itemID; setarray @itemQ[.@key],.@itemQ; setarray @points[.@key],.@points; setarray @category$[.@key],.@cat$; return 1; //return 1 as success } function garbagecol{ deletearray @itemID[0],128; deletearray @itemQ[0],128; deletearray @points[0],128; deletearray @category$[0],128; deletearray @listCat$[0],128; deletearray @itemKeys[0],128; return; } } eAthena version: //==================================================================================== //Script Name: Vote For Points NPC Script for FluxCP //SVN: Tested in rAthena r156513 //Developed By: JayPee Mateo //Version: 1.0 //Requirement(s): FluxCP V4P Addon //Description: This is a npc script for FluxCP Vote for points in order for the players //to claim their vote points //==================================================================================== prontera,151,175,5 script VoteForPoints 89,{ //Function Prototypes function garbagecol;//Garbage collection for the Character variables garbagecol(); function add_item; //Syntanx: add_item(ItemID,QUANTITY,POINTS,CATEGORY); function makeCategory;//This will return a list of the categories function getItemsByCat;//This will return the list of items associated to the particular category function getItemDetails;//This will return the details of the item function getPoints;//This will return the points of the player stored in the database function updatePoints;//This will updates the points of the player stored in the database //NPC Name set .npcname$,"[ Vote For Points ]"; //Initialization of the Rewards add_item(555,1,100,"Hello"); add_item(556,2,101,"Hello"); add_item(557,3,101,"Hello1"); add_item(607,1,10,"Ygg"); //Script Start mes .npcname$; mes "Hi! Do you want to exchange your vote points?:"; switch(select("Yes, I want to exchange my points:See my points")) { case 1: next; mes .npcname$; mes "Please choose a category:"; set .@selected,select(makeCategory())-1; next; mes .npcname$; mes "Please the item you want:"; set .@selected,select(getItemsByCat(@listCat$[.@selected]))-1; next; mes .npcname$; set .@rItemID,getItemDetails(@itemKeys[.@selected],"ItemID"); set .@rquantity,getItemDetails(@itemKeys[.@selected],"quantity"); set .@rpoints,getItemDetails(@itemKeys[.@selected],"points"); mes "Item ID:"+.@rItemID; mes "Item Name: "+getitemname(.@rItemID); mes "Item Quantity: "+.@rquantity+" pc(s)."; mes "Required Points: "+.@rpoints+" pt(s)."; mes "n"; mes "Do you want to this item?"; if(select("Yes:No")==1) { set .@points,getPoints(getcharid(3)); if(.@points>=.@rpoints) { next; mes .npcname$; updatePoints(getcharid(3),.@rpoints); getitem .@rItemID,.@rquantity; mes "Here you go!. Thank you for voting. Don't forget to vote again. "; } else mes "Sorry, you do not have enough points for this item."; } else { next; mes .npcname$; mes "Okay bye!"; } garbagecol(); close; case 2: next; mes .npcname$; set .@points,getPoints(getcharid(3)); mes "You currently have "+.@points+" pt(s)."; garbagecol(); close; } end; //Functions Bodies function updatePoints { set .@account_id,getarg(0); set .@usedPoints,getarg(1); query_sql("UPDATE `cp_v4p_voters` SET points=(points-"+.@usedPoints+") WHERE account_id='"+.@account_id+"'"); return; } function getPoints { set .@account_id,getarg(0); query_sql("SELECT `points` FROM `cp_v4p_voters` WHERE account_id="+.@account_id+" LIMIT 1",.@points); if(getarraysize(.@points)==0) return 0; return .@points[0]; } function getItemDetails { set .@key,getarg(0); //Key set .@detail$,getarg(1); //What details to return such as ItemID, Points, Quantity, Category if(.@detail$ == "ItemID") return @ItemID[.@key]; else if((.@detail$ == "Quantity") || (.@detail$ == "quantity")) return @itemQ[.@key]; else if((.@detail$ == "Points") || (.@detail$ == "points")) return @points[.@key]; else if((.@detail$ == "Category") || (.@detail$ == "category")) return @category$[.@key]; } function getItemsByCat { set .@selectedCat$,getarg(0); set .@make_string$,""; set .@x,0; for(set .@i,0; .@i<getarraysize(@category$); set .@i,.@i+1) { if(.@selectedCat$ == @category$[.@i]); { setarray @itemKeys[.@x],.@i; if(.@make_string$ == "") set .@make_string$,getitemname(@ItemID[.@i]); else set .@make_string$,.@make_string$+":"+getitemname(@ItemID[.@i]); set .@x,.@x+1; } } return .@make_string$; } function makeCategory { set .@make_string$,""; for(set .@i,0; .@i<getarraysize(@category$); set .@i,.@i+1) { if(.@make_string$ == "") { setarray @listCat$[getarraysize(@listCat$)],@category$[.@i]; set .@make_string$,@category$[.@i]; } else { if(compare(.@make_string$,@category$[.@i])==0) { setarray @listCat$[getarraysize(@listCat$)],@category$[.@i]; set .@make_string$,.@make_string$+":"+@category$[.@i]; } } } return .@make_string$; } function add_item { set .@ItemID,getarg(0,-1); //IteID set .@itemQ,getarg(1,-1); //Item Quantity set .@points,getarg(2,-1); set .@cat$,getarg(3,"Uncategorized"); //Category if(.@ItemID == -1) { debugmes "Invalid Item ID. Script not completely loaded."; end; } else if(.@itemQ == -1) { debugmes "Invalid Item Quantity. Script not completely loaded."; end; } else if(.@points == -1) { debugmes "Points assignment error. Script not completely loaded."; end; } set .@key,getarraysize(@ItemID); setarray @ItemID[.@key],.@ItemID; setarray @itemQ[.@key],.@itemQ; setarray @points[.@key],.@points; setarray @category$[.@key],.@cat$; return 1; //return 1 as success } function garbagecol{ deletearray @ItemID[0],128; deletearray @itemQ[0],128; deletearray @points[0],128; deletearray @category$[0],128; deletearray @listCat$[0],128; deletearray @itemKeys[0],128; return; } [color=#000000]}[/color]
    1 point
  3. Hello guys, I'm brazilian and I was using the brAthena so decided test the rAthena. I had a problem here with the max length size, that problem when the npc's name are too long. I looked on brAthena and could do the modification on NPC name length, to possibilite the brazilian users keep using their old npcs on rathena, so lets do it! First you have to open your emulator folder src/map/script.c change the bold line to: Nice! Close the script.c and open your npc.c You will do the same thing right here. Change all the bold parts to NPC_NAME_LENGTH Open your npc.h and do the same, changing all the NAME_LENGTH TO NPC_NAME_LENGTH Great! After that, open src/common/mmo.h and add this: Finished! After you did it just recompile your emulator and test, in my case it worked perfectly. Credits: Protimus, the admin of brAthena, he was the responsable to do the source modification, I just posted here to help someone that had this problem, like me Hope you enjoy!!
    1 point
  4. Introduction : Original topic was from eAthena, but I felt it'd be nice to share this map with rAthena community as well :3 I've added a very few slight changes to make the map look a little better. Feel free to post your comments and criticism. Pictures : Video : Download : (Hunter's Village Indoor Map + BGM + Sound Effect Script) Version 1.1 - Direct Link : Hunter's Village.rar (Updated on 06/16/2012) (Hunter's Village Map) Version 1.1- Direct Link : hun_vil.zip Mirror : http://www.mediafire...s56zb92smf2n384 (NEW) (Hunter's Village Indoors Map + Warps) Direct Link : Hunter's Village In and Warps.rar
    1 point
  5. http://rathena.org/board/topic/72715-unofficial-extra-status-icons/
    1 point
  6. 1 point
  7. make this script compatible with current SVN wow_domi_0.4.txt and as usual, the *viewpoint damn sux it doesn't blink in perfect alignment think tomorrow I'll try tackle with another method
    1 point
  8. guna NO-IP .. Daftar dan add hostname.. Lepas tuh, download Dynamic Update Client (DUC) dan install. Run Dynamic Update Client (DUC) setiap kali nak start server. Dalam file conf just letak hostname yang di daftarkan
    1 point
  9. http://www.eathena.ws/board/index.php?showtopic=271175 try the script in post#10 and see you get the |00 generated from your hexed client or not
    1 point
  10. port forwarding? http://portforward.com/ http://portforward.com/english/routers/port_forwarding/routerindex.htm
    1 point
  11. try to use my opensetup.exe http://www.mediafire.com/?abj2jau2wxbvoiu and use the Direct3D HAL and try the other one. it might be dual VGA issue (if you are using Laptop. they will come with Intel GMA and ATi / NVid)
    1 point
  12. why not do some cheap hack from mob_db table ... lol prontera,155,184,5 script kjdshfkjsdf 100,{ if ( getgmlevel() < 60 ) { mes "I only talk to gm"; close; } mes "select a mvp to summon"; next; set .@menu, select( .menu$ ) -1; monster "this", -1,-1, "--ja--", .mob_id[ .@menu ], 1, strnpcinfo(0)+"::Ondummy"; close; OnInit: set .@mob_size, query_sql( "select id, kname from mob_db where mvp1id != 0 and mexp > 2000 order by kname asc;", .mob_id, .@mob_name$ ); .menu$ = .@mob_name$; for ( .@i = 1; .@i < .@mob_size; .@i++ ) .menu$ = .menu$ +":"+ .@mob_name$[.@i]; Ondummy: end; }
    1 point
  13. File Name: Extra Status Icons File Submitter: darristan File Submitted: 19 Oct 2012 File Category: Textures Content Author: darristan Extra Status Icons for Cursed Water, Elemental Resist Potions and Undead Scrolls. For more info: http://rathena.org/board/topic/72715-unofficial-extra-status-icons/ Click here to download this file
    1 point
  14. if you did spend time read the error message that display below the database....you can figure out this easily....~
    1 point
  15. It's all because of their Graphic setting. Ask them what is the setting in their Ragnarok Setup (in RO Folder). For me, I always use Direct3D HAL
    1 point
  16. I stopped reading after "Sirs,".
    1 point
  17. its should be : sc_start sc_FIREWEAPON,180000,5; sc_start sc_WATERWEAPON,180000,5; sc_start sc_WINDWEAPON,180000,5; sc_start sc_EARTHWEAPON,180000,5;
    1 point
  18. another simple way for this..... sc_start FIREWEAPON,180000,5; sc_start WATERWEAPON,180000,5; sc_start WINDWEAPON,180000,5; sc_start EARTHWEAPON,180000,5;
    1 point
  19. 1 point
  20. here's some diff patch for you nice script accinfo.patch
    1 point
×
×
  • Create New...