Moderadores: andre_luis, 51, guest2003, Renie
fabim escreveu: val1 := val1;
val2 := val2;
val3 := val3;
max_val := max_val;
falcaum escreveu:me dá uma luz por favor fabimfabim escreveu: val1 := val1;
val2 := val2;
val3 := val3;
max_val := max_val;
levei uma surra nessa parte do pascal, que raio de incialização é essa??? nunca vi nada parecido em nenhuma linguagem de programção
onde entra a semente max_r?
Vou usar sua rotina(pretendo) depois te mando os direitos
I have assembly for a PIC number generator which was published in EDN magazine. It's internally a 31-bit shift register and can be used effectively as a white noise generator. It doesn't repeat for 17.8 hours of continuous operation @ 4 MHz.
RLF MAIN_GLOBAL_RANDOM,W
RLF MAIN_GLOBAL_RANDOM,W
BTFSC MAIN_GLOBAL_RANDOM,4
XORLW 1
BTFSC MAIN_GLOBAL_RANDOM,5
XORLW 1
BTFSC MAIN_GLOBAL_RANDOM,3
XORLW 1
MOVWF MAIN_GLOBAL_RANDOM
Usuários navegando neste fórum: Google [Bot] e 1 visitante