PenUltima Online

It is currently Sun Sep 07, 2008 1:40 am

All times are UTC - 8 hours




Post new topic Reply to topic  [ 18 posts ] 
Author Message
 Post subject:
PostPosted: Tue Apr 18, 2006 1:15 pm 
Offline

Joined: Thu Feb 02, 2006 1:41 pm
Posts: 1129
Location: Southern Central USA
Please post the compiler error that is displayed.

_________________
Sincerely,
Yukiko

I know you think you understand what you thought I said but what you heard is not exactly what I meant.

Titus 2:13


Top
 Profile  
 
 Post subject:
PostPosted: Tue Apr 18, 2006 2:32 pm 
Offline

Joined: Sat Feb 04, 2006 5:49 pm
Posts: 750
Location: Chicago, IL USA
junkitem := CreateItemAtLocation( what.x, what.y, what.z, 0x709s, 1 )

0x709s is invalid... maybe mean 0x709a? also put a ; at the end of that line.


Top
 Profile  
 
 Post subject:
PostPosted: Tue Apr 18, 2006 5:34 pm 
Offline
User avatar

Joined: Sat Feb 04, 2006 8:17 am
Posts: 137
Location: Illinois, USA
This is the dot command I use on my shard. It creates a "hand" at the targetted location.

Code:
use uo;
use os;

// These should be in your client.inc file.  If not you can add them there and use the include "client"; call instead.
const FONT_NORMAL       :=  0x03;   // Normal (default).
const ANIM_SALUTE               :=  0x0021; // Salute.


program point (who)
   SendSysMessage( who, "Point at what?" );
   var it := TargetCoordinates ( who );
   
   var itdesc;
   if ( it.item.name )
      itdesc := it.item.name;
      it := it.item;
   elseif ( it.item.desc )
      itdesc := it.item.desc;
      it := it.item;
   elseif ( it.mobile )
      itdesc := it.mobile.name;
      it := it.mobile;
   else
      it := CreateItemAtLocation( it.x, it.y, it.z, 0x706c, 1 );
      it.name := who.name;
      it.graphic := 0x206e;
      it.movable := 0;
      itdesc := "that spot";
      SetObjProperty (it, "destroyme", 1);
   endif      

   if ( it.hidden )
      SendSysMessage( who, "Canceled" );
      return;
   endif

   PerformAction ( who, ANIM_SALUTE );
   PrintTextAbove ( who, "*points at " + itdesc + "*", FONT_NORMAL, 55);
   sleepms (500);
   PrintTextAbove ( it, "*" + who.name + " points here*", FONT_NORMAL, 55);
   sleep (2);
   if ( it.objtype == 0x706c )
      if (GetObjProperty (it, "destroyme"))
         DestroyItem( it );
      endif
   endif
endprogram


This compiles in 95 and works very well. Hope it helps you out.

_________________
2nd place is the 1st loser.


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 18 posts ] 

All times are UTC - 8 hours


Who is online

Users browsing this forum: No registered users 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