home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD-ROM Magazin 1995 November
/
CD_11_95.BIN
/
demos
/
gocis
/
stocks.scr
< prev
next >
Wrap
Text File
|
1993-07-30
|
1KB
|
53 lines
;
;***********************************************************************
; WinCIS .94
; Copyright(C) 1992
; Larry Lee (76670,1471)
; 16038 Augusta Drive
; Chino Hills, Ca 91709
;***********************************************************************
; GO FULL SCREEN
WINDOWSTATE MAXIMIZE
WAIT !
SEND SET BRIEF YES^M
WAIT !
SEND SET PAGED NO^M
WAIT !
SEND SET BLANK YES^M
WAIT !
SEND GO CIS^M
WAIT !
; Erase Exitsing File if Any
KILLFILE &MESSAGEPATH\STOCKS.TXT
; ^M^J is the same as a CRLF
; Add a Title Line
PUTFILE &MESSAGEPATH\STOCKS.TXT ^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT *****************************************^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT * S T O C K R E P O R T *^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT *****************************************^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT * Date: &Date^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT * Time: &Time^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT * Name: &UserName^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT * Account: &UserId^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT *****************************************^M^J
PUTFILE &MESSAGEPATH\STOCKS.TXT ^M^J
; Start File Capture
CAPTURE &MESSAGEPATH\STOCKS.TXT APPEND
SEND QUOTE HRB^M
WAIT !
; Turn Off File Capture
CAPTURE OFF
; Shrink the screen Size
; WINDOWSTATE MINIMIZE
; Call Notepad
; SHELL NOTEPAD.EXE 1 &MESSAGEPATH\STOCKS.TXT
; Logoff CIS and Exit the Terminal Window
LOGOFF