디아블로 오토 핫키 - diabeullo oto haski

2022.04.01 17:24조회 수 158댓글 0

※ver1.11으로 갱신 스톱워치기능 버그수정

오토핫키 쓰는 사람들을 위한 자동방생성/참가 스크립트 공유합니다

특히 디아런방이나 자신이 몇번이나 방을 돌았는지 체크해볼사람은 편해질겁니다

단축키 좌측 키패드 +누르면 방제와 방번호로 방생성/참가할수 있습니다

방생성/참가는 방제옆에 선택버튼으로 선택할수있고

비번은 없으면 공방으로 생성/참가

방번호는 방번호넣으시고

스톱워치기능도 넣어놨습니다(키패드0)

해상도는 일반적인 16:9의 비율이어야 합니다

해상도 비율이 특별하다면 클릭좌표를 새롭게 수정하셔야합니다

ex) diarun-013번에 참가하고 싶으면 방만들기창에

방제에 diarun-0까지 치고 비번은 지우고 방번호는 13치고

옆에 선택버튼을 눌러서 방생성을 방참가로 바꾸고

디아 대기실 들어와서 키패드+누르면 알아서 바로 참가함

다음방은 대기실로 나왔을때 키패드+만 누르면 바로 diarun-014번방으로 참가함

단축키:

키패드+ 방생성/참가 (다음방 자동으로 번호+1)

키패드- 방번호빼기 (+잘못눌렀을경우 방번호-1)

키패드0 스톱워치기능 (처음누르면 시작, 두번째는 종료 알림음과 시간알림창뜸)

오토핫키니까 어차피 스크립트 다 볼수있고 

불안해서 파일조차 다운안받을거면 스크립트로 직접 오토핫키파일만들어 쓰라고 올렸음

========아래부터 스크립트=======

#IfWinActive, ahk_exe D2R.exe

#KeyHistory 0

;변수 방제 방제번호 비번

bangje = title- 

playsub := 0 

pw0 := 

bangmake := 0 

Startime := 0

Elaspedtime :=0

lastElaspedtime := 0

bestElaspedtime := 0

timecount := 0

scr_w := 0

scr_h := 0

scr_x := 0

scr_y := 0

SysGet, scr_w, 0

SysGet, scr_h, 1

If(FileExist("dia_num.txt")){

FileReadLine, playsub, dia_num.txt, 1

FileReadLine, bangje, dia_num.txt, 2

FileReadLine, pw0, dia_num.txt, 3

}else{

FileAppend, %playsub%, dia_num.txt

FileAppend, `n%bangje%, dia_num.txt

FileAppend, `n%pw0%, dia_num.txt

}

Gui, Font, S10 CDefault, Verdana

Gui, Add, DropDownList, x210 y9 w65 h80 vbangdropdownL gMySubroutine Choose1, 방생성|방참가 

Gui, Font, S12 CDefault, Verdana

Gui, Add, Text, x10 y9 w50 h20 , 방제

Gui, Add, Text, x10 y39 w50 h20 , 비번

Gui, Add, Text, x10 y69 w50 h20 , 방번호

Gui, Font, S10 CDefault, Verdana

Gui, Add, Edit, x70 y9 w130 h20 vBangjeTxt, %bangje%

Gui, Add, Edit, x70 y39 w130 h20 vPWTxt, %pw0%

Gui, Add, Edit, x70 y69 w130 h20 vNoTxt, %playsub%

Gui, Add, UpDown, x200 y69 w30 h20, %playsub%

Gui, Add, Text, x10 y93 w130 h20 vBangmakeTxt, ※방만들기 키패드 +

Gui, Add, Text, x10 y113 w130 h20, ※방번호빼기 키패드 -

Gui, Add, Text, x145 y93 w120 h20 vbesttimeTxt, 최고기록:

Gui, Add, Text, x145 y113 w120 h20 vlasttimeTxt, 클리어타임:

Gui, Show, x511 y184 h233 w280, 디아방만들기

return 

MySubroutine:

GuiControlGet,bangdropdownL

if(bangdropdownL = "방생성"){

bangmake = 0

GuiControl,,BangmakeTxt, ※방만들기 키패드 +

}else{

bangmake = 1

GuiControl,,BangmakeTxt, ※방참가 키패드 +

}

return

Numpad0::   ;스톱워치기능 버그수정됨

if(timecount = 0){

timecount = 1

Startime := A_TickCount

SoundPlay,*16

}else{

timecount=0

Elaspedtime := (A_TickCount - Startime)/1000

Elaspedtime := Floor(Elaspedtime)

SoundPlay,*16

MsgBox,,시간,%Elaspedtime%초만에 클리어!!!,3

lastElaspedtime := Elaspedtime

GuiControl,,lasttimeTxt, 클리어타임: %lastElaspedtime%초

if(lastElaspedtime<bestElaspedtime){

bestElaspedtime := lastElaspedtime

GuiControl,,besttimeTxt, 최고기록: %bestElaspedtime%초

}

}

return

GuiClose:

ExitApp

NumpadAdd:: ;방만들기 단축키

if(bangmake = 0){

scr_x := scr_w*0.651

scr_y := scr_h*0.064

click %scr_x%, %scr_y%

sleep 50

scr_x := scr_w*0.677

scr_y := scr_h*0.163

click %scr_x%, %scr_y%

sleep 50

}else{

scr_x := scr_w*0.755

scr_y := scr_h*0.064

click %scr_x%, %scr_y%

sleep 50

scr_x := scr_w*0.651

scr_y := scr_h*0.163

click %scr_x%, %scr_y%

sleep 50

}

GuiControlGet,BangjeTxt

GuiControlGet,PWTxt

GuiControlGet,NoTxt

bangje := BangjeTxt

playsub := NoTxt

pw0 := PWTxt

send, %bangje%%playsub%

sleep 50

if (pw0 <> ""){

sendinput, {Tab}

sleep 50

sendinput, %pw0%

sleep 50

}

sendinput, {Enter}

If(FileExist("dia_num.txt")){

playsub++

NoTxt++

GuiControl,,NoTxt,%playsub%

FileDelete, dia_num.txt

FileAppend, %playsub%, dia_num.txt

FileAppend, `n%bangje%, dia_num.txt

FileAppend, `n%pw0%, dia_num.txt

}else{

playsub++

NoTxt++

GuiControl,,NoTxt,%playsub%

FileAppend, %playsub%, dia_num.txt

FileAppend, `n%bangje%, dia_num.txt

FileAppend, `n%pw0%, dia_num.txt

}

return

NumpadSub:: ;단축키설정

GuiControlGet,BangjeTxt

GuiControlGet,PWTxt

GuiControlGet,NoTxt

bangje := BangjeTxt

playsub := NoTxt

pw0 := PWTxt

playsub--

NoTxt--

If(FileExist("dia_num.txt")){

GuiControl,,NoTxt,%playsub%

FileDelete, dia_num.txt

FileAppend, %playsub%, dia_num.txt

FileAppend, `n%bangje%, dia_num.txt

FileAppend, `n%pw0%, dia_num.txt

}else{

GuiControl,,NoTxt,%playsub%

FileAppend, %playsub%, dia_num.txt

FileAppend, `n%bangje%, dia_num.txt

FileAppend, `n%pw0%, dia_num.txt

}

return

Toplist

최신 우편물

태그