https://forums.polserver.com/

.createpentagram

https://forums.polserver.com/viewtopic.php?t=2085

Page 1 of 1

.createpentagram

Posted: Wed Mar 26, 2008 11:01 am
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]

Posted: Wed Mar 26, 2008 11:22 am
by coltain
is it in text command directory???

Posted: Wed Mar 26, 2008 1:02 pm
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

Posted: Wed Mar 26, 2008 2:13 pm
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

Posted: Wed Mar 26, 2008 7:36 pm
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
All times are UTC-08:00
Page 1 of 1

Powered by phpBB® Forum Software © phpBB Limited