
Hai kali ini ane akan bahas tentang membuatan Screensaver menggunakan turbo pascal 07 langsung aja ke TKPSSnyaCode : Program Screensaver;uses crt;Var a : integer;Beginclrscr;randomize; while not keypressed do begin gotoxy(random((80)+1),random((25)+1)); textcolor(random(5)+1); write(chr(random(6)+1)); textbackground(random((5)+1)); ...