728x90
반응형
S2U2 에는 블루투스 헤드셋이 연결되면 S2P 를 실행시키는 옵션이 있다.
얼마전 프로그램 주 메모리의 부족으로 과감하게 S2U2 를 삭제했는데, 위 기능은 계속 아쉬움으로 남았다.
그런 이유로 MortScript 를 활용한 블루투스 헤드셋 연결 감지 스크립트를 작성하게 되었다.
2초마다 한번씩 블루투스 헤드셋이 연결되었는지를 확인하고, 지정된 프로그램이 실행되지 않은 상태일 때 지정된 프로그램을 실행시키도록 했다.
또한 블루투스 헤드셋 연결이 끊어지면 지정된 프로그램을 종료시키도록 했다.
스크립트의 내용은 아래와 같다.
스크립트 파일을 첨부한다.
얼마전 프로그램 주 메모리의 부족으로 과감하게 S2U2 를 삭제했는데, 위 기능은 계속 아쉬움으로 남았다.
그런 이유로 MortScript 를 활용한 블루투스 헤드셋 연결 감지 스크립트를 작성하게 되었다.
2초마다 한번씩 블루투스 헤드셋이 연결되었는지를 확인하고, 지정된 프로그램이 실행되지 않은 상태일 때 지정된 프로그램을 실행시키도록 했다.
또한 블루투스 헤드셋 연결이 끊어지면 지정된 프로그램을 종료시키도록 했다.
스크립트의 내용은 아래와 같다.
#DetectBluetoothConnection.mscr
setQ=0
# 프로그램 경로
Path_S2P = "\Wibrostore\프로그램 파일\S2P\s2p.exe"
# 프로그램 경로
Path_S2P = "\Wibrostore\프로그램 파일\S2P\s2p.exe"
while (1)
#블루투스 연결 상태 확인
state=RegRead("HKLM", "\System\State\Hardware\", "Bluetooth")
# 연결된 상태 : 29
if (29 = state)
# 이미 프로그램이 실행되어 있는 상태가 아니면 프로그램 실행
if (ProcExists("s2p.exe"))
else
Run(Path_S2P)
endif
# 연결된 상태가 아닌 경우
else
# 프로그램이 실행중이면 프로그램 종료
if (ProcExists("s2p.exe"))
kill("s2p.exe")
endif
endif
Sleep (2000)
EndWhile
#블루투스 연결 상태 확인
state=RegRead("HKLM", "\System\State\Hardware\", "Bluetooth")
# 연결된 상태 : 29
if (29 = state)
# 이미 프로그램이 실행되어 있는 상태가 아니면 프로그램 실행
if (ProcExists("s2p.exe"))
else
Run(Path_S2P)
endif
# 연결된 상태가 아닌 경우
else
# 프로그램이 실행중이면 프로그램 종료
if (ProcExists("s2p.exe"))
kill("s2p.exe")
endif
endif
Sleep (2000)
EndWhile
스크립트 파일을 첨부한다.
반응형
'모바일소프트웨어' 카테고리의 다른 글
Spb MobileShell 3 프리뷰 (0) | 2009.04.17 |
---|---|
워드프로세서형 에디터 MyEditor (0) | 2009.01.06 |
금연 다이어리 StopSmokingDiary 1.0 build 4 (12) | 2009.01.06 |