Jump to content

Dynasty

Members
  • Posts

    151
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by Dynasty

  1. Im really sure that if you search on the forum you'll find something like that.
  2. AMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM.... it is not compatible...
  3. I'am looking a mapper for my server http://pkmode-ro.com || Estoy buscando un mapper para mi server http://pkmode-ro.com

  4. you can use the oficial rathena job master... pd: it is already configured //===== rAthena Script ======================================= //= Job Master //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.3 //===== Compatible With: ===================================== //= rAthena SVN r16114+ //===== Description: ========================================= //= A fully functional job changer. //===== Additional Comments: ================================= //= 1.0 Initial script. //= 1.1 Fixed reset on Baby job change. //= 1.2 Added Expanded Super Novice support and initial Kagerou/Oboro support. //= 1.3 Kagerou/Oboro added. //============================================================ prontera,153,193,6 script Job Master 123,{ function Job_Menu; function A_An; mes "[Job Master]"; if (Class > 6) { mes "No more jobs are available."; close; } if (checkfalcon() || checkcart() || checkriding() || ismounting()) { mes "Please remove your "+((checkfalcon())?"falcon":"")+((checkcart())?"cart":"")+((checkriding())?"Peco":"")+((ismounting())?"mount":"")+" before proceeding."; close; } if (.SkillPointCheck && SkillPoint) { mes "Please use all your skill points before proceeding."; close; } set .@eac, eaclass(); set .@i, ((.ThirdClass)?roclass(.@eac&EAJ_UPPERMASK):Class); if (.@i > 6 && .@i < 22) { if (BaseLevel < .Rebirth[0] || JobLevel < .Rebirth[1]) { set .@blvl, .Rebirth[0]-BaseLevel; set .@jlvl, .Rebirth[1]-JobLevel; mes "You need "+((.@blvl>0)?.@blvl+" more base levels "+((.@jlvl>0)?"/ ":""):"")+((.@jlvl>0)?.@jlvl+" more job levels ":"")+"to continue."; close; } if (Class > 21) { mes "Switch to third class?"; next; Job_Menu(roclass(.@eac|EAJL_THIRD)); close; } while(1) { mes "Select an option."; next; set .@i, select(" ~ ^0055FFRebirth^000000:"+((.ThirdClass)?" ~ ^FF0000Third Class^000000":"")+": ~ ^777777Cancel^000000"); if (.@i==3) close; mes "[Job Master]"; mes "Are you sure?"; next; Job_Menu(((.@i==1)?4001:roclass(.@eac|EAJL_THIRD))); mes "[Job Master]"; } } set .@j1, roclass(.@eac|EAJL_2_1); set .@j2,roclass(.@eac|EAJL_2_2); if ((.@eac&EAJ_UPPERMASK) == EAJ_SUPER_NOVICE) setarray .@exp[0],roclass(.@eac|EAJL_THIRD),99; if (Class == Job_Ninja) setarray .@exp[0],.@j1,70; if (.@exp[0] && .ThirdClass) { if (BaseLevel < .Rebirth[0] || JobLevel < .@exp[1]) { set .@blvl, .Rebirth[0]-BaseLevel; set .@jlvl, .@exp[1]-JobLevel; mes "You need "+((.@blvl>0)?.@blvl+" more base levels "+((.@jlvl>0)?"/ ":""):"")+((.@jlvl>0)?.@jlvl+" more job levels ":"")+"to continue."; close; } mes "Switch to "+jobname(.@exp[0])+"?"; next; Job_Menu(.@exp[0]); close; } if (.@eac&EAJL_2) if (.@eac&(EAJL_UPPER|EAJL_BABY) || roclass(.@eac|EAJL_UPPER) == -1) { mes "No more jobs are available."; close; } if ((.@eac&EAJ_BASEMASK) == EAJ_NOVICE) { if (JobLevel < .JobReq[0]) mes "A job level of "+.JobReq[0]+" is required to change into the 1st Class."; else if (Class == 4001 && .LastJob && lastJob) { mes "Switch classes now?"; next; Job_Menu(roclass((eaclass(lastJob)&EAJ_BASEMASK)|EAJL_UPPER)); } else switch(Class) { case 0: Job_Menu(1,2,3,4,5,6,23,4046,24,25,4023); case 4001: Job_Menu(4002,4003,4004,4005,4006,4007); case 4023: Job_Menu(4024,4025,4026,4027,4028,4029,4045); default: mes "An error has occurred."; break; } close; } if (roclass(.@eac|EAJL_2_1) == -1 || roclass(.@eac|EAJL_2_2) == -1) mes "No more jobs are available."; else if (!(.@eac&EAJL_2) && JobLevel < .JobReq[1]) mes "A job level of "+.JobReq[1]+" is required to change into the 2nd Class."; else if (.LastJob && lastJob && (.@eac&EAJL_UPPER)) { mes "Switch classes now?"; next; Job_Menu(lastJob+4001); } else Job_Menu(.@j1,.@j2); close; function Job_Menu { while(1) { if (getargcount() > 1) { mes "Select a job."; set .@menu$,""; for(set .@i,0; .@i<getargcount(); set .@i,.@i+1) set .@menu$, .@menu$+" ~ "+jobname(getarg(.@i))+":"; set .@menu$, .@menu$+" ~ ^777777Cancel^000000"; next; set .@i, getarg(select(.@menu$)-1,0); if (!.@i) close; if ((.@i == 23 || .@i == 4045) && BaseLevel < .SNovice) { mes "[Job Master]"; mes "A base level of "+.SNovice+" is required to turn into a "+jobname(.@i)+"."; close; } mes "[Job Master]"; mes "Are you sure?"; next; } else set .@i, getarg(0); if (select(" ~ Change into ^0055FF"+jobname(.@i)+"^000000 class: ~ ^777777"+((getargcount() > 1)?"Go back":"Cancel")+"^000000") == 1) { mes "[Job Master]"; mes "You are now "+A_An(jobname(.@i))+"!"; if (.@i==4001 && .LastJob) set lastJob, Class; jobchange .@i; if (.@i==4001 || .@i==4023) resetlvl(1); specialeffect2 338; specialeffect2 432; if (.Platinum) callsub Get_Platinum; close; } if (getargcount() == 1) return; mes "[Job Master]"; } end; } function A_An { setarray .@A$[0],"a","e","i","o","u"; set .@B$, "_"+getarg(0); for(set .@i,0; .@i<5; set .@i,.@i+1) if (compare(.@B$,"_"+.@A$[.@i])) return "an "+getarg(0); return "a "+getarg(0); } Get_Platinum: skill 142,1,0; switch(BaseClass) { case 0: if (Class !=23) skill 143,1,0; break; case 1: skill 144,1,0; skill 145,1,0; skill 146,1,0; break; case 2: skill 157,1,0; break; case 3: skill 147,1,0; skill 148,1,0; break; case 4: skill 156,1,0; break; case 5: skill 153,1,0; skill 154,1,0; skill 155,1,0; break; case 6: skill 149,1,0; skill 150,1,0; skill 151,1,0; skill 152,1,0; break; default: break; } switch(BaseJob) { case 7: skill 1001,1,0; break; case 8: skill 1014,1,0; break; case 9: skill 1006,1,0; break; case 10: skill 1012,1,0; skill 1013,1,0; break; case 11: skill 1009,1,0; break; case 12: skill 1003,1,0; skill 1004,1,0; break; case 14: skill 1002,1,0; break; case 15: skill 1015,1,0; skill 1016,1,0; break; case 16: skill 1007,1,0; skill 1008,1,0; skill 1017,1,0; skill 1018,1,0; skill 1019,1,0; break; case 17: skill 1005,1,0; break; case 18: skill 238,1,0; break; case 19: skill 1010,1,0; break; case 20: skill 1011,1,0; break; default: break; } return; OnInit: setarray .Rebirth[0],99,50; // Minimum base level, job level to rebirth OR change to third class setarray .JobReq[0],10,40; // Minimum job level to turn into 1st class, 2nd class set .ThirdClass,0; // Enable third classes? (1: yes / 0: no) set .SNovice,45; // Minimum base level to turn into Super Novice set .LastJob,1; // Enforce linear class changes? (1: yes / 0: no) set .SkillPointCheck,1; // Force player to use up all skill points? (1: yes / 0: no) set .Platinum,1; // Get platinum skills automatically? (1: yes / 0: no) end; }
  5. well if only is 1 require item configure this part: setarray .@itemre[0],501,2;//item, count here is the full script: // ------------------------------------------------------------------------------- // Script Name : Headgear to Costume converter >> Costume to Headgear converter // ------------------------------------------------------------------------------- // Description : // - Allows a user to convert the equipped headgear (on Top, Mid or Low) into a // costume item. It will remove any card and refine of the Item. // - Allows a user to restore the equipped costume headgear (on Top, Mid or Low) // into its original form. It will not return any card or refine of the item. // ------------------------------------------------------------------------------- - script Costume Clown -1,{ setarray .@itemre[0],501,2;//item, count mes "[Clown]"; mes "Here you can convert your headgears into a Costume Headgear or restore to its Original form."; switch(select("I want to convert.:I want to restore.:No thanks.")) { case 1: next; mes "Please, select what to convert."; mes "Remember, cards and refine will be removed."; next; setarray .@Position$[1],"Top","Mid","Low"; setarray .@Position[1], 1, 9, 10; set .@Menu$,""; for( set .@i, 1; .@i < 5; set .@i, .@i + 1 ) { if( getequipisequiped(.@Position[.@i]) ) set .@Menu$, .@Menu$ + .@Position$[.@i] + "-" + "[" + getequipname(.@Position[.@i]) + "]"; set .@Menu$, .@Menu$ + ":"; } set .@Part, .@Position[ select(.@Menu$) ]; if( !getequipisequiped(.@Part) ) { mes "[Clown]"; mes "Your not wearing anything there..."; close; } mes "[Clown]"; mes "You want to Costume your " + getitemname(getequipid(.@Part)) + "?"; next; if( select("Yes, proceed:No, I am sorry.") == 2 ) { mes "[Clown]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } costume .@Part; // Convert the Headgear mes "[Clown]"; mes "Done, enjoy your costume headgear."; close; case 2: next; mes "Please, select what to restore."; mes "Remember, I will only restore it back without refine and cards."; next; setarray .@Position$[1],"Top","Mid","Low"; setarray .@Position[1], 13, 12, 11; set .@Menu$,""; for( set .@i, 1; .@i < 5; set .@i, .@i + 1 ) { if( getequipisequiped(.@Position[.@i]) ) set .@Menu$, .@Menu$ + .@Position$[.@i] + "-" + "[" + getequipname(.@Position[.@i]) + "]"; set .@Menu$, .@Menu$ + ":"; } set .@Part, .@Position[ select(.@Menu$) ]; if( !getequipisequiped(.@Part) ) { mes "[Clown]"; mes "Your not wearing anything there..."; close; } mes "[Clown]"; mes "You want to restore your " + getitemname(getequipid(.@Part)) + "?"; next; if( select("Yes, proceed:No, I am sorry.") == 2 ) { mes "[Clown]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } mes "you would need this item"; mes ""+getitemname(.@itemre)+" "; mes "are you sure?"; if( select("Yes:No, I am sorry.") == 2 ) { mes "[Clown]"; mes "Need some time to think about it, huh?"; mes "Alright, I can understand."; close; } if (countitem(.@itemre[0]) >= .@itemre[1]){ a = getequipid(.@Part); delitem .@itemre[0],.@itemre[1]; delitem a,1; getitem a,1; mes "[Clown]"; mes "Done, enjoy your restored headgear."; close; } else { mes "[clown]"; mes "you dont have "+getitemname(.@itemre[0])+" [ "+countitem(.@itemre[1])+" / "+itemre[1]+"]"; close; } case 3: mes "[Clown]"; mes "Very well. Return at once if you seek my services."; close; } } send me a pm if u want more than 1
  6. you have to go into your src folder and search the core.h file and then look into and change this: src/config/core.h /// Enable VIP script changes? (requires VIP_ENABLE) /// The primary effects of this are restrictions on non-VIP players, such as requiring /// a Reset Stone to change into third classes, paying more for equipment upgrades, and /// so forth. Note that the changes are based on euRO, not iRO. #define VIP_SCRIPT 0 and the put a 1 (#define VIP_SCRIPT 1)
  7. download a new update data, i think it is the best way to solve it
  8. well im getting some problem with that option "Disable 4 Letter UserPassword Disable 4 Letter UserCharacter Limit" in the NEMO Differ... in brief it doesn't work... im using client 2013-08-07 bumm
  9. the error is not in your script customs is in somewhere of you item_db
  10. - script Anti-bot -1,{ OnPCLoginEvent: attachnpctimer ""+strcharinfo(0)+""; initnpctimer; end; OnTimer3600000: OnPCLoadMapEvent: getmapxy(@map$,@x,@y,0); if(strcharinfo(3) == @map$){ setmapflag .Map$,mf_loadevent; dispbottom "This is only to find out if you're a BOT"; atcommand "@battleignore"; atcommand "@adjgroup -1"+strcharinfo(0); atcommand "@option 2"; sc_start SC_FREEZE,10000000,1; sc_start SC_HIDE,10000000,1; mes "Please Enter Red Color Key in the Code..."; set .Code,rand(1000,99999); mes "^0000FF"+rand(1,9999)+"^FF0000"+.Code+"^0000FF"+rand(1,9999)+"^000000"; input @Code; if( @Code != .Code ){ stopnpctimer; detachnpctimer; atcommand "@kick "+strcharinfo(0); } else { atcommand "@battleignore"; atcommand "@option 0"; sc_end SC_FREEZE; sc_end SC_HIDE; dispbottom "Sorry for INTERRUPTING you, Thank You!"; stopnpctimer; initnpctimer; } close; } end; } well.. if im not wrong.. i can do it like this and both labels will run properly .-. OnTimer3600000: OnPCLoadMapEvent: Warp to the MAP and then Anti-Bot show.. (input the right code and done..) [ready, please try it] After 1 Hour the Anti-Bot show again.. (input again) [ready, please try it] Only my point of view: sometimes this tipe of anti-bots system could be annoying for the players.
  11. Ur wellcome, but in the future try to use switch(select is easier than select only, for the beginners scritpers. And there is the wiki you will find some tips for scripting
  12. but i got the same problem and i solved using visualbasic 13 for compile the rathena-13.sln.. .-.
  13. i'm on it.. sec_in01,94,156,4 script Gabrielle 720,{ mes "[ ^F660ABGabrielle^000000 ]"; mes "Hi ^F4123F"+strcharinfo(0)+"^000000"; mes "I can trade several beautiful scarfs to you"; mes "Do you want to know what i have in store?"; next; switch(select("Yes Please:No")) { case 2: mes "[ ^F660ABGabrielle^000000 ]"; mes "Comeback Soon!... >.>"; close; case 1: next; mes "I have a collection of special magical Scarfs"; next; switch(select("^F4123FBlue Scarf^000000:^F4123FCyan Scarf^000000:^F4123FBlack Scarf^000000:^F4123FRed Scarf^000000:^F4123FPink Scarf^000000:^F4123FGreen Scarf^000000:^F4123FExit^000000")) { case 1: Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I need the following items for me to give you"; mes "1 ^0000FFBlue Scarf^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "1 TCG Card"; mes "5 Santa's Hat"; mes "500 Well baked Cookie"; mes "500 Candy"; mes "10 Cobalt Blue Dyestuff"; mes "10 White Dyestuff"; mes "100 Tiger Panty"; mes "100 Alice's Apron"; mes "10 Silver Coins"; mes "What do you say?"; next; if(countitem(7227) >= 1 && countitem(2236) >= 5 && countitem(538) >= 500 && countitem(529) >= 500 && countitem(978) >= 10 && countitem(982) >= 10 && countitem(7267) >= 100 && countitem(7047) >= 100 && countitem(675) >= 10){ mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You've Collected it all!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 2: Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I need the following items for me to give you"; mes "1 ^0000FFCyan Scarf^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "1 TCG Card"; mes "5 Santa's Hat"; mes "500 Well baked Cookie"; mes "500 Candy"; mes "10 Cobalt Blue Dyestuff"; mes "10 White Dyestuff"; mes "100 Tiger Panty"; mes "100 Alice's Apron"; mes "10 Silver Coins"; mes "What do you say?"; next; if(countitem(7227) >= 1 && countitem(2236) >= 5 && countitem(538) >= 500 && countitem(529) >= 500 && countitem(978) >= 10 && countitem(982) >= 10 && countitem(7267) >= 100 && countitem(7047) >= 100 && countitem(675) >= 10){ mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You've Collected it all!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 3: Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I need the following items for me to give you"; mes "1 ^0000FFBlack Scarf^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "1 TCG Card"; mes "5 Santa's Hat"; mes "500 Well baked Cookie"; mes "500 Candy"; mes "10 Cobalt Blue Dyestuff"; mes "10 White Dyestuff"; mes "100 Tiger Panty"; mes "100 Alice's Apron"; mes "10 Silver Coins"; mes "What do you say?"; next; if(countitem(7227) >= 1 && countitem(2236) >= 5 && countitem(538) >= 500 && countitem(529) >= 500 && countitem(978) >= 10 && countitem(982) >= 10 && countitem(7267) >= 100 && countitem(7047) >= 100 && countitem(675) >= 10){ mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You've Collected it all!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 4: Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I need the following items for me to give you"; mes "1 ^0000FFRed Scarf^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "1 TCG Card"; mes "5 Santa's Hat"; mes "500 Well baked Cookie"; mes "500 Candy"; mes "10 Cobalt Blue Dyestuff"; mes "10 White Dyestuff"; mes "100 Tiger Panty"; mes "100 Alice's Apron"; mes "10 Silver Coins"; mes "What do you say?"; next; if(countitem(7227) >= 1 && countitem(2236) >= 5 && countitem(538) >= 500 && countitem(529) >= 500 && countitem(978) >= 10 && countitem(982) >= 10 && countitem(7267) >= 100 && countitem(7047) >= 100 && countitem(675) >= 10){ mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You've Collected it all!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 5: Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I need the following items for me to give you"; mes "1 ^0000FFPink Scarf^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "1 TCG Card"; mes "5 Santa's Hat"; mes "500 Well baked Cookie"; mes "500 Candy"; mes "10 Cobalt Blue Dyestuff"; mes "10 White Dyestuff"; mes "100 Tiger Panty"; mes "100 Alice's Apron"; mes "10 Silver Coins"; mes "What do you say?"; next; if(countitem(7227) >= 1 && countitem(2236) >= 5 && countitem(538) >= 500 && countitem(529) >= 500 && countitem(978) >= 10 && countitem(982) >= 10 && countitem(7267) >= 100 && countitem(7047) >= 100 && countitem(675) >= 10){ mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You've Collected it all!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 6: Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I need the following items for me to give you"; mes "1 ^0000FFGreen Scarf^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "1 TCG Card"; mes "5 Santa's Hat"; mes "500 Well baked Cookie"; mes "500 Candy"; mes "10 Cobalt Blue Dyestuff"; mes "10 White Dyestuff"; mes "100 Tiger Panty"; mes "100 Alice's Apron"; mes "10 Silver Coins"; mes "What do you say?"; next; if(countitem(7227) >= 1 && countitem(2236) >= 5 && countitem(538) >= 500 && countitem(529) >= 500 && countitem(978) >= 10 && countitem(982) >= 10 && countitem(7267) >= 100 && countitem(7047) >= 100 && countitem(675) >= 10){ mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You've Collected it all!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 7: mes "[ ^F660ABGabrielle^000000 ]"; mes "Alright!"; mes "Just come back , Ill be waiting baby!"; Emotion e_no1; close; } } }
  14. but when i added the mapflag the cutin only tigger once dont matter what... only work if i do @reloadscript
  15. ALLLLLL MAPS of ragnarok??
  16. running script sec_in01,94,156,4 script Gabrielle 720,{ mes "[ ^F660ABGabrielle^000000 ]"; mes "Hi ^F4123F"+strcharinfo(0)+"^000000"; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "I can trade several items to you for an item(s)"; mes "Do you want to know?"; next; switch(select("^F4123FBlue Scarf^000000:^F4123FCyan Scarf^000000:^F4123FBlack Scarf^000000:^F4123FRed Scarf^000000:^F4123FPink Scarf^000000:^F4123FGreen Scarf^000000:^F4123FExit^000000")) { case 1: mes "[ ^F660ABGabrielle^000000 ]"; mes "I can give you special magical Scarfs"; mes "Would you like one?"; Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "You can trade me certain items for 1 ^0000FFBlue Scarf^000000"; mes "What do you say?"; next; if(countitem(7227) > 1) if(countitem(2236) > 4) if(countitem(538) > 499) if(countitem(529) > 499) if(countitem(978) > 9) if(countitem(982) > 9) if(countitem(7267) > 99) if(countitem(7047) > 99) if(countitem(675) > 9) { mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You really want that huh!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 2: mes "[ ^F660ABGabrielle^000000 ]"; mes "I can give you special magical Scarfs"; mes "Would you like one?"; Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "You can trade me certain items for 1 ^0000FFCyan Scarf^000000"; mes "What do you say?"; next; if(countitem(7227) < 1) if(countitem(2236) > 4) if(countitem(538) > 499) if(countitem(529) > 499) if(countitem(978) > 9) if(countitem(982) > 9) if(countitem(7267) > 99) if(countitem(7047) > 99) if(countitem(675) >9) { mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You really want that huh!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 3: mes "[ ^F660ABGabrielle^000000 ]"; mes "I can give you special magical Scarfs"; mes "Would you like one?"; Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "You can trade me certain items for 1 ^0000FFBlack Scarf^000000"; mes "What do you say?"; next; if(countitem(7227) < 1) if(countitem(2236) > 4) if(countitem(538) > 499) if(countitem(529) > 499) if(countitem(978) > 9) if(countitem(982) > 9) if(countitem(7267) > 99) if(countitem(7047) > 99) if(countitem(675) >9) { mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You really want that huh!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 4: mes "[ ^F660ABGabrielle^000000 ]"; mes "I can give you special magical Scarfs"; mes "Would you like one?"; Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "You can trade me certain items for 1 ^0000FFRed Scarf^000000"; mes "What do you say?"; next; if(countitem(7227) < 1) if(countitem(2236) > 4) if(countitem(538) > 499) if(countitem(529) > 499) if(countitem(978) > 9) if(countitem(982) > 9) if(countitem(7267) > 99) if(countitem(7047) > 99) if(countitem(675) >9) { mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You really want that huh!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 5: mes "[ ^F660ABGabrielle^000000 ]"; mes "I can give you special magical Scarfs"; mes "Would you like one?"; Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "You can trade me certain items for 1 ^0000FFPink Scarf^000000"; mes "What do you say?"; next; if(countitem(7227) < 1) if(countitem(2236) > 4) if(countitem(538) > 499) if(countitem(529) > 499) if(countitem(978) > 9) if(countitem(982) > 9) if(countitem(7267) > 99) if(countitem(7047) > 99) if(countitem(675) >9) { mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You really want that huh!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 6: mes "[ ^F660ABGabrielle^000000 ]"; mes "I can give you special magical Scarfs"; mes "Would you like one?"; Emotion e_ho; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "You can trade me certain items for 1 ^0000FFGreen Scarf^000000"; mes "What do you say?"; next; if(countitem(7227) < 1) if(countitem(2236) > 4) if(countitem(538) > 499) if(countitem(529) > 499) if(countitem(978) > 9) if(countitem(982) > 9) if(countitem(7267) > 99) if(countitem(7047) > 99) if(countitem(675) >9) { mes "[ ^F660ABGabrielle^000000 ]"; mes "Wow! You really want that huh!"; next; delitem 7227,1; delitem 2236,5; delitem 538,500; delitem 529,500; delitem 978,10; delitem 982,10; delitem 7267,100; delitem 7047,100; delitem 675,10; mes "[ ^F660Gabrielle^000000 ]"; mes "Here you go"; getitem 21290,1; Emotion e_grat; next; mes "[ ^F660ABGabrielle^000000 ]"; mes "See you around!"; Emotion e_bo; close; } else { mes "[ ^F660ABGabrielle^000000 ]"; mes "You don't meet my standards go away!"; Emotion e_heh; close; } case 7: mes "[ ^F660ABJura^000000 ]"; mes "Alright!"; mes "Just come back , Ill be waiting baby!"; Emotion e_no1; close; } } Error 9- switch(select("^F4123FBlue Scarf^000000:^F4123FCyan Scarf^000000:^F4123FBlack Scarf^000000:^F4123FRed Scarf^000000:^F4123FPink Scarf^000000:^F4123FGreen Scarf^000000:^F4123FExit^000000")) { - "^F4123FExit^000000")) { + ^F4123FExit^000000")) {
  17. hi im doing this a cutin system that will trigger everytime that the user load a cities maps... - script CutinCity -1,{ OnPCLoadMapEvent: attachnpctimer; initnpctimer; end; Ontimer10: cutin "prontera",1; end; Ontimer10000: cutin "",255; stopnpctimer; detachnpctimer; end; }else{ end; } } well.. it works but no like i want, because i want that the script trigger the image every time that the user load all cities maps and that script do it only one time D; plz heeelp me :'c
  18. take it farm_zone.txt
×
×
  • Create New...