10 lines
188 B
Tcl
10 lines
188 B
Tcl
namespace eval robot {
|
|
proc add_robby {} {
|
|
MakeAsyncProtocol robot
|
|
MakeAsyncQueue robby robot 137.157.201.26 6000
|
|
robby delay 500
|
|
robby timeout 50000
|
|
drive sx 0 sy 0 som 0
|
|
}
|
|
}
|