Gammon Forum : SMAUG : SMAUG coding : Timer - re-run

Register forum user name Search FAQ

Gammon Forum

Entire forum

SMAUG

SMAUG coding

Timer - re-run

Timer - re-run

It is now over 60 days since the last post. This thread is closed. Refresh page

Pages: 1 2

Posted by Samryn United Kingdom (60 posts) bio

Date

Sat 06 Aug 2005 04:02 PM (UTC)

Amended on Sat 06 Aug 2005 05:50 PM (UTC) by Samryn

Message

I'm kinda new with timers and aint had much experience with them, but i was just wondering if there is a way of making a timer RE-RUN once its completed it for the first time.
Reason i ask is because im doing a do_trance command which is slightly different than the other one thats on here, i want it so the player types trance, and it will allow the player to trance until it reachs its max_mana.

Here is what i have so far:-


void do_trance( CHAR_DATA *ch, char *argument )
{
   int percent;
   
    switch( ch->substate )
    {
        default:
            if ( IS_NPC(ch) && IS_AFFECTED( ch, AFF_CHARM ) )
            {
                send_to_char( "You can't concentrate enough for that.\n\r", ch );
                return;
            }
            if ( ch->mount )
            {
                send_to_char( "You can't concentrate, whiles being mounted.\n\r", ch );
                return;
            }
			act( AT_ACTION, "You enter a peaceful trance, collecting mana as you rest.", ch, NULL, NULL, TO_CHAR );
			ch->position = POS_TRANCE;
			add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 );
			return;
			
	   case 1:
	      	if (ch->position != POS_TRANCE)
			{
			 send_to_char("Something went wrong...\n\r", ch);
			 return;
			}
			  
	   case SUB_TIMER_DO_ABORT:
	   		if (ch->mana >= ch->max_mana)
		   	  {
			  send_to_char("You complete your trance.\n\r", ch);
			  return;
			  }
			  
	       if (ch->mana < ch->max_mana)
			 percent = number_percent( ) + number_percent( ) - ( ch->level / 10 );
	       	 if (can_use_skill( ch, number_percent(), gsn_trance ) )
			 {
			 send_to_char("You fail to gain any mana.\n\r", ch);
			 learn_from_failure( ch, gsn_trance );
			 add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 );
			 return;
			 }else{
			 send_to_char("You gain some mana from your trance.\n\r", ch);
			 if (ch->mana < (ch->max_mana - 50))
			 {
			 ch->mana = (ch->mana + 50);
			 }else{
			 ch->mana = ch->max_mana;
			 }
			 add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 );
			 learn_from_success( ch, gsn_trance );
			 return;
			 }
		   }
}

Thanks,
Samryn

Samryn Medri

Posted by

David Haley USA (3,881 posts)

Date

Reply #1 on Sat 06 Aug 2005 09:14 PM (UTC)

Message

Why not just call add_timer again? You don't really need to make the same one run again, just make a new one.

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by

Samryn United Kingdom (60 posts)

Date

Reply #2 on Sat 06 Aug 2005 09:30 PM (UTC)

Message

how would i call the timer again? Im pretty new to timers so still trying to work them out.. sorry.

Samryn Medri

Posted by David Haley USA (3,881 posts) bio

Date Reply #3 on Sun 07 Aug 2005 01:11 AM (UTC)

Message

Look at this code, from what you posted:

			act( AT_ACTION, "You enter a peaceful trance, collecting mana as you rest.", ch, NULL, NULL, TO_CHAR );
			ch->position = POS_TRANCE;
			add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 ); /* <-- THIS LINE */
			return;

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by Samryn United Kingdom (60 posts) bio

Date

Reply #4 on Sun 07 Aug 2005 01:31 AM (UTC)

Amended on Sun 07 Aug 2005 01:33 AM (UTC) by Samryn

Message

ohhh, i did that in the code anyway.



			 add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 ); <--- here..

			 learn_from_success( ch, gsn_trance ); 



and



			 learn_from_failure( ch, gsn_trance );

			 add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 ); <--- here..

but when the player type trance, it only runs throught the code once, and doesn't repeat the code again, which sucks as i need it to read the code again until the plaer has full many or has interupted the trance, but if im able to make it read the code again, i'll be able to do the interupting thing from there anyway... its just getting it to read it again which is the problem :(

-- Samryn

Samryn Medri

Posted by

David Haley USA (3,881 posts)

Date

Reply #5 on Sun 07 Aug 2005 01:59 AM (UTC)

Message

Then you probably want to start the timer again in the case1, which is where the code will enter when the command is called by the timer. You'd want to check max mana and all that, and if it's not at the maximum, do the timer again.

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by Samryn United Kingdom (60 posts) bio

Date Reply #6 on Sun 07 Aug 2005 01:08 PM (UTC)

Message

ok did the changes and still getting the same reaction from it, some reason it just wont allow the timer to restart itself.

Just for testing purposes i put do_trance(ch, "auto"); inside the code, to make it self do the command again.. it works ok with that but one slight problem. It doesn't slow the process down, it all comes something like:-



You gain some mana from your trance.

You fail to gain any mana.

You gain some mana from your trance.

You fail to gain any mana.

You fail to gain any mana.

You gain some mana from your trance.

You gain some mana from your trance.

You gain some mana from your trance.

You gain some mana from your trance.

You complete your trance.

when really i want them to come out alot slower than that, and also allows the character cancel it, hence the reason i cant use the wait statement... Any ideas how i can get the timer working or something to slow it down? but without just lagging the player.

Samryn Medri

Posted by

David Haley USA (3,881 posts)

Date

Reply #7 on Sun 07 Aug 2005 08:01 PM (UTC)

Message

Can you show me the code, please? It's hard to debug this without seeing what exactly you've done.

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by Samryn United Kingdom (60 posts) bio

Date Reply #8 on Sun 07 Aug 2005 08:04 PM (UTC)

Message

sure :) and thanks for helping out...


void do_trance( CHAR_DATA *ch, char *argument )
{
   int percent;
   
    switch( ch->substate )
    {
        default:
            if ( IS_NPC(ch) && IS_AFFECTED( ch, AFF_CHARM ) )
            {
                send_to_char( "You can't concentrate enough for that.\n\r", ch );
                return;
            }
			
            if ( ch->mount )
            {
                send_to_char( "You can't concentrate, whiles being mounted.\n\r", ch );
                return;
            }
			
			act( AT_MAGIC, "You enter a peaceful trance, collecting mana as you rest.", ch, NULL, NULL, TO_CHAR );
			ch->position = POS_TRANCE;
			add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 );
			return;
			
	   case 1:
	   		if (ch->mana >= ch->max_mana)
		   	  {
			  send_to_char_color("&BYou complete your trance.\n\r", ch);
			  ch->position = POS_STANDING;
			  return;
			  }
			  
	       if (ch->mana < ch->max_mana)
		     {
			 percent = number_percent( ) + number_percent( ) - ( ch->level / 10 );
	       	 if (can_use_skill( ch, percent, gsn_trance ) )
			 {
			 send_to_char_color("&BYou fail to gain any mana.\n\r", ch);
			 learn_from_failure( ch, gsn_trance );
			 ch->position = POS_STANDING;
			 add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 );
			 return;
			 }else{
			 send_to_char_color("&BYou gain some mana from your trance.\n\r", ch);
			   if (ch->mana < (ch->max_mana - 50))
			   {
			   ch->mana = (ch->mana + 50);
			   }else{
			   ch->mana = ch->max_mana;
			   }
			 learn_from_success( ch, gsn_trance );
			 ch->position = POS_STANDING;
			 add_timer( ch, TIMER_DO_FUN, 3, do_trance, 1 );
			 return;
			 }
			 }
			  
	   case SUB_TIMER_DO_ABORT:
	      if (ch->position != POS_TRANCE)
			{
			 send_to_char("Something went wrong...\n\r", ch);
			 bug("do_trance: Character didn't go in POS_TRANCE -report to samryn",0);
			 return;
			}
	  }
}

Samryn Medri

Posted by

David Haley USA (3,881 posts)

Date

Reply #9 on Mon 08 Aug 2005 02:26 AM (UTC)

Message

So, just to make sure I have all the details, when you run that code you get:
- "You enter a peaceful trance" etc.
- 3 seconds go by
- You get the first trance result message
- nothing more happens

This won't fix your problem, but it probably isn't right: why are you resetting the character position to standing right before adding another timer?

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by Samryn United Kingdom (60 posts) bio

Date Reply #10 on Mon 08 Aug 2005 11:12 AM (UTC)

Message

because it keeps not working correctly so, i have to knock the person back into POS_STANDING, and its also the minpos on the spell... after sset'ing it to minpos 12.

So if i didn't do it, the character will stay in POS_TRANCE and will not be removed from it. As soon as i can get it to recall to itself and allow the code to finish itself to the "You complete your trance" i can then make them go back to the position. Or if they break out, i can change the position by interp.c

Thanks for your help again, much appreciated.

and yep, your right about the way it shows..



- "You enter a peaceful trance" etc.

- 3 seconds go by

- You get the first trance result message

- nothing more happens

-- Samryn

Samryn Medri

Posted by David Haley USA (3,881 posts) bio

Date Reply #11 on Mon 08 Aug 2005 04:24 PM (UTC)

Message

I think I found the source of your problem. On my copy of SMAUG - which, admittedly, is based off of SMAUG 1.0 - I have this in the 'violence_update' function:

        for ( timer = ch->first_timer; timer; timer = timer_next )
        {
            timer_next = timer->next;
            if ( --timer->count <= 0 )
            {
                if ( timer->type == TIMER_DO_FUN )
                {
                    int tempsub;

                    tempsub = ch->substate;
                    ch->substate = timer->value;
                    (timer->do_fun)( ch, "" );
                    if ( char_died(ch) )
                        break;
                    ch->substate = tempsub; 
                }
                extract_timer( ch, timer );
            }
        }

What does this mean? Well, it means that after executing a timer, it is removed. However, if we look at the 'add_timer' function...

void add_timer( CHAR_DATA *ch, sh_int type, sh_int count, DO_FUN *fun, int value )
{
    TIMER *timer;
    
    for ( timer = ch->first_timer; timer; timer = timer->next )
    {
        if ( timer->type == type )
        {
           timer->count  = count;
           timer->do_fun = fun;
           timer->value  = value;
           break;
        }
    }

    if ( !timer )
    {
        CREATE( timer, TIMER, 1 );
        timer->count    = count;
        timer->type = type;
        timer->do_fun   = fun;
        timer->value    = value;
        LINK( timer, ch->first_timer, ch->last_timer, next, prev );
    }
}

Here, we see that when we add a timer, we first loop through the existing timers, seeing if we already have one of that type.

In your case, we do have a timer, because we're in the middle of executing one, and we haven't removed it yet. So, we'll edit it, and then we'll remove it right after running it!

To fix this, we'll have to make sure that the timer is not extracted in violence_update if it has count left. This should be as simple as adding:

if ( timer->count == 0 )

before the 'extract_timer' call.

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by

Samryn United Kingdom (60 posts)

Date

Reply #12 on Mon 08 Aug 2005 05:00 PM (UTC)

Message

after adding the little bit just before the new add_timer... i got this error message after trying to compile.

skills.c: In function `do_trance':
skills.c:4128: error: `timer' undeclared (first use in this function)
skills.c:4128: error: (Each undeclared identifier is reported only once
skills.c:4128: error: for each function it appears in.)
make[1]: *** [o/skills.o] Error 1
make: *** [all] Error 2

Sorry for the hassel this is causing...

-- Samryn

Samryn Medri

Posted by

David Haley USA (3,881 posts)

Date

Reply #13 on Mon 08 Aug 2005 05:28 PM (UTC)

Message

Why are you adding it in skills.c? You were supposed to add it before the extract_timer call I showed you from violence_update, which is in fight.c. :-)

David Haley aka Ksilyan
Head Programmer,
Legends of the Darkstone

http://david.the-haleys.org

Posted by

Samryn United Kingdom (60 posts)

Date

Reply #14 on Mon 08 Aug 2005 07:06 PM (UTC)

Message

Hey sorry about taking so long to reply, had a powercut.

and it works great! thanks for all the time you've put in, muchly appreciated...

-- Samryn

Samryn Medri

The dates and times for posts above are shown in Universal Co-ordinated Time (UTC).

To show them in your local time you can join the forum, and then set the 'time correction' field in your profile to the number of hours difference between your location and UTC time.

38,986 views.

This is page 1, subject is 2 pages long: 1 2

It is now over 60 days since the last post. This thread is closed. Refresh page

Go to topic: Search the forum

Quick links: MUSHclient. MUSHclient help. Forum shortcuts. Posting templates. Lua modules. Lua documentation.

Information and images on this site are licensed under the Creative Commons Attribution 3.0 Australia License unless stated otherwise.

Comments to: Gammon Software support
Forum RSS feed ( https://gammon.com.au/rss/forum.xml )