TUGAS ALGO1

Cara Membuat Dari Visual Basic:
1. Kita buka program visual basic 6.0 - standart exe

2. Kita buad 2 label, biarkan saja (name)nya label1 dan label 2 dan tambahkan 1 timer dengan interval 1000 pada properties timer.

3. seperti gambar di bawah ini:

atau sesuai dengan selera dan kreasi anda sendiri, atur di properties label dan form untuk mengubah warna dan bentuk font.

4. untuk coding copy-paste coding di bawah ini untuk coding timer:

Private Sub Timer1_Timer()
s$ = Label1.Caption
s$ = Right$(s$, 1) & Mid$(s$, 1, Len(s$) - 1)
Label1.Caption = s$

s$ = Label2.Caption
s$ = Mid$(s$, 2, Len(s$)) & Left$(s$, 1)
Label2.Caption = s$
End Sub

Kemudian jalankan!
dan teks akan bergerak, label1 teks akan bergerak dari kiri ke kanan, sedangkan pada label2 teks akan berjalan dari kanan ke kiri.




Cara Membuat Dari C++:

#include<iostream> #include<windows.h> //variabel global untuk menyimpan tombol informasi //tombol yang ditekan INPUT_RECORD InRec; //fungsi delay(), digunakan untuk menunda proses eksekusi //selama beberapa millisecond #define delay Sleep //fungsi gotoxy(), digunakan untuk menempatkan kursor //pada posisi KOLOM dan BARIS void gotoxy(unsigned int kolom, unsigned int baris) { COORD posisi = {kolom,baris}; SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE), posisi); } //fungsi kbhit(), digunakan untuk mendeteksi terjadinya //penekanan tombol. Jika terdapat tombol yang ditekan maka fungsi ini //akan mengembalikan nilai TRUE sebaliknya FALSE bool kbhit() { DWORD EventCount,NumRead; GetNumberOfConsoleInputEvents(GetStdHandle(STD_INPUT_HANDLE), &EventCount); if(EventCount>0) ReadConsoleInput(GetStdHandle(STD_INPUT_HANDLE), &InRec, 1, &NumRead); return (InRec.EventType == KEY_EVENT); } //fungsi getch(), digunakan untuk mengambil informasi tombol yang //terakhir kali ditekan. char getch() { return InRec.Event.KeyEvent.uChar.AsciiChar; } int main() { char tekan='X'; //perulangan ini akan diulang selama tekan TIDAK SAMA dengan 'x' while(tekan!='x') { //cetak tulisan 'halo' pada kolom=20 & baris=10 gotoxy(20,10); cout << "hallo"; delay(1000); //cetak tulisan kosong pada kolom=20 & baris=10 //untuk menimpa tulisan 'halo' gotoxy(20,10); cout << " "; //cetak tulisan 'dunia' pada kolom=30 & baris=10 gotoxy(30,10); cout << "dunia"; delay(1000); //cetak tulisan kosong pada kolom=30 & baris=10 //untuk menimpa tulisan 'dunia' gotoxy(30,10); cout << " "; //cek apakah terjadi penekanan tombol, //jika 'ya', simpan tombol tersebut pada variabel TEKAN if(kbhit()) tekan = getch(); } }

saat di run akan muncul tulisan hello dan dunia dari kiri ke kanan , ,

http://www.khairulumam.com/2012/01/sistem-informasi-akademik-dengan-visual.html