Jump to content

deltadestiny

Members
  • Posts

    23
  • Joined

  • Last visited

4 Followers

Profile Information

  • Gender
    Male
  • Interests
    Ragnarok Online (duhh! :D), scripting, swimming, tennis, anime, manga

deltadestiny's Achievements

Poring

Poring (1/15)

2

Reputation

  1. Hi Syouji, thank you for your support =D I'll definitely learn a lot of things from this place and the people here!
  2. Hello Deacon.! Haha I hope this right place and time would stay that way for long. Heyya Lucian, thank you! But of course, learning comes first, so I hope I won't be a bother when asking you guys questions =D
  3. Seeing so many professionals here on rAthena makes me envy them, A LOT =O

  4. Thanks alot Yuki, looking forward to learn from you as well
  5. I think I'll be using that script as well haha. Thanks for sharing, wisekreker!
  6. The other error you most likely didn't notice is a missing comma below. menu "Yes.",M_eddga,"Return to Menu",H_top; prontera,147,169,6 script MVP Trader 803,{ mes "[Dream]"; mes "Are you looking for MVP cards? ."; next; mes "[Dream]"; mes "Well i have Special MVP Cards"; mes "and Normal MVP Cards"; goto H_top; H_top: menu "Normal MVP Cards",H_01,"Special MVP Cards",H_02,"Cancel",H_quit; H_01: menu "Amon Ra",I_amon, "Dark Lord",I_darkld, "Eddga",I_eddga, "Evil Snake Lord",I_esl, "Maya",I_maya, "Orc Hero",I_orc, "Return to Menu",H_top; H_02: menu "Golden Thief Bug",I_thief, "Phreeoni",I_phree, "Tao Gunka",I_gunka, "Turtle General",I_general, "Valkyrie Randgris",I_randgris, "Return to Menu",H_top; I_amon: next; mes "[Dream]"; mes "You need 300 TCG card for (Amon ra)"; mes "Do you really want this??"; next; menu "Yes",M_amon,"Return to Menu",H_top; I_darkld: next; mes "[Dream]"; mes "You need 300 TCG Card for (Dard Lord)"; mes "Do you really want this?"; next; menu "Yes.",M_darkld,"Return to Menu",H_top; I_eddga: next; mes "[Dream]"; mes "You need 300 TCG Card for (Eddga)"; mes "Do you really want this?"; next; menu "Yes.",M_eddga,"Return to Menu",H_top; I_esl: next; mes "[Dream]"; mes "You need 300 TCG Card for (Evil Snake Lord)"; mes "Do you really want this?"; next; menu "Yes.",M_esl,"Return to Menu",H_top; I_thief: next; mes "[Dream]"; mes "You need 700 TCG Card for (Golden Thief Bug)"; mes "Do you really want this?"; next; menu "Yes.",M_thief,"Return to Menu",H_top; I_maya: next; mes "[Dream]"; mes "You need 300 TCG Card for (Maya)"; mes "Do you really want this?"; next; menu "Yes.",M_maya,"Return to Menu",H_top; I_orc: next; mes "[Dream]"; mes "You need 300 TCG Card for (Orc Hero)"; mes "Do you really want this?"; next; menu "Yes.",M_orc,"Return to Menu",H_top; I_phree: next; mes "[Dream]"; mes "You need 1000 TCG Card for (Phreeoni)"; mes "Do you wish to continue?"; next; menu "Yes.",M_phree,"Return to Menu",H_top; I_gunka: next; mes "[Dream]"; mes "You need 1000 TCG Card for (Tao Gunka)"; mes "Do you wish to continue?"; next; menu "Yes.",M_gunka,"Return to Menu",H_top; I_general: next; mes "[Dream]"; mes "You need 700 TCG Card for (Turtle General)"; mes "Do you wish to continue?"; next; menu "Yes.",M_general,"Return to Menu",H_top; I_randgris: next; mes "[Dream]"; mes "You need 2000 TCG Card for (Valkyrie Randgris)"; mes "Do you wish to continue?"; next; menu "Yes.",M_randgris,"Return to Menu",H_top; M_amon: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4236,1; close; M_darkld: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4168,1; close; M_eddga: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4123,1; close; M_esl: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4330,1; close; M_maya: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4146,1; close; M_orc: if(countitem(7227) < 300) goto M_insufficient; delitem 7227,300; getitem 4143,1; close; M_thief: if(countitem(7227) < 700) goto M_insufficient; delitem 7227,700; getitem 4128,1; close; M_phree: if(countitem(7227) < 1000) goto M_insufficient; delitem 7227,1000; getitem 4121,1; close; M_gunka: if(countitem(7227) < 1000) goto M_insufficient; delitem 7227,1000; getitem 4302,1; close; M_general: if(countitem(7227) < 700) goto M_insufficient; delitem 7227,700; getitem 4305,1; close; M_randgris: if(countitem(7227) < 2000) goto M_insufficient; delitem 7227,2000; getitem 4407,1; close; M_insufficient: next; mes "[Dream]"; mes "you dont have enough of tcg"; mes "please come back when you do..."; menu "Return to Main Menu",H_top,"Leave",H_quit; end; H_quit: close; }
  7. Snurayroth, I have a vague idea that might work. Instead of using a floating NPC, make it something like this: mapname,xcoor,ycoor script NPC_Name -1,{ OnEventName: //attach rid of player //place your text in here end; } Then alter your custom command so that it saves the character RID into a variable and runs NPC_Name::OnEventName. I'm not exactly sure it'll work though, but that's an alternative I thought of. I'm not familiar with custom commands, so I can't test it myself. Sorry =(
  8. It looks like using next in a floating NPC causes an error. I was able to reproduce the same error using the following code: prontera,153,170,4 script Temptest 46,{ set @testrid, getcharid(0); doevent "XXX::OnDo"; end; } - script XXX -1,{ OnDo: attachrid @testrid; getmapxy(@roflmap$,@roflx,@rofly,0,strcharinfo(0)); warp @roflmap$,@roflx,@rofly; L_lol: mes "L_lol"; mes "XXXXXXXXXXX"; next; // NOTE menu "- A",L_A, "- Close",L_Close; L_back: mes "L_back"; mes "XXXXXXXXXXX"; next; menu "- A",L_A, "- Close",L_Close; L_A: mes "XX"; mes "XX"; mes "XX"; mes "XX"; next; menu "- Back",L_back, "- Close",L_Close; L_Close: mes "XX"; mes "XX"; mes "XX"; mes "XX"; L_open: close; } NOTE: If you comment out the 'next;' under the L_lol label, it is possible to access the menu that comes after it. However, choosing any of the menu resulted in either being disconnected from the server or my client crashing. There's also a warning message that looks like this: [Warning]: Invalid menu selection on npc 110076110:'XXX' - got 1, valid range is [1..0] However, if you replace the upper part of the code with the following, the script works just fine. So I'm assuming that your error is most likely related to the one mentioned in the description for next;, and by creating a 'valid' window before proceeding into your own code, it should bypass the error. But since you're executing it from a custom command, I'm not sure how you are going to do it... prontera,153,170,4 script Temptest 46,{ set @testrid, getcharid(0); mes "abcde"; getmapxy(@roflmap$,@roflx,@rofly,0,strcharinfo(0)); warp @roflmap$,@roflx,@rofly; doevent "XXX::OnDo"; end; } - script XXX -1,{ OnDo: attachrid @testrid; L_lol: // content from this line and below remains the same
  9. I believe you're missing a comma behind each label, and your " " is a little off for dark lord and eddga. Structure goes like this: Menu "option1",label1,"option2",label2; Or Menu "option1",label1, "option2",label2; Sent using my mobile, so I didnt go through the whole script. Hope it helps =)
  10. Change set @lang,#lang; to set @lang,1; This script seems to have bugs in certain parts when clicking the 'Cancel' button. Sorry, I'm still not too familiar with this method of array handling, this is as much as I can help. Good luck with the rest =)
  11. Here, try this one. prontera,180,150,5 script Teleport guy 61,{ set .@map$,"prt_are_in"; set .@id,13760; mes "[Teleportador]"; mes "want enter in the room? ~~ ~"; mes "blablablabla...."; next; mes "[Teleport guy]"; mes "Wanna get in now??"; next; if( select("Yep:Nope") == 2 ) { mes "[Teleport guy]"; mes "..."; close; } if(countitem(.@id) < 1) { mes "[Teleport guy]"; mes "you need the passport to enter"; close; } if (getmapusers(.@map$) >= 1 ){ mes "[Teleport guy]"; mes "Sorry, someone is using the room."; close; } delitem .@id,1; warp .@map$,21,128; dispbottom "You have 5 minutes to stay here."; //attachnpctimer strcharinfo(0); // attach timer to current character initnpctimer; end; OnTimer300000: //OnTimer5000: // used for shorter time testing stopnpctimer; killmonster "prt_are_in","All"; mapwarp "prt_are_in","prontera",156,178; announce getnpctimer(0,"Teleport guy"),0; sleep2 2000; announce getnpctimer(0,"Teleport guy"),0; end; OnPCDieEvent: if (strcharinfo(3) == "prt_are_in") { stopnpctimer; sleep2 500; killmonster "prt_are_in","All"; warp "prontera", 179,150; percentheal 100,100; announce getnpctimer(0,"Teleport guy"),0; sleep2 2000; announce getnpctimer(0,"Teleport guy"),0; } end; } //Mapflags prt_are_in mapflag nowarp prt_are_in mapflag nowarpto prt_are_in mapflag noteleport prt_are_in mapflag nomemo prt_are_in mapflag nosave prt_are_in mapflag noreturn prt_are_in mapflag noicewall prt_are_in mapflag nopenalty prt_are_in mapflag noexp Let me know if there's anything not working =)
  12. Sir you are confusing me =( I thought your 'some' and 'they' means ANY party can go in after 10 minutes? So now if the party fails the event (by any means), you don't want the 50% chance to be implemented? Instead you want them[1] to be ABLE to join in again after 10 minutes (100% event runs)? And when you say 'them[1]', are you referring to the previous party who failed the event, or do all other parties now stand a chance to participate? WHEN is the next event? WHO are 'they'? As asked above, the party that failed the event, or ALL other parties? What if one of the current party members died, and the rest killed the mob? The event is considered a failure, right? What will you do after the 10 minutes cooldown? Spawn the mob again? This may lead to abuse by the current party. Consider these scenarios, words in bold require your clarification. Party1 join event > all party members died > event fail > wait 10 minutes > can other parties join now, or only Party1 can enter? Party1 join event > 1 party member died > others kill the mob > event fail > wait 10 minutes > what happens next? Party1 join event > event successful > how long until the next event? I apologize for not understanding you fully, but the lack of information made me assume things which doesn't seem to fit your criteria. Anyway, just clear those things up for me and I'll write the script for you =)
×
×
  • Create New...