搜索
快捷導航
發新帖
查看: 559|回覆: 16
收起左側

[魔獸相關] 尋求有能人士幫忙翻譯

[複製鏈接]
掃一掃,手機訪問本帖
發表於 2017-5-3 18:06:13 | 顯示全部樓層 |閱讀模式

馬上註冊,結交更多好友,享用更多功能,讓你輕鬆玩轉社區。

您需要 登錄 才可以下載或查看,沒有帳號?註冊

x
如題主要是神奇寶貝的遊戲希望有人能幫忙

主要是韓國文字的部分順便附上程式碼

call PreloadGenStart()

call Preload("----------------- Save Code ------------------")

call Preload("클리어 유저 : "+PlayerNameS[1+GetPlayerId(p)])

call Preload("듀얼클리어 횟수 : "+I2S(DuelC))

call Preload("서바이벌클리어 횟수 : "+I2S(SurvC))

call Preload("-load "+GetColorRemovedString(Code))

call Preload("---------------- Chat Message ----------------")

call Preload("제작자 : Brahon, ANDY")

call Preload("공식 카페 : http://cafe.naver.com/war3rpgmaker3")

call PreloadGenEnd(MapName+"\\"+PlayerNameS[1+GetPlayerId(p)]+"_"+I2S(DuelC+SurvC)+"_"+I2S(RI2)+".txt")

call PreloadEnd(3.0)
call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|cfffffc01워크 폴더 \\ Pokemon \\ "+PlayerNameS[1+GetPlayerId(p)]+"_"+I2S(DuelC+SurvC)+"_"+I2S(RI2)+"로 저장되었습니다.|r ")



上一篇︰仲有無人玩魔獸(招人一齊玩)
下一篇︰《魔獸爭霸III》ROC+TFT 繁體中文免安裝版
 樓主| 發表於 2017-5-3 18:09:40 | 顯示全部樓層
call SaveInteger(DataHash,1+GetPlayerId(p),loopA,data[loopA])

set loopA=loopA+1
endloop
call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F로드 완료!|r")

set CodeLoadingNow[1+GetPlayerId(p)]=false

return true
endfunction
function LoadAction takes nothing returns nothing

local player p=GetTriggerPlayer()

set CodeLoadingNow[1+GetPlayerId(p)]=true
if HeroLoad(p,GetEventPlayerChatString())==true then
set Duel_Clear[1+GetPlayerId(p)]=LoadIntegerBJ(1,1+GetPlayerId(p),DataHash)

set Survivor_Clear[1+GetPlayerId(p)]=LoadIntegerBJ(1,1+GetPlayerId(p),DataHash)

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F서바이벌모드 클리어 횟수 : |r"+I2S(Survivor_Clear[1+GetPlayerId(p)]))

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4e듀얼모드 클리어 횟수 : |r"+I2S(Duel_Clear[1+GetPlayerId(p)]))

if Survivor_Clear[1+GetPlayerId(p)]>=50 then

call SetPlayerName(p,"|cff00D8FF[종결자] |r"+W[GetPlayerId(p)+1])
elseif Survivor_Clear[1+GetPlayerId(p)]>=30 then

call SetPlayerName(p,"|cffEAEAEA[고문 종결자] |r"+W[GetPlayerId(p)+1])
elseif Survivor_Clear[1+GetPlayerId(p)]>=25 then

call SetPlayerName(p,"|cffF6F6F6[하드 종결자] |r"+W[GetPlayerId(p)+1])
elseif Survivor_Clear[1+GetPlayerId(p)]>=15 then

call SetPlayerName(p,"|cffFAECC5[노말 종결자] |r"+W[GetPlayerId(p)+1])
elseif Survivor_Clear[1+GetPlayerId(p)]>=5 then

call SetPlayerName(p,"|cff3F0099[이지 종결자] |r"+W[GetPlayerId(p)+1])
endif
else

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F로드 실패!|r")
endif

set p=null
endfunction
function init4 takes nothing returns nothing
local timer GT_Timer=GetExpiredTimer()

call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10,"|c00DFFB4F더 이상 로드가 불가능합니다.|r")

call DestroyTrigger(LoadT)
call DestroyTimer(GT_Timer)

set GT_Timer=null
endfunction
function init3 takes nothing returns nothing

local timer GT_Timer=CreateTimer()
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,25,"|cffFFB1BC40초동안|r |cffFFFA78로드가 가능합니다.|r")

call TriggerRegisterPlayerChatEvent(LoadT,Player(0),"-load",false)
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:13:56 | 顯示全部樓層
call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F쉬움 난이도에서는 10번까지 저장이 가능합니다.|r")
return
elseif Difficult==2 and Survivor_Clear[1+GetPlayerId(p)]>=25 then

set Normal_Clear[1+GetPlayerId(p)]=Normal_Clear[1+GetPlayerId(p)]+1

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F일반 난이도에서는 25번까지 저장이 가능합니다.|r")
return
elseif Difficult==3 and Survivor_Clear[1+GetPlayerId(p)]>=50 then

set Hard_Clear[1+GetPlayerId(p)]=Hard_Clear[1+GetPlayerId(p)]+1

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F어려움 난이도에서는 50번까지 저장이 가능합니다.|r")
return
elseif Difficult>=4 and Survivor_Clear[1+GetPlayerId(p)]>=100 then

set SuperHard_Clear[1+GetPlayerId(p)]=SuperHard_Clear[1+GetPlayerId(p)]+1

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F매우어려움 난이도에서는 100번까지 저장이 가능합니다.|r")
return
endif

set Survivor_Clear[1+GetPlayerId(p)]=Survivor_Clear[1+GetPlayerId(p)]+1
set Data[3]=Survivor_Clear[1+GetPlayerId(p)]
else
if Duel_Clear[1+GetPlayerId(p)]<=150 then

call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F듀얼 모드는 ~ ~ 이 만족 되어야 세이브가 가능합니다.")
return
endif

set Duel_Clear[1+GetPlayerId(p)]=Duel_Clear[1+GetPlayerId(p)]+1
set Data[1]=Duel_Clear[1+GetPlayerId(p)]
call DisplayTimedTextToPlayer(p,0.0,0.0,10.0,"|c00DFFB4F듀얼 모드 클리어 횟수 "+I2S(Duel_Clear[1+GetPlayerId(p)])+"!!")
endif

set Data[2]=GetRandomInt(1,89)
loop
exitwhen loopA>SaveDataM
call SaveInteger(DataHash,1+GetPlayerId(p),loopA,Data[loopA])

set loopA=loopA+1
endloop
set CodeSavingNow[1+GetPlayerId(p)]=true
call HeroSave(p)
set p=null
endfunction
function init2 takes nothing returns nothing

call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,30,"|cffFFFA78이제부터 세이브가 가능합니다.|r")

call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,30,"|cffFFFA78-save를 쳐서 세이브 하여 주시길 바랍니다.|r")

call TriggerRegisterPlayerChatEvent(SaveT,Player(0),"-save",false)

call TriggerRegisterPlayerChatEvent(SaveT,Player(1),"-save",false)

call TriggerRegisterPlayerChatEvent(SaveT,Player(2),"-save",false)
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:18:56 | 顯示全部樓層
set attributePoke[6]=0

set attributePoke[7]=0

call GroupEnumUnitsOfPlayer(GT_G,p2p,Filter(function NumberCheck))

call DisplayTextToPlayer(p2p,0,0,"현재까지 포획한 포켓몬 : "+I2S(attributePoke[(1*12)+(GetPlayerId(p2p)+1)])+"마리")

call DisplayTextToPlayer(p2p,0,0,"현재까지 놓친 포켓몬 : "+I2S(attributePoke[(2*12)+(GetPlayerId(p2p)+1)])+"마리")

call DisplayTextToPlayer(p2p,0,0,"현재까지 판매한 포켓몬 : "+I2S(attributePoke[(3*12)+(GetPlayerId(p2p)+1)])+"마리")

call DisplayTextToPlayer(p2p,0,0,"|c00ffffff노말 포켓몬 : "+I2S(attributePoke[7])+"마리|r")

call DisplayTextToPlayer(p2p,0,0,"|c00ffff00전기 포켓몬 : "+I2S(attributePoke[6])+"마리|r")

call DisplayTextToPlayer(p2p,0,0,"|c000080ff물 포켓몬 : "+I2S(attributePoke[1])+"마리|r")

call DisplayTextToPlayer(p2p,0,0,"|c00ff0000불 포켓몬 : "+I2S(attributePoke[5])+"마리|r")

call DisplayTextToPlayer(p2p,0,0,"|c0000cd00풀 포켓몬 : "+I2S(attributePoke[2])+"마리|r")

call DisplayTextToPlayer(p2p,0,0,"|c008b008b에스퍼 포켓몬 : "+I2S(attributePoke[3])+"마리|r")

call DisplayTextToPlayer(p2p,0,0,"|c008b4513격투 포켓몬 : "+I2S(attributePoke[4])+"마리|r")

call DestroyGroup(GT_G)
set GT_G=null
else
call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"라운드가 진행 중 일때는 사용할 수 없습니다.")
endif

set p2p=null
return false
endfunction
function ChecJiant takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GIANT)==false and IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)==false)
endfunction
function
UpgradePoke_Con takes nothing returns boolean
local group GT_G=CreateGroup()
local unit UUU
if IsTriggerEnabled(yR)==false then

call GroupEnumUnitsOfPlayer(GT_G,GetTriggerPlayer(),Filter(function ChecJiant))

set UUU=FirstOfGroup(GT_G)
if UUU==null then
call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"업그레이드 할 포켓몬이 없습니다.")
else

loop
set UUU=FirstOfGroup(GT_G)
exitwhen(UUU==null)
if GetPlayerState(GetTriggerPlayer(),PLAYER_STATE_RESOURCE_GOLD)<=1500 then

call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"돈이 1500원 이하일 경우 자동업글이 취소 됩니다.")
exitwhen true
endif

call GroupRemoveUnit(GT_G,UUU)
call IssueImmediateOrderById(UUU,LoadInteger(HTable,GetUnitTypeId(UUU),0))
endloop
endif
else

call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"라운드가 진행 중 일때는 사용할 수 없습니다.")
endif

call DestroyGroup(GT_G)
set GT_G=null

set UUU=null
return false
endfunction
function LifeBuy_Con takes nothing returns boolean

local player p2p=GetTriggerPlayer()
if(DiePlayer[1+GetPlayerId(p2p)]==false)then

if(GetPlayerState(p2p,PLAYER_STATE_RESOURCE_LUMBER)>=4)then

call AdjustPlayerStateBJ(-4,p2p,PLAYER_STATE_RESOURCE_LUMBER)

set CurLife[GetPlayerId(p2p)+1]=CurLife[GetPlayerId(p2p)+1]+1

call MultiboardSetItemValueBJ(Xv,2,GetPlayerId(p2p)+2,("|cffff0000"+(I2S(CurLife[GetPlayerId(p2p)+1])+"|r")))
else

call DisplayTextToPlayer(GetTriggerPlayer(),0,0,"하이퍼볼 개수가 부족합니다.")
endif
endif
return false
endfunction

function KickPlayer takes player p returns nothing
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:21:47 | 顯示全部樓層
call SetPlayerTechResearchedSwap(GetResearched(),(GetPlayerTechCountSimple(GetResearched(),GetOwningPlayer(GetTriggerUnit()))+1),GetOwningPlayer(GetTriggerUnit()))
endfunction
function PowerNick takes nothing returns nothing

call TriggerRegisterPlayerChatEvent(UpgradePoke,GetEnumPlayer(),"1",true)

call TriggerRegisterPlayerChatEvent(PokeHave,GetEnumPlayer(),"-포켓몬",true)

call TriggerRegisterPlayerChatEvent(LifeBuy,GetEnumPlayer(),"-라이프",true)

call TriggerRegisterPlayerChatEvent(LifeBuy,GetEnumPlayer(),"-LF",true)

if(GetPlayerName(GetEnumPlayer())=="Bravehon")then

call SetPlayerName(GetEnumPlayer(),"|c000080FF나|c002480ED른 |c004980DB제|c006D80C9작|c009280B6자 |c00B680A4용|c00DB8092기|r")
elseif(GetPlayerName(GetEnumPlayer())=="ANBY")then

call SetPlayerName(GetEnumPlayer(),"|c001595EA갯|c000080FF힝|r")
elseif(GetPlayerName(GetEnumPlayer())=="MeatHouse")then

call SetPlayerName(GetEnumPlayer(),"|c00FF8080넘|c00FD8D6F나 |c00FC9A5D맛|c00FAA84C있|c00F8B53B는 |c00F7C229고|c00F5CF18기|r")
endif
endfunction
function ReTimer_Act takes nothing returns nothing

set bj_forLoopAIndex=1
loop
exitwhen GetExpiredTimer()==ReTimer[bj_forLoopAIndex]
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop

call PauseTimer(GetExpiredTimer())

set changePoke[bj_forLoopAIndex]=false

call DisplayTextToPlayer(Player(bj_forLoopAIndex-1),0,0,"|cffFF0000포켓몬 교체 쿨타임 초기화!")

call DisplayTextToPlayer(Player(bj_forLoopAIndex-1),0,0,"|cffFF0000포켓몬 교체 쿨타임 초기화!")

call DisplayTextToPlayer(Player(bj_forLoopAIndex-1),0,0,"|cffFF0000포켓몬 교체 쿨타임 초기화!")
endfunction
function
AddonJohabSick___main takes nothing returns nothing
local trigger t=CreateTrigger()
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:26:17 | 顯示全部樓層
if QuizI==1 then

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"|c00ff0000퀴즈제한시간 만료!!|r")

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"|c00ff0000퀴즈제한시간 만료!!|r")

call TimerDialogDisplay(quizDialog,(false))

call DisableTrigger(QuizTri)
set QuizTri=null
endif
call DestroyTimer(GT_Timer)

set GT_Timer=null
endfunction
function GT_QuizA takes nothing returns nothing
local timer GT_Timer=CreateTimer()
local integer i

if GetRandomReal(0,100)<=30.00 then
set QuizI=1
set i=GetRandomInt(1,31)

call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c00FF0000↓|r")

call TimerStart(GT_Timer,10.,false,function QuizTimeOver)

call CreateTimerDialogBJ(GT_Timer,"|c00ff5f11Quiz 제한시간")

set quizDialog=bj_lastCreatedTimerDialog
call TimerDialogDisplay(quizDialog,true)
if i==1 then
set QuizTri=QuizArray[0]

call EnableTrigger(QuizTri)

call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포디 "+GameVer+" 제작자 braveXXX 는 누구일까요?!|r")
elseif i==2 then
set QuizTri=QuizArray[1]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포디 "+GameVer+" 제작자 ㄱㅎ은 누굴까요?!|r")
elseif i==3 then
set QuizTri=QuizArray[2]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포켓몬스터 애니메이션 지우가 첫번째로 잡은 포켓몬 이름은 뭘까요?!|r")
elseif i==4 then
set QuizTri=QuizArray[3]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포켓몬스터 애니메이션 오렌지제도에서 지우 일행이 바다에서 타고 다닌 포켓몬 이름은 뭘까요?!|r")
elseif i==5 then
set QuizTri=QuizArray[4]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포켓몬스터 애니매이션 주인공 이름 ㅎㅈㅇ는 뭘까요?!|r")
elseif i==6 then
set QuizTri=QuizArray[5]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF공식 카페 전체 주소는 무엇일까요?!|r")
elseif i==7 then
set QuizTri=QuizArray[6]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF공식 카페 뒷주소는 무엇일까요?!|r")
elseif i==8 then
set QuizTri=QuizArray[7]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF지우가 첫번째로 만난 체육관 관장의 이름은 뭘까요?|r")
elseif i==9 then
set QuizTri=QuizArray[8]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF지우의 포켓몬 중 가장 먼저 최종 진화를 한 포켓몬 이름은 뭘까요?|r")
elseif i==10 then
set QuizTri=QuizArray[9]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF지우의 엄마가 기르는 포켓몬 이름은 뭘까요?|r")
elseif i==11 then
set QuizTri=QuizArray[10]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF물 포켓몬 중 강함인 ㅍㄷㄹ 이름은 뭘까요?|r")
elseif i==12 then
set QuizTri=QuizArray[11]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF노말 포켓몬 중 강함인 ㅍㄹㄱ 이름은 뭘까요?|r")
elseif i==13 then
set QuizTri=QuizArray[12]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF풀 포켓몬 중 강함인 ㅅㅇㅁ 이름은 뭘까요?|r")
elseif i==14 then
set QuizTri=QuizArray[13]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF에스퍼 포켓몬 중 강함인 ㅁㅊ 이름은 뭘까요?|r")
elseif i==15 then
set QuizTri=QuizArray[14]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF격투 포켓몬 중 강함인 ㅇㅂㄹㅅ 이름은 뭘까요?|r")
elseif i==16 then
set QuizTri=QuizArray[15]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF노말 포켓몬 중 전설인 ㄹㅋㅈ 이름은 뭘까요?|r")
elseif i==17 then
set QuizTri=QuizArray[16]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF노말 포켓몬 중 전설인 ㄷㅇㄹㄱ 이름은 뭘까요?|r")
elseif i==18 then
set QuizTri=QuizArray[17]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF전기 포켓몬 중 전설인 ㄹㅇㅋ 이름은 뭘까요?|r")
elseif i==19 then
set QuizTri=QuizArray[18]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF전기 포켓몬 중 전설인 ㅍㄱㅇ 이름은 뭘까요?|r")
elseif i==20 then
set QuizTri=QuizArray[19]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF물 포켓몬 중 전설인 ㅅㅇㅋ 이름은 뭘까요?|r")
elseif i==21 then
set QuizTri=QuizArray[20]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF물 포켓몬 중 전설인  ㄱㅇㅇㄱ이름은 뭘까요?|r")
elseif i==22 then
set QuizTri=QuizArray[21]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF불 포켓몬 중 전설인 ㅇㅌㅇ 이름은 뭘까요?|r")
elseif i==23 then
set QuizTri=QuizArray[22]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF불 포켓몬 중 전설인  ㄱㄹㄷ 이름은 뭘까요?|r")
elseif i==24 then
set QuizTri=QuizArray[23]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF풀 포켓몬 중 전설인 ㅅㄹㅂ 이름은 뭘까요?|r")
elseif i==25 then
set QuizTri=QuizArray[24]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF풀 포켓몬 중 전설인 ㅈㄹㅊ 이름은 뭘까요?|r")
elseif i==26 then
set QuizTri=QuizArray[25]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF에스퍼 포켓몬 중 전설인 ㄷㅋㄹㅇ 이름은 뭘까요?|r")
elseif i==27 then
set QuizTri=QuizArray[26]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF에스퍼 포켓몬 중 전설인  ㄱㄹㅌㄴ 이름은 뭘까요?|r")
elseif i==28 then
set QuizTri=QuizArray[27]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF격투 포켓몬 중 전설인 ㄹㅈㅅㅌ 이름은 뭘까요?|r")
elseif i==29 then
set QuizTri=QuizArray[28]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF격투 포켓몬 중 전설인 ㄹㅈㄱㄱㅅ 이름은 뭘까요?|r")
elseif i==30 then
set QuizTri=QuizArray[29]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포켓몬스터 금·은 게임에서 나오는 연두마을에 있는 박사이름은 뭘까요?|r")
elseif i==31 then
set QuizTri=QuizArray[30]

call EnableTrigger(QuizTri)
call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c000080FF포켓몬스터 게임에서 무조건 잡을 수 있는 포켓볼 이름은 뭘까요?|r")
endif

call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.00,"|c00FF0000↑|r")
endif

set GT_Timer=null
endfunction
function QuizArray_C takes nothing returns boolean
if DiePlayer[(1+GetPlayerId(GetTriggerPlayer()))]==false then
return true
endif

call DisplayTextToPlayer(Player(GetPlayerId(GetTriggerPlayer())),0,0,"패배하였으므로 퀴즈를 맞출 수 없습니다")
return false
endfunction
function QuizArray_A0 takes nothing returns nothing

call TriggerExecute(Quiz_Reward)

call DisableTrigger(GetTriggeringTrigger())
endfunction
function Trig_WITCH_Func001Func003A takes nothing returns nothing

call SetUnitPositionLoc(GetEnumUnit(),WICH)
endfunction
function NoTrade_Con takes nothing returns boolean
if(GetSpellAbilityId()=='A097')then
if(GetUnitAbilityLevel(GetTriggerUnit(),'A098')>0)then

call UnitRemoveAbility(GetTriggerUnit(),'A098')
else
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:28:34 | 顯示全部樓層
set CurLife[playerint]=0

set DiePlayer[playerint]=true

if Observ_Check[playerint]then

call MultiboardSetItemValueBJ(Xv,2,playerint+1,("|cff696969"+("관전중"+"|r")))
else

call MultiboardSetItemValueBJ(Xv,2,playerint+1,("|cff696969"+("패배"+"|r")))
endif

if(playerint==1)then
call EnableTrigger(BO)
elseif(playerint==2)then

call EnableTrigger(gO)
elseif(playerint==3)then

call EnableTrigger(KO)
elseif(playerint==4)then

call EnableTrigger(qO)
elseif(playerint==5)then

call EnableTrigger(UO)
elseif(playerint==6)then

call EnableTrigger(vR)
elseif(playerint==7)then

call EnableTrigger(nR)
elseif(playerint==8)then

call EnableTrigger(AR)
elseif(playerint==9)then

call EnableTrigger(DR)
elseif(playerint==10)then

call EnableTrigger(jR)
endif
call ConditionalTriggerExecute(Victory_T)

call ConditionalTriggerExecute(DiePlayer_T)
endfunction
function Observer_A takes nothing returns nothing

set Observ_Check[1+GetPlayerId(GetTriggerPlayer())]=true

call DieVariable(1+GetPlayerId(GetTriggerPlayer()))

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[(1+GetPlayerId(GetTriggerPlayer()))]+"님이 관전모드를 하셨습니다."))
endfunction

function CreateAllUnits takes nothing returns nothing
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:34:34 | 顯示全部樓層
call AdjustPlayerStateBJ(Co,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)

call DisplayTextToForce(kA(Condition(function SN)),("당신은 포켓볼에서"+(I2S(Co)+"의 골드를 획득하였습니다!")))
endif

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+"이(가) 이번 라운드의 포켓볼을 찾았습니다!"))

if(WN())then
if(IsTriggerEnabled(yR))then

call AddSpecialEffectLocBJ(GetSpellTargetLoc(),"Objects\\Spawnmodels\\Undead\\UDeathSmall\\UDeathSmall.mdl")

call DestroyEffect(bj_lastCreatedEffect)

set co=GetRectCenter(bj_mapInitialPlayableArea)

call CreateNUnitsAtLoc(1,Bo,GetTriggerPlayer(),co,bj_UNIT_FACING)

set fo=bj_lastCreatedUnit

call DisplayTextToForce(kA(Condition(function uN)),("당신은 포켓볼에서"+(GetUnitName(fo)+("를 획득하였습니다!"+"웨이브가 종료되면 포켓몬을 받을 수 있습니다."))))

call ShowUnitHide(bj_lastCreatedUnit)
call RemoveLocation(co)
loop
exitwhen(UN())

call TriggerSleepAction(RMaxBJ(bj_WAIT_FOR_COND_MIN_INTERVAL,1))
endloop

call ShowUnitShow(fo)

set co=GetRectCenter(Oo[(1+GetPlayerId(GetTriggerPlayer()))])

call SetUnitPositionLoc(fo,co)

set Bo=0
call RemoveLocation(co)
else

call AddSpecialEffectLocBJ(GetSpellTargetLoc(),"Objects\\Spawnmodels\\Undead\\UDeathSmall\\UDeathSmall.mdl")

call DestroyEffect(bj_lastCreatedEffect)

set co=GetRectCenter(Oo[(1+GetPlayerId(GetTriggerPlayer()))])

call CreateNUnitsAtLoc(1,Bo,GetTriggerPlayer(),co,bj_UNIT_FACING)
set Bo=0

call DisplayTextToForce(kA(Condition(function TN)),("당신은 포켓볼에서"+(GetUnitName(bj_lastCreatedUnit)+"을 획득하였습니다!")))

call RemoveLocation(co)
endif
endif
else

call DisplayTextToForce(kA(Condition(function jN)),"당신은 패배하였기 때문에 포켓볼을 획득할 수 없습니다. 다음 게임에 시도하세요.")
endif

set co=null
endfunction
function PlayerLocation takes player p2p returns nothing
local integer i2i=GetPlayerId(p2p)+1
if i2i==1 then

set c[i2i]=GetRandomLocInRect(qo)
elseif i2i==2 then

set c[i2i]=GetRandomLocInRect(to)
elseif i2i==3 then

set c[i2i]=GetRandomLocInRect(yo)
elseif i2i==4 then

set c[i2i]=GetRandomLocInRect(Yo)
elseif i2i==5 then

set c[i2i]=GetRandomLocInRect(zo)
elseif i2i==6 then

set c[i2i]=GetRandomLocInRect(Vr)
elseif i2i==7 then

set c[i2i]=GetRandomLocInRect(Ir)
elseif i2i==8 then

set c[i2i]=GetRandomLocInRect(Br)
elseif i2i==9 then

set c[i2i]=GetRandomLocInRect(Dr)
elseif i2i==10 then

set c[i2i]=GetRandomLocInRect(Gr)
else
endif

set p2p=null
endfunction
function Quiz_RewardA takes nothing returns nothing
local integer GT_Int=GetRandomInt(1,100)

set QuizI=0
if(DiePlayer[(1+GetPlayerId(GetTriggerPlayer()))]==false)then
if(GT_Int<=14)then

set Bo=H[GetRandomInt(1,attribute[1])]
elseif(GT_Int<=28)then

set Bo=Normal_Poke[GetRandomInt(1,attribute[2])]
elseif(GT_Int<=42)then

set Bo=Thunder_Poke[GetRandomInt(1,attribute[3])]
elseif(GT_Int<=56)then

set Bo=f[GetRandomInt(1,attribute[4])]
elseif(GT_Int<=70)then

set Bo=D[GetRandomInt(1,attribute[5])]
elseif(GT_Int<=84)then

set Bo=d[GetRandomInt(1,attribute[6])]
else

set Bo=B[GetRandomInt(1,attribute[7])]
endif

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetTriggerPlayer())+"이(가) 퀴즈를 맞췄습니다."))

call PlaySoundBJ(Get)

if(WN())then

call PlayerLocation(GetTriggerPlayer())

call CreateNUnitsAtLoc(1,Bo,Player(10),c[1+GetPlayerId(GetTriggerPlayer())],bj_UNIT_FACING)

call DisplayTextToForce(kA(Condition(function uN2)),("퀴즈의 보상으로 "+(GetUnitName(bj_lastCreatedUnit)+("가 등장 합니다!"))))

call RemoveLocation(c[GetPlayerId(GetTriggerPlayer())+1])
else
endif
else
call DisplayTextToForce(kA(Condition(function uN2)),"당신은 패배하였기 때문에 퀴즈를 맞출 수 없습니다.")
endif

call TimerDialogDisplay(quizDialog,(false))

set QuizTri=null
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:36:02 | 顯示全部樓層
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function LeaveGame_Act takes nothing returns nothing

set PlayingGamer=(PlayingGamer-1)

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[(1+GetPlayerId(GetTriggerPlayer()))]+"이(가) 포켓몬을 버리고 도망갔습니다..."))

call DieVariable(1+GetPlayerId(GetTriggerPlayer()))
endfunction
function Pc takes nothing returns nothing
local integer i2i

call ConditionalTriggerExecute(PlayerCheck_T)
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"공식채널 Clan PM")

set bj_forLoopBIndex=1
set bj_forLoopBIndexEnd=10
set bj_forLoopAIndex=1
回覆 支持 反對

使用道具 舉報

 樓主| 發表於 2017-5-3 18:39:42 | 顯示全部樓層
function Victory_Act takes nothing returns nothing

if(hD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[1]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif

if(HD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[2]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif

if(jD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[3]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif

if(JD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[4]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif

if(kD())then

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[5]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif

if(KD())then

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[6]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif
if(lD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[7]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif
if(LD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[8]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif
if(mD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[9]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif
if(MD())then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[10]+"이(가) 게임에 승리하였습니다. 혼자 게임을 계속합니다."))

set Restart=true
call PlaySoundBJ(In)
call KillSoundWhenDone(bj_lastPlayedSound)
endif
endfunction
function DefeatPlayer_Act takes nothing returns nothing
call TriggerSleepAction(2.)

set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=10
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(CurLife[bj_forLoopAIndex]<=0 and DiePlayer[bj_forLoopAIndex]==false)then

call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(W[bj_forLoopAIndex]+"이(가) 라이프 소모를 다하여 패배하였습니다."))

call DieVariable(bj_forLoopAIndex)
endif
回覆 支持 反對

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 註冊

本版積分規則

返回列表 快速回復 返回頂部