script SeparateLines

[ffredyk 167]

Na prani v ICQ.. Neslo mu nacitat stringy ze souboru do dialogu (neradkovalo mu to)

stock SeparateLines(text[])
   {
       new
           tmp,
           temp[258];
       format(temp,258,"%s",text);
       loop:
       if(strfind(temp,";") != -1)
       {
           tmp = strfind(temp, ";");
           strdel(temp,tmp,tmp+1);
           strins(temp,"\n",tmp);
           goto loop;
       }else return temp;
       return temp;
   }

Misto \n staci v souborech psat ";" (bez uvozovek) nacist je do stringu treba "zdialogu" a pak pouzit:

zdialogu = SeparateLines(zdialogu);

[tbx 7]

nefunkční zatím

[ffredyk 167]

Uz funguje