xHarbour Reference Documentation > Function Reference |
Rotates bits in a character string to the right.
CharRLR( <cString>, <nShift> ) --> cResult
The function returns a string by rotating the bits of the individual characters of <cString> for <nShift> places to the right. The lowest bit replaces the highest bit for each rotation.
See also: | CharAND(), CharNOT(), CharOR(), CharRLL(), CharSHL(), CharSHR(), CharXOR() |
Category: | CT:String manipulation , Bitwise functions , Character functions , xHarbour extensions |
Source: | ct\charop.c |
LIB: | xhb.lib |
DLL: | xhbdll.dll |
// The example demonstrates the effect of rotating bits in // a two-character string, by displaying the ASCII codes and // their binary representation before and after the right rotation. PROCEDURE Main LOCAL cString := "AB" LOCAL cShift LOCAL nAsc1, nAsc2 ? nAsc1 := Asc( cString[1] ) // result: 65 ? nAsc2 := Asc( cString[2] ) // result: 66 ? NtoC( nAsc1, 2, 8, "0" ) // result: 01000001 ? NtoC( nAsc2, 2, 8, "0" ) // result: 01000010 cShift := CharRLR( cString, 2 ) ? nAsc1 := Asc( cShift[1] ) // result: 80 ? nAsc2 := Asc( cShift[2] ) // result: 144 ? NtoC( nAsc1, 2, 8, "0" ) // result: 01010000 ? NtoC( nAsc2, 2, 8, "0" ) // result: 10100000 RETURN
http://www.xHarbour.com