Jan:
Here's a simple example:
output="example.lst"; input="portfoli.lst";
integer i; For i = 0 to -3 step -1 do If Close(i) > Close(i-1) then println symbol,",",close(i):8:3, ",", date(i); endif; next i;
The output looks like this:
A , 20.875,06/25/1998 A , 20.750,06/24/1998 AA , 64.500,06/23/1998 AAB , 20.625,06/24/1998 AAB , 20.375,06/22/1998 AABC , 12.375,06/24/1998 AAC , 8.500,06/24/1998 AAC , 7.312,06/23/1998 AACE , 17.875,06/24/1998 AACE , 16.750,06/23/1998 AACE , 16.500,06/22/1998 AAFG , 0.312,06/25/1998 AAFG , 0.281,06/22/1998 AAG , 23.875,06/24/1998 AAG , 23.812,06/23/1998 AAGIY , 3.750,06/23/1998 AAGP , 2.062,06/25/1998 AAGP , 2.031,06/23/1998 AAII , 12.500,06/23/1998 AAIR , 8.156,06/24/1998 AAIR , 8.125,06/23/1998 AAIR , 8.062,06/22/1998 AAM , 14.250,06/25/1998 AAM , 14.000,06/24/1998 AAM , 13.875,06/23/1998
|