Need some scripting help, if statement and another question

Here you can post threads requesting help on the official POL Ultima Online Emulator Core 097.
Note: Core 097 is no longer officially supported.

Moderator: POL Developer

Post Reply
Poi
Grandmaster Poster
Posts: 298
Joined: Fri Apr 14, 2006 9:36 am

Need some scripting help, if statement and another question

Post by Poi »

I used to script back on 94 a little bit, but I haven't done any scripting for ever, but this is what I got so far:

Code: Select all

use uo;
use os;

include ":magery:spells";
include "include/sounds";

program textcmd_xf( staff )

if ( staff.concealed < 1 )

PrintTextAbove( staff, "Farewell!", font := 3, color := 73 );
PrintTextAbove( staff, "Never let your fire die!", font := 3, color := 73 );
sleepms(250);
PerformAction(staff,17);
PlaySoundEffect(staff, SFX_EXPLOSION_7);
PlayFlameStrikeEffect(staff);
staff.concealed := 1;

endif

endprogram

When I go to compile it, it tells me there is a problem with my If statement, and that PlayFlameStrikeEffect(staff); doesn't exist, I figured that part wouldn't exist, it was just a hope that it would. I took that part form another script that says PlayLightningBolteEffect(staff); so I was hoping it might work, but it doesn't, so I want to figure out how to make flame strikes in a specific location.

Any help is greatly appreciated :)


EDIT:
I got the flamestrike part done, so I just need to know whats wrong with my if statement

This is my updated script:

Code: Select all

use uo;
use os;

include ":magery:spells";
include "include/sounds";

program textcmd_xf( staff )

if ( staff.concealed < 1 )
PrintTextAbove( staff, "Farewell!", font := 3, color := 73 );
PrintTextAbove( staff, "Never let your fire die!", font := 3, color := 73 );
sleepms(250);
PerformAction(staff,17);
	PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlaySoundEffect(who,0xf8);
staff.concealed := 1;
endif


if ( staff.concealed > 0 )
sleepms(250);
PerformAction(staff,17);
	PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlaySoundEffect(who,0xf8);
staff.concealed := 0;
PrintTextAbove( staff, "Greetings!", font := 3, color := 73 );
endif

endprogram
Justae
Expert Poster
Posts: 79
Joined: Thu May 24, 2007 2:12 pm
Location: South Africa

Re: Need some scripting help, if statement and another quest

Post by Justae »

You need to define 'who' or else change 'staff' to 'who' or vice versa.
Variable 'who' is not defined at this stage.

This works just fine although for my compile I commented-out the two includes as I do not have those. :

Code: Select all

use uo;
use os;

include ":magery:spells";
include "include/sounds";

program textcmd_xf( who )

	if ( who.concealed < 1 )
		PrintTextAbove( who, "Farewell!", font := 3, color := 73 );
		PrintTextAbove( who, "Never let your fire die!", font := 3, color := 73 );
		sleepms(250);
		PerformAction(who,17);
		PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlaySoundEffect(who,0xf8);
		who.concealed := 1;
	endif

	if ( who.concealed > 0 )
		sleepms(250);
		PerformAction(who,17);
		PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
		sleepms(500);
		
		PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
		PlaySoundEffect(who,0xf8);
		who.concealed := 0;
		PrintTextAbove( who, "Greetings!", font := 3, color := 73 );
	endif

endprogram
Regards,
Justae
Poi
Grandmaster Poster
Posts: 298
Joined: Fri Apr 14, 2006 9:36 am

Re: Need some scripting help, if statement and another quest

Post by Poi »

Ahh, didn't even think of that, but I got it working too, heres what I have now:

Code: Select all

use uo;
use os;

include ":magery:spells";
include "include/sounds";

program textcmd_xf( who )

if ( who.concealed < 1 )
PrintTextAbove( who, "Farewell!", font := 3, color := 73 );
PrintTextAbove( who, "Never let your fire die!", font := 3, color := 73 );
sleepms(250);
PerformAction(who,17);
	PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlaySoundEffect(who,0xf8);
who.concealed := 1;
endif


if ( who.concealed > 0 )
sleepms(250);
	PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
	sleepms(500);

	PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
	PlaySoundEffect(who,0xf8);
who.concealed := 0;
PerformAction(who,17);
PrintTextAbove( who, "Greetings!", font := 3, color := 73 );
endif

endprogram
Now my problem is when I use the text command, first it conceals me, and then it unconceals me, I need it to conceal me if im not concealed, and unconceal if I am concealed, but for some reason its doing both, should I put endprogram right before both endif's?


Nevermind, got it working :) return 0;
Justae
Expert Poster
Posts: 79
Joined: Thu May 24, 2007 2:12 pm
Location: South Africa

Re: Need some scripting help, if statement and another quest

Post by Justae »

So you want it to toggle, if concealed, unconceal. If unconcealed, conceal. You just need to change the structure of the If....endif to if...else...endif :

Code: Select all

use uo;
use os;

include ":magery:spells";
include "include/sounds";

program textcmd_xf( who )

if ( !who.concealed )   // if NOT concealed say bye bye and conceal

   PrintTextAbove( who, "Farewell!", font := 3, color := 73 );
   PrintTextAbove( who, "Never let your fire die!", font := 3, color := 73 );
   sleepms(250);
   PerformAction(who,17);
   PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlaySoundEffect(who,0xf8);
   who.concealed := 1;

else             // else you are concealed, so you're going to unconceal and greet

   PerformAction(who,17);
   sleepms(250);

   PlayStationaryEffect( who.x+5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-5, who.y-5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+5, who.y+5, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-4, who.y-4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+4, who.y+4, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-3, who.y-3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+3, who.y+3, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-2, who.y-2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+2, who.y+2, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x+1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x-1, who.y-1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlayStationaryEffect( who.x+1, who.y+1, who.z, 0x3709, 0x0a, 0x1e, 0 );
   sleepms(500);

   PlayStationaryEffect( who.x, who.y, who.z, 0x3709, 0x0a, 0x1e, 0 );
   PlaySoundEffect(who,0xf8);
   PrintTextAbove( who, "Greetings!", font := 3, color := 73 );

endif

endprogram
Depends if you want to unconceal before effects or after, just move the lines of code which do those functions. Should work as it is above.

Regards,
Justae.
Post Reply