Главная страницаМой профильРегистрацияВыходВход
Приветствую Вас Гость | RSS
Среда
2025-08-06
4:44 PM
Forum
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Bag Rename Tool
AntoskaДата: Воскресенье, 2006-02-19, 10:16 PM | Сообщение # 1
Генерал-полковник
Группа: Модераторы
Сообщений: 18
Репутация: 2
Статус: Offline
Code
[ITEMDEF i_bag_rename_tool]
NAME=Bag Rename Tool
ID=i_gravestone_17
TYPE=i_gravestone_17
SU BSECTION=Custom
CATEGORY=Stuff
DESCRIPTION=Bag Rename Tool

ON=@CREATE
COLOR=0480
//ATTR=0010 

ON=@DCLICK

Target Choose bag to rename.
return 1

ON=@Targon_Item
if (<SRC.TARG.CONT.CONT.UID>!=<SRC.UID>)
SRC.sysmess age Bag must be in your pack!
return 1
elseif !(<SRC.TARG.BASEID>==i_bag)
SRC.sysmessage That is not a bag.
return 1
Else
dialog d_name_bag
Return 1 
endif
//Reming i_bag code and unreming i_backpack code will swap them.
//Don`t unrem both. Nothing will work!
if (<SRC.TARG.CONT.CONT.UID>!=<SRC.UID>)
SRC.sysmess age Bag must be in your pack!
return 1
elseif !(<SRC.TARG.BASEID>==i_bag)
SRC.sysmessage That is not a bag.
return 1
Else
dialog d_name_bag
Return 1 
endif

[DIALOG d_name_bag]
0,0
nomove
resizepic 190 175 5054 335 150
resizepic 200 185 3000 315 130
resizepic 220 235 3000 270 22
text 215 200 995 0
text 255 275 0000 1
button 220 275 4005 4006 1 0 1
text 435 275 0000 2
button 400 275 4005 4006 1 0 0
textentry 225 237 253 25 0 0 3

[DIALOG d_name_bag TEXT]
How would you like to name this bag?
Continue
Cancel
<src.targ.name>

[DIALOG d_name_bag BUTTON]
ON=0
ON=1
src.message You renamed <SRC.TARG.NAME> to <ARGTXT[0]>!
SRC.TARG.NAME <ARGTXT[0]>
RETURN 1



.invis
 
  • Страница 1 из 1
  • 1
Поиск:


  Copyright Ultima  © 2007