Re: 【EasyUO】問題:EUO飛符石書 怎麼寫?
發表於 : 週五 6月 14, 2019 10:16 pm
以下為程式部分區段截錄 請勿直接使用.......
IF #MenuButton = SetBankR
{
menu set Tips 設定銀行符石書,請選擇符石書
gosub SetRunebook
set %Rec_BANK %Rec_00
set %Rec_00 N/A
menu set BankRunebook %Rec_BANK
set #MenuButton 0
}
以下這段是設定哪一本符石書(不翻頁)直接在符石書上設定首要
sub SetRunebook
{
gosub s7GetTarget
FINDITEM #result
if #FINDTYPE = mpf
{
set %REC_00 #FINDID
menu set Tips 符石書設定完成
}
else
{
menu set Tips 這不像是符石書,請重新設定
}
return
}
以下為目標產生器
sub s7GetTarget
{
set #ltargetid
set #targcurs 1
_waitfortargcurs:
if #targcurs = 1 2
wait 1
goto _waitfortargcurs
return #ltargetid
}
IF #MenuButton = SetBankR
{
menu set Tips 設定銀行符石書,請選擇符石書
gosub SetRunebook
set %Rec_BANK %Rec_00
set %Rec_00 N/A
menu set BankRunebook %Rec_BANK
set #MenuButton 0
}
以下這段是設定哪一本符石書(不翻頁)直接在符石書上設定首要
sub SetRunebook
{
gosub s7GetTarget
FINDITEM #result
if #FINDTYPE = mpf
{
set %REC_00 #FINDID
menu set Tips 符石書設定完成
}
else
{
menu set Tips 這不像是符石書,請重新設定
}
return
}
以下為目標產生器
sub s7GetTarget
{
set #ltargetid
set #targcurs 1
_waitfortargcurs:
if #targcurs = 1 2
wait 1
goto _waitfortargcurs
return #ltargetid
}