en en en ms id id id ms id id id id id id id id en en en en en en en en en ru pt en en en en en en en en en en en en en en en en en en en en en en az en en en en en en en en en en en en en en en en ceb en az en en en en en en en en en de cs cs cs cs cs cs en cs cs en cs cs cs en en cs cs cs en en cs cs cs cs da en en fr cs da en da en en en en en ms en cs cs da en da cs en en en cs da en cs cs en en en en en en en en en en en en en en en en en id id en id en
Me , Myself and Nurul: January 2012
Tak der idea sebenarnya nak update blog... hmmm ... Tadi, baru lepas keluar makan malam ngan wife and her office mates, suka tengok anak kawan wife aku yang comel-comel...cute sangat.... beruntung dia dikurniakan anak-anak yang comel-comel, semoga anak-anak yang diberikan menjadi rahmat buat kita, menjadi seorang yang soleh dan solehah apabila besar nanti... amin
Setiap insan yang berkahwin mesti mahu dianugerahkan rahmat ini, tapi tidak semua yang kita kehendaki itu akan kita perolehi...kadang kita kena redha dan pasrah dengan ketentuan tuhan, Bersyukur dengan apa yang kita ada dan redha dengan ujian yang diberikan. Memang senang mengucapkan kata-kata, tapi bila hendak menerima hakikat umpama mengenggam bara api...
Kita tidak akan merasai sesuatu yang kita ada itu amat berharga setelah kita kehilangannya, Hargailah ia sebelum kita kehilangannya...
Banyak, ia banyak rahmat yang diberikan tuhan kepada kita, samaada kita sedar atau pun tidak.
Yang berkahwin, kadang menyesali dengan perkahwinan mereka...sedangkan kita lupa ada berapa ramai gadis dan lelaki di luar sana yang belum bertemu jodoh mereka dan masih tercari-cari sehingga ke penghujung usia.
Yang punya anak , kadang sedih dengan anak yang ada pada mereka ...sehingga ada yang sanggup mengabaikan dan membuang anak mereka..sedangkan kita lupa , ada berapa ramai pasangan berkahwin yang merintih, berdoa dan berusaha untuk rahmat ini.
Yang berkerja , sering merungut dengan pekerjaan mereka, sedangkan kita lupa ada mereka yang diluar sana yang hidupnya kais pagi makan pagi untuk sesuap nasi, hidup mereka tidak sesempurna kita.
Kadang kita terlalu menginginkan apa yang kita tidak dapat, sampai kita lupa akan perkara yang telah banyak kita dapat, telah diberikan tuhan kepada kita.
Tetapi sekiranya kita, setelah berusaha dengan gigih dan mencuba sedaya upaya, tetap tidak berjaya, tetap tidak mendapatkan apa yang kita mahu, maka redha adalah jawapan kepada Allah SWT. Begitulah juga apabila kita ditimpa kelemahan, kerosakan, bencana. Kerana akhirnya, kita sebagai hambaNya tidak mengetahui apa-apa. Allah jualah yang mengetahui apa yang baik atau buruk bagi kita.
“Diwajibkan ke atas kamu berperang dan itu bukanlah disukai kamu. Tetapi boleh jadi apa yang kamu benci itu baik buat kamu. Dan boleh jadi apa yang kamu sukai itu buruk bagi kamu. Dan Allah Maha Mengetahui, manakala kamu tidak mengetahui.” Surah Al-Baqarah ayat 216.
Persoalannya, adakah aku ini seorang insan yang bersyukur?
“Patutkah manusia menyangka bahawa mereka akan dibiarkan dengan hanya berkata: Kami beriman, sedang mereka tidak diuji (dengan sesuatu cubaan)? Dan demi sesungguhnya! Kami telah menguji orang-orang yang terdahulu daripada mereka, maka (dengan ujian yang demikian), nyata apa yang diketahui Allah tentang orang-orang yang sebenar-benarnya beriman, dan nyata pula apa yang diketahuiNya tentang orang-orang yang berdusta.” Surah Al-Ankabut ayat 2-3.
Wednesday, January 4, 2012
A Simple Hex Editor - Qbasic / FreeBASIC / QB64
This is A Simple Hex Editor I found on the net . This Editor reads one Character at a time (byte per byte),This method is really slow, specially with big files and not that efficient but still good for beginners in understanding the idea and concept
Source code can be found below :-
INPUT "Enter BINARY File's Name -->", Name$
OPEN Name$ FOR BINARY AS #1
DIM Size AS LONG: Size = LOF(1)
DIM CharNum AS LONG
PRINT : PRINT "Menu - Last byte is currently"; Size
PRINT " 1) Read hex"
PRINT " 2) Write hex"
PRINT " 3) Finished"
CASE "1": GOSUB Read1
CASE "2": GOSUB Write1
CASE "3": EXIT DO
CASE ELSE: PRINT "GOOF use 1 2 3 only"
DIM TheChar AS STRING * 1
DIM TheHex AS STRING * 2
INPUT "Character Number"; CharNum
IF CharNum < 1 THEN PRINT "Too little": RETURN
IF CharNum > Size THEN PRINT "Too big": RETURN
GET #1, CharNum, TheChar
PRINT "Value is "; TheHex
INPUT "Character Number"; CharNum
IF CharNum < 1 THEN PRINT "Too little": RETURN
IF CharNum > Size + 1 THEN PRINT "Too big": RETURN
LINE INPUT "Value: "; TheHex
IF LEN(TheHex)   2 THEN PRINT "Need two chars such as 3F": RETURN
DIM w1 AS INTEGER, W2 AS INTEGER
w1 = INSTR("0123456789ABCDEF", LEFT$(TheHex, 1))
IF w1 = 0 THEN PRINT "Use 0-F only": RETURN
W2 = (w1 - 1) * 16
w1 = INSTR("0123456789ABCDEF", RIGHT$(TheHex, 1))
IF w1 = 0 THEN PRINT "Use 0-F only": RETURN
W2 = W2 + w1 - 1
PUT #1, CharNum, TheChar
Posted by fixxxxxer at 4:52 PM No comments:
Newer Posts Older Posts Home
Subscribe to: Posts (Atom)
View my complete profile
A Simple Hex Editor - Qbasic / FreeBASIC / QB64
CAMBODIA AutoCAD Virus Removal
Infected with CAMBODIA AUTOCAD Virus? Download CAMBODIA AUTOCAD Virus Removal...FREE!!! CAMBODIA AUTOCAD Virus Removal: Do...
QBASIC MONEY MANAGER FOR WINDOWS
MONEY MANAGER For Windows Download Money Manager.zip
Design Of Small Dam
My boss asked me to redesign this small Gabion Dam because it has some scouring problems in the downstream., taking account in the desi...
EASY STEEL PORTAL FRAME TO BS5950
EASY STEEL PORTAL FRAME TO BS5950 A Simple and Easy to use Steel Portal Frame Design Software!!! Selling Price : USD 300. 00 Only ...
CONTINUOUS BEAM ANALYSIS - QBASIC / FREEBASIC - STRUCTURAL ANALYSIS / CIVIL ENGINEERING
REM SHEAR AND MOMENT ENVELOPES FOR A CONTINUOUS BEAM REM ************************************************ DIM VS(10,...
A simple STEEL PORTAL FRAME to BS5950 ( Plastic Design )
A simple STEEL PORTAL FRAME to BS5950 ( Plastic Design ) software has been added with source code. This simple program is not a demo and  ...
A Simple Hex Editor - Qbasic / FreeBASIC / QB64
This is A Simple Hex Editor I found on the net . This Editor reads one Character at a time (byte per byte),This method is really slow, spec...
Low Weir / Tidal Gate / Head Work
This is what so called Low Weir / Tidal Gate / Head Work. The design is based on BS8110 - 1985 Front View Piling Key Plan Se...
PENTAULIAHAN DIRAJA KE-14 17 JUN 1995
PEGAWAI MUDA YANG DITAULIAHKAN PADA PENTAULIAHAN DIRAJA KE-14 17 JUN 1995 LT M Abdul Aziz bin Misngat LT M Abdul Halim bin Mohamed Ikbar ...
Bagi aku, dalam kehidupan sebagai seorang yang dewasa, ada 2 benda yang aku tak boleh gagal .. 1. Perkahwinan 2. Pekerjaan Kalau aku ga...
Ethereal theme. Powered by Blogger.