.createpentagram

Get Help on scripting in POL with configurations, config setups, script trouble shooting, etc.
Post Reply
westrupp
Adept Poster
Posts: 89
Joined: Wed Aug 01, 2007 3:07 am

.createpentagram

Post by westrupp »

Code: Select all

use uo;
use os;

include "include/logger";

program MakePent( who )

	var x := who.x;
	var y := who.y - 5;
	var z := who.z;

var item := TargetCoordinates( who );
	
item:=CreateItemAtLocation( (x + 2) , (y + 7) , z , 0x1CF1 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 1) , (y + 7) , z , 0x1CF2 , 1 );
item.movable := 0;
item:=CreateItemAtLocation(  x      , (y + 7) , z , 0x1CF3 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 1) , (y + 7) , z , 0x1CF4 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 2) , (y + 7) , z , 0x1CF5 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 2) , (y + 6) , z , 0x1CF6 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 2) , (y + 5) , z , 0x1CF7 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 2) , (y + 4) , z , 0x1CF8 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 2) , (y + 3) , z , 0x1CF9 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 1) , (y + 3) , z , 0x1CFA , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 1) , (y + 2) , z , 0x1CFB , 1 );
item.movable := 0;
item:=CreateItemAtLocation(  x      , (y + 2) , z , 0x1CFC , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 1) , (y + 2) , z , 0x1CFD , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 2) , (y + 2) , z , 0x1CFE , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 3) , (y + 2) , z , 0x1CFF , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 3) , (y + 3) , z , 0x1D00 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 3) , (y + 4) , z , 0x1D01 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 3) , (y + 5) , z , 0x1D02 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 3) , (y + 6) , z , 0x1D03 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 2) , (y + 6) , z , 0x1D04 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 1) , (y + 6) , z , 0x1D05 , 1 );
item.movable := 0;
item:=CreateItemAtLocation(  x      , (y + 6) , z , 0x1D06 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 1) , (y + 6) , z , 0x1D07 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 1) , (y + 5) , z , 0x1D08 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x - 1) , (y + 4) , z , 0x1D09 , 1 );
item.movable := 0;
item:=CreateItemAtLocation(  x      , (y + 3) , z , 0x1D0A , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 1) , (y + 3) , z , 0x1D0B , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 2) , (y + 3) , z , 0x1D0C , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 2) , (y + 4) , z , 0x1D0D , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 2) , (y + 5) , z , 0x1D0E , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 1) , (y + 5) , z , 0x1D0F , 1 );
item.movable := 0;
item:=CreateItemAtLocation(  x      , (y + 5) , z , 0x1D10 , 1 );
item.movable := 0;
item:=CreateItemAtLocation(  x      , (y + 4) , z , 0x1D11 , 1 );
item.movable := 0;
item:=CreateItemAtLocation( (x + 1) , (y + 4) , z , 0x1D12 , 1 );
item.movable := 0;
	
Endprogram
the script compile normal but say ingame cmd dont exist...what i making wrong?

Thanks,[/code]
Top
coltain
Grandmaster Poster
Posts: 159
Joined: Tue Mar 20, 2007 7:17 am

Post by coltain »

is it in text command directory???
Top
Pierce
Forum Regular
Posts: 420
Joined: Thu Feb 02, 2006 8:33 am

Post by Pierce »

Where is this script located?
If it is in e.g. scripts/textcmd/"whatevercmdlevel/" you can use it once it is there. If it is in something like another pkg like e.g. pkg/whatever/textcmd/"whatevercmdlevel/" the new command needs a server restart.
That's at least my experience :D
Top
User avatar
*Edwards
Forum Regular
Posts: 303
Joined: Fri Dec 28, 2007 11:19 pm

Post by *Edwards »

[...]
5+5 = 10
6+4 = 10
3+7 = 10
20 -10 = 10
[...]

That's the same with coding...

Code: Select all

use uo; 

program MakePent( mobile ) 

   var targ := Target(mobile),
         item;
    
item:=CreateItemAtLocation( targ.x+2, targ.y+7, targ.z , 0x1CF1 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+7, targ.z , 0x1CF2 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x , targ.y+7, targ.z , 0x1CF3 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+7, targ.z , 0x1CF4 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( (targ.x-2, targ.y+7, targ.z , 0x1CF5 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+6, targ.z , 0x1CF6 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+5, targ.z , 0x1CF7 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+4, targ.z , 0x1CF8 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+3, targ.z , 0x1CF9 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+3, targ.z , 0x1CFA , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+2, targ.z , 0x1CFB , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+2, targ.z , 0x1CFC , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+2, targ.z , 0x1CFD , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+2, targ.z , 0x1CFE , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+2, targ.z , 0x1CFF , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+3, targ.z , 0x1D00 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+4, targ.z , 0x1D01 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+5, targ.z , 0x1D02 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+6, targ.z , 0x1D03 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+6, targ.z , 0x1D04 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+6, targ.z , 0x1D05 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+6, targ.z , 0x1D06 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+6, targ.z , 0x1D07 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+5, targ.z , 0x1D08 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+4, targ.z , 0x1D09 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+3, targ.z , 0x1D0A , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+3, targ.z , 0x1D0B , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+3, targ.z , 0x1D0C , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+4, targ.z , 0x1D0D , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+5, targ.z , 0x1D0E , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+5, targ.z , 0x1D0F , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+5, targ.z , 0x1D10 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+4, targ.z , 0x1D11 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+4, targ.z , 0x1D12 , 1 ); 
item.movable := 0; 
    
Endprogram
Last edited by *Edwards on Thu Mar 27, 2008 3:29 pm, edited 1 time in total.
Top
westrupp
Adept Poster
Posts: 89
Joined: Wed Aug 01, 2007 3:07 am

Post by westrupp »

Code: Select all

use uo; 

program MakePent( mobile, item ) 

   var targ := Target(mobile);  
    
item:=CreateItemAtLocation( targ.x+2, targ.y+7, targ.z , 0x1CF1 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+7, targ.z , 0x1CF2 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x , targ.y+7, targ.z , 0x1CF3 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+7, targ.z , 0x1CF4 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+7, targ.z , 0x1CF5 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+6, targ.z , 0x1CF6 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+5, targ.z , 0x1CF7 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+4, targ.z , 0x1CF8 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-2, targ.y+3, targ.z , 0x1CF9 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+3, targ.z , 0x1CFA , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+2, targ.z , 0x1CFB , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+2, targ.z , 0x1CFC , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+2, targ.z , 0x1CFD , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+2, targ.z , 0x1CFE , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+2, targ.z , 0x1CFF , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+3, targ.z , 0x1D00 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+4, targ.z , 0x1D01 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+5, targ.z , 0x1D02 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+3, targ.y+6, targ.z , 0x1D03 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+6, targ.z , 0x1D04 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+6, targ.z , 0x1D05 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+6, targ.z , 0x1D06 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+6, targ.z , 0x1D07 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+5, targ.z , 0x1D08 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x-1, targ.y+4, targ.z , 0x1D09 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+3, targ.z , 0x1D0A , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+3, targ.z , 0x1D0B , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+3, targ.z , 0x1D0C , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+4, targ.z , 0x1D0D , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+2, targ.y+5, targ.z , 0x1D0E , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+5, targ.z , 0x1D0F , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+5, targ.z , 0x1D10 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation(  targ.x, targ.y+4, targ.z , 0x1D11 , 1 ); 
item.movable := 0; 
item:=CreateItemAtLocation( targ.x+1, targ.y+4, targ.z , 0x1D12 , 1 ); 
item.movable := 0; 
    
Endprogram
Thanks Edwards, work fine...i put items variable in top and fix something in line 15, Thanks again...

PS.: this is cmd to create big large pentagram put in scripts\textcmd\gm
Top
Post Reply

Return to “Scripting Help”