Difference between revisions of "Geshi"
(8 intermediate revisions by 2 users not shown) | |||
Line 1: | Line 1: | ||
− | <geshi lang= | + | [[Category:Programming]] |
− | + | ||
− | ld | + | Working now, isn't it? :) :) :) |
− | ld | + | |
− | + | <geshi lang=MAXAM> | |
+ | ;; A useful procedure to display a 8-bit number in binary | ||
+ | ;; | ||
+ | |||
+ | .txt_output equ &bb5a | ||
+ | |||
+ | ;;------------------------------ | ||
+ | ;; DISPLAY A BYTE IN BINARY FORM | ||
+ | ;; | ||
+ | ;; Enter: | ||
+ | ;; A = 8-bit value | ||
+ | ;; | ||
+ | ;; Exit: | ||
+ | ;; AF corrupt. | ||
+ | ;; B corrupt. | ||
+ | ;; All other registers preserved | ||
+ | |||
+ | .display_binary | ||
+ | ld b ,8 ;number of bits to display | ||
+ | |||
+ | .get_bit | ||
+ | rlca ;rotate current top bit into carry | ||
+ | |||
+ | ;if the bit was 1, the carry is set. (i.e. carry=1) | ||
+ | ;if the bit was 0, the carry is reset. (i.e carry=0) | ||
+ | |||
+ | push af | ||
+ | ld a,"0" ;ASCII character for bit value | ||
+ | adc a,0 ;add carry, if carry is set A="1", otherwise A="0" | ||
+ | call txt_output ;display character onscreen | ||
+ | pop af | ||
+ | |||
+ | djnz get_bit ;loop, until all bits have been displayed | ||
ret | ret | ||
</geshi> | </geshi> |
Latest revision as of 15:10, 17 December 2010
Working now, isn't it? :) :) :)
<geshi lang=MAXAM>
- A useful procedure to display a 8-bit number in binary
.txt_output equ &bb5a
- ------------------------------
- DISPLAY A BYTE IN BINARY FORM
- Enter
- A = 8-bit value
- Exit
- AF corrupt.
- B corrupt.
- All other registers preserved
.display_binary ld b ,8 ;number of bits to display
.get_bit rlca ;rotate current top bit into carry
;if the bit was 1, the carry is set. (i.e. carry=1) ;if the bit was 0, the carry is reset. (i.e carry=0)
push af ld a,"0" ;ASCII character for bit value adc a,0 ;add carry, if carry is set A="1", otherwise A="0" call txt_output ;display character onscreen pop af
djnz get_bit ;loop, until all bits have been displayed ret </geshi>
GeSHi
<php><?php
echo 'Hello, world!'; # What else? $my_cnx = mysql_open('localhost', 'user', 'pass'); if ($my_cnx === false) die('Unable to open connection with MySQL database engine'); mysql_select_db('database', $my_cnx) or die('Unable to select database'); $request = sprintf('UPDATE table SET column=data WHERE othercolumn=\'%s\, $_SESSION['text']); $my_success = mysql_query($request, $my_cnx); if ($my_success === false) { die('Error when trying to update table'); } mysql_close($my_cnx);</php>
<geshi lang=sql> select * from lib.tbl where this=that </geshi>
<geshi lang=bash>
- !/bin/ksh
HOST=host USER=username PASS=password FILE=bad.txt LOGFILE=log.txt
ftp -n -v -i ${HOST} > ${LOGFILE} 2>&1 << EOF quote USER ${USER} quote PASS ${PASS} binary put ${FILE} quit EOF
grep -q "Transfer complete." ${LOGFILE}
if $? != 0 ; then
echo "ftp failed"
else
echo "ftp succeeded"
fi
rm ${LOGFILE} </geshi>