Bossnia

stydianx · October 30, 2012

hello guys could you guys help me with this bossnia script?..

i would like the following modification:

1. i want it to be open every 4hours (or 3 times a day)

2. it announces that the event will be open in 3min.

3. It only opens for 30min.

4. a minimum of 4 players in a party to enter, max is 10.

5. if one member of the party dies, they are all warped out.

6. Minimum base level to enter is 150.

7. A control panel for GM lvl 99.

8. PvP on. No @warp/@go

9. No usable items are allowed inside (example: YGG)

10. Those who can survive for 30min. recieves 3 TCG's.


prontera,150,179,5 script bossnia Staff::bsw 105,{

mes "[Red]";
mes "Halt! Who approaches?";
mes "I know a Place where chaos rules the land.";
mes "I found it while wondering the plains of RObust.";
mes "I am an adventurer.";
mes "Haha~";
next;
mes "[Red]";
mes "What? My name is...";
mes "'RObustnia Staff'?? Urghh no...";
mes "Well, my name is not so important.";
mes "Sometimes you should be generous.";
mes "No time for considering that kind of small stuff";
mes "when you have to concentrate on more important things.";
next;
mes "[Red]";
mes "Hum... anyway I want to say... something..";
mes "While I was travelling through some places,";
mes "I found a really dreadful and fearful place.";
next;
mes "[Red]";
mes "Most of the time when you come to a place,";
mes "there is one strong and fearful monster.";
mes "Isn't it?";
next;
mes "[Red]";
mes "But... but... in there...";
mes "There are lots of fearful and strong monsters in there...";
mes "That was really frightful, i even heared rumors of Satan being spotted there.";
next;
mes "[Red]";
mes "If I had reacted a bit later... a few seconds...";
mes "I might have been killed.";
next;
mes "[Red]";
mes "What?";
mes "You want to go in there?";
mes "Oh~ Boy~ you didn't get me.";
mes "In there.......";
next;
mes "[Red]";
mes "Uh... you already know?";
mes "Although you know the place, you want to go in...";
mes "Good, I will send you there.";
mes "But after you went there, don't hold";
mes "a grudge against me. Also it costs 5,000 zeny.";
next;
if (Zeny > 4999) {
mes "[Riss]";
mes "Would you really like to take the challenge??";
mes "Ok, just choose the course.";
next;
set .@i, select("First","Second","Third","Fourth");
mes "[Riss]";
mes "Take care, boy~";
mes "Don't hold a grudge against me.";
close2;
set Zeny, Zeny - 5000;
warp "bossnia_0"+.@i,rand(199,200),rand(199,200);
end;
}
mes "[Red]";
mes "You don't have enough money...";
mes "Come back when you have at least 5,000 zeny.";
close;
}

geffen,124,169,4 duplicate(bsw) Bossnia Staff#2 908
payon,165,150,4 duplicate(bsw) Bossnia Staff#3 908
morocc,142,100,4 duplicate(bsw) Bossnia Staff#4 908
lighthalzen,203,140,4 duplicate(bsw) Bossnia Staff#5 908
rachel,132,144,4 duplicate(bsw) Bossnia Staff#6 908

Edited October 30, 2012 by stydianx

stydianx · November 1, 2012

3. It only opens for 30min.

here...
announce "Bossnia Event Opened.",0;
sleep ( 30 * 60000 );
announce "Bossnia Event Closed.",0;
for the survive 30 minute and get reward... i havent do it...

because...still thinking a solution for it...

i scare i would mess up the time calculation....if the following cases appear...

Multiple Party Access into the Map

Member login / logout ( if allow to stay in the map ? )

Attach timer to NPC / Players...or Party Leader

use addtimer attach to party leader after register

when timeout, that label warpparty

I think you can figure out yourself with this hint

i think a script that will give each player 3 TCG's at the end of that 30min. will work..

hmmm.. something like a "gettime" and then if 30min. they recieve 3 TCG's,

and after the 30min. mark, they are warped out of the map to the coordinates that i will put.

===========================================

i took out a piece of annieruru's script. can this be used to this script that im asking for?

all its missing is the time, and "guild_vs2,49,49,5" to be edited.

guild_vs2,49,49,5 script Reward#bossnia 100,{

getitem 501,1; // change to TCG here ... you didn't say what are the item ID so I'm not going to look up for you

warp "Save", 0,0;

end;

Edited November 1, 2012 by stydianx

Emistry · November 1, 2012

use addtimer attach to party leader after register

when timeout, that label warpparty

I think you can figure out yourself with this hint

ya it will do....but....what if the leader logout ? and never login back within the 30 minute ? xD

that's the part make me confuse in certain part..~.~

perhap i already mess up the way to attach timer and etc... >.<

AnnieRuru · November 1, 2012

erm ... lol

that script is now looks more like a joke XD its useless

to gives the reward out immediately,

like this

prontera,156,185,5    script    kdjshfksdjf    100,{
   if ( getcharid(1) == 0 ) end;
   warpparty "guild_vs2", 49,49, getcharid(1);
   addtimer 10000, strnpcinfo(0)+"::Ontimeup";
   end;
Ontimeup:
   announce strcharinfo(1) +" survive for 10 seconds !!", 0;
   warpparty "SavePoint", 0,0, getcharid(1);
   getpartymember getcharid(1), 1;
   getpartymember getcharid(1), 2;
   for ( .@i = 0; .@i < $@partymembercount; .@i++ )
       if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) )
           getitem 501, 1, $@partymemberaid[.@i];
   end;
OnPCLogoutEvent:
OnPCDieEvent:
   if ( getcharid(1) == 0 )
       warp "Save", 0,0;
   else
       warpparty "SavePoint", 0,0, getcharid(1);
   end;
}

don't forget all the mapflags

especially the nosave SavePoint ones

@Emistry

yes, addtimer command will disappear if 1 of the party member log out

but isn't on the 1st post it says, if any one of the party member log out, that party is fail ?

EDIT:

5. if one member of the party dies, they are all warped out.

hmm he just said dies

but if logout is counted, this method is possible

( this is one of the level1 event script technique )

EDIT2:

if you want to make things complicated

allow die = whole team warp out, but log out still allow to remain until 1 person

then need to use level2 event script technique ( party system )

wait me write out the technique ( though I think you already familiar the system )

EDIT3:

here it is ... a level2 event script technique if you want to use this

prontera,156,185,5    script    kdjshfksdjf    100,{
   if ( getcharid(1) == 0 ) end;
   warpparty "guild_vs2", 49,49, getcharid(1);
   .@party_id = getcharid(1);

   getpartymember .@party_id, 1;
   getpartymember .@party_id, 2;
   for ( .@i = 0; .@i < $@partymembercount; .@i++ ) {
       if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) ) {
           setd ".bossnia_pid_"+ .@party_id +"["+ .@c +"]", $@partymemberaid[.@i]; // simulate a new party array using setd/getd - a very typical level2 event script technique
           .@c++;
       }
   }

   sleep 10000; // use sleep command to attach timer to the party, there's no other way
   if ( getarraysize( getd( ".bossnia_pid_"+ .@party_id ) ) == 0 ) end; // when all party member down, it ends itself

   announce getpartyname( .@party_id ) +" survive for 10 seconds !!", 0;
   getpartymember .@party_id, 1;
   getpartymember .@party_id, 2;
   for ( .@i = 0; .@i < $@partymembercount; .@i++ ) {
       if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) ) {
           attachrid $@partymemberaid[.@i];
           if ( strcharinfo(3) == "guild_vs2" ) {
               getitem 501, 1;
               warp "Save", 0,0;
           }
       }
   }
   deletearray getd( ".bossnia_pid_"+ .@party_id );
   end;
OnPCDieEvent:
   if ( getcharid(1) == 0 )
       warp "Save", 0,0;
   else
       warpparty "SavePoint", 0,0, getcharid(1);
   deletearray getd( ".bossnia_pid_"+ getcharid(1) );
   end;
OnPCLogoutEvent:
   if ( strcharinfo(3) != "guild_vs2" ) end; // ok I originally don wan to do this
   if ( getcharid(1) ) {
       .@size = getarraysize( getd( ".bossnia_pid_"+ getcharid(1) ) );
       for ( .@i = 0; .@i < .@size; .@i++ ) {
           if ( getd( ".bossnia_pid_"+ getcharid(1) +"["+ .@i +"]" ) == getcharid(3) ) {
               deletearray getd( ".bossnia_pid_"+ getcharid(1) +"["+ .@i +"]" ), 1;
               .@size--;
               if ( .@size )
                   announce strcharinfo(0) +" from "+ strcharinfo(1) +" has log out ! "+ .@size +" members left", 1;
               else
                   announce "all team members from "+ strcharinfo(1) +" has log out !", 1;
               end;
           }
       }
   }
   end;
}
guild_vs2    mapflag    nosave    SavePoint    // this mapflag itself prevent them staying in the map with logout

its fine if you just want to learn this for fun ( well you seems to be asking for this )

though I still recommend level1 event script technique can already do the trick

no need to complicate yourself with this

Edited November 1, 2012 by AnnieRuru

stydianx · November 1, 2012

erm ... lol

that script is now looks more like a joke XD its useless

to gives the reward out immediately,

like this

prontera,156,185,5	script	kdjshfksdjf	100,{
if ( getcharid(1) == 0 ) end;
warpparty "guild_vs2", 49,49, getcharid(1);
addtimer 10000, strnpcinfo(0)+"::Ontimeup";
end;
Ontimeup:
announce strcharinfo(1) +" survive for 10 seconds !!", 0;
warpparty "SavePoint", 0,0, getcharid(1);
getpartymember getcharid(1), 1;
getpartymember getcharid(1), 2;
for ( .@i = 0; .@i < $@partymembercount; .@i++ )
	if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) )
		getitem 501, 1, $@partymemberaid[.@i];
end;
OnPCLogoutEvent:
OnPCDieEvent:
if ( getcharid(1) == 0 )
	warp "Save", 0,0;
else
	warpparty "SavePoint", 0,0, getcharid(1);
end;
}

don't forget all the mapflags

especially the nosave SavePoint ones

@Emistry

yes, addtimer command will disappear if 1 of the party member log out

but isn't on the 1st post it says, if any one of the party member log out, that party is fail ?

EDIT:

5. if one member of the party dies, they are all warped out.

hmm he just said dies

but if logout is counted, this method is possible

( this is one of the level1 event script technique )

EDIT2:

if you want to make things complicated

allow die = whole team warp out, but log out still allow to remain until 1 person

then need to use level2 event script technique ( party system )

wait me write out the technique ( though I think you already familiar the system )

EDIT3:

here it is ... a level2 event script technique if you want to use this

prontera,156,185,5	script	kdjshfksdjf	100,{
if ( getcharid(1) == 0 ) end;
warpparty "guild_vs2", 49,49, getcharid(1);
.@party_id = getcharid(1);

getpartymember .@party_id, 1;
getpartymember .@party_id, 2;
for ( .@i = 0; .@i < $@partymembercount; .@i++ ) {
	if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) ) {
		setd ".bossnia_pid_"+ .@party_id +"["+ .@c +"]", $@partymemberaid[.@i]; // simulate a new party array using setd/getd - a very typical level2 event script technique
		.@c++;
	}
}

sleep 10000; // use sleep command to attach timer to the party, there's no other way
if ( getarraysize( getd( ".bossnia_pid_"+ .@party_id ) ) == 0 ) end; // when all party member down, it ends itself

announce getpartyname( .@party_id ) +" survive for 10 seconds !!", 0;
getpartymember .@party_id, 1;
getpartymember .@party_id, 2;
for ( .@i = 0; .@i < $@partymembercount; .@i++ ) {
	if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) ) {
		attachrid $@partymemberaid[.@i];
		if ( strcharinfo(3) == "guild_vs2" ) {
			getitem 501, 1;
			warp "Save", 0,0;
		}
	}
}
deletearray getd( ".bossnia_pid_"+ .@party_id );
end;
OnPCDieEvent:
if ( getcharid(1) == 0 )
	warp "Save", 0,0;
else
	warpparty "SavePoint", 0,0, getcharid(1);
deletearray getd( ".bossnia_pid_"+ getcharid(1) );
end;
OnPCLogoutEvent:
if ( strcharinfo(3) != "guild_vs2" ) end; // ok I originally don wan to do this
if ( getcharid(1) ) {
	.@size = getarraysize( getd( ".bossnia_pid_"+ getcharid(1) ) );
	for ( .@i = 0; .@i < .@size; .@i++ ) {
		if ( getd( ".bossnia_pid_"+ getcharid(1) +"["+ .@i +"]" ) == getcharid(3) ) {
			deletearray getd( ".bossnia_pid_"+ getcharid(1) +"["+ .@i +"]" ), 1;
			.@size--;
			if ( .@size )
				announce strcharinfo(0) +" from "+ strcharinfo(1) +" has log out ! "+ .@size +" members left", 1;
			else
				announce "all team members from "+ strcharinfo(1) +" has log out !", 1;
			end;
		}
	}
}
end;
}
guild_vs2	mapflag	nosave	SavePoint	// this mapflag itself prevent them staying in the map with logout

its fine if you just want to learn this for fun ( well you seems to be asking for this )

though I still recommend level1 event script technique can already do the trick

no need to complicate yourself with this

im sorry if i didnt mention the party if the leader or a team member logs out...

well, if the leader logs out, or even a member, all of then should be warped back out, same as one dying,

and they should be allowed to enter the event anymore..

and the script your using is still not the right one..

its the one that i posted in the 1st post = bossnia script.

right under here:


- script Sample -1,{
OnClock0100:
OnClock0500:
OnClock0900:
OnClock1300:
OnClock1700:
for( set .@i,0; .@i < 3; set .@i,.@i + 1 ){
announce "RObustnia Event will Open within "+( 3 - .@i )+" Minutes.",0;
sleep 60000;
}
enablenpc "bsw";
announce "RObustnia Event Opened, Party leader's with 4-10 Members may go in!.",0;
sleep ( 30 * 60000 );
announce "RObustnia Event Closed.",0;
OnInit:
disablenpc "bsw";
end;
}


lighthalzen,162,105,4 script RObustnia Staff::bsw 105,{
function CheckBaseLevel;
mes "[Red]";
mes "Halt! Who approaches?";
mes "I know a Place where chaos rules the land.";
mes "I found it while wondering the plains of RObust.";
mes "I am an adventurer.";
mes "Haha~";
next;
mes "[Red]";
mes "What? My name is...";
mes "'RObustnia Staff'?? Urghh no...";
mes "Well, my name is not so important.";
mes "Sometimes you should be generous.";
mes "No time for considering that kind of small stuff";
mes "when you have to concentrate on more important things.";
next;
mes "[Red]";
mes "Hum... anyway I want to say... something..";
mes "While I was travelling through some places,";
mes "I found a really dreadful and fearful place.";
next;
mes "[Red]";
mes "Most of the time when you come to a place,";
mes "there is one strong and fearful monster.";
mes "Isn't it?";
next;
mes "[Red]";
mes "But... but... in there...";
mes "There are lots of fearful and strong monsters in there...";
mes "That was really frightful, i even heared rumors of Satan being spotted there.";
next;
mes "[Red]";
mes "If I had reacted a bit later... a few seconds...";
mes "I might have been killed.";
next;
mes "[Red]";
mes "What?";
mes "You want to go in there?";
mes "Oh~ Boy~ you didn't get me.";
mes "In there.......";
next;
mes "[Red]";
mes "Uh... you already know?";
mes "Although you know the place, you want to go in...";
mes "Good, I will send you there.";
mes "But after you went there, don't hold";
mes "a grudge against me. Also it costs 5,000 zeny.";
next;
mes "[Red]";

if( !getcharid(1) ){
mes "You need a Party.";
}else{
mes "Would you really like to take the challenge??";
mes "Ok, just choose the course.";
set .@room, select("First","Second","Third","Fourth");
getpartymember getcharid(1),1;
if( getcharid(0) != getpartyleader( getcharid(1),2 ) ){
mes "Only Party Leader can decide to go or not.";
}else if( !CheckBaseLevel( getcharid(1) ) ){
mes "All party Member must be level 150.";
}else if( $@partymembercount < 4 || $@partymembercount > 10 ){
mes "You need total of 4 - 10 Party Members.";
}else if (Zeny < 499999){
mes "You need 500,000 Zeny.";
}else{
set Zeny, Zeny - 500000;
warpparty "bossnia_0"+.@room,rand(199,200),rand(199,200),getcharid(1);
end;
}
}
close;

function CheckBaseLevel {
set .@Leader,getpartyleader( getarg(0),1 );
getpartymember getarg(0),2;
for( set .@i,0; .@i < $@partymembercount; set .@i,.@i + 1 )
if( attachrid( $@partymemberaid[.@i] ) )
if( BaseLevel < 150 ){
attachrid(.@Leader);
return 0;
}
attachrid(.@Leader);
return 1;
}

OnPCDieEvent:
if( compare( strcharinfo(3),"bossnia_0" ) ){
warpparty "lighthalzen",138,85,getcharid(1);
}
end;
}

bossnia_01 mapflag partylock
bossnia_02 mapflag partylock
bossnia_03 mapflag partylock
bossnia_04 mapflag partylock
bossnia_01 mapflag pvp
bossnia_02 mapflag pvp
bossnia_03 mapflag pvp
bossnia_04 mapflag pvp

damn! two of the greatest mind working on one script = perfect script..

thanks guys!

@emistry.. im sorry, haven't slept yet.. LOL! i forget things..

@annie, thanks! i might use the script for other purposes, or study it

thanks guys! its working perfectly now..

almost forgot..
it even got worse.. the NPC is no longer showing itself..

@Annie...

thx for reminding..xD

was fixing that too while uploading to pastebin...~

@TS

http://pastebin.com/raw.php?i=UmgRBLXp

it even got worse.. the NPC is no longer showing itself..

the NPC is hided every time server is reloaded ...and will appear every 4 hours...specified by yourself inside the script....

otherwise just temporary remove this..
OnInit:
disablenpc "bsw";
or add another way to enable the NPC for testing purpose.....
thus this script has this:

3. It only opens for 30min.

10. Those who can survive for 30min. recieves 3 TCG's.

if yes, where can i find them, cause i dont see them here..

if no, could you give me the script and tell me where to put it?

or you can just add it on to what you did and i'll just copy on paste bin..

same, if one member leaves the map (under any circumstances(died,logout,DC,char select,guild,recall)) all members of that party should be warped out of the map event, and is not allowed to go in anymore.

for the award script at the end, a time based rewarder will be ideal..

lets say if party A lasted 30min inside the map, they get the reward and automatically after getting the reward, they are warped back out.

Edited November 1, 2012 by stydianx

AnnieRuru · November 6, 2012

finish this one off ... 1 PM less to worry

bossnia_0.9.txt

also give Emistry 5 in this topic for trying <3

btw if the party failed within 30 mins,

they can retry again because this script haven't deny them with gettimetick(2)

Edited November 6, 2012 by AnnieRuru

Peopleperson49 · November 6, 2012

I don't know...give a man a fish, or teach them to fish? He requested assistance so really it seems like its darristan's choice how he wishes to fill his request... He is not leaving him hanging and what he said wasn't wrong. Just giving him the answer now leaves him open to request the same thing again tomorrow instead of teaching him to be a future leader here. Plus Annie you can't keep writing stuff for everybody forever! He requested help and darristan provided it, which is the intent of the request section.

Peopleperson49

stydianx · November 6, 2012

finish this one off ... 1 PM less to worry

bossnia_0.9.txt

also give Emistry 5 in this topic for trying <3

btw if the party failed within 30 mins,

they can retry again because this script haven't deny them with gettimetick(2)

THANKS ANNIE!! <3

this is great! thanks also to Emistry!

AnnieRuru · November 6, 2012

.... which is the intent of the request section.

that should be support section ... an I wrong ?

what you are saying is actually correct IF the user post the topic in support section ...

but this is script request section

Script Requests
Need something written but haven't the slightest clue how to do it yourself? Ask here and someone might do it for you!

I'm just doing what the admin has set to the definition

Plus Annie you can't keep writing stuff for everybody forever!

yeah I know ...

it just ... right now I have a feeling that many members here need to learn more advance scripting technique

actually, I'm not quite interested of having my post get up

I'm just want more users aware of some kind of scripting technique that you guys never aware off

you see some of my script, for example that mission board script,

I don't think many members here can understand what's the technique I've used in that script

and I doubt your current level can even make edit on that script too

even emistry also asked me in PM few days ago how to script that function I've used in the script

that's why, when I see some request that looks interesting to me

I'll show off my advance techniques that I couldn't do in script support section

because in script support section, they mostly already know how to do it themself

that's why I do them in script request section,

so I wish some of you here can learn how I solved the problem using my own technique

of course, there're always some people that can script better than me

ToastofDoom and Keyworld also sometimes share out their techniques from time to time

and I also learned a lot from them

you should've noticed I keep mentioned 'credit to keyworld' ... this guy is seriously pro than me

I think you can understand what I'm saying,

because you might've noticed that my scripting style is unique when compare to most users here

... teaching him to be a future leader here ...

now emistry can make such a high standard script

because he had study many scripts that I've made in script request section before, too

he's a fine leader when I was absent in past 1 year ... am I wrong ?

script request is a section to share out your scripting technique ...

... besides getting the script done

I still remember this topic

during that time, GmOcean made that script that I have no words to explain how messy that script was ...

and when compare to mine ... it was like ..... hahaha ... I better don't say xD

but seriously, this is getting very off-topic LMAO

Edited November 6, 2012 by AnnieRuru

Omnipotent · November 6, 2012

I just want to say I enjoyed the history.

stydianx · November 7, 2012

I just want to say I enjoyed the history.

LOL!

imajhaynation · December 20, 2012

how can i change zeny need to tcg 10 pcs needed ?

Emistry · December 20, 2012

if( countitem( 7227 ) < 10 ){
   mes "You need 10 TCG";
   close;
}

delitem 7227,10;

replace the part for zeny checking and zeny deleting part

imajhaynation · December 23, 2012

thanks emistry

Sign In

Bossnia

Question

Link to comment

Share on other sites

Top Posters For This Question

Popular Days

Top Posters For This Question

Popular Days

Popular Posts

Emistry

Emistry

Emistry

63 answers to this question

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Recently Browsing 0 members