Jump to content
  • Sign Up

RyokoMVP

Members
 View Profile  See their activity

  • Content Count

    13

  • Joined

  • Last visited

Posts posted by RyokoMVP

  2. Posted · Edited by RyokoMVP 

    //===== Athena Script =====================================//= Cluck! Cluck! Boom!//===== By Keale of VoidRO ================================//= http://voidro.com//===== Description =======================================//= Click the chicken and try retrieve the item at a low//= chance. If you fail he will nuke, freeze, stone,//= stun, or make you fall asleep.//= The prize is configurable and triggered by the NPC.//===== Credits ===========================================//= LuTze for his 'Chicken of Punishment' script.//= BrianL for suggesting the 'switch' command.//===== Version ===========================================//= v1.1//=========================================================//= v1.0 - First release.//= v1.1 - Using 'switch rand' instead.//=========================================================prontera,156,178,4    script    Cluckers    800,{if (getgmlevel() >=60) goto cluckadmin;if ($@startcluck == 1) goto L_playcluck;cluckcluck:if (getgmlevel() >= 60) goto cluckadmin;mes "[Cluckers]";mes "Cluck cluck! Cluuuuuck?";mes "Cluck....";close;GM:mes "[Cluckers]";mes "Cluck cluck! Cluuuuuck? ^FF0000~Hi GM " + strcharinfo(0) + ", Wanna stop the event?~^000000";mes "Cluck cluck... CLUCK! ^FF0000~Just tell me what to do!~^000000";next;switch(select("Stop Event","Check Prize","Cancel")) {case 1:set $@startcluck,0;mes "[Cluckers]";mes "Cluck cluck! Cluuuuuck!!";announce "Cluckers event has been stop by Admin / GM , Thanks for playing",bc_all;close;case 2:mes "[Cluckers]";mes "Cluck, cluck cluck... Cluck! ^FF0000~The current prize is^000000 ^008000"+ $cluck_item_amount +" "+ getitemname($cluck_item_id) +".^000000";close;case 3:mes "[Cluckers]";mes "Cluck cluck! Cluuuuuck?";mes "Cluck....";close;}cluckadmin:if ($@startcluck == 1) goto GM;mes "[Cluckers]";mes "Cluck cluck! Cluuuuuck? ^FF0000~Hi GM " + strcharinfo(0) + ", Wanna play today?~^000000";mes "Cluck cluck... CLUCK! ^FF0000~Just tell me what to do!~^000000";switch(select("Start Event:Check Prize:Set Prize:Not today Cluckers")) {case 1:next;mes "[Cluckers]";mes "CLUCK! ^FF0000~Sure thing!~^000000";emotion 33;close2;goto L_cluckannounce;case 2:next;mes "[Cluckers]";mes "Cluck, cluck cluck... Cluck! ^FF0000~The current prize is^000000 ^008000"+ $cluck_item_amount +" "+ getitemname($cluck_item_id) +".^000000";next;goto cluckadmin;case 3:next;mes "[Cluckers]";mes "Cluck cluck? Cluck??? ^FF0000~What should the prize for winning be? Please input the ID.~^000000";input $cluck_item_id;next;mes "[Cluckers]";mes "Cluck? cluuuck? ^FF0000~How many if this item should I give away?~^000000";input $cluck_item_amount;next;mes "[Cluckers]";mes "Cluck cluck..? Cluck. ^FF0000~So, the prize is^000000 ^008000"+ $cluck_item_amount +" "+ getitemname($cluck_item_id) +"^000000? ^FF0000Great.~^000000";emotion 33;next;goto cluckadmin;case 4:next;mes "[Cluckers]";mes "Cluck cluck cluck...";close;}L_cluckannounce:announce "[Cluck! Cluck! Boom!] Cluckers Events The Stealing Chicken Has Been Start At Prontera!",bc_blue;initnpctimer;Set(.starer$, Escape_SQL(StrCharInfo(0)));end;OnTimer10000:announce "Go to Prontera now!!!Event will be start...",bc_blue;end;OnTimer20000:announce "Citizen of Prontera : A chicken has eaten my stuff!!!HELP....!!!",bc_all;end;OnTimer30000:announce "Click Cluckers the stealer chicken!!If You're Lucky You Get The Prize!!Ready??",bc_blue;end;OnTimer40000:announce "GO!Click Cluckers the stealer chicken and get the prize!!!",bc_all;Query_SQL("SELECT `key` FROM `event_log` WHERE `event` = 'Cluckers' AND `won_by` IS NULL", .@key);if(.@key)Query_SQL("UPDATE `event_log` SET `started_time` = NOW(), `started_by` = '" + .starer$ + "' WHERE `key` = " + .@key);elseQuery_SQL("INSERT INTO `event_log` (`started_time`, `event`, `started_by`) VALUES (NOW(), 'Cluckers', '" + .starer$ + "')");set $@startcluck,1;end;L_playcluck:specialeffect2 2;switch( rand(24) ) {case 0:npctalk "Hahahahaha...Loe Apes Banget !!!";emotion 23;atcommand "@nuke "+strcharinfo(0);break;case 1:npctalk "Sorry kk Semua , Orang Jelek Ga Akan Dapet Hadiah~";break;case 2:npctalk "Ashh...Ngapaen Sih Colek2, Jablay Ya?:ngacir:";atcommand "@nuke "+strcharinfo(0);break;case 3:sc_start SC_Freeze,10000,0;break;case 4:npctalk "Wakwkakwkawka...Anda Belum Beruntung";emotion 23;atcommand "@nuke "+strcharinfo(0);break;case 5:sc_start SC_Sleep,10000,0;break;case 6:emotion 29;atcommand "@nuke "+strcharinfo(0);break;case 7:npctalk "Oi Kakak,Sudah Bosan Sama Manusia Ya?Kok Colek2 Ayam :ngakak";emotion 23;atcommand "@nuke "+strcharinfo(0);break;case 8:npctalk "Saya Ganteng Terima Kasih";emotion 23;atcommand "@nuke "+strcharinfo(0);break;case 9:nude;break;case 10:emotion 29;sc_start SC_Sleep,10000,0;break;case 11:npctalk "http://27.111.34.120/CP";break;case 12:sc_start SC_Stun,10000,0;break;case 13:nude;break;case 14:sc_start SC_Blind,10000,0;break;case 15:nude;break;case 16:npctalk "Kalau Colek2 Terus Saya Bunuh Terus Nih";nude;break;case 17:npctalk "http://27.111.34.120/CP";sc_start SC_Curse,10000,0;break;case 18:npctalk "http://27.111.34.120/CP";nude;break;case 19:npctalk "Kapok Bugilll.....";sc_start SC_Curse,10000,0;break;case 20:atcommand "@jump "+strcharinfo(0);break;case 21:atcommand "@jump "+strcharinfo(0);break;case 22:atcommand "@jump "+strcharinfo(0);break;default:if( rand(50) < 3 ) {npctalk "WOOF!...........";specialeffect2 72;announce "[Cluck! Cluck! Boom!] "+strcharinfo(0)+" won the Cluck Event! He won a "+ $cluck_item_amount +" "+getitemname($cluck_item_id)+" !",0;getitem $cluck_item_id,$cluck_item_amount;Query_SQL("UPDATE `event_log` SET `won_by` = '" + Escape_SQL(StrCharInfo(0)) + "', `won_time` = NOW(), `price_id` = " + $cluck_item_id + ", `price_amount` = " + $cluck_item_amount + " WHERE `event` = 'Cluckers' AND `won_by` IS NULL");set $@startcluck,0;} else {npctalk "Cluck! CLUUUCK!!";atcommand "@nuke "+strcharinfo(0);}break;}}-    script    EDCluckers    -1,{OnClock2200:    announce "Cluckers : Uda Malem Neh~ , WaktuNya Bobok..Gua Pamit Pulang Dolo",bc_all;    disablenpc "Cluckers";    end;OnClock0900:    announce "Cluckers : Petok Petok Petok , Uda Pagi~ Saatnya Saya Kerja Kembali, Morning All",bc_all;    enablenpc "Cluckers";    end;} 

     

     

     

    sorry guys forgot about this one hehehehe...

  5. Posted · Edited by RyokoMVP

    hello i want to ask , i use 2013 - 06 - 05 RagRE , but why i got error when @item custom item ? but when i use my grf to exe 2012 - 04 - 10 it's work good...only got error in 2013-06-05

     

    someone can help me ?

     

    this is my RagRE exe

     

    RosaE.7z

     

    this is my item db

     

    30000,New_Dark_Blue_Fairy_Wings,New_Dark_Blue_Fairy_Wings,5,100000,,10, ,0,,0,0xFFFFFFFF,31,2,512,,0,0,2000,{bonus bAllstats,1;},{},{}

     

    i only change my exe to 2012-04-10 and it's work good...so i think this is exe problem. please help me :)

     

  6. Posted

    because in the code i am checking the last patched date and running the updater only if there is any. so if your uptodate with the official patches it wont run it.

    you can only run KPatcher > Rolex > Client. 

     

     

    uhmmm , yes i can disable kRO patch finally !! and i run KPatcher -> Rolex -> Client , and it's work 100% NOW !! THANKS !!

  7. Posted · Edited by RyokoMVP

    NeoMind, on 15 Aug 2013 - 01:27, said:

    @Ryoko that is not what the Updater section is for. If you wish to use KPatcher you need to put RoLex as the client executable in KPatcher's ini file not the other way around. As for disabling kro patching you can just put the Enabled=false.

    yes i know , before i patch kRO Use RSU it's work fine...

     

    so when i click RoLex it's will open kPatcher And When I Click Start In Kpatcher It's will transfered into login screen

     

    So RoLex -> Kpatcher -> Login Screen

     

    but after patch kRO , now when i click RoLex It's Always Open Windows Login Not kPatcher First...

     

    And When I Click KPatcher And Click Start ( without RoLex ) i can't login...

     

    so i only can login use RoLex . And Patch Use Kpatcher.thats why i make RoLex -> Kpatcher - > Login Screen

     

     

    and how to make RoLex Open kPatcher Before This ? I Only Change

     

    ; Filename of Official updater - rsu-kro-rag-lite.exe is used by default

    ExeName="KPatcher.exe"

     

    and it's work good...but when patch kRO it's not work again

  8. Posted

    sorry 4 ask , i use 2013-06-26b.exe Dan R.O.L.eX.LQ Launcher

     

    And My Question Is :

     

    Why
    When I Open R.O.L.eX.LQ Launcher , Always Download kRO Patch ? I
    Already Change It To Download My RO Patch...But Every I Patch kRO Use
    RSU And Open R.O.L.eX.LQ Launcher will transfer to windows login , not
    to my patcher again..

     

    so what i want is , disable download / checking kRO update When Launch R.O.L.eX.LQ

     

    Thanks

     

    - This Is My Launcher.txt

     

     

     

    [uI]
    ; Currently Image is checked for in the path where Launcher is
    Background="vembel.jpg"
    ;Background="bg1.jpg"

    ; Set the Window TItle
    Title="Ragnarok Vembel"

    ; Save UserName - can also be configured from the Launcher
    Save_User=true
    ; Enable MD5 Password Encryption - currently this option is not used
    ; since MD5 is dependent only on the server side.
    Enable_MD5_Pass=false

    [Data]
    ; Client Exe is expected to be in same location as launcher
    ExeName=Selker.exe
    ExeArgs="-1rag1 /account:clientinfo.xml"

    ; Also Set by Launcher if asked to Save (Save User option)
    Username=

    ; This is used for the settings button
    Setup=Setup.exe

    ; Website for registration
    ;Register="registrationweb"

    [updater]
    ; Enable updation of folder or not
    Enabled=True

    ; Filename of Official updater - rsu-kro-rag-lite.exe is used by default
    ExeName="KPatcher.exe" <== i change rsu patcher into my patcher

    ; No of days to wait before next update - default is 1 day
    ;DaySpan=1'

     

     

  10. Posted 

    prontera,159,192,4    script    Healer    729,{OnS1:if(Zeny < 500) goto NeedZenys;set Zeny,zeny-500;percentheal 100,100;skilleffect 34,0; sc_start SC_BLESSING,360000,10;skilleffect 29,0; sc_start SC_INCREASEAGI,360000,10;sc_start SC_MAGNIFICAT,180000,10;end;OnS2:if(Zeny < 30000) goto NeedZenys;set Zeny,zeny-30000;percentheal 100,100;sc_start SC_BLESSING,360000,10;sc_start SC_INCREASEAGI,360000,10;sc_start SC_MAGNIFICAT,360000,10;sc_start SC_IMPOSITIO,360000,10;sc_start SC_SUFFRAGIUM,120000,2;skilleffect 361,0; sc_start SC_ASSUMPTIO,360000,10;end;OnS3:if(Zeny < 5000) goto NeedZenys;set Zeny,zeny-5000;switch ( basejob ) {  case Job_Alchemist:    set .@spirit, 445; break;  case Job_Monk:     set .@spirit, 447; break;  case Job_Star_Gladiator:  set .@spirit, 448; break;  case Job_Sage:     set .@spirit, 449; break;  case Job_Crusader:    set .@spirit, 450; break;  case Job_SuperNovice:   set .@spirit, 451; break;  case Job_Knight:    set .@spirit, 452; break;  case Job_Wizard:    set .@spirit, 453; break;  case Job_Priest:    set .@spirit, 454; break;  case Job_Bard: case Job_Dancer: set .@spirit, 455; break;  case Job_Rogue:     set .@spirit, 456; break;  case Job_Assassin:    set .@spirit, 457; break;  case Job_Blacksmith:   set .@spirit, 458; break;  case Job_Hunter:    set .@spirit, 460; break;  case Job_Soul_Linker:   set .@spirit, 461; break;  default:   if ( upper == 1 && baselevel < 70 )    set .@spirit, 494;}if ( .@spirit ) {  sc_start4 sc_spirit, 360000, 5, .@spirit,0,0;  skilleffect .@spirit, 5;}end;NeedZenys:mes "You Don't Have Money";close;OnInit:defpattern 1, "S1","OnS1";defpattern 1, "S2","OnS2";defpattern 1, "S3","OnS3";activatepset 1;initnpctimer;end;onTimer2000:delwaitingroom;waitingroom "S1 = 500z",0;end;OnTimer4000:delwaitingroom;waitingroom "S2 = 30.000z",0;end;OnTimer6000:delwaitingroom;waitingroom "S3 = 5000z",0;stopnpctimer;initnpctimer;end;}

     hello hercules , i want to ask..i use this script on rA and it's okay..but when i use in hercules , i got " stone curse effect " every use buff / soul link~ someone know why ?thanks...

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.

  I accept