Storyline

One night, young David McLean sees a spaceship crash into a nearby sandpit. His father goes to investigate, but comes back changed. Where once he was cheerful and affectionate, he's now sullen and snarlingly rude. Others fall into the sandpit and begin acting like him: cold, ill-tempered and conspiratorial. David knows that aliens are taking over the bodies of humans, but he'll soon discover there have been far more of these terrible thefts than he could have imagined. The young doom-monger finds some serious help in a lady doctor and a brilliant astronomer. Soon they meet the aliens: green creatures with insect-like eyes. These beings prove to be slaves to their leader: a large, silent head with ceaselessly shifting eyes and two tentacles on either side, each of which branches off into three smaller tentacles. It's up to the redoubtable earth trio to stop its evil plans. Written by J. Spurlin 
 

Is something like this even possible?


menu List Create EUOListBox1 0 0 249 520
finditem * C_ , #backpackid
for #FINDINDEX 1 #FINDCNT
{
  event property #findid
  str pos #property  $ 1
  set %lenght #strres - 1
  str left #property  %lenght
  set %name #strres
  if #findstack = 1
  {
    if % , #findtype , #findcol , ammount = N/A || % , #findtype , #findcol , ammount = 0
    {
     set % , #findtype , #findcol , ammount #findstack
     menu List Add EUOListBox1 % , #findtype , #findcol , ammount %name
     }
    else
      set % , #findtype , #findcol , ammount  % , #findtype , #findcol , ammount + #findstack
  }
  else
    menu List Add EUOListBox1 %name
}
  menu Window Size 246 561
  menu Show
halt


Well i used to use this sub a lot, when I was using yoko injection. Now I have remembered it and was thinking of importing it to euo. Well this is the closest what i have come up with -- take a look below. And if you have any ideas, don't hesitate and share them.

; injection code
sub checklag()
uo.deletejournal()
uo.click('backpack')
repeat
wait(500)
until uo.injournal('backpack')
end sub

;euo code
sub check_lag
set %jrnl #jindex
event macro 1 1 .
while #true
   {
   if #jindex > %jrnl
      {
      set %jrnl %jrnl + 1
      scanjournal %jrnl
      if . in #journal
      {
       event SysMessage check lag finished.
       break
       }
      }
   }
}
return


Vodka without beer - money down the drain or our response to  "October fest".

"Ruff" - an alcoholic drink. Most often, the word "ruff" is understood a mixture of vodka and beer.

Recipes:
Classic - Take a mug of beer with high-quality dense pronounced hop flavor, which is required for the "mute" the vodka taste and smell, and to him (in that order!) Topped 30-60 ml of good vodka.

"Going up and down" or "The Way of the brown bear to white and back again" -
Take a mug of dark beer. Take a sip of, and fill the mug with vodka. Then take another sip, and pour vodka and so on. When the circle will clear the mixture begin to fill up the beer and then sip a sip.
Such a "ruff" is not only dangerous to health, but it is also hard to drink. Only few return to the brown bear.

"Chpok" -
Has a pronounced warming effect.
In 200ml faceted glass filled with one hundred grams of "Zhiguli"--popular russian beer. Next, carefully poured into a hundred grams of vodka. On top of the glass is covered tightly with a hand, and strike a good bottom of the table. The resulting homogeneous (beer + vodka + gas bubbles), you should drink this mixture in one gulp..
Named for a sound that is heard at impact.

"A blow to the teeth" -
In half-liter beer glass carefully placed glass of vodka, then slowly pour the beer (if you use a dark beer, then the effect will be even more surprising). You need to drink this cocktail in one gulp. "Punch line" of this cocktail is that the drinker does not see a glass of vodka on the bottom of the glass and quietly drinking a beer. When it finishes before the end, a shot in the literal sense of beating on the teeth.

;=====================================================================
; Script Name: Item Buyer & Donator
; Author: CAMOTbIK
; Version: 0.3 Alfa
; Client Tested with: 7.0.14.0
; EUO version tested with: 1.92
; Shard OSI / FS:  FS WWW.RWUO.COM
; Revision Date: 2011/09/19
; Public Release: 2011/09/16
; Global Variables Used: None
; Purpose: Buying stuff from vendors and donating it.
;=====================================================================

Setup.
Mark one, two or three runebooks with locations to vendors that sell battle axes.
set %vendorbooks 3 Set how many runebooks are you using
set %vendorbook1 0x000 Set the Id's of the runebook's
set %vendorbook2 0x000
set %vendorbook3 0x000
set %startrune 1 Set starting rune
set %endrune 14 Set ending rune
set %donaterune 15 Set donation rune number in first runebook with vendors
set %bankrune 16 Set bank rune in first runebook with vendors
set %donation_vendor 0x000 Set donation npc id
set %maxpoints 800000 Set desired points
set %current_points 0 Set current points
set %move_to_vendor #false Set #true if you need to walk to vendor after recall (sub move_to_vendor)

*Note that the script uses razors buying agent for buying and save password function for reconnect.

Ok, so lately I've been playing with this fishing script of mine. I'm using a gargoyle with 70 throwing to kill those nasty sea serpents, tough this script doesn't have healing sub in it- as it's not required, hp regen solves this problem easily. It carves the serpents body, takes hides, regs, gold and keeps fishing until max weight +50 has been reached, then recalls back home, drops the loot and recalls back to the ship. I've been using Gargish Galleon as a ship with out cannons, so I don't know if this script works on any other ship.

Try it out, and leave your oppinion.

The main issue is that ignoreitem isnt working as it should, when i lounch check_serpent again, it runs again to the ignored corpse. Cann't see where's the problem.

sub check_serpent
  set %timer #sCnt
  finditem %serpent G_
  if #findcnt > 0
  {
    set %atacked_serpent #findid
    set #ltargetid #findid
    event macro 27
    wait 1
    while #findcnt > 0
    {
      finditem %atacked_serpent G_
      wait 1s
    }
    finditem %serpent_body G_8
    if #findcnt > 0
    {
      set %timer ( #sCnt + 10 )
      set %findx #findx - 1
      set %findy #findy - 1
      move %findx %findy 1 50
      wait 2s
    }
    finditem %serpent_body G_2
    if #findcnt > 0
    {
      set %current_serp #findid
      finditem %dagger C_ , #BACKPACKID
      if #FINDCNT > 0
      {
        set #lobjectid #findid
        set #ltargetid %current_serp
        set #ltargetkind 1
        event macro 17
        target 10s
        event macro 22
        wait 20
        set #lobjectid %current_serp
        event macro 17
        repeat
          {
            wait 2s
          }
        until #CONTNAME = container_gump && #CONTTYPE = YFM || #sCnt > %timer
        finditem %fished_stuff C_ , %current_serp
        while #findcnt > 0
        {
          Exevent Drag #findid #findstack
          wait 10
          Exevent Dropc #BACKPACKID
          wait 10
          finditem %fished_stuff C_ , %current_serp
        }
      }    
    }
   ignoreitem %current_serp
  }
  return


updated: Thank you Dixie Wrecked for noticing the missing bracket