Jump to content

Question

Posted

how to fix this error?

=========================================
- shop dyn_shop8 -1,50150
=========================================

ra_temsky,57,145,4 script Donation Armor Shop#8 966,{
mes Your Donation Coupon--[+countitem(.Cost)+];
close2;
callshop dyn_shop+.a,1;
npcshopattach dyn_shop+.a;
end;
OnInit
set .a,strnpcinfo(2);
=========================================
set .Cost,7179;
=========================================
setarray .buy_id[0],2383,2344,2346,2348,2350,2367,2381,2377,2382,2378,2379,2376,2380;
setarray .buy_co[0],20,6,6,6,6,6,6,12,12,12,12,12,12;
=========================================

npcshopitem dyn_shop8,.buy_id[0],.buy_co[0];
for(set .ik,1;.ikgetarraysize(.buy_id);set .ik,.ik+1){
npcshopadditem dyn_shop+.a,.buy_id[.ik],.buy_co[.ik];
}
end;

OnBuyItem
getinventorylist;
if(@bought_quantity[@i] = 0){
goto OnEnrd;
end;
}
for(set @i,0;@igetarraysize(@bought_nameid);set @i,@i+1){
KeyWorld
set .@type, getiteminfo( @bought_nameid[.@i], 2 );
if (  .@type == 4  .@type == 5  .@type == 7  .@type == 8 ) 
set .@count, .@count + 1;
else {
for( set .@j,0; .@j@inventorylist_count; set .@j, .@j+1 )
if ( @inventorylist_id[.@i] == @bought_nameid[.@i] )
break;
if ( .@j == @inventorylist_count )
set .@count, .@count+1 ;
}
for(set @i2,0;@i2getarraysize(.buy_id);set @i2,@i2+1){
if(@bought_nameid[@i]==.buy_id[@i2]){
set @gh,@gh+.buy_co[@i2]@bought_quantity[@i];
set @wh,@wh+getiteminfo(@bought_nameid[@i],6)@bought_quantity[@i];
}
}
}
if ( .@count + @inventorylist_count  100 ) {
announce [D-Shop] Can't hold more than 100 items.,bc_self;
goto OnEnrd;
}
if(countitem(.Cost)@gh){
announce You do not have enough Reunited Donation Ticket.,bc_self;
announce Contact  ADMIN  and try to donate.,bc_self;
goto OnEnrd;
end;
}else{
if(@wh(MaxWeight-Weight)){
announce [D-Shop]Too heavy,bc_self;
goto OnEnrd;
end;
}else{
delitem .Cost,@gh;
for(set @i,0;@igetarraysize(@bought_nameid);set @i,@i+1){
getitem @bought_nameid[@i],@bought_quantity[@i];
} 
}
}
OnEnrd
set @gh,0;
set @wh,0;
set @i,0;
set @i2,0;
deletearray @bought_quantity,getarraysize(@bought_quantity);
deletearray @bought_nameid,getarraysize(@bought_nameid);
end;
}

post-329-0-15372400-1340426478_thumb.jpg

4 answers to this question

Recommended Posts

Posted

//=========================================
- shop dyn_shop8 -1,50150
//=========================================

ra_temsky,57,145,4 script Donation Armor Shop#8 966,{
mes Your Donation Coupon--[+countitem(.Cost)+];
close2;
callshop dyn_shop+.a,1;
npcshopattach dyn_shop+.a;
end;
OnInit
set .a,strnpcinfo(2);
//=========================================
set .Cost,7179;
//=========================================
setarray .buy_id[0],2383,2344,2346,2348,2350,2367,2381,2377,2382,2378,2379,2376,2380;
setarray .buy_co[0],20,6,6,6,6,6,6,12,12,12,12,12,12;
//=========================================

npcshopitem dyn_shop8,.buy_id[0],.buy_co[0];
for(set .ik,1;.ikgetarraysize(.buy_id);set .ik,.ik+1){
npcshopadditem dyn_shop+.a,.buy_id[.ik],.buy_co[.ik];
}
end;

OnBuyItem
getinventorylist;
if(@bought_quantity[@i] = 0){
goto OnEnrd;
end;
}
for(set @i,0;@igetarraysize(@bought_nameid);set @i,@i+1){
KeyWorld
set .@type, getiteminfo( @bought_nameid[.@i], 2 );
if (  .@type == 4  .@type == 5  .@type == 7  .@type == 8 )
set .@count, .@count + 1;
else {
for( set .@j,0; .@j@inventorylist_count; set .@j, .@j+1 )
if ( @inventorylist_id[.@i] == @bought_nameid[.@i] )
break;
if ( .@j == @inventorylist_count )
set .@count, .@count+1 ;
}
for(set @i2,0;@i2getarraysize(.buy_id);set @i2,@i2+1){
if(@bought_nameid[@i]==.buy_id[@i2]){
set @gh,@gh+.buy_co[@i2]@bought_quantity[@i];
set @wh,@wh+getiteminfo(@bought_nameid[@i],6)@bought_quantity[@i];
}
}
}
if ( .@count + @inventorylist_count  100 ) {
announce [D-Shop] Can't hold more than 100 items.,bc_self;
goto OnEnrd;
}
if(countitem(.Cost)@gh){
announce You do not have enough Reunited Donation Ticket.,bc_self;
announce Contact  ADMIN  and try to donate.,bc_self;
goto OnEnrd;
end;
}else{
if(@wh(MaxWeight-Weight)){
announce [D-Shop]Too heavy,bc_self;
goto OnEnrd;
end;
}else{
delitem .Cost,@gh;
for(set @i,0;@igetarraysize(@bought_nameid);set @i,@i+1){
getitem @bought_nameid[@i],@bought_quantity[@i];
}
}
}
OnEnrd
set @gh,0;
set @wh,0;
set @i,0;
set @i2,0;
deletearray @bought_quantity,getarraysize(@bought_quantity);
deletearray @bought_nameid,getarraysize(@bought_nameid);
end;
}

try this

Posted

You also forgot to use " when writing text:

//=========================================
- shop dyn_shop8 -1,50150
//=========================================

ra_temsky,57,145,4 script Donation Armor Shop#8 966,{
mes "Your Donation Coupon--["+countitem(.Cost)+"]";
close2;
callshop dyn_shop+.a,1;
npcshopattach dyn_shop+.a;
end;
OnInit
set .a,strnpcinfo(2);
//=========================================
set .Cost,7179;
//=========================================
setarray .buy_id[0],2383,2344,2346,2348,2350,2367,2381,2377,2382,2378,2379,2376,2380;
setarray .buy_co[0],20,6,6,6,6,6,6,12,12,12,12,12,12;
//=========================================

npcshopitem dyn_shop8,.buy_id[0],.buy_co[0];
for(set .ik,1;.ikgetarraysize(.buy_id);set .ik,.ik+1){
npcshopadditem dyn_shop+.a,.buy_id[.ik],.buy_co[.ik];
}
end;

OnBuyItem
getinventorylist;
if(@bought_quantity[@i] = 0){
goto OnEnrd;
end;
}
for(set @i,0;@igetarraysize(@bought_nameid);set @i,@i+1){
//KeyWorld
set .@type, getiteminfo( @bought_nameid[.@i], 2 );
if (  .@type == 4  .@type == 5  .@type == 7  .@type == 8 )
set .@count, .@count + 1;
else {
for( set .@j,0; .@j@inventorylist_count; set .@j, .@j+1 )
if ( @inventorylist_id[.@i] == @bought_nameid[.@i] )
break;
if ( .@j == @inventorylist_count )
set .@count, .@count+1 ;
}
for(set @i2,0;@i2getarraysize(.buy_id);set @i2,@i2+1){
if(@bought_nameid[@i]==.buy_id[@i2]){
set @gh,@gh+.buy_co[@i2]@bought_quantity[@i];
set @wh,@wh+getiteminfo(@bought_nameid[@i],6)@bought_quantity[@i];
}
}
}
if ( .@count + @inventorylist_count  100 ) {
announce "[D-Shop] Can't hold more than 100 items.",bc_self;
goto OnEnrd;
}
if(countitem(.Cost)@gh){
announce "You do not have enough Reunited Donation Ticket.",bc_self;
announce "Contact  ADMIN  and try to donate.",bc_self;
goto OnEnrd;
end;
}else{
if(@wh(MaxWeight-Weight)){
announce "[D-Shop]Too heavy",bc_self;
goto OnEnrd;
end;
}else{
delitem .Cost,@gh;
for(set @i,0;@igetarraysize(@bought_nameid);set @i,@i+1){
getitem @bought_nameid[@i],@bought_quantity[@i];
}
}
}
OnEnrd
set @gh,0;
set @wh,0;
set @i,0;
set @i2,0;
deletearray @bought_quantity,getarraysize(@bought_quantity);
deletearray @bought_nameid,getarraysize(@bought_nameid);
end;
}

Posted

@ @Hatake Kakashi

You've removed the '//' (comment) on the llne ========================

just add // like this

// ================================= 

Yeah but he also forgot to use " when writing text.

His code:

mes Your Donation Coupon--[+countitem(.Cost)+];

How it should be:

mes "Your Donation Coupon--["+countitem(.Cost)+"]";

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.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...