Home

Selamat Datang di blog Creativitas Anak Purworejo

Rabu, 19 Juni 2013

Cara Menulis Option Value Tanggal Lahir di HTML Dengan Cepat

Setalah lama ga buat postingan kini saatnya meluncur kembali. Pada postingan kali ini saya ingin membagikan tips membuat option value di HTML dengan cepat, tidak sampai 5 menit. Seperti inilah contohnya..


Pada contoh kali ini say menggunaka option value untuk tanggal lahir. capek kan kalo harus menuliskan
"< option value ="1" > 1< /option>" sampai 31 kali. Nah ada trik mudah caranya bukalah MS Excel.

* Pada cell pertama ketikkan < option value ="
< /option>

nah tampilannya seperti ini..


Selanjutnya blok kelima cell tersebut dan tarik ujung kanan bawah sampaicell 31. Hasilnya seperti ini..


kemudian copy dan paste di notepad. Uppss.. jangan lansung save HTML ya soalnya codenya masih belum bener.



Nah selanjutnya copy salah satu spasi kosong, copy, lalu klik menu edit, > Replace paste di form "find what". Klik Repleace All.


nah copy n paste di code HTML agan2.. beres dah..

Senin, 28 Januari 2013

Membuat kalkulator sederhana dengan delphi 7

Tutorial membuat kalkulator sederhana menggunakan delphi 7.. silahkan disimak.. thank for whatcing this video.. please came back here or klik Youtube"

Membuat Menu Website Dengan CSS dan background gradient

Mari disimak cara membuat menu dengan css... thank for watching this video.. please come back here.. atau klik Youtube

Kamis, 17 Januari 2013

Tutorial Membuat Web Browser Dengan Delphi 7

Pada postingan kali ini saya akan memposting video tutorial membuat browser dengan delphi 7. Video ini dapat didownload menggunakan downloader semacam IDM. Silahkan disimak. atau silahkan download di link download berikut DOWNLOAD Jika berhasil

Rabu, 11 April 2012

pemrograman c++ part2

pada pembahasan sebelumnya Pemrograman C++ part 1 saya menggunakan borland c++ portable. namun pada postingan kali ini saya gunakan borland c++ 5.02. perbedaannya ada pada headernya dengan di tambah header conio.h
#include
dan sebelum tanda } di tambah getch();
fungsinya untuk memanggil program

Fungsi Manipulator

Menggunakan header iomanip.h
#include

setprecision()

Mengatur jumlah digit desimal
coba katik code ini di borland C++ 5.02



setw()

Mengatur lebar tampilan
contohnya:




coba ubah angkanya dan huruf "a","b","c" di ubah kata.

setfill()

Menambah karakter sejumlah lebar pada setw()



cobalah code diatas

setiosflags()


Mengatur format keluaran data

setiosflags() untuk perataan

ios::left digunakan untuk perataan sebelah kiri
ios::right digunakan untuk perataan sebelah kanan



setiosflags() untuk konversi notasi keluaran

ios::scientific digunakan untuk mengatur keluaran dalam bentuk eksponensial
ios::fixed digunakan untuk mengatur keluaran dalam bentuk desimal.
coba ketik code di bawah:



setiosflags() untuk menampilkan simbol (+)

ios::showpos digunakan untuk menampilkan simbol (+) untuk variabel yang memiliki nilai bilangan positif



Fungsi Matematika


Menggunakan header math.h
#include

sqrt(x)


sqrt(x) memberikan nilai balik berupa akar kuadrat x. Argumen x dan nilai balik bertipe double




pow(x,y)


pow(x,y) memberikan nilai balik berupa x pangkat y.Argumen x dan y serta nilai balik bertipe double
coba ketik code ini:






Fungsi Matematika Lainnya


  • sin(x)
  • cos(x)
  • tan(x)
  • log(x)
  • log10(x)
  • cabs(x)


SELAMAT MENCOBA... MAU PINTAR GA HARUS MAHAL...

Sabtu, 31 Maret 2012

Pemrograman C++ part 1

Pengenalan Bahasa C++

Diciptakan oleh Bjarne Stroustrup pada tahun 1983Bahasa C++ kompatibel dengan bahasa CKelebihan : Mendukung Object Oriented Programming (OOP)Karakteristik penulisan script : Case Sensitive ( Membedakan antara huruf kapital dan huruf kecil ).

Pengenalan Bahasa C

Bahasa C diciptakan oleh Dennis Ritchie tahun 1972 di Bell Laboratories. Bahasa C dapat dikategorikan High Level Language dan Low Level Language.

Special symbols include:

  • +
  • -
  • *
  • /
  • .
  • ;
  • ,
  • !=<=
  • ==
  • >=

Tipe Data

NameDescriptionSize*Range*
charCharacter or small integer.1bytesigned: -128 to 127 unsigned: 0 to 255
short int(short)Short Integer.2bytessigned: -32768 to 32767 unsigned: 0 to 65535
intInteger.4bytessigned: -2147483648 to 2147483647 unsigned: 0 to 4294967295
long int (long)Long integer.4bytessigned: -2147483648 to 2147483647 unsigned: 0 to 4294967295
boolBoolean value. It can take one of two values: true or false.1bytetrue or false
floatFloating point number.4bytes+/- 3.4e +/- 38 (~7 digits)
doubleDouble precision floating point number.8bytes+/- 1.7e +/- 308 (~15 digits)
long doubleLong double precision floating point number.8bytes+/- 1.7e +/- 308 (~15 digits)
wchar_tWide character.2 or 4 bytes1 wide character
langsung ke contoh prrogram ya biar ga bosen... tapi sebelumnya download dulu programnya Borlan c++ portable.rar bagi yang sudah punya lanjut... coba buka aplikasinya. klik file, > new lalu ketik ini
lalu tekan ctrl+F9 apa yang terjadi??? coba ketik yang ini

coba ketik code diatas tanpa \n, atau ganti dengan \t atau \b coba run program apa yang terjadi??? lanjut ke tingkat lebih... coba ketik ini

coba ketik juga yang ini lalu run

disini x dan y sudah di tentukan lalu bagaimana kalo memasukkan angka yang di inginkan?? coba ketik ini

cobalah untuk membuat program segi tiga dll. untuk pembagian sebaiknya variablenya menggunakan float contoh menghitung luas segitiga

silahkan download materinya disini dalam bentuk pdf. bagi pengguna seluler download mobile pdf disini.

Jumat, 16 Maret 2012

Pesan Eror Turbo Pascal

Hasil comot sana sini

1 Out of memory
Kesalahan ini terjadi bila memory tidak mencukupi sewaktu
proses kompilasi.
2 Identifier expected
Suatu pengenal (identifier) harus ada diposisi ini. Kesalahan ini
mungkin
3 Unknown identifier
Pengenal belum dideklarasikan
4 Duplicate identifier
Pengenal telah digunakan dalam blok ini
5 Syntax error
Suatu karakter tidak sah telah ditemukan di program sumber.
Kemungkinan kesalahan ini disebabkan lupa menuliskan tanda
petik diantara suatu konstanta string.
6 Error in real constant
Konstanta tipe real salah
7 Error in integer constant
Konstanta tipe integer salah
8 String constant exceeds line
Konstanta string melebihi suatu baris
9 Too many nested files
Kesalahan ini disebabkan karena menggunakan include file
yang bersarang lebih dari 5
10 Unexpected end of file
Kesalahan ini disebabkan karena program selesai tidak
semestinya kemungkinan terjadi karena Begin dan End tidak
imbang, suatu include file berakhir di tengah bagian pernyataan
dan tidak menutup suatu komentar program.
11 Line too long
Maksimum panjang suatu baris adalah 126 karakter
12 Type identifier expected
Suatu pengenal tidak menunjukkan tipe yang seharusnya
13 Too many open files
Kesalahan ini adalah tidak dapat membukanya beberapa file,
yang disebabkan oleh file CONFIG.SYS tidak ada atau jumlah file
yang disebutkan di command CONFIG.SYS terlalu sedikit.
14 Invalid file name
Nama sari suatu file tidak benar atau mengandung jalur
pencarian (path) yang tidak ada di disk
15 File not found
File tidak ditemukan di directory yang aktif
16 Disk full
Disk penuh, hapuslah file-file yang sudah tidak digunakkan
17 Invalid compiler directive
Kesalahan pada compiler directive yang digunakan, disebabkan
oleh kemungkinan huruf compile directive tidak dikenal, satu
atau lebih parameter di compiler directive tidak benar dan
penggunaan compiler directive yang bersifat global ketika
kompilasi terhadap suatu badan program utama mulai
dilakukan.
18 Too many files
Terlalu banyak file yang terlibat sewaktu kompilasi suatu
program atau unit. Usahakanlah untuk tidak menggunakan
terlalu banyak file, yaitu dengan cara menggabung beberapa
include file.
19 Undefined type in pointer definition
Tipe ini sebelumnya telah dihubungkan dengan suatu deklarasi
tipe pointer, tetapi belum pernah dideklarasikan.
20 Variable indentifier expected
Pengenal ini tidak menunjukkan suatu variabel seperti yang
seharusnya
21 Error in type
Simbol ini tidak dapat digunakan untuk memulai suatu deklarasi
tipe
22 Structure too large
Ukuran maksimum yang diijinkan untuk tipe terstruktur adalah
sebanyak 65520 byte
23 Set base type out of range
Base type dari suatu himpunan (set) harus berupa suatu
subrange dengan batas jangkauan 0..255 atau suatu tipe
enumerated yang tidak lebih dari 256 kemungkinan nilai.
24 File components may not be files
Konstruksi berupa file di dalam file tidak diijinkan
25 Invalid string length.
Panjang suatu string yang dideklarasikan harus diantara 1..255
26 Type mismatch
Kesalahan ini disebabkan karena tiepe variabel dan ungkapan
yang tidak sesuai di statement pengerjaan, tipe parameter
formal dan parameter nyata yang tidak sesuai pada penggunaan
suatu prosedur atau fungsi, tipe ungkapan dan tipe indeks yang
tidak sesuai untuk indeks suatu larik dan tipe operand yang
tidak sesuai di suatu ungkapan.
27 Invalid subrange base type
Base type di suatu subrange yang tidak benar, harus berupa
tipe ordinal
28 Lower bound greater than upper bound
Pendeklarasian suatu tipe subrange yang tidak benar, karena
nilai batas bawahnya lebih besar dengan nilai batas atasnya.
29 Ordinal type expected
Tipe real, string, tipe terstruktur dan tipe pointer tidak diijinkan
disini, harus berupa tipe ordinal.
30 Integer constant expected
Konstanta integer harus digunakan disini
31 Constant expected
Suatu konstanta harus digunakan disini
32 Integer or real constant expected
Konstanta integer atau real harus digunakan disini
33 Type identifier expected
Suatu pengenal tidak menunjukkan suatu tipe yang seharusnya
34 Invalid function result type
Tipe hasil dari suatu fungsi tidak benar dan yang benar adalah
semua tipe sederhana, tipe string atau tipe pointer
35 Label identifier expected
Suatu pengenal tidak menunjukkan suatu label yang seharusnya
36 BEGIN expected
Kata cadangan Begin diharapkan
37 END expected
Kata cadangan End diharapkan
38 Integer expression expected
Ungkapan yang mengikuti harus bertipe integer
39 Ordinal expression expected
Ungkapan yang mengikuti harus bertipe ordinal
40 Boolean expression expected
Ungkapan yang mengikuti harus bertipe boolean
41 Operand types do not match operator
Operator yang digunakan tidak dapat untuk tipe operandnya,
misalnya operator DIV tidak dapat menggunakan operand tipe
Char atau String
42 Error in expression
Kesalahan di dalam suatu ungkapan yang mungkin disebabkan
Anda lupa meletakkan suatu operator diantara dua operand
43 llegal assignment
Suatu pengerjaan yang salah, disebabkan oleh kemungkinan
variabel file dan variabel tak bertipe tidak dapat diisi dengan
suatu nilai
44 Field identifier expected
Suatu pengenal tidak menunjukkan suatu field di variabel record
yang mendahulinya
45 Object file too large
Turbo Pascal tidak dapat menghubungkan (link) file-file. OBJ
yang lebih besar dari 64 K
46 Undefined external
Prosedur External atau fungsi External tidak mengandung
definisi PUBLIC yang dapat ditemukan di file objek. Telitilah
kembali file sumber .ASM.
47 Invalid object file record
File .OBJ mengandung record objek yang tidak benar.
Yakinkanlah bahwa file ini adalah benar-benar file .OBJ
48 Code segment too large
Ukuran maksimum dari kode suatu program atau unit adalah
65520 byte
49 Data segment too large
Ukuran maksimum dari segment data suatu program 65520
byte, termasuk dengan data yang dideklarasikan di unit. Bila
membutuhkan data yang bersifata global melebihi batas ini,
maka dapat dideklarasikan sebagi pointer dan alokasikanlah
secara dinamik di heap menggunakan prosedur standar new.
50 DO expected
Statement DO diharapkan
51 Invalid PUBLIC definition
Kesalahan ini disebabkan karena kemungkinan suatu pengenal
dibuat public melalui suatu directive PUBLIC di bahasa perakit,
tetapi tidak sesuai dengan deklarsi External di program Pascal
atau unit, dua atau lebih directive PUBLIC di bahasa perakit
mendefinisikan pengenal yang sama dan file .OBJ
mendefinisikan simbol PUBLIC yang tidak ada di segment CODE
52 Invalid EXTRN definition
Kesalahan ini disebabkan oleh kemungkinan suatu pengenal
dihubungkan lewat directive EXTRN pada bahasa perakit, tetapi
tidak deklarasikan di program Pascal atau unit, tidak juga
dibagian penghubung di suatu unit yang digunakan oleh
program, yang kedua adalah suatu pengenal sebagi variabel
absolut dan yang terakhir disebabkan karena suatu pengenal
digunakan di prosedur atau fungsi Inline
53 Too many EXTRN definitions
Turbo Pascal tidak dapat menangani file .OBJ yang mempunyai
lebih dari 256 definisi EXTRN
54 OF expected
Kata cadangan OF diharapkan
55 INTERFACE expected
Kata cadangan interface diharapkan
56 Invalid relocatable reference
Kesalahan ini disebakan karena
o Anda mencoba mendeklarasikan suatu varibel pada segment
DATA di file .OBJ
o File .OBJ mengandung byte-sized yang dihubungkan dengan
simbol relocatable. Kesalahan ini terjadi bil aAnda
menggunkan operator HIGH dan LOW dengan simbol
relocatable atau Anda hubungkan dengan simbol relocatable
di directive DB
o Suatu operand yang dihubungkan dengan simbol
relocatabele yang belum didefinisikan di degement CODE
atau di segment DATA
o Suatu operand yang dihubungkan dengan suatu prosedur
atau fungsi EXTRN dengan suatu offset
57 THEN expected
Kata cadangan THEN diharapkan
58 TO or DOWNTO expected
Kata cadangan TO atau DOWN TO diharapkan
59 Undefined forward
Kesalahan ini disebabkan karena:
o Suatu prosedur atau fungsi telah dideklarasikan di bagian
penghubung dari suatu unit, tetapi definisinya tidak tampak
di bagian penerapan
o Suatu prosedur atau fungsi telah dideklarasikan dengan
acuan Forward tetapi defisinya tidak ditemukan
60 Too many procedures
Turbo Pascal tidak mengijinkan lebih dari 512 prosedur atau
fungsi tiap modulnya. Bila Anda mengkomilasi suatu program,
rubahlah bebarapa prosedur atau fungsi menjadi satu unit. Bila
anda mengkompilasi suatu unit, pecahlah menjadi dua atau
lebih unit.
61 Invalid typecast
Kesalahan ini disebakan karena :
o Ukuran dari acuan variabel dan tipe tujuannya berbeda di
suatu variabel typecast
o Anda mencoba untuk melakukan typecast suatu ungkapan
yang hanya sebuah acuan variabel saja yang diperbolehkan
62 Devision by zero
Operand sebelumnya terbagi dengan nilai nol
63 Invalid file type
Tipe dari file tidak didukung oleh prosedur penangan file,
misalnya melakukan prosedur standar Seek atau file teks
64 Cannot Read or Write variables of this type
Kesalahan ini disebabkan oleh:
o Prosedur standar Read atau Readln mencoba membaca data
yang bukan ti Char, Integer, Real atau String
o Prosedur standar Write atau Writeln mencoba menampilkan
data yang buka tipe Char, Integer, Real, String atau
Boolean
65 Pointer variable expected
Variabel sebelumnya harus bertipe Pointer
66 String variable expected
Variabel sebelumnya harus bertipe String
67 String expression expected
Ungkapan sebelumnya harus bertipe String
68 Circular unit reference
Dua unit tidak diijinkan untuk menggunakan satu dengan yang
lainnya
69 Unit name mismatch
Nama dari unit di file .TPU tiak sama dengan nama dari unit
yang disebutkan di Uses
70 Unit version mismatch
Satu atau lebih unit yang digunakan oleh unit ini telah berubah
sejak terakhir kali unit di kompilasi. Gunakanlah Compila/Mask
atau Compile/Build di integrated environment atau option /M
atau /B di command-line compiler untuk secara otomatis
mengkompilasli unit-unit yang membutuhkan kompilasi ulang.
71 Duplicate unit name
Anda telah menggunakan nama unit ini sebelumnya di Uses,
sehingga ada nama unit yang kembar
72 Unit file format error
Terdapat kesalahan di file .TPU. yakinkanlah bahwa file
tersebuta adalah file unit
73 Implementation expected
Kata cadangan Implementation diharapkan
74 Constant and case types do not match
Tipe dari konstanta Case tidak sesuai dengan ungkapan selector
di statemen Case
75 Record variable expected
Variabel sebelumnya harus bertipe record
76 Constant out of range
Kealahan ini disebabkan karena Anda mencoba mengindeks
suatu larik dengan konstanta yang diluar jangkaunnya, anda
mencoba untuk memasukkan nilai yang diluar jangkauan suatu
variabel dan anda mencoba untuk mengirimkan nilai konstanta
yang diluar jangkauan ke suatu prosedur atau fungsi
77 File variable expected
Variabel sebelumnya harus berupa tipe file
78 Pointer expression expected
Ungkapan sebelumnya harus berupa tipe Pointer
79 Integer atau real expressioan expected
Ungkapan sebelumnya harus berupa tipe Integer atau Real
80 Label not whitin current block
Suatu statement Goto tidak dapat menunjukkan suatu label
yang berada di luar blok
81 Label already defined
Suatu label telah pernah digunakan sebelumnya
82 Undefined label in preceding statement part
Suatu label telah dideklarasikan dan dihubungkan di bagian
pernyataan sebelumnya, tetapi tidak pernah didefinisikan
83 Invalid @ argument.
Argumen dari operator @ tidak benar dan yang benar adalah
berupa acuan variabel atau pengenal prosedur atau pengenal
fungsi
84 UNIT expected
Kata cadanga Unit diharapkan
85 ’’;’’ expected
Simbol ’’;’’ diharapakan
86 ’’:’’ expected
Simbol ’’ :’’ diharapakan
87 ’’,’’ expected
Simbol ’’ , ’’ diharapakan
88 ’’(’’ expected
Simbol ’’ (’’ diharapakan
89 ’’)’’ expected
Simbol ’’ ) ’’ diharapakan
90 ’’=’’ expected
Simbol ’’ = ’’ diharapakan
91 ’’:=’’ expected
Simbol ’’ := ’’ diharapakan
92 ’’[’’ or ’’(.’’ expected
Simbol ’’ [’’ atau ’’ (.’’ Diharapakan
93 ’’[’’ or ’’.)’’ expected
Simbol ’’ [’’ atau ’’ .)’’ diharapakan
94 ’’.’’ expected
Simbol ’’ .’’ diharapakan
95 ’’..’’ expected
Simbol ’’ .. ’’ diharapakan
96 Too many variables
Keslahan ini disebabkan karena ukuran total dari variabel global
yang dideklarasikan di suatu program atau unit tidak melebihi
64K dan ukuran total dari variabel likal dideklarasikan di suatu
program atau unit tidak dapat melebihi 64 K
97 Invalid FOR control variable
Variabel kontrol di statement FOR harus berupa variabel tipe
sederhana yang dideklarasikan di bagian deklarasi
98 Integer variable expected
Variabel sebelumnya harus berupa tipe integer
99 Files are not allowed here
Suatu konstanta tidak dapat digunakan sebagai tipe dari suatu
file
100 String length mismatch
Panjang dari konstanta string tidak sesuai dengan jumlah
komponen dari karik karakternya
101 Invalid ordering of fields
Field dari suatu konstanta tipe record harus ditulis dengan
urutan yang sma deklarasinya
102 String constant expected
Konstanta string diharapkan
103 Integer or real variable expected
Variabel sebelumnya harus berupa tipe integer atau real
104 Ordinal variable expected
Variabel sebelumnya harus berupa tipe ordinal
105 INLINE error
Operator < tidak diijinkan di relocatable references yang
dihubungkan denga suatu variabel, acuan ini harus selalu wordsized
106 Character expression expected
Ungkapan karakter diharapkan
107 Too many relocation items
Jumlah dari tabel penampung di file .EXE melebihi 64 K yang
merupakan batas dari Turbo Pascal. Jika anda menemui
kesalahan in, berarti program Anda terlalu besar bagi linker
Turbo Pascal untuk menanganinya. Juga mungkin program
Anda telalu besar dieksekusi oleh DOS
108 Not enough memory to run program
Kesalahan ini karena memori yang digunakan tidak cukup untuk
menjalankan suatu program lewat integrated environment.
Kalau anda menggunakan program-program resident, hapuslah
program ini dan bila memori masih tidak cukup, kompilasi
program ke disk dan jalankan di prompt DOS
109 Cannot find EXE file
Kesalahan ini mungkin disebabkan file .EXE yang telah
dihasilkan oleh kompiler hilang dari disk
110 Cannot run a unit
Anda tidak dapat menjalankan secara langsung suatu unit,
harus dijalankan suatu program.
111 Compilation aborted
Proses kompilasi dihentikan dengan penekanan tombol Ctrl-
Break
112 CASE constant out of range
Untuk statement Case tipe Integer, konstanta harus bernilai
diantara –32768..32767
113 Error in statement
Suatu statement diawali dengan simbol yang tidak benar
114 Cannot call an interrupt procedure
Anda tidak dapat secara langsung memanggil suatu prosedur
interrupt
115 Must have an 8087 to compile this
Kompiler membutuhkan suatu coproccesor 8087 untuk
mengkompilasi suatu program atau unit bila digunakan directive
{$N+}
116 Must be 8087 mode to compile this
Anda menggunakan tipe data real 8087, yaitu Single, Double,
Extended dan Comp yang membutuhkan coproccesor 8087
dengan status directive {$N+}
117 Target address not found
Command compile/ find error di integreted environment atau
option /F di command line tidak dapat menemukan suatu
statement di suatu alamat tertentu
118 Include files are not allowed here
Setiap bagian pernyataan harus berada seluruhnya di satu file
119 TPM file format error
File .TPM tidak benar, yakinlah bahwa file ini benar-benar file
.TPM
120 NIL expected
Kata cadangan NIL diharapkan
121 Invalid qualifier
Kesalahan ini dibabkan karena anda mencoba mengindeks suatu
variabel yang bukan suatu lirik, amda mencoba menentukan
suatu field di suatu variabel yang bukan suatu record dan anda
mencoba untuk mengacu suatu variabel yang bukan suatu
pointer.
122 Invalid variable reference
Bentuk debelumnya diikuti dengan suatu sintaks dari variabel
acuan, tetapi tidak menunjukkan suatu lokasi memori.
123 Too many symbols
Suatu program atau unit menggunakan simbol yang
dideklarasikan lebih dari 64 K
124 Statement part too large
Turbo Pascal membatasi ukuran dari bagian prnyataan sekitar
24K. Jika Anda menemui kesalahan ini pindahkan bagian ini ke
dalam satu atau lebih prosedur.
125 Module has no debug information
Suatu runtime error terjadi di suatu modul (program atau unit)
yang tidak mempunyai informasi pelacakan
126 Files must be var parameters
Kesalahan ini disebabkan karena Anda berusaha untuk
mendeklrasikan paremeter nilai di tipe file. Parameter di tipe file
harus berupa parameter var.
127 Too many conditional symbols
Sudah tidak bersedia tempat untuk mendefinisikan conditional
symbols lebih lanjut. Cobalah menghilangkan beberapa simbol
atau memendekkan nama dari simbol.
128 Misplaced conditional directive
Kompiler menemukan suatu directive {$ELSE} atau {$ENDIF}
yang tidak mempunyai pasangan directive {$IFDEF}, {$IFNDEF}
atau {$IFOPT}
129 ENDIF directive missing
File sumber berakhir di dalam suatu konstruksi kompilasi
bersyarat (conditional compilation) yang disebabkan tidak
samanya jumlah directive {$Ifxxx} dengan {$ENDIF}
130 Error in initial conditional defines
Simbol bersyarat awal yang disebutkan di
Options/Compiler/Conditional defines atau directive /D tidak
benar.
131 Header does not match previous definition
Kesalahan ini disebabkan oleh kemungkinan judul dari prosedur
atau fungsi yang disebutkan di bagian penghubung tidak sama
dengan judul ini dan judul dari prosedur atau fungsi yang
disebutkan di deklarasi Forward tidak sama dengan judul ini.
132 Critical disk error
Suatu kesalahan kritis terjadi sewaktu proses kompilasi,
misalnya drive tidak siap
133 Old map file
File .TPM merupakan file yang lama dibandingkan dengan file
.EXE bersangkutan. Ini merupakan indikasi bahwa terakhir kali
Anda mengkompilasi program, suatu file .TPM tidak dihasilkan

Minggu, 05 Februari 2012

softwere aplikasi

Postingan ini berisi materi Pengantar teknologi informasi (PTI) yang berjudul Softwere Aplikasi. Untuk membacanya silahkan KLIK DISINI.

Ucapan terimakasih saya sampaikan kepada bapak Bambang Sugianto yang telah menyampaikan materi ini.

Minggu, 11 Desember 2011

text bb generator

Teks Blackberry Generator


Salam blogger. Di postinggan kali ini saya akan memposting cara membuat teks blackberry walau tanpa menggunakan handphone kelas BB. Ada pepatah "air beriak tanda tak dalam" daripada banyak omong tapi ga ada hasil mending ke TKP yuk..



atau copy hasil teksnya lalu klik

disini

lalu pastein di kotak yang tersedia lalu klik bagikan untuk menjadikan status via blackberry bukan status biru

Minggu, 20 November 2011

Perintah - Perintah Dasar Turbo Pascal

Salam blogger..
Di postingan ini saya akan memposting tentang perintah-perintah dasar turbo pascal. Bukan maksud saya sok pinter, disini saya juga masih belajar. Ini untuk arsip pribadi, jika bermanfaat untuk temen temen blogger silahkan di baca.
~write --> Perintah untuk mencetak hasil pada layar dan hasilnya di cetak pada baris yang sama, bukan pada baris berikutnya.
~writeln --> Mencetak hasil pada layar pada baris berikutnya.
~read --> Perintah membaca data yang dimasukkan si pemakai.
~readln --> sama dengan read perbedaannya ketika bekerja pada file teks (teks file), file bertype (typed teks), file tak bertype (untyped teks)
~repeat..until --> perintah membuat pengulangan (loop)
~while..do --> perintah melakukan pengulangan tapi menggunakan persyaratan.
~with..do --> perintah memasukkan sekelompok data kedalam sebuah variable.
~if..then..else --> perintah melakukan perbandingan.
~case..of..else..end --> perintah memilih kelompok data.
~for..to / down..do --> perintah membuat pengulangan sebanyak angka yang di berikan pada variabel awal dan akhir.
~goto --> perintah untuk membuat percabangan dalam program, tetapi pada awal program harus diberitahu nama-nama percabangan yang akan dibuat dengan perintah label. Bisa huruf atau angka.

Mungkin ini yang bisa saya tulis. Mohon maaf bila ada kesalahan.

Daftar pustaka.
Pardosi, Miko (2004). Bahasa Pemrograman Turbo Pascal 7.0. Surabaya: Penerbit INDAH Surabaya.

Rabu, 02 November 2011

Trik update status facebook via BlackBarry dengan autotext

kadang kita iri liat status temen facebook kita via BlackBerry, dengan autotextnya. nah disini kita bisa buat status facebook via BlackBerry dengan autotext. kelebihannya status kita tar berwarna biru. keren kan? langsung copy paste aja ya



























Sabtu, 29 Oktober 2011

wapper purworejo

Saya sebenarnya lebih suka dibilang wapper purworejo daripada BLOGGER karena saya lebih suka edit wapsite. wat pengungjung blog ini kunjungi wapku ya alismatsul wap terimakasih...

Jumat, 28 Oktober 2011

belajar logika algoritma

Mari belajar logika algoritma bareng. Bukan maksud saya sok pinter, saya tulis ini sebagai catatan untuk evaluasi belajar saya di kampus.
Program if_then_else;
uses crt;
Var nilai : integer;
mhs,ket : string;
begin;
clrscr;
writeln(‘ Nilai Ujian
Mahasiswa ‘);
writeln;
write(‘ Masukkan nama
mahasiswa = ‘);
readln(mhs);
write(‘ Masukkan nilai
mahasiswa = ‘);
readln(nilai);
if nilai>=60 then ket:=’Lulus’
else ket:=’Tidak Lulus’;
writeln;
writeln(‘Nama mahasiswa
adalah ‘,mhs,’ ‘,ket);readln;
end.


daftar pustaka
Riyan (2008). Contoh program if then else, from http://riyanwae.wordpress.com/2008/10/31/contoh-program-if_then_else, 28 oktober 2011.

Selasa, 25 Oktober 2011

my friend


video temen-temen anak politekmik Sawunggalih Aji Purworejo kocak dan gila abis.. semoga menghibur...

Rabu, 12 Oktober 2011

jawaban habib Munzir atas tuduhan boleh memperawani wanita usia 9 tahun.

Halal Memperawani Wanita Usia 9
Tahun (Rasul Saw Manikahi
Aisyah Ra)
Saya Jawab:
Mengenai hal ini, adalah kekhususan untuk sang Nabi
saw, beliau saw berbeda dengan
kita, sebagaimana kesaksian beliau
saw tidak makan dan minum berhari - hari, ketika para sahabat
mengikutinya maka beliau saw
melarangnya, dan berkata :
“sungguh aku tidak sama dengan
kalian, aku diberi makan dan
minum oleh Allah” (Shahih
Bukhari), demikianlah Mukjizat
270 kenalilah akidahmu 2
para Nabi, demikian Mukjizat Isa
bin maryam as yang
menghidupakan orang mati,
demikian
pula Mukjizat Musa as yang
merubah tongkatnya menjadi
ular, maka memperawani seorang
wanita dalam konteks orang
awam adalah menyetubuhinya
dengan syahwat, namun berbeda
dengan Rasulullah saw, Allah swt
menciptakan aisyah untuk istri
Nabi-Nya, tentunya Dia Maha Luhur dari segala kekejian
dan kebiadaban, karena seluruh
ucapan sang Nabi saw
adalah perintah Allah swt :
“Tiadalah ia berbicara dari hawa
nafsunya, tetapi merupakan
wahyu yg diwahyukan oleh Allah
swt” (Annajm 3-4).
Aisyah ra adalah seorang wanita
yang cerdas dan jenius, Nabi saw
membutuhkan seorang
wanita yang jenius dan cerdas
untuk menyampaikan risalah
pada kaum wanita, maka Jibril
as mewahyukan agar beliau saw
menikahi Aisyah ra.
Dengan logika yang sempurna,
dan hati yang beriman kami
mempercayai bahwa Maryam
as adalah wanita suci yang bukan
pendosa apalagi pezina, namun
merupakan perintah Allah
swt. Dengan hati suci dan iman,
kami kaum muslimin
mempercayai bahwa Isa bin
Maryam
adalah anak suci dan sesekali
bukan anak zina, namun
merupakan perintah Allah swt.
Dengan
kesucian dan Iman, kami kaum
muslimin mempercayai bahwa
Muhammad saw menikahi
Aisyah dan istri - istrinya bukan
karena nafsu, namun merupakan
perintah Allah swt.
Tuduhan anda dengan logika
bahwa Muhammad saw bernafsu
birahi dan sex maniac
karena menikahi banyak wanita
dan wanita dibawah umur,
berarti anda berlogika
pula bahwa Maryam as adalah
pelacur biadab yang berkedok
wanita suci, Dan Isa
bin Maryam adalah anak haram
jadah dan bukan putra suci,
demikianlah logika yang
kotor berbicara, demikian logika
jahat menilai, bagaimana wanita
hamil tanpa ayah..?,
lalu anak apakah itu..?, bukankah
anak haram dari hasil zina lalu
kalian mengakuinya
sebagai Tuhan..??, adakah logika
lebih bodoh dari ini..?,
namun anda dapat
membandingkan mana logika
sempurna dan mana logika jahat.
dikutip dari kenalilah akidahmu 2
karya alhabib munzir
almusawa

Selasa, 11 Oktober 2011

Imam Bukhori &Imam Muslim

Imam Bukhari banyak menulis
buku hadits, diantara yg paling
masyhur adalah Shahih Bukhari,
dan Imam Muslim pun
meriwayatkan banyak hadits, yg
termasyhur adalah shahih
Muslim,
Al Hafidh Al Muhaddits Imam
Abu Abdillah Muhammad bin
Ismail Al Bukhari
rahimahullah
Beliau lahir pada hari jumat
selepas shalat jumat 13 Syawal
194 H dan beliau wafat pada
malam jumat yg sekaligus malam
idul fitri th 256 H
Berkata Imam Muhammad bin
Yusuf Al Farbariy, aku
mendengar dari Najm bin Fudhail
berkata : aku bermimpi
Rasulullah saw dan kulihat Imam
Bukhari dibelakang beliau saw,
setiap beliau saw melangkah
sebuah langkah, dan Imam
Bukhari melangkah pula dan
menaruhkan kakinya tepat
dibekas pijakan Nabi saw.
Ketika dikatakan kepada Imam
Bukhari bahwa ada disuatu
wilayah yg barangsiapa orang
asing yg datang ke wilayah
mereka maka saat setelah shalat
maka penduduk setempat akan
mencobanya dg hadits hadits
tentang shalat, maka Imam
Bukhari berkata :“Bila aku
diperlakukan seperti itu akan
kukeluarkan 10 ribu hadits
shahih mengenai shalat
dihadapan mereka agar mereka
bertobat dan tidak lagi
mengulangi perbuatan buruk
itu”.
Imam Bukhari telah menulis
shahih nya sebanyak sekitar
7000 hadits saat beliau belum
berusia 17 tahun, dan ia telah
hafal 100 ribu hadits shahih dan
200 ribu shahih di usia tersebut.
Berkata Imam Al Hafidh
Muhammad bin Salam
rahimahullah :“kalau datang si
bocah ini maka aku terbata bata
dan tak nyaman membaca
hadits”, dan ia berkata kepada
seorang tamunya yg datang
setelah Imam Bukhari pergi :
“kalau kau datang lebih cepat
sedikit kau akan berjumpa dg
bocah yg hafal lebih dari 70 ribu
hadits..”, maka tamunya segera
bergegas menyusul Imam
Bukhari, dan Imam Bukhari
berkata :“sungguh aku hafal
lebih dari itu, dan akan
kujelaskan padamu semua
masing masing sanad periwayat
hadits nya, dimana lahirnya,
tahun kelahiran dan wafatnya,
sifat dan sejarah periwayat
sanad2 nya dari semua hadits
itu”.
Ketika salah seorang perawi
hadits bertanya kepada Imam
Bukhari mengenai nama nama
periwayat, gelar, bentuk
kesalahan sanad hadits dll maka
Imam Bukhari menjawabnya
bagaikan membaca surat Al
Ikhlas.
Berkata Imam Bukhari :“aku
berharap menghadap Allah
tanpa ada hisab bahwa aku
pernah menggunjing aib orang
lain”.
Suatu hari Imam Bukhari
mengimami shalat dhuhur
disebuah kebun korma, dan
didalam bajunya terdapat seekor
Zanbur (kumbang hitam) yg
menggigit dan menyengatnya
hingga 16 sengatan, selepas
shalat Imam Bukhari berkata
dengan tenang :“coba kalian
lihat ada apakah didalam baju
lenganku ini”, maka
ditemukanlah 16 luka sengatan
kumbang di tubuhnya.
Suatu ketika Imam Bukhari
membacakan sanad hadits dan
saat ia melirik dilihatnya ada
orang yg terkesima dg
ucapannya, dan Imam Bukhari
tertawa dalam hati, keesokan
harinya Imam Bukhari mencari
orang itu dan meminta maaf
dan ridho karena telah
menertawakannya, padahal ia
hanya menertawakan didalam
hati.
Diriwayatkan ketika Imam
Bukhari sedang mengajari hadits
kepada salah seorang muridnya
dan ia tampak bosan, maka
Imam Bukhari berkata : “para
pedagang sibuk dg
perdagangannya, para pegawai
sibuk dengan pekerjaannya, dan
engkau bersama Nabi
Muhammad saw”.
Imam Bukhari menulis shahih
nya (Shahih Bukhari) di
Raudhah, yaitu antara Mimbar
dan Makam Rasulullah saw di
Masjid Nabawiy Madinah
Almunawwarah, dan ia mandi
dan berwudhu lalu shalat 2
rakaat baru menulis satu hadits,
lalu kembali mandi, berwudhu
dan shalat 2 rakaat, lalu menulis
1 hadits lagi, demikian hingga
selesai di hadits no.7124. maka
selesailah 7000 hadits itu ditulis
di kitab beliau, dengan
bertabarruk dg Makam
Rasulullah saw dan Mimbar Rasul
saw.
Berkata Imam Muslim dihadapan
Imam Bukhari : “Izinkan aku
mencium kedua kakimu wahai
Pemimpin para Muhadditsin,
guru dari semua guru hadits”.
Dikatakan kepada Imam Bukhari,
mengapa tak kau balas orang yg
memfitnahmu dan mencacimu?,
ia menjawab :“aku teringat
ucapan Rasul saw : “akan
muncul kelak ikhitilaf dan
perpecahan, maka bersabarlah
hingga kalian menjumpai aku di
telaga haudh”.
Imam Bukhari mempunyai akal
yg jenius, dan ia hafal bila
mendengar 1X saja. Atau
membaca 1X saja. Hingga ketika
suatu ketika Imam Bukhari
dicoba dan diajukan padanya
100 hadits yg dikacaukan dan
dibolak balik sanadnya, maka
Imam Bukhari berkata :“tidak
tahu… tidak tahu”, hingga hadits
yg ke seratus, lalu Imam Bukhari
berpidato, mengulang hadits yg
pertama yg disebut si penanya :
“Kau tadi sebut hadits dg sanad
seperti ini, dan yg benar adalah
begini”, demikian hadits kedua..
ketiga… hingga 100 hadits.
Ketika telah wafatnya Imam
Bukhari, terjadi kekeringan yg
berkepanjangan, maka par
Ulama, Huffadh dan Muhadditsin
dari wilayah samraqand
berduyun duyun ke Makam
Imam Bukhari, lalu mereka
bertawassul pada Imam Bukhari,
maka hujanpun turun dengan
derasnya hingga 7 malam
mereka tertahan dan tak bisa
pulang ke sdamraqand karena
derasnya hujan.
Al Hafidh Al Muhaddits Imam
Abul Husein Muslim bin Hajjaj
Alqusyairiy Annaisaburiy
rahimahullah, (Imam Muslim)

Beliau lahir pada th 204 H dan
wafat pada Rajab 261 H, beliau
adalah Imam Mulia yg menjadi
peringkat kedua dari seluruh
para Muhadditsin, yaitu setelah
Imam Bukhari rahimahullah,
beliau ini adalah murid daripada
Imam Ahmad bin Hanbal, dan ia
digelari sebagai salah satu
Huffadhuddunia, bersama Imam
bukhari, yaitu salah satu dari
Imam yg dalam peringkat
tertinggi dari para Hafidhul
hadits, ia menulis hadits shahih
pada usianya 15 tahun
sebanyak 12 ribu hadits shahih
dan menyingkat itu semua dari
300 ribu hadits.
Berkata para Muhaddits :“bila
kita mencatat hadits selama 200
tahun maka tetaplah kita harus
kembali berpegang pada Musnad
Imam Muslim.