home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
pibterm
/
pibt41e3.zip
/
PIBTERM.DEF
< prev
next >
Wrap
Text File
|
1988-01-05
|
9KB
|
260 lines
; File: PibTerm.Def
; Purpose: Microsoft Mouse interface for PibTerm v4.1.
; Author: Philip R. Burns
; Version: 1.0. October 29, 1987
;
Begin LB,ES,BB,Left,Right,Up,Down,50,50
LB: Execute PTMenu ; Left button pops up main menu
ES: Type 13 ; Right button = carriage return
BB: Type ESC ; Both buttons = escape
Left: Type 0,75 ; Left arrow
Right: Type 0,77 ; Right arrow
Up: Type 0,72 ; Up arrow
Down: Type 0,80 ; Down arrow
PTMenu: PopUp 2,2,inverse ;
Text "╔══════════════════════════════════════════════════════════════════════════╗"
Text "║ PibTerm ║"
Text "╠══════════════╤══════════════╤══════════════╤══════════════╤══════════════╣"
Text "║ File Transfer│ Toggles │ DOS │ Dialing │ Goodies ║"
Text "╟──────────────┼──────────────┼──────────────┼──────────────┼──────────────╢"
Text "║ Kermit Get │ BS sends BS │ Jump To Dos │ Dial │ Show Review ║"
Text "║ Kermit Rcv │ BS sends DEL │ │ Redial │ Timers ║"
Text "║ Kermit Send │ Echo │ Change Dir │ Hang Up │ Translate ║"
Text "║ Kermit Finish│ LineFeeds │ Change Drive │ │ Edit Line ║"
Text "║ │ Muting │ Directory │ Change Port │ Area Codes ║"
Text "║ Receive File │ │ Free Space │ Change Speed │ Define Keys ║"
Text "║ Send File │ CTS │ │ │ Info ║"
Text "║ │ Xon/Xoff │ Quit │ Send Break │ Set Params ║"
Text "╠══════════════╪══════════════╪══════════════╪══════════════╪══════════════╣"
Text "║ File Actions │ Emulation │ Capture │ Scripts │ Screen ║"
Text "╟──────────────┼──────────────┼──────────────┼──────────────┼──────────────╢"
Text "║ Copy File │ VT100 │ To File │ Execute │ Clear Screen ║"
Text "║ Delete File │ Tek 4010 │ To Log │ Learn │ Dump Screen ║"
Text "║ Edit File │ Gossip Mode │ To Printer │ Unload All │ Reset Term ║"
Text "║ Print File │ ANSI/BBS │ │ Exit │ Set Colors ║"
Text "║ View File │ Host │ │ │ VT100 Colors ║"
Text "╚══════════════╧══════════════╧══════════════╧══════════════╧══════════════╝"
Select 2,2,74
Select 6,2,14,Get_Kermit
Select 7,2,14,Receive_Kermit
Select 8,2,14,Send_Kermit
Select 9,2,14,Finish_Kermit
Select 11,2,14,Receive
Select 12,2,14,Send
Select 6,17,14,BackSpace
Select 7,17,14,Delete
Select 8,17,14,Echo
Select 9,17,14,LineFeeds
Select 10,17,14,Muting
Select 12,17,14,CTS
Select 13,17,14,Xon_Xoff
Select 6,32,14,Jump
Select 8,32,14,ChDir
Select 9,32,14,ChDrive
Select 10,32,14,Dir
Select 11,32,14,Free_Space
Select 13,32,14,Exit
Select 6,47,14,Dial
Select 7,47,14,ReDial
Select 8,47,14,Hang_Up
Select 10,47,14,Change_Port
Select 11,47,14,Change_Speed
Select 13,47,14,Send_Break
Select 6,62,14,Show_Review
Select 7,62,14,Timers
Select 8,62,14,Translate
Select 9,62,14,Edit_Line
Select 10,62,14,Area_Codes
Select 11,62,14,Define_Keys
Select 12,62,14,Info
Select 13,62,14,Set_Params
Select 17,2,14,Copy_File
Select 18,2,14,Delete_File
Select 19,2,14,Edit_File
Select 20,2,14,Print_File
Select 21,2,14,View_File
Select 17,17,14,Do_VT100
Select 18,17,14,Do_Tek4010
Select 19,17,14,Do_Gossip
Select 20,17,14,Do_AnsiBBS
Select 21,17,14,Do_Host
Select 17,32,14,Capture
Select 18,32,14,Logging
Select 19,32,14,Printing
Select 17,47,14,Execute_Script
Select 18,47,14,Learn_Script
Select 19,47,14,Unload_All
Select 20,47,14,Exit
Select 17,62,14,Clear_Screen
Select 18,62,14,Screen_Dump
Select 19,62,14,Reset_Terminal
Select 20,62,14,Set_Colors
Select 21,62,14,VT100_Colors
PEND
;-------------------------------------------------------------------
Get_Kermit: Execute Receive,LetD,LetB
Send_Kermit: Execute Send,LetD,LetB
Receive_Kermit: Execute Receive,LetD,LetD
Finish_Kermit: Execute Send,LetD,LetF
Receive: Execute AltR
Send: Execute AltS
;-------------------------------------------------------------------
BackSpace: Execute AltP,LetI,LetC,CR,CR
Delete: Execute AltP,LetI,LetD,CR,CR
Echo: Execute AltE
LineFeeds: Execute AltP,LetC,LetF,CR,CR
Muting: Execute AltM
CTS: Execute AltP,LetC,LetH,CR,CR
Xon_Xoff: Execute AltP,LetC,LetN,CR,CR
;-------------------------------------------------------------------
Jump: Execute AltJ
ChDir: Execute AltF,AltA
ChDrive: Execute AltF,AltL
Dir: Execute AltF,LetD
Free_Space: Execute AltF,LetF
;-------------------------------------------------------------------
Dial: Execute AltD
ReDial: Execute AltQ
Hang_Up: Execute AltH
Change_Port: Execute AltP,LetC,LetA
Change_Speed: Execute AltN
Send_Break: Execute AltB
;-------------------------------------------------------------------
Show_Review: Execute AltV
Timers: Execute AltY
Translate: Execute AltT
Edit_Line: Execute AltA
Area_Codes: Execute AltZ
Define_Keys: Execute AltK
Info: Execute AltI
Set_Params: Execute AltP
;-------------------------------------------------------------------
Copy_File: Execute AltF,LetC
Delete_File: Execute AltF,LetZ
Edit_File: Execute AltF,LetE
Print_File: Execute AltF,LetP
View_File: Execute AltF,LetV
;-------------------------------------------------------------------
Do_VT100: Execute AltP,LetT,LetA,LetD,CR,CR,CR
Do_Tek4010: Execute AltP,LetT,LetA,LetG,CR,CR,CR
Do_Gossip: Execute AltP,LetT,LetA,LetE,CR,CR,CR
Do_AnsiBBS: Execute AltP,LetT,LetA,LetC,CR,CR,CR
Do_Host: Execute AltW
;-------------------------------------------------------------------
Printing: Execute AltL
Capture: Execute AltO
Logging: Execute AltP,LetO,LetI,CR,CR
;-------------------------------------------------------------------
Execute_Script: Execute AltG
Learn_Script: Execute AltG,CR,LetL
Unload_All: Execute AltG,CR,LetA,Escape
Exit: Execute AltX
;-------------------------------------------------------------------
Clear_Screen: Execute AltC
Screen_Dump: Execute AltU
Reset_Terminal: Execute ShiftTab
Set_Colors: Execute AltP,LetV
VT100_Colors: Execute AltP,LetV,LetI,CR,CR
;-------------------------------------------------------------------
Escape: Type ESC
CR: Type 13
;-------------------------------------------------------------------
AltA: Type 0,30
AltB: Type 0,48
AltC: Type 0,46
AltD: Type 0,32
AltE: Type 0,18
AltF: Type 0,33
AltG: Type 0,34
AltH: Type 0,35
AltI: Type 0,23
AltJ: Type 0,36
AltK: Type 0,37
AltL: Type 0,38
AltM: Type 0,50
AltN: Type 0,49
AltO: Type 0,24
AltP: Type 0,25
AltQ: Type 0,16
AltR: Type 0,19
AltS: Type 0,31
AltT: Type 0,20
AltU: Type 0,22
AltV: Type 0,47
AltW: Type 0,17
AltX: Type 0,45
AltY: Type 0,21
AltZ: Type 0,44
;-------------------------------------------------------------------
ShiftTab: Type 0,15
;-------------------------------------------------------------------
LetA: Type "a"
LetB: Type "b"
LetC: Type "c"
LetD: Type "d"
LetE: Type "e"
LetF: Type "f"
LetG: Type "g"
LetH: Type "h"
LetI: Type "i"
LetJ: Type "j"
LetK: Type "k"
LetL: Type "l"
LetM: Type "m"
LetN: Type "n"
LetO: Type "o"
LetP: Type "p"
LetQ: Type "q"
LetR: Type "r"
LetS: Type "s"
LetT: Type "t"
LetU: Type "u"
LetV: Type "v"
LetW: Type "w"
LetX: Type "x"
LetY: Type "y"
LetZ: Type "z"