script

[johnpoole]

here's a pretty decent script that just sends information in seq.. this one sends any group of numbers to ld 87.. i wrote it because some of our remotes are were sent blocks of 100 numbers.. of course users want to move one number back to the main site.. by modifing the bold lines it is very flexable.

proc main
    integer iCount
    string sCount
    
    call ld87

    for iCount = [b]1168 upto 1172[/b]
    waitfor "DSC  "
     
   
    itoa iCount sCount
      transmit sCount
    mspause 2
    transmit "^M"
     call body
    call stepto
    endfor
    transmit "End^M"

endproc 


proc body
 
 

waitfor "FLEN "

mspause 10
   transmit[b] "4^M"[/b]
   waitfor "DSP  "
   transmit "^M"
   waitfor "RLI  "
   transmit[b] "1^M"[/b]
   waitfor "NPA  "
   transmit "^M"
   waitfor "NXX  "
   transmit "^M"
 
 endproc

proc stepto
  beep
  set txpace 40
  endproc
  
  
  
  proc ld87
  
  set txpace 60
  
  transmit "new^M"
   waitfor "CUST "
   transmit "0^M"
   waitfor "FEAT "
   transmit "cdp^M"
   waitfor "TYPE "
   transmit "dsc^M"
   
   endproc

john poole
bellsouth business
columbia,sc