/******************************************************************* PORTO Version 3.0. COPYRIGHT 1994 by Yilmaz Cengeloglu. This utilities are sole property of Yilmaz Cengeloglu P.O. Box 10412 Daytona Beach, FL 32120-0412, USA PORTO Version 3.0 can be freely used and redistributed. **********************************************************************/ ----------------------------- Creating A stock Portfolio : ----------------------------- Create a file and enter stock information in following format.. PORTFOLIO_TYPE STOCK BUY_DATE TICKER SHARE BUY_PRICE BUY_COMISSION SELL_COMISSION CODE CODE can be : buy and short example : Stock Portfolio ex1 -------- PORTFOLIO_TYPE STOCK 1/1/94 SUNW 100 22.625 35 35 buy 2/2/94 GTE 200 30.75 35 35 buy 3/2/94 DEC 100 28.0 35 35 buy 2/2/94 GTE 200 30.75 35 35 short --------- You can have multiple stock portfolio, create a new file for each portfolio. ----------------------------- Creating A option Portfolio : ----------------------------- Create a file and enter option information in following format.. PORTFOLIO_TYPE OPTION BUY_DATE TICKER EXPIRATION-MONTH EXERSIZE-PRICE UNDERLINE-STOCK-TICKER Expiration-date SHARE BUY_PRICE OPTION_BUY_COMISSION OPTION_SELL_COMISSION STOCK_BUY_COMISSION STOCK_SELL_COMISSION CODE CODE can be : call-buy and put-buy example : Option Portfolio ex3 --------- PORTFOLIO_TYPE OPTION 5/31/94 AAQ JUN 30 AAPL jun/17 1 1.75 29 29 25 25 call-buy 5/31/94 MSQ JUL 50 MSFT Jul/24 1 2.5 29 29 25 25 put-buy ---------- ----------------------------- Updating Stock and option Prices.. --------------------------- Open file st.dat and update prices. example st.dat ---- SUNW 21.5 DEC 24.125 GTE 31.375 ML 40 IBM 60 AAQJUN30.00 4 MSQJUL50.00 3 QNTM 15.75 VCAGX 31.71 ---- st.dat is used for all portfolio.. ----------------------------- Displaying Current Status of portfolio ----------------------------- Enter port ......... example : displaying portfolio ex1 , ex2 and ex3 at the same time *************** [cambridge]64: porto ex1 ex2 ex3 PORTO Version 3.0, COPYRIGHT 1994 by Yilmaz Cengeloglu. ------------------------------------------------------------------------- STOCK PORTFOLIO : ex1 ------------------------------------------------------------------------- Ticker Share Price Cost | Price Worth Gain/lost % ------------------------------------------------------------------------- SUNW 100.00 22.625 2297.50 | 21.500 2115.00 -182.50 -7.94 GTE 200.00 30.750 6185.00 | 31.375 6240.00 55.00 0.89 DEC 100.00 28.000 2835.00 | 24.125 2377.50 -457.50 -16.14 GTE 200.00 30.750 6115.00 S 31.375 6310.00 -195.00 -3.19 ------------------------------------------------------------------------- 17432.50 | 17042.50 -780.00 -4.47 ------------------------------------------------------------------------- ------------------------------------------------------------------------- STOCK PORTFOLIO : ex2 ------------------------------------------------------------------------- Ticker Share Price Cost | Price Worth Gain/lost % ------------------------------------------------------------------------- IBM 100.00 22.625 2297.50 | 60.000 5965.00 3667.50 159.63 ML 200.00 30.750 6185.00 | 40.000 7965.00 1780.00 28.78 ------------------------------------------------------------------------- 8482.50 | 13930.00 5447.50 64.22 ------------------------------------------------------------------------- ------------------------------------------------------------------------- OPTION PORTFOLIO : ex3 ------------------------------------------------------------------------- Ticker Price Cost | Stock Price Worth G/L EX-G/L % ------------------------------------------------------------------------- 1-AAQJUN30.00 1.750 204.00 | 30.000 4.000 371.00 167.0 -254.0 81.9 1-MSQJUL50.00 2.500 279.00 P 50.000 3.000 271.00 -8.0 -329.0 -2.9 ------------------------------------------------------------------------- 483.00 | 642.00 159.0 ------------------------------------------------------------------------- ------------------------------------------------------------------------ TOTALS 26398.00 31614.50 4826.50 18.28 ------------------------------------------------------------------------ [cambridge]65: ******************* -------------------------- NOTE ON DISPLAYING OPTIONS --------------------------- G/L : gain/lost if you sell the options EX-G/L : gain/lost, if you exersize and sell the stock. ----------------------------- CLOSING STOCKS ---------------------------- create a file and use following format PORTFOLIO_TYPE STOCK_CLOSED BUY_DATE TICKER SHARE BUY_PRICE BUY_COMISSION SELL_COMISSION CODE SELL_DATE SELL_PRICE example : exclosed --------- PORTFOLIO_TYPE STOCK_CLOSED 1/1/94 GE 100 22.625 35 35 buy 2/2/94 25 2/2/94 IBM 200 30.75 35 35 buy 3/3/94 32 3/2/94 GEGEX 100 28.0 35 35 buy 5/5/94 30 3/2/94 GEGEX 100 28.0 35 35 short 5/5/94 30 ----------- ----------------------------- CLOSING OPTIONS ---------------------------- It is not implemented. You can use STOCK_CLOSED at this time. ----------------------------- DISPLAYING CLOSED STOCK ----------------------------- enter port example : [cambridge]70: porto exclosed PORTO Version 3.0, COPYRIGHT 1994 by Yilmaz Cengeloglu. ------------------------------------------------------------------------- STOCK PORTFOLIO : exclosed ------------------------------------------------------------------------- Ticker Share Price Cost | Price Worth Gain/lost % ------------------------------------------------------------------------- GE 100.00 22.625 2297.50 | 25.000 2465.00 167.50 7.29 IBM 200.00 30.750 6185.00 | 32.000 6365.00 180.00 2.91 GEGEX 100.00 28.000 2835.00 | 30.000 2965.00 130.00 4.59 GEGEX 100.00 28.000 2765.00 S 30.000 3035.00 -270.00 -9.76 ------------------------------------------------------------------------- 14082.50 | 14830.00 207.50 1.47 ------------------------------------------------------------------------- ------------------------------------------------------------------------ TOTALS 14082.50 14830.00 207.50 1.47 ------------------------------------------------------------------------ [cambridge]71: -------- ------------------------- USING WHAT IF OPTION ------------------------- Open file whatif.dat and update prices. examples whatif.dat SUNW 124.75 GTE 130.125 GEGEX 118.75 DEC 129.375 APPL 133.5 ML 140 IBM 100 when you display portfolio with -f keyword, porto will update stock prices from whatif.dat instead of st.dat. ---------- [cambridge]73: porto -f ex1 PORTO Version 3.0, COPYRIGHT 1994 by Yilmaz Cengeloglu. ------------------------------------------------------------------------- STOCK PORTFOLIO : ex1 ------------------------------------------------------------------------- Ticker Share Price Cost | Price Worth Gain/lost % ------------------------------------------------------------------------- SUNW 100.00 22.625 2297.50 | 25.000 2465.00 167.50 7.29 GTE 200.00 30.750 6185.00 | 35.000 6965.00 780.00 12.61 DEC 100.00 28.000 2835.00 | 29.000 2865.00 30.00 1.06 GTE 200.00 30.750 6115.00 S 35.000 7035.00 -920.00 -15.04 ------------------------------------------------------------------------- 17432.50 | 19330.00 57.50 0.33 ------------------------------------------------------------------------- ------------------------------------------------------------------------ TOTALS 17432.50 19330.00 57.50 0.33 ------------------------------------------------------------------------ [cambridge]74: ---------------