Công đồng L2Friend
Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.
Latest topics
» troi` oi bo? hon 1nam rui` ma` van con` forrum nay` mung` qua'
Auto attribute :) EmptyWed Sep 12, 2012 11:41 am by thientamnhi

» L2 TenKai nơi hội tụ mới của mọi người Open 3/2012
Auto attribute :) EmptyWed Sep 12, 2012 10:33 am by NgoiSaoCoDon

» Guide 1 số class phien ban God
Auto attribute :) EmptyTue Apr 10, 2012 9:43 am by ElfLee

» buy backlink backlink service
Auto attribute :) EmptyTue Aug 02, 2011 6:56 am by Khách viếng thăm

» How To Make Bitcoin
Auto attribute :) EmptyFri Jul 29, 2011 2:23 am by Khách viếng thăm

» How To Mine Bitcoin
Auto attribute :) EmptyThu Jul 28, 2011 12:15 pm by Khách viếng thăm

» Just saying hello
Auto attribute :) EmptyWed Jul 27, 2011 11:57 pm by Khách viếng thăm

» Em xin script warlork
Auto attribute :) EmptyFri Jul 15, 2011 3:59 am by Khách viếng thăm

» Huong dan l2net hoan chinh.
Auto attribute :) EmptyTue May 31, 2011 7:18 pm by Khách viếng thăm


Auto attribute :)

Go down

Auto attribute :) Empty Auto attribute :)

Bài gửi  Admin Sun Jan 30, 2011 5:17 pm

Code:
// Auto Add Attribute
// Server: all
// Autor: HoangLong
// Date: 13. 12. 2010
PRINT_TEXT "SCRIPT STARTED!]"
INCLUDE "StdLib\Inventory.l2c"

DEFINE ARRAYLIST Inven
DEFINE INT      ItemID
DEFINE STRING    STONE
DEFINE STRING    ITEM

// Edit the elemental stone name and name of item
STONE = "#$Fire Stone" 
ITEM  = "#$Dynasty Dual Daggers"

// Main section
// ===============================
GET_INVENTORY Inven
FOREACH A INVENTORY Inven
    IF Inven.A.NAME == ITEM
        SLEEP 200
        PRINT_TEXT "Found item: <&Inven.A.NAME&>"
        ItemID = Inven.A.ID
        JUMP_TO_LABEL HERE
    ENDIF
NEXTEACH   

LABEL HERE
GET_INVENTORY Inven
SLEEP 800
FOREACH A INVENTORY Inven
    IF Inven.A.NAME == STONE
        USE_ITEM "<&Inven.A.ITEM_ID&>"
        SLEEP 400
        IF Inven.A.COUNT > 1
            PRINT_TEXT "Element with <&Inven.A.NAME&>"
            INJECT "D0 35 00 <&ItemID.GET_HEX32&>"
        ELSE
            JUMP_TO_LABEL END
        ENDIF
        JUMP_TO_LABEL HERE
    ENDIF
NEXTEACH

LABEL END
PRINT_TEXT "SCRIPT STOPED!]"
END_SCRIPT
Chỉnh lại tên stone, tên item cần up, nhớ là trong người không đc có 2 item cùng tên nha.
Admin
Admin
Admin

Tổng số bài gửi : 89
Points : 196
Reputation : 2
Join date : 30/10/2010

https://l2friend.forumvi.com

Về Đầu Trang Go down

Về Đầu Trang

- Similar topics

 
Permissions in this forum:
Bạn không có quyền trả lời bài viết