Für dieses Forum muß Javascript im Browser aktiviert werden!
Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C2 Quellcode formatieren: <code>Quellcode</code> ASM Quellcode formatieren: <asm>Quellcode</asm> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! > Hallo Günni, > > > hat Jemand zufällig eine Library/Funktion zum rotieren von Variablen. Also z.B. rechts raus und links > > dafür rein. > > Ich meine nicht die Funktionen shl und shr, denn dabei gehen die zu schiebenden Bits ja verloren. > > Eigentlich sollte das OS dies beherschen. > Es gibt nämlich die VM-Codes VM_ROR und VM_ROL. (siehe vmcodes.c2) > Jedoch habe ich nach einem Teast feststellen müssen, daß dies alles andere machen, > nur nicht rotieren. ;-( > Entweder das ROL und ROR bedeutet hier etwas anderes, was auch immer, > oder hier im OS wurde Kaudawelsch programmiert. > Ich würde auch letzteres tippen. Denn ein VM-Code für ASHR gibt es auch. (VM_ASR) > Und dieser funzt. > Aber leider ist dies alles in der Programmiersprache C2 nicht implementiert, sodaß > man hier dies über eine Inline-Funktion implementieren muß: > <code>inline function ashr_int(int value, int shift) returns int > {// für Integer > inline vmcodes.VM_ASR; > } > > inline function ashr_long(int value, int shift) returns int > {// für Long > inline vmcodes.VM_ASR or (vmcodes.CALC_LONG_INT shl 8); > }</code> > > Aber das hilft Dir für ROL und ROR wenig. > Bevor ich bei OSOPT V3.1 diese Routinen anpasse, muß ich erst sicherstellen, > daß die Routinen auch wirklich für "Rotate" gedacht waren. > OS-Routine für VM_ROL, CALC_INT_ INT: (was die Routine auch immer in Wirklichkeit macht) > <asm> > 0x59e4: MOV [-R0],R9 > 0x59e6: MOV [-R0],R8 > 0x59e8: CALLS 0x765a ;POP > 0x59ec: MOV R9,R4 > 0x59ee: CALLS 0x765a ;POP > 0x59f2: MOV R8,R4 > 0x59f4: MOV R12,R8 > 0x59f6: SHL R12,R9 > 0x59f8: CMP R8,#0x0 > 0x59fa: JMPR cc_SGE,0x5a00 > 0x59fc: MOV R8,#0x1 > 0x59fe: JMPR cc_UC,0x5a02 > 0x5a00: MOV R8,#0x0 > 0x5a02: OR R12,R8 > 0x5a04: JMPR cc_Z,0x5a0a > 0x5a06: MOV R12,#0x1 > 0x5a08: JMPR cc_UC,0x5a0c > 0x5a0a: MOV R12,#0x0 > 0x5a0c: CALLS 0x75d6 ;PUSH > 0x5a10: MOV R8,[R0+] > 0x5a12: MOV R9,[R0+] > 0x5a14: RETS > </asm> > > > So nun aber zur "eleganten" Lösung diese Problems: > > Du kannst dies sehr bequem über eine kleine ASM-Routine lösen. > Da diese unter der Stringgrenze von 30 Byte bleibt, kann man die > Routine sehr einfach im RAM ablaufen lassen: > string ASM_ROR,ASM_ROL; > <code> > inline function call_asm(int value, int rotate, int segment, byte stringassembler[]) returns int > { > inline vmcodes.VM_SYSCALL; > } > > function ror(int value, int shift) returns int > { > return call_asm(value, shift, 8, ASM_ROR); > } > > function rol(int value, int shift) returns int > { > return call_asm(value, shift, 8, ASM_ROL); > } > > function sendBitmask(int x) > {byte i; > for i=15 ... >=0 step -1 hwcom.put(((x shr i) and 1) + 0x30); > } > > thread main > {int x,y; > hwcom.setspeed(8); > hwcom.clr(); > ASM_ROR="\xDA\x00\x5A\x76\xF0\x84\xDA\x00\x5A\x76\x2C\x48\xF0\xC4\xDA\x00\xD6\x75\xFC\xF1\xFC\xF1\xDB\x00"; > ASM_ROL="\xDA\x00\x5A\x76\xF0\x84\xDA\x00\x5A\x76\x0C\x48\xF0\xC4\xDA\x00\xD6\x75\xFC\xF1\xFC\xF1\xDB\x00"; > > x=0b10011000101; > > hwcom.print("X:\9"); > sendBitmask(x); > hwcom.ret(); > > y=ror(x,5); > > hwcom.print("ROR:\9"); > sendBitmask(y); > hwcom.ret(); > > y=rol(x,5); > > hwcom.print("ROL:\9"); > sendBitmask(y); > hwcom.ret(); > quit 1; > }</code> > > Der ASM-Code wird in zwei String-Variablen gespeichert. > Anschließend werden diese Strings ausgeführt. ;-) > Verwendet man globale Variable für diese Strings, so muß man die Strings nur einmal > beim Programmstart mit dem ASM-Code beschreiben. > > MfG André H.