How do you set timeouts or delay on plugins [.pl]

[einbroch]

Here is an example

Code: Select all

	Commands::cmdStand();
	Commands::cmdUseSkill('sp', '29 "'.$payloadName.'"');
	sleep 2;
	# Cast Blessing to player
	Commands::cmdUseSkill('sp', '34 "'.$payloadName.'"');
	sleep 2;
	Commands::run("c hello'");

sleep this doesn't seem to work well

[EternalHarvest]

Maybe Task::Chained or Task::Timeout can be used for that - create the task you need and add it to $taskManager.

[einbroch]

@Eternal Harvest

Thank you, could you give me a quick example. If not, does openkore have a wiki for plugin development, I would definitely appreciate that.

[EternalHarvest]

Just search for these names in OpenKore's sources and you'll find all the usage examples available.

[einbroch]

Hi

Here is what I came up with:

Code: Select all

	my $buffAndSay = new Task::Chained(
		tasks => [
			new Task::SitStand(mode => 'stand'),
			new Task::Wait(seconds => 1),
			new Task::Function(function => sub {
				 # $task is the Task::Function object.
				 my ($task) = @_;
				 # Cast Increase Agi to Player
				 Commands::cmdUseSkill('sp', '29 "'.$payloadName.'"');
				 $task->setDone();
			}),
			new Task::Wait(seconds => 3),
			new Task::Function(function => sub {
				 # $task is the Task::Function object.
				 my ($task) = @_;
				 # Cast Blessing Agi to Player
				 Commands::cmdUseSkill('sp', '34 "'.$payloadName.'"');
				 $task->setDone();
			}),
			new Task::Wait(seconds => 1),
						new Task::Function(function => sub {
				 # $task is the Task::Function object.
				 my ($task) = @_;
				 # Ecxecute autowarp
				 Commands::run("c hello'");
				 $task->setDone();
			}),
		]
	);
	$taskManager->add($buffAndSay );

I get this error:

Code: Select all

Can't call method "isa" on an undefined value at src/Task/SitStand.pm line 55.

[EternalHarvest]

Code: Select all

new Task::SitStand(actor => $char, mode => 'stand')

[einbroch]

@EternalHarvest

I get this error:

Code: Select all

Can't locate object "new" via package "Task::SitStand"

my bad, I forgot:

Code: Select all

use Task::SitStand;