Jump to content

arokken

Members
  • Posts

    12
  • Joined

  • Last visited

Profile Information

  • Gender
    Not Telling
  • Location
    Indonesia

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

arokken's Achievements

Poring

Poring (1/15)

0

Reputation

  1. Thanks for reply Technoken, But it's not working. i try that, and script automatic give player rewards.
  2. //===== EinherjarRO Scripts ================================== //= Daily Rewards //===== By: ================================================== //= Stolao //===== Current Version: ===================================== //= 1.84 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= A reward system for players who play more frequently //===== Todo: ================================================ //= Maybe make .MinWait an array mins,days,weeks,months,years; //= Make Logging out then it continue count //= Make a Overweight easy collect //= Remove use of sleep2 //= Suggestions? //===== Additional Comments: ================================= //= For Older See Old Versions //= 1.7A No Rewards for Autotraders option added //= 1.7B Tabulation Cleanup //= 1.7C Added custom item binding mode [Secretdataz] //= 1.7D Added cutin for next day option + command //= 1.7E Added IP Check //= 1.7F Moved .Rest Message to after .MinWait Check //= 1.80 Added MacAddress check for those using Gepard Shield (disabled by default) //= 1.81 Fixed Typo in .MacCheck //= 1.82 Moved .Rest Check before rewards check to prevent bug //= 1.83 Added strnpcinfo(3) for bindatcomands //= 1.84 Rephrased some conf settings //= 1.85 Fixed Capilazation //= 1.86 Small Tabulation Tweaks //===== Contact Info: ======================================== //= [Stolao] //= Email: [email protected] //============================================================ prontera,147,190,5 script LOGIN 911,{ OnWhisperGlobal: OnLoginCmnd: OnPCLoginEvent: if(.IPCheck){ query_sql("SELECT last_ip FROM `login` WHERE account_id = "+getcharid(3)+"", .@LastIp$); query_sql("SELECT account_id FROM `login` WHERE last_ip = '"+.@LastIp$+"'", .@AccountId); if(getarraysize(.@AccountId) > .IPCheck){ message strcharinfo(0),"[Daily Rewards]: Rewards are limited to "+.IPCheck+" per IP sorry."; end; } } if(.MacCheck){ query_sql("SELECT last_unique_id FROM `login` WHERE account_id = "+getcharid(3)+"", .@last_unique_id$); query_sql("SELECT account_id FROM `login` WHERE last_unique_id = '"+.@last_unique_id$+"'", .@AccountId2); if(getarraysize(.@AccountId2) > .MacCheck){ message strcharinfo(0),"[Daily Rewards]: Rewards are limited to "+.MacCheck+" per computer sorry."; end; } } .@i = (gettime(7) * 365 * 24 * 60) + (gettime(8) * 24 * 60) + (gettime(3) * 60) + gettime(2); if(.@i >= (#LastDailyReward + .MinWait) && .Rest){ message strcharinfo(0),"[Daily Rewards]: To collect reward you must remain logged in for "+ .Rest +" minutes"; sleep2 1000 + .Rest * 60000; } if(.@i >= (#LastDailyReward + .MinWait)){ if(checkvending() & 2 && .Mode & 64){ message strcharinfo(0),"[Daily Rewards]: Venders cannot recive rewards."; end; } if(.@i < #LastDailyReward + .MaxWait) #DRewardCon += 1; else #DRewardCon = 1; if(#DRewardCon >= getarraysize(.Rewards$)){ if(.Reset) #DRewardCon = 1; else .@g = getarraysize(.Rewards$)-1; } else .@g = #DRewardCon; explode(.@XT$,.Rewards$[.@g],","); for(.@x = 0; .@x < getarraysize(.@XT$); .@x++) .@TT[.@x] = atoi(.@XT$[.@x]); if(.Mode & 1 && .@TT[4] > 0){ for(.@x = 4; .@x <= getarraysize(.@TT) - 1 ; .@x += 2){ .@itms[getarraysize(.@itms)] = .@TT[.@x]; .@qnts[getarraysize(.@qnts)] = .@TT[.@x + 1]; } if(checkweight2(.@itms,.@qnts)){ for(.@x = 0; .@x < getarraysize(.@itms) && .@x < getarraysize(.@qnts); .@x++){ if(.Mode & 32) getitembound .@itms[.@x], .@qnts[.@x], .Bound_Mode; else getitem .@itms[.@x], .@qnts[.@x]; } } else { message strcharinfo(0),"[Daily Rewards]: You can not carry the prizes, please use storage and relog."; if(#DRewardCon) #DRewardCon -= 1; end; } } if(.Mode & 16) cutin .Cutins$[#DRewardCon],4; if(.Mode & 2){ if(.@TT[0]){ zeny += .@TT[0]; message strcharinfo(0),"[Daily Rewards]: Recieved "+ .@TT[0] +"z"; } if(.@TT[1]){ setd getd(.Points$[0]),getd(.Points$[0]) + .@TT[1]; message strcharinfo(0),"[Daily Rewards]: Recieved "+ .@TT[1] +" "+.Points$[1]; } } if(.Mode & 4 && (.@TT[3] || .@TT[4])) getexp .@TT[3], .@TT[4]; if(.Mode & 8){ for(.@x = 0; .@x < getarraysize(.BuffInfo); .@x += 4){ if(#DRewardCon % .BuffInfo[.@x + 1] == 0) sc_start .BuffInfo[.@x], .BuffInfo[.@x + 2] * 60000, .BuffInfo[.@x + 3]; } } message strcharinfo(0),"[Daily Rewards]: You have collected your daily reward, for "+callfunc("F_InsertPlural",#DRewardCon,"day")+" in a row."; #LastDailyReward = (gettime(7) * 365 * 24 * 60) + (gettime(8) * 24 * 60) + (gettime(3) * 60) + gettime(2) - .Rest; end; } OnNextCmnd: if(!.@i) .@i = (gettime(7) * 365 * 24 * 60) + (gettime(8) * 24 * 60) + (gettime(3) * 60) + gettime(2) - .Rest; .@days = (#LastDailyReward + .MinWait - .@i)/60/24; .@hours = ((#LastDailyReward + .MinWait - .@i)/60)%24; .@mins = (#LastDailyReward + .MinWait - .@i)%60; message strcharinfo(0),"[Daily Rewards]: You have "+ ((.@days) ? .@days +" Days " : "") +""+ ((.@hours) ? .@hours +" Hours " : "") +""+ ((.@mins) ? .@mins +" Minutes " : "") +"till your next reward."; if(.Mode & 128){ if(#DRewardCon + 1 >= getarraysize(.Rewards$)){ if(.Reset) .@DRewardCon = 1; else .@g = getarraysize(.Rewards$)-1; } else .@g = #DRewardCon + 1; cutin .Cutins$[.@g],4; } end; OnInit: // Basic Settings // 1: Item | 2: Points | 4: Exp // 8: Gain Buffs Every X Consecutive Days logged in // 16: Show Cutins | 32: Bound Items // 64: No Rewards ffor Autotraders // 128: Show Next Day Cutin // (a bit value, e.g. 3 = Items & Points from Multi) .Mode = 1|2|4|8|16|64; // Number of times same IP can recive rewards // 0 = unlimited .IPCheck = 0; // Number of times same Computer (MacAdress) can recive rewards // 0 = unlimited .MacCheck = 0; // Item Binding Mode // Bound_Account : Account Bound item // Bound_Guild : Guild Bound item // Bound_Party : Party Bound item // Bound_Char : Character Bound item .Bound_Mode = Bound_Account; // To disable the command '@loginreward' comment the next lines // * Needs extra commands for typos bindatcmd("relog",strnpcinfo(3)+"::OnLoginCmnd",0,99); bindatcmd("nextreward",strnpcinfo(3)+"::OnNextCmnd",0,99); // Minimum minutes between collecting daily reward // Day: 22*60 - 24*60 // Week: 10080 .MinWait = 1320; // Minutes before losing the consecutive reward // Day: 48*60 - 50*60 // Week: 20160 .MaxWait = 3000; // What to do upon reaching last day defined // [0] Repeat last day // [1] Restart at 1 .Reset = 1; // Number of mins after logging before collecting prize .Rest = 2; // Point Type // [0] Points earned // [1] Point name in mes setarray .Points$,"#KAFRAPOINTS","K-Points"; // Consecutive Days Buff // Each buff contains 4 variables (32 Total Max) // <Type>,<Days>,<Duration>,<Rate>, // Buff 1 // <Type>,<Days>,<Duration>,<Rate>, // Buff 2 // ...; // // Example: 188,7,45,3 // -Every 7th consecutive day logged in Player gains +3 Str for 45 mins // // Type is 188, which references which SC_ to use, SC_INCSTR in this example // -For a full list of SC_ visit the db/const.txt // Days is days buff is applied, in this example 7, so every 7th day, 14,21,28.... // Duration is buff duration is Minuits, in this example 45 mins // Rate is buff strength, in this example player gains 3 Str setarray .BuffInfo ,260,2,360,1 // Life Insurance for 360 Mins Every 2nd Day ,198,3,120,10 // +10% Hp for 120 Mins Every 3th Day ,196,5,120,25 // +25 Flee for 120 Mins Every 5th Day ,257,7,240,50; // +50% Exp for 240 Mins Every 7th Day // Daily Prize items (max 128 days): // "<Zeny>|<Points>|<BaseExp>|<JobExp>|<itemID-1>|<amount-1>|<itemID-2>|<amount-2>...etc", // Day 1 // "<Zeny>|<Points>|<BaseExp>|<JobExp>|<itemID-1>|<amount-1>|<itemID-2>|<amount-2>...etc" // Day 2 // ...; // Total length of any days string must be 255 or shorter // * If players login longer than the last set // day, they will keep getting the last prize. setarray .Rewards$[1], "0,0,0,0,503,5,506,5", // Day 1: 5 White Potion + 5 Green Potion "100", // Day 2: 100 Zeny "0,0,0,0,501,5", // Day 3: 5 Red Potion "0,0,0,0,503,5,506,5", // Day 4: 5 White Potion + 5 Green Potion "100", // Day 5: 100 Zeny "0,0,0,0,501,5", // Day 6: 5 Red Potion "1000", // Day 7: 100 Zeny "1000", // Day 8: 100 Zeny "0,0,0,0,503,5,506,5"; // Day 9: 5 White Potion + 5 Green Potion // Cutin Array // Shows a cuting for each date // setarray .Cutins$[1], "kafra_01", "kafra_02", "kafra_03", "kafra_04", "kafra_05", "kafra_06", "kafra_07", "kafra_08", "kafra_09"; end; } Hallo guys, i have Daily Rewards Script by Stolao, can someone modification this script become proper NPC? so player must talk to npc to get their rewards. Thanks all...
  3. this part on my script atcommand "@effect 1"; like use GM Commands @effect 1, everytime i use this command i got notif "Your effect has changed". can i disable notification?
  4. Hello guys, i have a script with specialeffect. i wanna ask, how to disable notification "Your effect has changed" everytime player got effect. Thanks
  5. thanks a lot Technoken, it works. it's not my problem, but this script doesn't work if i insert town_map like prontera or payon, but another map like dungeon, field, or custom_map great!
  6. Thanks Technoken for the script, i have some problem here, what's wrong?
  7. Hello guys, can u help me give a script OnPCLoadMapEvent for speed change as fast as "@speed 1", only when player stay on the Map, when player leave the Map they speed back to normal. Thanks
  8. Stolao, what if i want to make daily login rewards, become npc? how should i add on your script? can you help me? Thanks a lot!
  9. Anyone have a Myzter's BotKiller6 script? Because on his page, the link is broken. Thank you all, thanks rAthena!
  10. Myzter, can u update link for your BK6, your link is broken now. Thanks a lot myzter.
  11. Yes, link is broken, do you have any update?
×
×
  • Create New...