Create tttt.pas