Turtle Bisque
output = "TurtleB.lst";
exchange = nyse,amex,nasdaq;
DaysRequired=60;
DaysToLoad=60;
Printhdrln "Symbol,Company,Industry Group,Close,Change, % Chg,EPSRank,QRS,PE,Vol,30adv,SharesFloat,SharesShort, % Short";
if ( high (0) > max(-1,-55,hi) ) and
( high (-1) \< max(-2,-56,hi) ) and
High (0) > max(-1,-20,hi) and
High (-1) > max(-2,-21,hi)
then
println symbol , "," , Description,",",IRLsymbol:12,",",Close(0):7:2,",",Close(0)-Close(-1):7:2,",",((Close(0)-Close(-1))/Close(-1))*100:7:2,",",EPSRank(0):3:0,",",QRS(0):3:0,",",PE:5:0,",",vol(0)/1000:8:1,",",avgvol(0,-29)/1000:8:1,",",Sharesfloat:5:0,",",Shortint:5:3,",",100*Shortint/(Sharesfloat+1):3:1;
endif;