Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - Chrisok

Pages: [1]
1
Stealth archive / Stealth + UOSteam
« on: December 28, 2013, 07:59:35 AM »
So i was able to about 6 months ago use Stealth v 4 with AUO but now with 6.15 i cannot get it to work with UOSteam. I can connect to server but i cannot get past server selection, it gets hung up on character selection. any ideaS?

2
Stealth archive / Couple Snippets for PVP
« on: April 26, 2013, 06:36:24 AM »
Trying to think of different things to script; Would love to have others help with this ; either sending in pm or posting.

PVP
-Automated potion drinking
Code: [Select]
Procedure DrinkStam;
begin
    if (Count($0F0B) > 0) then
    begin
      UseType($0F0B,$0000);
      wait(500);
    end;
end;
-Automated stuns (pre uor shards)
Code: [Select]
Procedure AutoStun;
begin
if (Stam < 20) then DrinkStam;
begin
UseSecondaryAbility;
wait(1000);
end;
end;

-Target Lowest Enemy
(working on now) - buggy
-Explosion pot kicker (kicks back xplode pots)
(completed but depends on timers for shard)
-Xheals
(having problem with target quene'ing)
-Auto Pop pouches
Procedure AutoPop
(was working now not working on new shard)

3
Stealth Snippets\Library / GM detect
« on: April 24, 2013, 09:18:25 AM »
i use this for fs uosa change names if you know them.
Code: [Select]
Unit GM_detect;
interface
 
function is_GM_around():boolean;
function does_GM_name_match(ID:cardinal):boolean;
implementation
 
Var
   GM_name_contains :array of string; // general prefixes+official uosa staff
      
 
function does_GM_name_match(ID:cardinal):boolean;
var
   HisName:String;
   i:integer;
begin
   HisName := GetName(ID);
  GM_name_contains := ['GM','Seer', 'Counselor', 'Helper', 'Administrator', 'Admin','GM_name1', 'GM_name2', 'GM_name3', 'GM_name4', 'Derrick', 'Kaivan'];
   For i:= Low(GM_name_contains) to High(GM_name_contains) do
   begin
      if (BMSearch(1,HisName,GM_name_contains[i])>0) then
      begin
      // the name of the character mached with one of known GM names
         AddToSystemJournal('Found by a GM, CARE');
         Result := true;
         Exit;
      end;
   end;
   Result := false;
end;

function is_GM_around():boolean;
var
   GM_ID :Cardinal;
begin
   FindDistance := 30;
  
   GM_ID := FindType($0190, Ground);  // looking for a male GM
  
   if (GM_ID >0) then
      if (does_GM_name_match(GM_ID)) then
      begin
         Result := true;
         Exit;
      end;
 
   GM_ID := FindType($0191, Ground);   // looking for a female GM
      
   if (GM_ID >0) then
      if (does_GM_name_match(GM_ID)) then
      begin
         Result := true;
         Exit;
      end;
      
   // Found no Staff
  
   Result := false;
end;
 
begin
AddToSystemJournal('Found Nothing, Keep Macroing');
end.

4
Stealth archive / AssistUO n Stealth
« on: April 16, 2013, 05:48:15 PM »
With the new AUO version, ive officially decided i should move over to it with RC8 - my problem now is connecting through stealth.

Client send game packets again to LoginServ against connecting to GameServ
 is the error i get?

5
Stealth archive / May be helpful for some (Paralyze - Instant MA)
« on: April 11, 2013, 09:13:28 AM »
At work so i have not yet tested this but it should be fine, report any problems and i will fix.

Code: [Select]
Program Paramenot
var
ctime: TDateTime;

Procedure Arrow;
begin
  if Mana > 10 then
    begin
    Cast('Magic Arrow');
     WaitTarget(1,1000);
      TargetToObject(Self);
    end; 
end;


Procedure CheckJournal;
begin
 if InJournalBetweenTimes ('Paralyze', ctime, Now) <> -1 then
  begin
   Arrow;
  end;
end;

Could even go further to remove targetself or have it wait until journal reads "you feel yourself resisting" thus insuring you get para'd for those being attacked by slow fingers

6
Stealth archive / how to access DLL
« on: April 04, 2013, 07:00:13 PM »
how do i access the portion where it lets me bind hotkeys?

7
Stealth archive / targetting
« on: April 01, 2013, 10:03:05 AM »
I am having difficulties with LOS issues and checking between assigned friends healthbars

I am using

Code: [Select]
begin
losOptions := losTypeRunUO;
while not dead do
  begin
//edited out
    begin
     c := GetPathArray(PredictedX, PredictedY, PredictedZ, GetX(Host), GetY(Host), 1, True, p);
     if c > 0 then StepQ(CalcDir(PredictedX, PredictedY, p[0].X, p[0].Y), True);
    end;
//edited out
  end;
end.

Code: [Select]
procedure checkthem;
begin
 Friend := [$assigned, $assigned, $assigned, $assigned];
 for i := 0 to Length(Friend) -1 do
  begin
   res := CheckLoS(getX(self), getY(self), getZ(self) + 15, getX(Friend[i]), getY(Friend[i]), getZ(Friend[i]) + 15, WorldNum);
//edited out
  end;  
end;


constant is defined as my chars ID$
and vars i : Integer;
Friend: array of Cardinal;


any ideas? Ive tried to pm a few people with no luck, seems this community is a graveyard.

8
General UO Chat - Freeshard edition / UOSecondage
« on: March 26, 2013, 09:45:03 AM »
Hey does anyone here play UOSA? www.uosecondage.com



9
Stealth archive / How to call 'bars'
« on: March 26, 2013, 09:20:51 AM »
Can not for the life of me find anything related to health bars on the stealth site. I am just brainstorming but want criticism.

////finding orange on screen/////
if FindNotoriety($190,6) > 5 then
begin
  //having trouble  here
AddToSystemJournal(IntToStr(LastTarget()));
procedure LastTarget
function TargetID: Cardinal
if targetpresent then
   begin
   TargetToXYZ(X,Y,Z); //do i define this to multiple areas or can i place it at one spot and they will stack together when put together?
   end;
end;

10
New member introductions / Hello Scripters.
« on: March 21, 2013, 12:26:19 PM »
Name is Chris and recently came back to UO. Am deciding between two servers. Both of which do not allow scripting or EUO. Will be coming here for tips on stealthing what i am doing and uploading whatever i work on as contribution. I have noob chararcters on both serveres so far and are being macro'd by razor at the moment. Will get back into the swing of things and eventually move into the pvm/pvp scene on both servers. Any fellow players for either of these two servers? My username here and alias's there are different but is there any way i can be detected with EUO/SUO besides item movements ? I have played from 99-2003 ; 2005-2011 2013-present. I always PVP, sometimes PVM and have used Razor, UOAssist, EUO, Krrios.

Pages: [1]