Here is my Procomm Plus script for configuring a SIP route & Trunk & all of the other main parameters.
; 18th November 2005
; NOTE!
; This program will only work with a WINDOWS version of Procomm Plus.
; The " ; " denotes that the data on the program file line is ignored,
; when the script is run.
; This program file should remain unaltered & only copies made from it for whatever
; use is required. P.S. I suggest that you make it a "READ ONLY" file. & store it on
; your P.C's HARD DRIVE.
; NOTE!
; For Release 03.00 onwards
; I have used the highest available D Channel "254" for half & full groups
; & D Channel 79 for the smaller SSC (11c) systems. The script will change
; the D Channel, according the the SCH code message.
proc main
WHEN TARGET 1 "DMOD " CALL CAR_RETURN
WHEN TARGET 2 "IDEF " CALL CAR_RETURN
WHEN TARGET 3 "TTA " CALL KNOW
WHEN TARGET 4 "CLEN " CALL CAR_RETURN
WHEN TARGET 5 "CDRX " CALL CAR_RETURN
WHEN TARGET 6 "RACD " CALL CAR_RETURN
WHEN TARGET 7 "VTRK " CALL VTRK
WHEN TARGET 8 "BRIP " CALL CAR_RETURN
WHEN TARGET 9 "RANX " CALL CAR_RETURN
WHEN TARGET 10 "TCPP " CALL CAR_RETURN
; WHEN TARGET 11 "NCNA " CALL NCNA_NO
; WHEN TARGET 12 "NCRD " CALL NCNA_NO
; WHEN TARGET 13 "ISAR " CALL ISAR_NO
WHEN TARGET 14 "DCDR " CALL CAR_RETURN
WHEN TARGET 15 "IANI " CALL CAR_RETURN
WHEN TARGET 16 "DSPD " CALL CAR_RETURN
WHEN TARGET 17 "RUCS " CALL CAR_RETURN
WHEN TARGET 18 "RURC " CALL CAR_RETURN
WHEN TARGET 19 "RUCF " CALL CAR_RETURN
WHEN TARGET 20 "MULT " CALL CAR_RETURN
WHEN TARGET 21 "DSPT " CALL CAR_RETURN
WHEN TARGET 22 "OPR " CALL CAR_RETURN
WHEN TARGET 23 "PRDL " CALL CAR_RETURN
WHEN TARGET 24 "DNSZ " CALL CAR_RETURN
WHEN TARGET 25 "RCAL " CALL CAR_RETURN
WHEN TARGET 26 "MCTS " CALL CAR_RETURN
; WHEN TARGET 27 "ALRM " CALL CAR_RETURN
WHEN TARGET 28 "BTT " CALL CAR_RETURN
WHEN TARGET 29 "ACKW " CALL CAR_RETURN
WHEN TARGET 30 "PECL " CALL CAR_RETURN
WHEN TARGET 31 "DCTI " CALL CAR_RETURN
WHEN TARGET 32 "VRAT " CALL CAR_RETURN
WHEN TARGET 33 "OHQ " CALL CAR_RETURN
WHEN TARGET 34 "OHQT " CALL CAR_RETURN
; WHEN TARGET 35 "TTBL " CALL CAR_RETURN
; WHEN TARGET 36 "ATAN " CALL CAR_RETURN
WHEN TARGET 37 "PLEV " CALL PLEV
WHEN TARGET 38 "ICIS " CALL CAR_RETURN
WHEN TARGET 39 "OGIS " CALL CAR_RETURN
WHEN TARGET 40 "FALT " CALL CAR_RETURN
WHEN TARGET 41 "PTYP " CALL CAR_RETURN
WHEN TARGET 42 "MFC " CALL CAR_RETURN
WHEN TARGET 43 "TIMR " CALL CAR_RETURN
WHEN TARGET 44 "SST " CALL CAR_RETURN
WHEN TARGET 45 "DTD " CALL CAR_RETURN
WHEN TARGET 46 "CPDC " CALL CAR_RETURN
WHEN TARGET 47 "DLTN " CALL CAR_RETURN
WHEN TARGET 48 "HOLD " CALL CAR_RETURN
WHEN TARGET 49 "SEIZ " CALL CAR_RETURN
WHEN TARGET 50 "SVFL " CALL CAR_RETURN
WHEN TARGET 51 "MANO " CALL CAR_RETURN
WHEN TARGET 52 "OHTD " CALL CAR_RETURN
WHEN TARGET 53 "ATRR " CALL CAR_RETURN
WHEN TARGET 54 "TRRL " CALL CAR_RETURN
WHEN TARGET 55 "CRID " CALL CAR_RETURN
WHEN TARGET 56 "SRCH " CALL CAR_RETURN
WHEN TARGET 57 "STYP " CALL CAR_RETURN
WHEN TARGET 58 "AC2 " CALL CAR_RETURN
WHEN TARGET 59 "FNP " CALL CAR_RETURN
WHEN TARGET 60 "CLID " CALL CAR_RETURN
WHEN TARGET 61 "ISDN " CALL VTRK
WHEN TARGET 62 "TIDM " CALL CAR_RETURN
WHEN TARGET 63 "DASC " CALL CAR_RETURN
WHEN TARGET 64 "ROPT " CALL CAR_RETURN
WHEN TARGET 65 "DITI " CALL CAR_RETURN
WHEN TARGET 66 "TRNX " CALL CAR_RETURN
WHEN TARGET 67 "EXTT " CALL CAR_RETURN
WHEN TARGET 68 "FTOP " CALL CAR_RETURN
WHEN TARGET 69 "APAD " CALL CAR_RETURN
WHEN TARGET 70 "NAS ATCL " CALL CAR_RETURN
WHEN TARGET 71 "NAS ACTV " CALL CAR_RETURN
WHEN TARGET 72 "FOPT " CALL PLEV
WHEN TARGET 73 "CNDN " CALL CAR_RETURN
WHEN TARGET 74 "CNAT " CALL CAR_RETURN
WHEN TARGET 75 "CNIP " CALL CAR_RETURN
WHEN TARGET 76 "DMWM " CALL CAR_RETURN
WHEN TARGET 77 "MWNS " CALL CAR_RETURN
WHEN TARGET 78 "CNTC " CALL CNTC_44
WHEN TARGET 79 "NATC " CALL CAR_RETURN
WHEN TARGET 80 "INTC " CALL INTC_00
WHEN TARGET 81 " GRP " CALL GRP_00
WHEN TARGET 82 "DNUM " CALL DNUM_15
WHEN TARGET 83 "CDNO " CALL CDNO
WHEN TARGET 84 "PORT " CALL PORT_03
WHEN TARGET 85 "DPNS " CALL CAR_RETURN
WHEN TARGET 86 "USR " CALL ISLD
WHEN TARGET 87 "SGRP " CALL CAR_RETURN
WHEN TARGET 8 "SSRC " CALL CAR_RETURN
WHEN TARGET 9 "ISLM " CALL ISLM
WHEN TARGET 11 "OVLR " CALL CAR_RETURN
WHEN TARGET 12 " OVLR " CALL CAR_RETURN
WHEN TARGET 35 "OVLS " CALL CAR_RETURN
WHEN TARGET 36 " OVLS " CALL CAR_RETURN
WHEN TARGET 94 "SCH3160 " CALL SCH4791
WHEN TARGET 95 "SCH4791 " CALL SCH4791
WHEN TARGET 96 "SCH0582 " CALL SCH5563
WHEN TARGET 97 "SCH5576 " CALL SCH5563
WHEN TARGET 98 "SCH5563 " CALL SCH5563
WHEN TARGET 99 "SCH0162 " CALL SCH0162
transmit "****~~"
; waitfor ">"
transmit "~~~~LD 117^M~~~"
; waitfor "=>"
transmit "NEW ZONE 1 100000 BB 100000 BB^M~~~~"
; waitfor "=>"
transmit "NEW ZONE 2 100000 BB 100000 BB^M~~~~"
; waitfor "=>"
transmit "****~~"
; waitfor ">"
transmit "LD 17^M"
waitfor "REQ"
transmit "CHG^M"
waitfor "TYPE "
transmit "ADAN^M"
waitfor "ADAN "
transmit "NEW DCH 254^M"
waitfor "CTYP "
transmit "DCIP^M"
waitfor "DES "
transmit "IP_PEER^M"
waitfor "IFC "
transmit "SL1^M"
; waitfor "SSRC "
; transmit "^M"
waitfor "OTBF "
transmit "^M"
waitfor "RLS "
transmit "xx^M"
waitfor "RCAP "
transmit "ND2^M"
waitfor "RCAP "
transmit "^M"
; waitfor "H323 "
; transmit "^M"
; waitfor " OVLR "
; transmit "^M"
; waitfor " OVLS "
; transmit "^M"
waitfor "MBGA "
transmit "^M"
waitfor "NASA "
transmit "YES^M"
waitfor "TIMR"
transmit "^M"
waitfor "ADAN "
transmit "^M"
waitfor "REQ"
transmit "END^M"
; waitfor ">"
transmit "LD 16^M"
waitfor "REQ"
transmit "NEW^M"
waitfor "TYPE"
transmit "RDB^M"
waitfor "CUST"
transmit "0^M"
; waitfor "DMOD"
; transmit "x^M"
waitfor "ROUT"
transmit "120^M~~"
waitfor "DES"
transmit "SIP ROUTE^M"
waitfor "TKTP "
transmit "TIE^M"
waitfor "ESN "
transmit "^M"
waitfor "CNVT "
transmit "^M"
waitfor "SAT "
transmit "^M"
; waitfor "IDEF "
; transmit "^M"
waitfor "RCLS "
transmit "^M"
; waitfor "VTRK "
; transmit "YES^M"
waitfor "ZONE "
transmit "2^M"
waitfor "PCID "
transmit "SIP^M"
; waitfor "CRID "
; transmit "^M"
waitfor "NODE "
transmit "1^M"
waitfor "MODE "
transmit "ISLD^M"
waitfor "DCH "
transmit "254^M"
waitfor "IFC "
transmit "SL1^M"
waitfor "PNI "
transmit "1^M"
waitfor "NCNA "
transmit "YES^M"
waitfor "NCRD "
transmit "YES^M"
waitfor "TRO "
transmit "YES^M"
waitfor "CTYP "
transmit "CDP^M"
waitfor "INAC "
transmit "^M"
waitfor "ISAR "
transmit "NO^M"
waitfor "DAPC "
transmit "^M"
; waitfor "DSEL "
; transmit "^M"
; waitfor "PTYP "
; transmit "^M"
waitfor "AUTO "
transmit "^M"
waitfor "DNIS "
transmit "^M"
; waitfor "DCDR "
; transmit "^M"
waitfor "ICOG "
transmit "IAO^M"
; waitfor "SRCH "
; transmit "^M"
waitfor "TRMB "
transmit "NO^M"
waitfor "STEP "
transmit "^M"
waitfor "ACOD "
transmit "1620^M"
; waitfor "TCPP "
; transmit "^M"
waitfor "TARG "
transmit "X1^M"
waitfor "BILN "
transmit "^M"
; waitfor "SGRP "
; transmit "^M"
waitfor "OABS "
transmit "^M"
waitfor "INST "
transmit "^M"
waitfor "IDC "
transmit "^M"
waitfor "ANTK "
transmit "^M"
waitfor "SIGO "
transmit "^M"
waitfor "CNTL "
transmit "YES^M"
waitfor "NEDC "
transmit "ETH^M"
waitfor "FEDC "
transmit "ETH^M"
waitfor "DRNG "
transmit "YES^M"
waitfor "NDRI "
transmit "^M"
waitfor "CDR "
transmit "YES^M"
waitfor "INC "
transmit "YES^M"
waitfor "LAST "
transmit "YES^M"
waitfor "QREC "
transmit "NO^M"
waitfor "OAL "
transmit "YES^M"
waitfor "AIA "
transmit "YES^M"
waitfor "OAN "
transmit "YES^M"
waitfor "OPD "
transmit "YES^M"
waitfor "NDP "
transmit "^M"
waitfor "NATL "
transmit "^M"
waitfor "SSL "
transmit "^M"
waitfor "CFWR "
transmit "^M"
waitfor "IDOP "
transmit "^M"
; waitfor "VRAT "
; transmit "^M"
waitfor "MUS "
transmit "^M"
waitfor "PANS "
transmit "^M"
waitfor "FRL "
transmit "^M"
; waitfor "OHQ "
; transmit "^M"
; waitfor "OHQT "
; transmit "^M"
waitfor "CBQ "
transmit "^M"
waitfor "AUTH "
transmit "^M"
waitfor "TTBL "
transmit "^M"
waitfor "ATAN "
transmit "^M"
; waitfor "PLEV "
; transmit "0^M"
; waitfor "OPR "
; transmit "^M"
waitfor "ALRM "
transmit "^M"
; waitfor "PECL "
; transmit "^M"
; waitfor "DCTI "
; transmit "^M"
waitfor "TIDY "
transmit "^M"
waitfor "REQ"
transmit "****^M~~"
; waitfor ">"
pause 2
transmit "LD 15^M"
waitfor "REQ"
transmit "CHG^M"
waitfor "TYPE"
transmit "NET_DATA^M"
waitfor "CUST "
transmit "0^M"
waitfor "OPT "
transmit "^M"
; waitfor "AC2 "
; transmit "^M"
; waitfor "FNP "
; transmit "^M"
; waitfor "ISDN "
; transmit "YES^M"
waitfor " VPNI "
transmit "1^M"
waitfor " PNI "
transmit "^M"
waitfor " PINX_DN "
transmit "^M"
waitfor " MBG "
transmit "^M"
waitfor " BSGC "
transmit "^M"
waitfor " PFX1 "
transmit "^M"
waitfor " PFX2 "
transmit "^M"
waitfor " HLOC "
transmit "^M"
waitfor " LSC "
transmit "^M"
waitfor " RCNT "
transmit "^M"
waitfor " PSTN "
transmit "^M"
waitfor " TNDM "
transmit "^M"
waitfor " PCMC "
transmit "^M"
waitfor " SATD "
transmit "^M"
waitfor " OCLI "
transmit "^M"
; waitfor "EXTT "
; transmit "^M"
; waitfor "FTOP "
; transmit "^M"
; waitfor "APAD "
; transmit "^M"
waitfor "VNR "
transmit "^M"
waitfor "NIT "
transmit "^M"
; waitfor "NAS ATCL "
; transmit "^M"
; waitfor "NAS ACTV "
; transmit "^M"
; waitfor "FOPT "
; transmit "0^M"
; waitfor "CNDN "
; transmit "^M"
; waitfor "CNAT "
; transmit "^M"
; waitfor "CNIP "
; transmit "^M"
; waitfor "DMWM "
; transmit "^M"
; waitfor "MWNS "
; transmit "^M"
; waitfor "CNTC "
; transmit "1^M" ; "International access number for your country!"
; waitfor "NATC "
; transmit "^M" ; "Local area dialling code!"
; waitfor "INTC "
; transmit "00^M" ; "access code to make a international call after AC1/2 is dialled"
waitfor "REQ"
transmit "****^M~~"
; waitfor ">"
endproc
PROC KNOW
TRANSMIT "NO^M"
ENDPROC
PROC CAR_RETURN
TRANSMIT "^M"
ENDPROC
PROC NCNA_NO
TRANSMIT "YES^M"
ENDPROC
PROC ISAR_NO
TRANSMIT "NO^M"
ENDPROC
PROC PLEV
TRANSMIT "0^M"
ENDPROC
PROC VTRK
TRANSMIT "YES^M"
ENDPROC
PROC SCH0162
TRANSMIT "126^M"
ENDPROC
PROC CNTC_44
TRANSMIT "44^M"
ENDPROC
PROC INTC_00
TRANSMIT "00^M"
ENDPROC
PROC SCH5563
TRANSMIT "NEW DCH 79^M"
ENDPROC
PROC SCH4791
TRANSMIT "79^M"
ENDPROC
PROC GRP_00
TRANSMIT "0^M"
ENDPROC
PROC DNUM_15
TRANSMIT "15^M"
ENDPROC
PROC CDNO
TRANSMIT "2^M"
ENDPROC
PROC PORT_03
TRANSMIT "3^M"
ENDPROC
PROC ISLD
TRANSMIT "ISLD^M"
ENDPROC
PROC ISLM
TRANSMIT "382^M"
ENDPROC
All the best
Firebird Scrambler
Meridian Programmer in the UK