循環替換腳本
1. 求助用autohotkey編寫鍵盤替換腳本
;定義變數
toggle=0
`::
;~
toggle=1
Return
~Space::
;加~發送原有按鍵
toggle=0
Return
$q::
;加$屏蔽腳本按鍵
iftoggle=1
{
Send,{7Down};第一次按下一秒內只發送一次
KeyWait,q,T1
Loop
{
GetKeyState,枯野q_state,q,P;檢測q的狀態
ifq_state=U
{
Send,{7Up};抬起
Break;中斷循環
}
Else
{
Send,{7Down};按下
}
Sleep,30;休息30ms
}
}
iftoggle=0
{
Send,{qDown};第一次按下一秒內只發送一次
KeyWait,q,T1
Loop
{
GetKeyState,q_state,q,P;檢測q的狀態
ifq_state=U
{
Send,{qUp};抬起
Break;中斷循環
}
Else
{
Send,{qDown};按下
}
Sleep,30;休息30ms
}
}
Return
$w::
;加$屏蔽腳本按鍵
iftoggle=1
{
Send,碧敗橡{8Down};第一次按下一秒內只發送一次
KeyWait,w,悔旁T1
Loop
{
GetKeyState,w_state,w,P;檢測q的狀態
ifw_state=U
{
Send,{8Up};抬起
Break;中斷循環
}
Else
{
Send,{8Down};按下
}
Sleep,30;休息30ms
}
}
iftoggle=0
{
Send,{wDown};第一次按下一秒內只發送一次
KeyWait,w,T1
Loop
{
GetKeyState,w_state,w,P;檢測q的狀態
ifw_state=U
{
Send,{wUp};抬起
Break;中斷循環
}
Else
{
Send,{wDown};按下
}
Sleep,30;休息30ms
}
}
Return
2. 按鍵精靈怎麼用一次腳本間隔1小時在循環
1、首先打開按鍵精靈，點擊需要設置循環的腳本，再點擊後方的【屬性】。
3. 請問怎麼在shell腳本中，替換文件多行裡面的指定字元串
sed-i'/aaa/{:a;n;s/123/xyz/g;/eee/!ba}'yourfile先匹配aaa，匹配到後執行大括弧里的語句。
n 讀取下一行
s/123/xyz/g 將123替換為xyz，全局替換，同一行中出現幾次替換幾次
:a 設定跳轉標簽a
/eee/!ba 若當前行匹配不上eee，則跳轉到標簽a處繼續執行，構成一個循環。若匹配到eee，則退出循環，sed重新對讀入的每行匹配aaa。
由於sed沒有加-n靜默選項，所以默認對每行數據處理後都列印。
4. excel中有全形字元，比如：「12 等，如何用VBA腳本批量替換
使用 for next 循環 逐一替換唄！
將下面的代碼 插入 你的文檔 模塊中……然後執行 就把工作不中所有的表中的全形變成了半形
根據你自己的實際需要修改吧！
祝你快樂！
Sub test()
Dim mycel As Range
For i = 1 To ActiveWorkbook.Sheets.Count
Sheets(i).Select
For Each mycel In Sheets(i).UsedRange
mycel = WorksheetFunction.Asc(mycel)
Next
Next
MsgBox "恭喜你該工作簿中的所有全形字元都已經被替換成半形的了 "
End Sub
5. shell腳本 批量替換文件 重金酬謝
我理解一下，你的意思只是想把2012-01-01.txt里的year-month-day改成跟文件名一樣是嗎？
如果是這樣，可以這么寫。
1.所有文件名存一個數組。
2.依次調用數組元素，然後用sed替換文本里的內容就行了。
6. 按鍵精靈怎樣設置:循環某腳本100次後切換至另一個腳步
你其實可以利用子程序的方法，不一定要分兩個腳本，例如這個
Rem c
//這些是判斷a腳本是否運行了悔冊100次
If n=100 Then
Call b()
//b程序是在a腳本運行100次之後才運行的
Else
For 100
Call a()
n=n+1
Next
Goto c
End If
//-----分割線------
Sub a()
//這里填寫你想要運行100次的腳本碧耐宏
End Sub
Sub b()
//這里填寫你運行100次a腳本之後運行的b腳本
End Sub
（我是新手，這個畝猜腳本在我的電腦上測試可以使用。。但是我只是告訴你方法。。。你要用我這個我沒意見。。只是運行不了的話不要罵我。。。）
7. bat 替換字元串
::關閉回顯&窗口標題
@echooff&title切換語言By依夢琴瑤
::開啟環境變數延遲
::設置painter.ini文檔所在的主目錄，如果直接在腳本所在目錄搜索，請直接寫一個英文小數點
setIniDir=.
::跳轉目錄
cd/d"%IniDir%"
::搜索painter.ini文件，包括子目錄
for/f"delims="%%ain('dir/a-d/s/bpainter.ini')do(
rem讀取搜索到的文件內容，這里for前面加個(，主要用於把此for中執行過程中顯示的內容進行輸出
(for/f"eol=delims="%%bin('type"%%~a"')do(
rem設置行內容到Str變數
set"Str=%%~b"
rem顯示Str變數值，並傳遞到findstr命令進行查找zh_CN字元串，>nul2>nul用於屏蔽反饋提示
rem&&表示findstr找到指定字元串後要准備執行什麼
echo"!Str!"|findstr/c:"zh_CN">nul2>nul&&(
rem顯示替換zh_CN為en_US後的Str變數值
echo!Str:zh_CN=en_US!
rem設置一個空值的local變數，主要用於後續窗口中文字提示的判斷
set"local="
rem||表示findstr找不到指定字元串後要准備執行什麼
)||(
rem顯示Str變數值，並傳遞到findstr命令進行查找en_US字元串，>nul2>nul用於屏蔽反饋提示
rem&&表示findstr找到指定字元串後要准備執行什麼
echo"!Str!"|findstr/c:"en_US">nul2>nul&&(
御枯rem顯示替換en_US為zh_CN後的Str變數值
echo!Str:en_US=zh_CN!
rem設置一個值為1的local變數，主要用於後續窗口中文字提示的判斷
set"local=1"
rem||表示findstr找不到指定字元串後要准備執行什麼
)||(
rem顯示沒有相關字元串的Str變數值
echo!Str!
rem結束第二次findstr命令的處理過程
)
rem結束第一次findstr命令的處理過敏拆殲程
)
rem結束第二次for命令的處理過程，並輸出上面執行時顯示的內容到Ini_tmp$文件
))>Ini_tmp$
rem判斷local變數是否被定義值，
ifdefinedlocal(
rem如果被定義就直接在CMD窗口中顯示下方一行內容
echoen_US--^>zh_CN
橋沖
rem如果沒有被定義
)else(
rem就顯示下方一行內容
echozh_CN--^>en_US
rem結束if判斷語句
)
rem移動Ini_tmp$，並覆蓋搜索到的painter.ini文件，以達到修改的目的
move/yIni_tmp$"%%~a">nul2>nul
rem結束第一次for，也就是搜索文件的處理過程
)
rem暫停腳本
pause
這樣的腳本和每行注釋，應該能看的明白了吧！