[UOS] Macro 룬북복사 쉐린북

* 울티마온라인 UltimaOnline 게시판 * 회원가입 후 3단계 등업 후 다운로드 가능

오픈채팅등에서 코린사이드의 자료를 직접 다운로드 후 공유하지 말아주세요 

울온게시판이 활성화되고 풍성해지도록 자료는 게시글 링크(URL) 공유로 해주길 바랍니다

[UOS] Macro 룬북복사 쉐린북

마크 0 809 1

 


// Author: Hawt

// Description: Automatic Runebook Cloner.

// You need to insert the names of each rune on the "Names" List. IT will run over and over if a location is blocked untill it makes it passed too the rune.

//===========================================================

//Select runebook to be cloned

promptalias 'ToBeCloned'

//Select a blank book

promptalias 'Blank Runebook'

//Lists

clearlist 'Runes'

clearlist 'Names'

if not listexists 'Runes'

createlist 'Runes'

endif

if list 'Runes' == 0

pushlist 'Runes' 5

pushlist 'Runes' 11

pushlist 'Runes' 17

pushlist 'Runes' 23

pushlist 'Runes' 29

pushlist 'Runes' 35

pushlist 'Runes' 41

pushlist 'Runes' 47

pushlist 'Runes' 53

pushlist 'Runes' 59

pushlist 'Runes' 65

pushlist 'Runes' 71

pushlist 'Runes' 77

pushlist 'Runes' 83

pushlist 'Runes' 89

pushlist 'Runes' 95

endif

if not listexists 'Names'

createlist 'Names'

endif

if list 'Names' == 0

pushlist 'Names' 'Hythloth'

pushlist 'Names' "Wrong"

pushlist 'Names' 'Shame'

pushlist 'Names' 'Wind'

pushlist 'Names' 'Spirit'

pushlist 'Names' 'Compassion'

pushlist 'Names' "Honesty"

pushlist 'Names' 'Honor'

pushlist 'Names' "Justice"

pushlist 'Names' 'Sacrifice'

pushlist 'Names' "Valor"

pushlist 'Names' 'Chaos'

pushlist 'Names' 'Humility'

pushlist 'Names' "YewGate"

pushlist 'Names' 'TrinsicGate'

pushlist 'Names' 'SkaraGate'

endif

if not @findtype 0x1f14 any 'backpack'

sysmsg 'Out of blank runes!' 25

pause 100

playsound 984

pause 100

playsound 987

pause 100

playsound 988

pause 100

messagebox 'Error' '*No Runes restock & restart*'

stop

endif

clearjournal

for 0 to 'Runes'

if mana <= 30

useskill 'Meditation'

while not mana == maxmana

endwhile

endif

pause 1500

useobject! 'ToBeCloned'

waitforgump 0x554b87f3 15000

pause 900

replygump 0x554b87f3 Runes[0]

pause '3500'

if injournal 'blocked' 'system'

replay

endif

if @findtype 0x1f14 0 'backpack' 1 2

autotargetobject 'found'

cast 'Mark'

pause 3500

useobject! 'found'

waitforprompt 15000

promptmsg Names[0]

pause 2000

moveitem 'found' 'Blank Runebook'

pause 2000

if @injournal 'Names[0]' 'system'

@poplist 'Names' 'front'

@poplist 'Runes' 'front'

endif

else

playsound 984

pause 100

playsound 987

pause 100

playsound 988

pause 100

messagebox 'Error' '*No Runes restock & restart*'

stop

endif

endfor







[ 울티마 온라인 신규유저분들을 위한 글 ]

*울온 Demise서버 게시판 추천글 정리  :: https://bit.ly/2YC45Ou *

*러브님의 스킬정보 튜토리얼 등등 (깔끔정리) :: http://eljza.com/uo/ *

*데마이즈 PVP유저 모집중, 마크의 유튜브채널 :: https://bit.ly/2PnXINQ *


ULTIMA ONLINE DEMISE SERVER     

 

0 Comments
제목

방문자통계

  • 73 명현재 접속자
  • 522 명오늘 방문자
  • 879 명어제 방문자
  • 1,743 명최대 방문자
  • 360,878 명전체 방문자
  • 2,351 개전체 게시물
  • 1,187 개전체 댓글수
  • 450 명전체 회원수