Browse Subversion Repository
Diff of /trunk/installer/release/mpause.ttl
Parent Directory
| Revision Log
| Patch
1 |
; sample macro of Tera Term |
; sample macro of Tera Term |
2 |
; |
; |
3 |
; File: mpause.ttl |
; File: mpause.ttl |
4 |
; Description: wait command in each millisecond |
; Description: wait command in each millisecond |
5 |
; Environment: generic |
; Environment: generic |
6 |
; Update: 2006/2/10 |
; Update: 2006/2/10 |
7 |
; Author: Yutaka Hirata |
; Author: Yutaka Hirata |
8 |
|
|
9 |
timeout = 2 |
timeout = 2 |
10 |
|
|
11 |
sendln |
sendln |
12 |
sendln |
sendln |
13 |
sendln |
sendln |
14 |
|
|
15 |
for i 1 100 |
for i 1 100 |
16 |
|
|
17 |
sendln "uptime" |
sendln "uptime" |
18 |
pause 3 |
pause 3 |
19 |
sendln "uptime" |
sendln "uptime" |
20 |
; wait for 500 milliseconds. |
; wait for 500 milliseconds. |
21 |
mpause 500 |
mpause 500 |
22 |
mpause 500 |
mpause 500 |
23 |
mpause 500 |
mpause 500 |
24 |
mpause 500 |
mpause 500 |
25 |
mpause 500 |
mpause 500 |
26 |
mpause 500 |
mpause 500 |
27 |
sendln "uptime" |
sendln "uptime" |
28 |
|
|
29 |
sendln "cat /etc/passwd" |
sendln "cat /etc/passwd" |
30 |
sendln |
sendln |
31 |
sendln |
sendln |
32 |
sendln |
sendln |
33 |
|
|
34 |
:WAIT_CHECK |
:WAIT_CHECK |
35 |
sendln "#------ Log End -----" |
sendln "#------ Log End -----" |
36 |
wait "------ Log End -----" |
wait "------ Log End -----" |
37 |
if result=0 goto WAIT_CHECK |
if result=0 goto WAIT_CHECK |
38 |
flushrecv |
flushrecv |
39 |
next |
next |
40 |
|
|
41 |
sendln "#----- Macro Finish -----" |
sendln "#----- Macro Finish -----" |
42 |
end |
end |
|
Legend:
Removed from v.3226 |
|
changed lines |
|
Added in v.3227 |
|
|
|