Jump to content
  • 0

Can I request random castle drop prize


Famous

Question


  • Group:  Members
  • Topic Count:  145
  • Topics Per Day:  0.03
  • Content Count:  455
  • Reputation:   3
  • Joined:  06/19/12
  • Last Seen:  

prontera,155,181,5    script    Sample    757,{
set .@guild_id,getcharid(2);

if( !.@guild_id ){
    mes "You dont have a guild.";
}else if( getguildmasterid( .@guild_id ) == getcharid(0) ){
    mes "Select your Castle...";
    set .@i,select( .castle_menu$ ) - 1;
    if( $castle_reward & .@i << 2 ){
        mes "You already claimed this.";
    }else{
        mes "Here's your items...";
        getitem 7073,1;
        getitem 7074,1;
        getitem 7075,1;
        set $castle_reward,$castle_reward + ( .@i << 2 ); 
    }
}else{
    mes "Nothing i can do for you..";
}
close;
    
    
OnAgitEnd;
    switch( gettime(4) ){
        Case 0:    //    sunday
            setarray .@today_woe_map$,"aldeg_cas01","aldeg_cas03";
            break;
        Case 1:    //    monday
            setarray .@today_woe_map$,"prtg_cas01","prtg_cas03";
            break;
        Case 2:    //    tuesday
            setarray .@today_woe_map$,"payg_cas01","payg_cas03";
            break;
        Case 3:    //    wednesday
            setarray .@today_woe_map$,"gefg_cas01","gefg_cas03";
            break;
        Case 4:    //    thursday
            setarray .@today_woe_map$,"prtg_cas01","prtg_cas03";
            break;
        Case 5:    //    friday
            setarray .@today_woe_map$,"aldeg_cas01","aldeg_cas03";
            break;
        Case 6:    //    saturday
            setarray .@today_woe_map$,"payg_cas01","payg_cas03";
        default: break;
    }
    set .@today_map_size,getarraysize( .@today_woe_map$ );
    for( set .@x,0; .@x < .castle_size; set .@x,.@x + 1 )
        for( set .@y,0; .@y < .@today_map_size; set .@y,.@y + 1 )
            if( .castle$[.@x] == .@today_woe_map$[.@y] )
                if( $castle_reward & ( .@x << 2 ) ){
                    set $castle_reward,$castle_reward - ( .@x << 2 );
                    break;
                }
    end;
    
OnInit:
setarray .castle$,
    aldeg_cas01,
    aldeg_cas02,
    aldeg_cas03,
    aldeg_cas04,
    aldeg_cas05,
    gefg_cas01,
    gefg_cas02,
    gefg_cas03,
    gefg_cas04,
    gefg_cas05,
    payg_cas01,
    payg_cas02,
    payg_cas03,
    payg_cas04,
    payg_cas05,
    prtg_cas01,
    prtg_cas02,
    prtg_cas03,
    prtg_cas04,
    prtg_cas05;
set .castle_size,getarraysize( .castle$ );
for( set .@i,0; .@i < .castle_size; set .@i,.@i + 1 )
    set .castle_menu$,.castle_menu$ + getcastlename( .castle$[.@i] ) +":";
end;
}

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

 

how to make it guildmaster will choose only one 1 item he desire to get..

Link to comment
Share on other sites

6 answers to this question

Recommended Posts


  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10015
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  

change

    }else{
        mes "Here's your items...";
        getitem 7073,1;
        getitem 7074,1;
        getitem 7075,1;
        set $castle_reward,$castle_reward + ( .@i << 2 ); 
    }

to this

    }else{	
		switch( select( "Prize 1","Prize 2","Prize 3" ) ){
			Case 1: getitem 7073,1; break;
			Case 2: getitem 7074,1; break;
			Case 3: getitem 7075,1; break;
			default: break;
		}
       set $castle_reward,$castle_reward + ( .@i << 2 ); 
    }
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  145
  • Topics Per Day:  0.03
  • Content Count:  455
  • Reputation:   3
  • Joined:  06/19/12
  • Last Seen:  

thank you so much ^_^




umbala,98,151,5	script	Castle Drop	757,{
set .@guild_id,getcharid(2);

if( !.@guild_id ){
	mes "You dont have a guild.";
}else if( getguildmasterid( .@guild_id ) == getcharid(0) ){
	mes "Select your Castle...";
	set .@i,select( .castle_menu$ ) - 1;
	if( $castle_reward & .@i << 2 ){
		mes "You already claimed this.";
	}else{
		switch( select( "Prize 1","Prize 2","Prize 3","Prize 4","Prize 5","Prize 6","Prize 7","Prize 8","Prize 9","Prize 10","Prize 11","Prize 12","Prize 13","Prize 14","Prize 15","Prize 16","Prize 17","Prize 18","Prize 19","Prize 20","Prize 21","Prize 22","Prize 23","Prize 24" ) ){
		getitem 7073,1; break;
		getitem 7074,1; break;
		getitem 7075,1; break;
		getitem 7076,1; break;
		getitem 7077,1; break;
		getitem 7078,1; break;
		getitem 7079,1; break;
		getitem 7081,1; break;
		getitem 7080,1; break;
		getitem 7081,1; break;
		getitem 7082,1; break;
		getitem 7083,1; break;
		getitem 7084,1; break;
		getitem 7085,1; break;
		getitem 7086,1; break;
		getitem 7087,1; break;
		getitem 7088,1; break;
		getitem 7089,1; break;
		getitem 7090,1; break;
		getitem 7091,1; break;
		getitem 7092,1; break;
		getitem 7837,1; break;
		getitem 7831,1; break;
		getitem 7832,1; break;
		default: break; break;
		}
		set $castle_reward,$castle_reward + ( .@i << 2 ); 
	}
}else{
	mes "Nothing i can do for you..";
}
close;
	
	
OnAgitEnd;
	switch( gettime(4) ){
		Case 0:	//	sunday
			setarray .@today_woe_map$,"aldeg_cas01","aldeg_cas03";
			break;
		Case 1:	//	monday
			setarray .@today_woe_map$,"prtg_cas01","prtg_cas03";
			break;
		Case 2:	//	tuesday
			setarray .@today_woe_map$,"payg_cas01","payg_cas03";
			break;
		Case 3:	//	wednesday
			setarray .@today_woe_map$,"gefg_cas01","gefg_cas03";
			break;
		Case 4:	//	thursday
			setarray .@today_woe_map$,"prtg_cas01","prtg_cas03";
			break;
		Case 5:	//	friday
			setarray .@today_woe_map$,"aldeg_cas01","aldeg_cas03";
			break;
		Case 6:	//	saturday
			setarray .@today_woe_map$,"payg_cas01","payg_cas03";
		default: break;
	}
	set .@today_map_size,getarraysize( .@today_woe_map$ );
	for( set .@x,0; .@x < .castle_size; set .@x,.@x + 1 )
		for( set .@y,0; .@y < .@today_map_size; set .@y,.@y + 1 )
			if( .castle$[.@x] == .@today_woe_map$[.@y] )
				if( $castle_reward & ( .@x << 2 ) ){
					set $castle_reward,$castle_reward - ( .@x << 2 );
					break;
				}
	end;
	
OnInit:
setarray .castle$,
	aldeg_cas01,
	aldeg_cas02,
	aldeg_cas03,
	aldeg_cas04,
	aldeg_cas05,
	gefg_cas01,
	gefg_cas02,
	gefg_cas03,
	gefg_cas04,
	gefg_cas05,
	payg_cas01,
	payg_cas02,
	payg_cas03,
	payg_cas04,
	payg_cas05,
	prtg_cas01,
	prtg_cas02,
	prtg_cas03,
	prtg_cas04,
	prtg_cas05;
set .castle_size,getarraysize( .castle$ );
for( set .@i,0; .@i < .castle_size; set .@i,.@i + 1 )
	set .castle_menu$,.castle_menu$ + getcastlename( .castle$[.@i] ) +":";
end;
}

how should this one work?



0t38.jpg

Link to comment
Share on other sites


  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10015
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  


Case 1: getitem 7073,1; break;

Case 2: getitem 7074,1; break;

Case 3: getitem 7075,1; break;

...

...

...

...

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  145
  • Topics Per Day:  0.03
  • Content Count:  455
  • Reputation:   3
  • Joined:  06/19/12
  • Last Seen:  

I still have same error

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  50
  • Topics Per Day:  0.01
  • Content Count:  1702
  • Reputation:   238
  • Joined:  09/05/12
  • Last Seen:  

I still have same error

 

switch( select( "Prize 1","Prize 2","Prize 3","Prize 4","Prize 5","Prize 6","Prize         7","Prize 8","Prize 9","Prize 10","Prize 11","Prize 12","Prize 13","Prize 14","Prize 15","Prize 16","Prize 17","Prize 18","Prize 19","Prize 20","Prize 21","Prize 22","Prize 23","Prize 24" ) ) {
            Case 1: getitem 7073,1; break;
            Case 2: getitem 7074,1; break;
            Case 3: getitem 7075,1; break;
            Case 4: getitem 7076,1; break;
            Case 5: getitem 7077,1; break;
            Case 6: getitem 7078,1; break;
            Case 7: getitem 7079,1; break;
            Case 8: getitem 7081,1; break;
            Case 9: getitem 7080,1; break;
            Case 10: getitem 7081,1; break;
            Case 11: getitem 7082,1; break;
            Case 12: getitem 7083,1; break;
            Case 13: getitem 7084,1; break;
            Case 14: getitem 7085,1; break;
            Case 15: getitem 7086,1; break;
            Case 16: getitem 7087,1; break;
            Case 17: getitem 7088,1; break;
            Case 18: getitem 7089,1; break;
            Case 19: getitem 7090,1; break;
            Case 20: getitem 7091,1; break;
            Case 21: getitem 7092,1; break;
            Case 22: getitem 7837,1; break;
            Case 23: getitem 7831,1; break;
            Case 24: getitem 7832,1; break;
            default: break;
Link to comment
Share on other sites


  • Group:  Developer
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  2407
  • Reputation:   613
  • Joined:  07/05/12
  • Last Seen:  

-    OnAgitEnd;
+    OnAgitEnd:

replace ; by :

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...