Jump to content

Quesooo

Members
 View Profile  See their activity

  • Posts

    883

  • Joined

  • Last visited

 Content Type 

Posts posted by Quesooo

    R> Double exp and droprates every weekend

    in Script Requests

    Posted

    On 9/23/2018 at 11:49 AM, Dissidia said: 
    
-    script    FloatingRates    -1,{
OnInit:
OnClock0000:
        set $@drate,1000000;

        if((gettime(4) == 5 || gettime(4) == 6)) { // Saturday, Sunday

            // Drop Rate
            setbattleflag("item_rate_common",$@drate);
            setbattleflag("item_rate_common_boss",$@drate);
                
            setbattleflag("item_rate_heal",$@drate);
            setbattleflag("item_rate_heal_boss",$@drate);
                
            setbattleflag("item_rate_use",$@drate);
            setbattleflag("item_rate_use_boss",$@drate);
            
            setbattleflag("item_rate_equip",$@drate);
            setbattleflag("item_rate_equip_boss",$@drate);
                
            setbattleflag("item_rate_card",400000);
            setbattleflag("item_rate_card_boss",200000);

            // Reload the database
            atcommand "@reloadmobdb";      
        }
        end;
}

     

    hi thank you for this do i need to setup something over here or not? thank you again

     

    i think this is only for drop rates event i need a separate rates for job and base also for drop rates because i use different rates for item cars and normal drops

    Disguise Event using rathena latest git

    in Script Requests

    Posted

    6 hours ago, hendra814 said:

    try this 

    
//===== rAthena Script =======================================
//= Disguise Event
//===== By: ==================================================
//= GmOcean
//===== Current Version: =====================================
//= 5.1
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Guess a monster name correctly for prizes.
//= 
//= NOTE: Requires PCRE library installed.
//===== Additional Comments: =================================
//= 5.0 Last update by GmOcean.
//= 5.1 Cleaned and standardized, mostly. [Euphy]
//============================================================

prontera,160,155,4	script	Disguise Event	795,{

	// Currently set to run every two hours.
	// To change times, edit the OnClock labels below.

	set .@GMLevel,60;	// GM level required to access NPC.
	set .@n$,"[^0000FFDisguise NPC^000000]";

	if (getgmlevel()>=.@GMLevel) {
		mes .@n$;
		mes "Select an option.";
		next;
		switch(select("Turn ON/OFF Event:Event Settings")) {
		case 1:
			mes .@n$;
			if (.EventON) {
				mes "The Event is currently: [^0000FFON^000000]";
				mes "Would you like to turn it OFF?";
			} else {
				mes "The Event is currently: [^FF0000OFF^000000]";
				mes "Would you like to turn it ON?";
			}
			if(select("Yes:No")==2) close;
			if (.EventON) {
				set .EventON,0; set .Timer,0;
				setnpctimer 0; stopnpctimer;
				announce "A GM has decided to turn the Disguise Event off. As a result no further prizes will be given.",bc_map | bc_blue;
				deletepset 1;
				setnpcdisplay "Disguise Event",795;
				close;
			}
			set .EventON,1; set .Timer,1; setnpctimer 0; initnpctimer;
			set .ResetCounter,.ResetCounter+1;
			announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
			announce "The Event is being held in Prontera.",bc_all | bc_blue;
			close;
		case 2:
			mes .@n$;
			mes "Pick a setting to modify.";
			next;
			switch(select("Monster Display:Number of Rounds:Prize Settings")) {
			case 1:
				setarray .@r$[0],"Disguise as all monsters.","Disguise as MVPs only.";
				mes .@n$;
				mes "Choose a disguise rule.";
				next;
				set .Rule, select(implode(.@r$,":"));
				mes .@n$;
				mes "The Disguise Rule has been set:";
				mes "  > ^0055FF"+.@r$[.Rule-1]+"^000000";
				close;
			case 2:
				mes .@n$;
				mes "Input the number of rounds you want the event to last.";
				mes "Current number: [^0000FF"+.Rounds+"^000000]";
				next;
				input .@Rounds;
				set .Rounds,.@Rounds;
				mes .@n$;
				mes "The number of rounds has been changed to "+.Rounds+".";
				close;
			case 3:
				mes .@n$;
				mes "Input the Item ID of the prize given each round.";
				mes "Current item: [^0000FF"+getitemname(.Prize)+"^000000] (ID #"+.Prize+")";
				next;
				input .@Prize;
				mes .@n$;
				if (getitemname(.@Prize)=="" || getitemname(.@Prize)=="null") {
					mes "That item does not exist. Please try again.";
					close;
				}
				set .Prize,.@Prize;
				mes "Input the amount to be given.";
				next;
				input .@amount;
				mes .@n$;
				if (.@amount<=0 || .@amount>=10000) {
					mes "That amount is invalid. Using default amount of 1.";
					set .@amount,1;
					next;
					mes .@n$;
				}
				set .PrizeAmt,.@amount;
				mes "The Prize has been changed successfully.";
				mes "Prize: "+.PrizeAmt+"x [^0000FF"+getitemname(.Prize)+"^000000]";
				close;
			}
		}
	}
	if (.EventON) end;
	mes .@n$;
	mes "Welcome.";
	mes "How may I be of assistance?";
	if(select("Information:Nothing, just passing through.")==2) close;
	next;
	mes .@n$;
	mes "This event is quite simple.";
	mes "At the start of the event, I will";
	mes "disguise myself as a random";
	mes "monster. You have to shout";
	mes "that monster's name out loud.";
	next;
	mes "If you are correct, you will receive";
	mes "a prize. If not, keep trying!";
	mes "That's all that there is to this event.";
	close;

OnInit:
	hideonnpc strnpcinfo(3);
	set .EventON,0;
	set .Wait,0;
	set .Winner,0;
	set .ResetCounter,0;
	set .Rounds,10;
	set .Prize,512;
	set .PrizeAmt,1;
	set .Rule,1;
	setarray .MVP[0],1038,1039,1046,1059,1086,1087,1112,1115,1147,1150,1157,1159,1190,1251,1252,1272,1312,1373,
	                  1389,1399,1418,1492,1502,1511,1583,1623,1630,1646,1647,1648,1649,1650,1651,1658,1685,1688,
				   1708,1719,1734,1751,1768,1779,1785,1802,1832,1871,1874,1885,1917,1980,2022,2068,2087,2131,
				   2156,2165;
	set .BlackList$, "1003,1006,1017,1021,1022,1027,1043,1075,1136,1137,1168," + 
	    "1171,1172,1173,1181,1187,1210,1217,1218,1222,1223,1224,1225,1226,1227,1228," + 
	    "1233,1284,1407,1411,1414,1495,1501,1900,1996,2000,2001,2002,2003,2004," + 
	    "2005,2006,2007,2011,2012,2025,2028,2029,2030,2031,2032,2033,2034,2035," + 
	    "2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048,2049," + 
	    "2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063," + 
	    "2064,2065,2066,2067,2075,2076,2077,2078,2079,2080,2081,2083,2084,2085," + 
	    "2086,2087,2088,2089,2090,2091,2092,2093,2094,2095,2096,2097,2098,2099," + 
	    "2100,2101,2012,2103,2104,2105,2106,2107,2108,2109,2110,2111,2112,2113," + 
	    "2114,2115,2116,2117,2118,2119,2120,2121,2123,2124,2125,1496,";
	end;
OnClock0000:
OnClock0200:
OnClock0400:
OnClock0600:
OnClock0800:
OnClock1000:
OnClock1200:
OnClock1400:
OnClock1600:
OnClock1800:
OnClock2000:
OnClock2200:
	set .ResetCounter,.ResetCounter+1;
	set .EventON,1;
	set .Timer,1;
	set .Wait,1;
	announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
	announce "The Event is being held in Prontera.",bc_all | bc_blue;
	setnpctimer 0;
	initnpctimer;
	end;
OnTimer10000:
	if (.Timer || .Change) end;
	set .Wait,0;
	goto iDisguise;
	end;
OnTimer30000:
	if (.Timer) end;
	set .Change,0;
	setnpcdisplay "Disguise Event",795;
	npctalk "Disguise Event : You took too long to guess what I was. Please wait 10 seconds while I disguise again.";
	specialeffect EF_DETECT2;
	set $MonsterName$,"";
	deletepset 1;
	stopnpctimer;
	setnpctimer 0;
	initnpctimer;
	end;
OnTimer60000:
	if (.Timer!=1) end;
	announce "The Disguise Event will begin in 2 minutes.",bc_all | bc_blue;
	announce "The Event is being held in Prontera.",bc_all | bc_blue;
	end;
OnTimer120000:
	if (.Timer!=1) end;
	announce "The Disguise Event will begin 1 minute.",bc_all | bc_blue;
	announce "The Event is being held in Prontera.",bc_all | bc_blue;
	end;
OnTimer180000:
	if (.Timer!=1) end;
	announce "The Disguise Event has begun!",bc_all | bc_blue;
	announce "The Event is being held in Prontera.",bc_all | bc_blue;
	hideoffnpc strnpcinfo(3);
	set .Timer,0; stopnpctimer;
	setnpctimer 0; initnpctimer;
iDisguise:
	if (.Rule==1) {
		set .Winner,0;
		set .Monster,1000+rand(1,995);
		if (compare(","+.BlackList$+"," , ","+.Monster+",")) goto iDisguise;
		if (.Monster==.LastMonster) goto iDisguise;
		set .LastMonster,.Monster;
		set $MonsterName$,getmonsterinfo(.Monster,0);
	}
	if (.Rule==2) {
		set .Winner,0;
		set .Monster,rand(49);
		set $MonsterName$,getmonsterinfo(.MVP[.Monster],0);
	}
	deletepset 1;
	defpattern 1,"([^:]+):.\\s*"+$MonsterName$+".*", "iCorrect";
	activatepset 1;
	if (.Rule==1) setnpcdisplay "Disguise Event",.Monster;
	if (.Rule==2) setnpcdisplay "Disguise Event",.MVP[.Monster];
	set .Change,1;
	setnpctimer 0;
	end;
iCorrect:
	if (.Winner) {
		dispbottom "Someone has already won this round.";
		end;
	}
	set .Winner,1;
	set .RoundCount,.RoundCount+1;
	deletepset 1;
	activatepset 1;
	getitem .Prize,.PrizeAmt;
	announce strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue;
	if (.RoundCount>=.Rounds) {
		setnpcdisplay "Disguise Event",795;
		set .RoundCount,0; set .Change,0; set .EventON,0;
		setnpctimer 0; stopnpctimer;
		hideonnpc strnpcinfo(3);
		npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later.";
		end;
	}
	setnpcdisplay "Disguise Event",795;
	set .Change,0;
	setnpctimer 0;
	end;
}

     

    Thank you working perfectly

    long time no see heheheh

    Disguise Event using rathena latest git

    in Script Requests

    Posted · Edited by Quesooo

    Hi there guys! welcome back to me and i was working on my offline server just a few days ago

     

    i just want to request a disguise event using latest rathena git now

    when the event start the npc will show and when the event end the npc will hide

    also the npc will allowed to transform all monsters around our database together with mvp and mini bosses hopefully some one can help me here again ^_^

    Ragnarok Online complete offline server & client pack 2019 | Make your RO server in less than 5 minutes

    in Abandoned Projects

    Posted

    1 hour ago, Edel Raid said:

    I don't know i can help you (or not, again). You should try go to "01_emulator\rathena_RENEWAL\npc" and edit the .conf file --> make the NPCs you want available by uncomment (delete the "//" before the NPCs).

    For example: You have made the custom NPC script name Queso.txt and put it in "01_emulator\rathena_RENEWAL\npc\custom"  --> open the file "scripts_custom.conf" and add your script location "npc: npc/custom/Queso.txt" (don't put the comment (//)  before its)

    Hehehe thank you but i figure it out my problem now last is how to recompile my server i try using virtual studio but when i open rathena.sln with it my vitual studio cant read it he just display a code and nothing to do to build it

     

    I cant find any solution how to read sln using vitual studio since on this guide is no details about it

    Ragnarok Online complete offline server & client pack 2019 | Make your RO server in less than 5 minutes

    in Abandoned Projects

    Posted

    20 hours ago, Edel Raid said:

    Let try this: (Anacondaqq readme.txt)

    "Very important:
    ---------------

    After downloading the package, you MUST change credentials inside conf/import/inter_conf.txt
    I talk about MySQL login and password. Please do it! You can leave everything as is, but it's very insecure.

    For making that, imagine you wish to change MySQL user credentials to next:

    mysweetuser
    theuserpass

    You need to do in theory next:
    1. Open conf/import/inter_conf.txt
    2. Replace rathena_user_db to mysweetuser
    3. Replace pass to theuserpass
    4. Make a new user at MySQL database and remove old user.

    How to change MySQL user credentials:
    1. Run OpenServer (green flag)
    2. Run on flag, select -> Advanced -> Console
    3. You will open a console where you need connect to MySQL database
    4. Enter to the window: MySQL -uroot
    5. Press enter
    6. You now at MySQL-server console
    7. You need to enter a proper command to change your user, enter something like:

    grant create, select, update, delete, drop, alter, insert ON rathena_PRERE_db.* TO 'mysweetuser'@'localhost' IDENTIFIED BY 'theuserpass';
    grant create, select, update, delete, drop, alter, insert ON rathena_PRERE_log.* TO 'mysweetuser'@'localhost' IDENTIFIED BY 'theuserpass';
    grant create, select, update, delete, drop, alter, insert ON rathena_RENEWAL_db.* TO 'mysweetuser'@'localhost' IDENTIFIED BY 'theuserpass';
    grant create, select, update, delete, drop, alter, insert ON rathena_RENEWAL_log.* TO 'mysweetuser'@'localhost' IDENTIFIED BY 'theuserpass';
    flush privileges;

    Where `mysweetuser` and `theuserpass` please replace with your own credentials.

    8. Hit enter after each line
    9. At this point, you have changed your credentials.
    10. Try to run the emulator, if you did it correctly, you will be able to connect to MySQL and emulator will run without any errors in console.
    If you made some fails, please check again guide above, and use phpmyadmin for adding a new user (google for guides how to make a MySQL user)"

    i already fix my problem before thank you for tip ^_^

     

    my last problem is adding custom npc's and other npc's like instance since i already add them all and restart server i cant see it ingame also on my console said that he cant see "npc/re/instaces/DevilsTower.txt but when i check it its already there

    R> @ii command with item view

    in Source Requests

    Posted

    good day masters i would like to request a source editing or a solution how make this @ii command something like this

     

    if you use @ii command you can see items on chat table but you can also right click it and see the item description just like when you use shift + right click on the item on your bag

     

    thank you ^_^

×
×
  • Create New...