Il 06/03/2012 22:16, Valerio Messina ha scritto:
Paolo Mantovani ha scritto:
ecco, vorrei dare un occhiata al codice delle funzioni che hai già
reimplementato. è possibile?

sono semplicissime, fatte tutte sulla falsariga della bitNOT. Eccole:


Function BitNOT (val)
BitNOT = NOT (val)
End Function

Function BitAND (val1, val2)
BitAND = val1 AND val2
End Function

Function BitOR (val1, val2)
BitOR = val1 OR val2
End Function

Function BitXOR (val1, val2)
BitXOR = val1 XOR val2
End Function

Function BitRShift (val, bit)
if (bit > len(val)) then end
BitRShift = LEFT (val, len(val)-bit)
End Function


Funzionano bene (nel senso che danno il risultato corretto in binario)
se la cella di ingresso è già in binario (testo).

questo non corrisponde al vero
se la cella di ingresso contiene testo le funzioni generano un errore.

Solo l'ultima funzione accetta (e restituisce) del testo perchè usa le fuznioni di manipolazione delle stringhe per simulare l'operazione di bit shift.

ciao
Paolo M







Alle altre domande rispondo con mail separata.

grazie intanto,
Valerio
.



---------------------------------------------------------------------
Per cancellarsi: [email protected]
Per informazioni: http://www.openoffice.org/it/
Per avviare una nuova discussione: [email protected]
Archivi: http://mail-archives.apache.org/mod_mbox/incubator-ooo-utenti-it

Rispondere a