Mungkin sebelumnya saya memosting Asscii viewer yang berguna untuk menampilkan hasil dari kode asscii ke charakter, nah rekan-rekan dapat mengonvert dari asscii ke charakter atau sebaliknnya. berikut source kode pada pascal:
PROGRAM ASSCIICHAR;USES crt;var i,j: char;k : integer;label akhir;beginclrscr;repeat;writeln;writeln;writeln;writeln('1. ascii to char');writeln('2. char to ascii');write('input pilihan, ' + chr(39) + 'Q' + chr(39) +' untuk keluar : ');j := readkey ;j := upcase(j);if j = 'Q' then goto akhirelsewriteln;write('input : ');if j = '1' thenbeginreadln(k);writeln('ascii to char = ', chr(k));endelse if j = '2' thenbeginreadln(i);writeln('char to ascii = ', ord(i))end;until j = 'q';akhir:end.dengan hasil output sebagai berikut:
Selamat Mencoba yaw...