Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

  • Congratulations waross on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

ver 5.07

Status
Not open for further replies.

gpape

Mechanical
Nov 18, 2003
18
0
0
US
The company I work for has 5.07 (please don't laugh). Is there a way to make the scroll button work on my Microsoft Optical mouse? Center button is tentative, but won't scroll. Thanks
 
Replies continue below

Recommended for you

V5.07 is for dos,
I don't think you can make scroll mouse work to scroll.
I used to just use an F key to zoom in
and shf f key to zoom out..
I don't think I have any old ucms anymore to help you even..
I did find date text.. copy below and paste into notpad and save as date.ucm
;
; Store current symbology, active level.
; Date text placer Public domain L.Lea

SET R0 = IDSYMB ; Active symbology
SET R1 = CAFONT ; Active font number
SET R2 = ACTLEV ; Store active level
SET R3 = TXJUST ; Text justification

SET C0=DGNNAM ; Create the string containing the file
SET C0=C0+' '
SET C0=C0+_DATE
SET C0=C0+' '
; SET C0=C0+_TIME


START:
SET CONTRL=CONTRL ! 768 ; Disable the message fields.
MSG 'CFDATE & FILE Stamp Utility.'
MSG 'PRDATA point to place File Name & Date.'
MSG 'ST'
MSG 'ERRESET to EXIT.'
GET P,PLNAME,R,EXITUC
GO START

PLNAME:
SET I0=XUR
SET I1=YUR
CMD TXJS2 ; Set text justification left, bottom
KEY 'LV=60'
KEY 'CO=4'
KEY 'WT=1'
KEY 'FT=1'
; KEY 'TX=3.5'
CMD PTEXT
KEY C0
PNT I0,I1
RST

EXITUC:
CMD NULCMD
SET IDSYMB = R0 ; Restore active
SET CAFONT = R1 ; parameters
SET ACTLEV = R2 ;
SET TXJUST = R3
SET CONTRL = CONTRL & -769 ; Enable the message fields.
MSG 'ST'
MSG 'CF'
MSG 'PR'
MSG 'ER'
MSG 'MS'
END
 
Status
Not open for further replies.
Back
Top