PDA

View Full Version : FlashText



Dumpin
11-04-2007, 07:28 PM
Simple script I made, its just for fun, or making a nice sig

Function FlashText(TheText: string; totalflash:integer) : boolean;
var
Flashtimes : integer;
begin
repeat
ClearDebug;
Writeln(' '+TheText+' ');
wait(500);
ClearDebug;
wait(500);
Flashtimes := Flashtimes +1
Until(Flashtimes = totalflash)
end;

Makes a flashing Text in your Debug. Fill it in like:

Flashtext('Dumpin Owns!!!', 3);

Dumpin owns = the text
3 = the number of flashes

easy!!!

MasterKill
11-04-2007, 07:30 PM
lol. the first function that works!

rofl.

good job though.

you learned something wich is good ;)

Dumpin
11-04-2007, 07:33 PM
hehe ty, but this was a VEEEEERRRRRRRRYYYYYYYY simple function ;P I am going to try other later :)
ty