Request someone to edit the script

[casteryee]

//Author : goddameit(DeathFire)
//Assist : .g(NihilityFire)
//Test : .g(ShuraFire)
//Web : http://www.okay.hk/?fromuser=goddameit
//Version : 3
prontera,150,180,4 script dps 990,{
function reward {
 set Zeny,Zeny+rand(1,10)*1000+rand(0,999);
 return;
}
function se ;
function de ;
function sd {
 set @dsp_t2,0;
 set @dsp_t3,0;
 set @dsp_t7,0;
 set @dsp_t1,compare(getarg(0),"a1");
 while(!compare(getarg(0),"a"+@dsp_t1+"b"+@dsp_t2))
 {
  set @dsp_t2,@dsp_t2+1;
  if(@dsp_t2%23==0)sleep2(1);
 }

 while(!compare(getarg(0),"d"+@dsp_t3+"e"))
 {
  set @dsp_t3,@dsp_t3+1;
  if(@dsp_t3%53==0)sleep2(1);
 }

 if(!compare(getarg(0),"c"+gettime(7)))
  set @dsp_t3,1;

 if(@dsp_t3==1)
  set @dsp_t1,0;

 if(compare(getarg(0),"a1"))
 {
  if(!sqrt(pow(@dsp_t3-gettime(8),2)))
   set @dsp_t1,1;
  else
   set @dsp_t1,0;
 }

 if(sqrt(pow(@dsp_t3-gettime(8),2))>1)
  set @dsp_t3,1;

 if(@dsp_t3!=1)
  set @dsp_t3,0;

 while(!compare(getarg(0),"e"+@dsp_t7+"f"))
 {
  set @dsp_t7,@dsp_t7+1;
  if(@dsp_t7%53==0)sleep2(1);
 }

}
mes "Welcome to 'Daily sign'";
mes "1.This board is opening";
mes "2.Sign can get ^6600991000~100000^000000z";
mes "3.1 account can sign one time.";
mes "4.It will auto clean messages at 1am.";
if(#dsp$=="")
 set #dsp$,"a0b0c"+gettime(7)+"d"+gettime(8)+"e0f";
sd(#dsp$);
mes "[You ^FF0000"+(@dsp_t1?"already":"not yet")+"^000000 sign]";
if(@dsp_t2)
 mes "[Keep "+@dsp_t2+" days]";
switch(select("Watch","Sign",(getgmlevel()==99?"[Clean]":"")))
{
 case 1:
  se();
 case 2:
  de();
 case 3:
  close2;
  goto OnClen;
}
function de {
 close2;
 if(@dsp_t1)
 {
  mes "You already sign it.";
  close;
 }
 mes "type what you want to talk.";
 mes "if don't, type'(null)'";
 input .@temp$;
 for(set .@i,0;;set .@i,.@i+1)
 {
  if(.@i%37==0)sleep2(1);
  if(getd("$dps_username_"+.@i+"$")=="")
   break;
 }
 set @dsp_t2,@dsp_t2+1;
 set @dsp_t7,@dsp_t7+1;
 if(@dsp_t3==1)
  set @dsp_t2,1;
 setd "$dps_username_"+.@i+"$",strcharinfo(0);
 setd "$dps_usertalk_"+.@i+"$",(.@temp$=="(null)"?"":.@temp$);
 setd "$dps_usertime_"+.@i+"$",gettime(3)+"h"+gettime(2)+"m"+gettime(1)+"s";
 setd "$dps_usertims_"+.@i+"$",@dsp_t2; 
 setd "$dps_usertotl_"+.@i+"$",@dsp_t7;
 set #dsp$,"a1b"+@dsp_t2+"c"+gettime(7)+"d"+gettime(8)+"e"+@dsp_t7+"f";
 mes "complete";
 reward();
 close;
}
function se {
 function ti {
  if(getarg(0)<10)
   return "000"+getarg(0);
  if(getarg(0)<100)
   return "00"+getarg(0);
  if(getarg(0)<1000)
   return "0"+getarg(0);
  return getarg(0);
 }
 close2;
 while(getd("$dps_username_"+.@i+"$")!="")
 {
  if(getd("$dps_usertalk_"+.@i+"$")=="")
  {
   set .@i,.@i+1;
   continue;
  }
  mes "[No."+ti(.@i+1)+"]";
  mes "^FF0000"+getd("$dps_usertime_"+.@i+"$")+" sign in.";
  mes "^8B7500'"+getd("$dps_username_"+.@i+"$")+"'";
  mes "^008B00said:'"+getd("$dps_usertalk_"+.@i+"$")+"'^000000";
  mes "[^008B00keep^000000/^FF0000total ^008B00"+getd("$dps_usertims_"+.@i+"$")+"^000000/^FF0000"+getd("$dps_usertotl_"+.@i+"$")+"^000000 days]";
  mes "=====================";
  set .@i,.@i+1;
  if(.@i%24==0)
  {
   if(select("[continue]","[end]")==1)
 next;
   else
 break;
  }
 }
 close;
}
OnInit:
waitingroom "{[Daily sign]}",0;
OnClock0100:
OnClen:
while(getd("$dps_username_"+.@i+"$")!="")
{
 setd "$dps_username_"+.@i+"$","";
 setd "$dps_usertalk_"+.@i+"$","";
 setd "$dps_usertime_"+.@i+"$","";
 setd "$dps_usertims_"+.@i+"$","";
 setd "$dps_usertotl_"+.@i+"$","";
 set .@i,.@i+1;
}
end;
}

Please someone to help me the script.

I want remove zeny giving but give poring coin.

And If the player login 7 days continuously without break, will reward better item.

[Nameless2you]

Edit the line where it says:

set Zeny,Zeny+rand(1,10)*1000+rand(0,999);

and change it to

getitem 7539,1;

[casteryee]

Thanks, how about the continuous part?

Anyone?

Still waiting for someone to teach, and I willing to learn.

[casteryee]

Still waiting

[plankt]

If I understand you correctly, if they get rewarded 7 days in a row, you want them to get a better reward.

One way to do this is to keep track of:

1) The last day they were rewarded

2) How many days in a row they have been rewarded

And when they get rewarded, you check if it's a subsequent day. If it is, increase the day count, if not set it to 0.

If it reaches 7, they have been active for a week.