Скрипт на тайлоринг

[Sweden 0]

Привет!!!Мужчины помогите пожалуйста)!У кого есть скрит на прокачку тайлоринга после 100?Спасибо за рание!

[wizardme 0]

sub materials()
    while not uo.dead()
        uo.deletejournal('create')
        uo.deletejournal('make')
        uo.deletejournal('failed')
        checklag()
        uo.waittargettype('0x1766')
        uo.waitmenu('Choose a category.', 'carpets', 'Select', 'carpet1','Select', 'corner')
        uo.usetype('0x0F9D')
        repeat
            wait(1000)
        until uo.injournal("create|make|failed")
        wait(1000)
        checklag()
        rez()
        checklag()
    wend
end sub
Sub checklag()
    DelJournal("ackpack")
    UO.Click("backpack")
    repeat
        wait(100)
    until UO.InJournal("ackpack")
end sub
Sub DelJournal(msg)
    While UO.InJournal(msg)
        UO.SetJournalLine(UO.InJournal(msg) - 1,'')
    wend
end sub
sub rez()
    uo.waittargettype('0x0AC2')
    uo.usetype('0x0F9E')
    wait(1000)
end sub