It's not much but as i do more I'll post them.
Anything specific ?
;Name of Script.
proc main
transmit "li u 59010^M" ;List mail box No.
waitfor "CAEHQ."
transmit "mod u 59010^M" ;Mod Mail box.
waitfor " MOD:"
transmit "59010,59010,100,^M" ;CHANGE COS to 100.
waitfor " MOD:"
transmit "59020^M"
waitfor " MOD:"
transmit "59020,59020,100,^M"
waitfor " MOD:"
transmit "59030^M"
waitfor " MOD:"
transmit "59030,59030,100,^M"
waitfor " MOD:"
transmit "59040^M"
waitfor " MOD:"
transmit "59040,59040,100^M"
waitfor " MOD:"
transmit "59050^M"
waitfor " MOD:"
transmit "59050,59050,100^M"
waitfor " MOD:"
transmit "59600^M"
waitfor " MOD:"
transmit "59600,59600,100^M"
transmit "^M"
endproc
lever