PenUltima Online

It is currently Fri Aug 29, 2008 4:40 pm

All times are UTC - 8 hours




Post new topic Reply to topic  [ 5 posts ] 
Author Message
 Post subject: .createpentagram
PostPosted: Wed Mar 26, 2008 11:01 am 
Offline

Joined: Wed Aug 01, 2007 3:07 am
Posts: 46
Location: Brazil
Code:
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
 Profile  
 
 Post subject:
PostPosted: Wed Mar 26, 2008 11:22 am 
Offline

Joined: Tue Mar 20, 2007 7:17 am
Posts: 99
Location: Poland
is it in text command directory???


Top
 Profile  
 
 Post subject:
PostPosted: Wed Mar 26, 2008 1:02 pm 
Offline

Joined: Thu Feb 02, 2006 8:33 am
Posts: 273
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
 Profile  
 
 Post subject:
PostPosted: Wed Mar 26, 2008 2:13 pm 
Offline
User avatar

Joined: Fri Dec 28, 2007 11:19 pm
Posts: 91
Location: Montreal, Canada
[...]
5+5 = 10
6+4 = 10
3+7 = 10
20 -10 = 10
[...]

That's the same with coding...

Code:
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

_________________
Image
FantasiaShard.com


Last edited by *Edwards on Thu Mar 27, 2008 3:29 pm, edited 1 time in total.

Top
 Profile  
 
 Post subject:
PostPosted: Wed Mar 26, 2008 7:36 pm 
Offline

Joined: Wed Aug 01, 2007 3:07 am
Posts: 46
Location: Brazil
Code:
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
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 5 posts ] 

All times are UTC - 8 hours


Who is online

Users browsing this forum: Google [Bot] and 0 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Style based on FI Subice by phpBBservice.nl