$yazi = explode("\n",$yazi);
for($i=0; $i<count($yazi); $i++){
     imagestring($im,2,$x- strlen($yazi)*2+(20*$i) ,$y -15,$yazi[$i],$siyah);
}

bilmem anlatabilmişimdir

yaziyi tanimlarkende
$yazi = "deneme\ndeneme2\ndeneme3";

gibi yapmaniz yeterli olacaktir.

ordaki x poziyosnu ile oynamaniz lazim.