Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Melodie dance veche

RIP Shifty Shellshock

Daca nu ar conta salariul, ce mes...

Racordare la apa termosemineu
 Mi-am luat 4x4 si vreau sa-l testez

Recomandare laptop cu luminozitat...

Cautarea pe google android nu merge

Caut serviciu serios de captura v...
 Frauda magazin online

AC Woods Venezia Smart - nu races...

podea ciment denivelata

Îndepartare bule folie reflectoriz...
 Revista imobiliara cu poze... cir...

Recomandare soundbar pentru laptop

Veți renunța in 2025 la...

Coaxial pentru cablare casa
 

atei posedati

- - - - -
  • This topic is locked This topic is locked
189 replies to this topic

#127
arpisz

arpisz

    Senior Member

  • Grup: Senior Members
  • Posts: 4,896
  • Înscris: 25.04.2008

 AMAN_SER, on Dec 17 2008, 19:02, said:

Deci sa inteleg ca ai ceva cu mine.???
nu ai inteles iar nimic
prin "Crezi?" te intreaba delicat daca parerea asta a ta cu are ceva cu tine scrie in mult respectata carte

#128
sorin520

sorin520

    OM

  • Grup: Banned
  • Posts: 2,572
  • Înscris: 05.09.2008

 ryanna, on Dec 17 2008, 18:13, said:

KONAMI , CAROLINE_HI , AMAN_SER.....eu zic ca tipul de mai sus e dus....voi ce ziceti ?


Oamenii inteligenți reușesc să răspundă de obicei și la întrebări simple,dar dacă tu nu reușești să răspunzi la așa ceva,atunci nici nu mai am curaj să merg mai departe

#129
caroline_hi

caroline_hi

    One moon shows in every pool, in every pool the one moon.

  • Grup: Senior Members
  • Posts: 7,813
  • Înscris: 04.12.2007

 AMAN_SER, on Dec 17 2008, 19:02, said:

Deci sa inteleg ca ai ceva cu mine.???
Hai ca nu e asa de greu de inteles. :lol:

 sorin520, on Dec 17 2008, 19:41, said:

Oamenii inteligenți reușesc să răspundă de obicei și la întrebări simple,dar dacă tu nu reușești să răspunzi la așa ceva,atunci nici nu mai am curaj să merg mai departe
Esti rautacios. :P

Edited by caroline_hi, 17 December 2008 - 19:55.


#130
AMAN_SER

AMAN_SER

    Senior Member

  • Grup: Senior Members
  • Posts: 7,566
  • Înscris: 10.11.2008

 caroline_hi, on Dec 17 2008, 19:54, said:

Hai ca nu e asa de greu de inteles. :lol:
bine domnu politai data viitoare o sa postez conform regulamentului, ma scuzati ca m-am abatut de la subiect.

#131
sorin520

sorin520

    OM

  • Grup: Banned
  • Posts: 2,572
  • Înscris: 05.09.2008

 caroline_hi, on Dec 17 2008, 19:54, said:

Esti rautacios. :P


Deloc!
Am pus niște întrebări simple,legate de o „experiență extrasenzorială”și aștept răspuns

#132
craciunfericit

craciunfericit

    Junior Member

  • Grup: Members
  • Posts: 75
  • Înscris: 17.12.2008
Ateii sunt posedați în masă de duhul prostiei. Crăciun fericit!

#include p16f887.inc

w_temp EQU 0x7D				
	   status_temp EQU 0x7E	   
	   pclath_temp EQU 0x7F	   

	   cblock	  0x20		   
	   Port_A					
	   Port_B					 
	   Rsn32temp			   
	   RXchr					  
	   endc					   
;**********************************************************************
	   ORG		 0x0000		  
	   nop
	   goto		main			
;**********************************************************************
	   ORG		 0x0004		 
	   
	   movwf	   w_temp		 
	   movf		STATUS,w	   
	   movwf	   status_temp
	   movf		PCLATH,w		
	   movwf	   pclath_temp
;**********************************************************************

	   banksel	 PIE1
	   btfss	   PIE1, RCIE
	   goto		ISR_Not_RX232int
	   banksel	 PIE1
	   btfsc	   PIR1, RCIF
	   call		RX232_int_proc
	   
ISR_Not_RX232int
	   movf		pclath_temp,w
	   movwf	   PCLATH		  
	   
	   movf		status_temp,w
	   movwf	   STATUS		 
	   swapf	   w_temp,f
	   swapf	   w_temp,w	   
	   
	   retfie					
;**********************************************************************
RX232_int_proc					
	   banksel	 RCSTA
	   movf		RCSTA, w
	   movwf	   Rsn32temp
	   btfsc	   Rsn32temp, FERR
	   goto		RX232_int_proc_FERR
	   btfsc	   Rsn32temp, OERR
	   goto		RX232_int_proc_OERR
	   goto		RX232_int_proc_Cont
	   
RX232_int_proc_FERR
	   bcf		 RCSTA, CREN	
							   
	   nop					   
	   nop
	   bsf		 RCSTA, CREN
	   movf		RCREG, w	   
	   bsf		 Port_A, 0	  
	   movf		Port_A, w
	   movwf	   PORTA
	   goto		Rsn32_exit
	   
RX232_int_proc_OERR
	   bcf		 RCSTA, CREN	 
	   nop						 
	   nop
	   bsf		 RCSTA, CREN
	   movf		RCREG, w	   
	   bsf		 Port_A, 1	  
	   movf		Port_A, w
	   movwf	   PORTA
	   goto		Rsn32_exit
	   
RX232_int_proc_Cont
	   movf		RCREG, W	   
	   movwf	   RXchr
	   movwf	   PORTB
	   movwf	   TXREG		  
	   
Rsn32_exit
	   return					
;**********************************************************************


main
	   banksel	 ANSEL		
	   clrf		ANSEL		 
	   clrf		ANSELH
	   
	 
	   banksel	 TRISA
	   movlw	   b'11111100'
	   movwf	   TRISA
	   movlw	   b'00000000'
	   movwf	   TRISB
	

	   banksel	 PORTA
	   movlw	   b'11111100'
	   movwf	   PORTA
	   movwf	   Port_A
	   movlw	   b'00000000'
	   movwf	   PORTB
	   movwf	   Port_B
	 
	

	   banksel	 TRISC
	   bcf		 TRISC, 6		
	   bsf		 TRISC, 7	  
	   
	   banksel	 BAUDCTL	   
	   bsf		 BAUDCTL, BRG16
	   banksel	 SPBRG
	   movlw	   .51			
								   
	   movwf	   SPBRG
	   clrf		SPBRGH
	   
	   banksel	 TXSTA
	   bcf		 TXSTA, TX9	 
	   bsf		 TXSTA, TXEN	
	   bcf		 TXSTA, SYNC	
	   bsf		 TXSTA, BRGH	
	   
	   banksel	 RCSTA
	   bsf		 RCSTA, SPEN	 
	   bcf		 RCSTA, RX9	 
	   bsf		 RCSTA, CREN	 
	   bcf		 RCSTA, ADDEN	
								   
	   movf		RCSTA, W
	   movf		RCREG, W
	 

	   banksel	 PIE1
	   bsf		 PIE1, RCIE	
	   
	   bsf		 INTCON, PEIE   
	   bsf		 INTCON, GIE	 
	   
	

	   goto $
	   
	   end						

Edited by craciunfericit, 17 December 2008 - 20:32.


#133
AMAN_SER

AMAN_SER

    Senior Member

  • Grup: Senior Members
  • Posts: 7,566
  • Înscris: 10.11.2008

 craciunfericit, on Dec 17 2008, 20:25, said:

Ateii sunt posedați în masă de duhul prostiei. Crăciun fericit!

#include p16f887.inc

w_temp EQU 0x7D					   ; Variabilă pentru salvarea reg. W
	   status_temp EQU 0x7E		; Variabilă pentru salvarea reg. STATUS
	   pclath_temp EQU 0x7F		; Variabilă pentru salvarea reg. PCLATH

	   cblock	  0x20			; blocul varibilelor începe la adresa 20 h
	   Port_A					  ; Variabilă la adresa 20 h
	   Port_B					  ; Variabilă la adresa21 h
	   Rsn32temp				   ; Variabilă la adresa 22 h
	   RXchr					   ; Variabilă la adresa 23 h
	   endc						; sfârșitul blocului de variabile
;**********************************************************************
	   ORG		 0x0000		  ; vectorul de reset
	   nop
	   goto		main			; Du-te la începutul programului (eticheta "main")
;**********************************************************************
	   ORG		 0x0004		  ; adresa vectorului de întrerupere
	   
	   movwf	   w_temp		  ; salvează valoarea reg. W
	   movf		STATUS,w		; salvează valoarea reg. STATUS
	   movwf	   status_temp
	   movf		PCLATH,w		; salvează valoarea reg. PCLATH
	   movwf	   pclath_temp
;**********************************************************************
; Parte a programului executată în rutina de întrerupere
	   banksel	 PIE1
	   btfss	   PIE1, RCIE
	   goto		ISR_Not_RX232int
	   banksel	 PIE1
	   btfsc	   PIR1, RCIF
	   call		RX232_int_proc
	   
ISR_Not_RX232int
	   movf		pclath_temp,w
	   movwf	   PCLATH		  ; refacere valoare originală a reg. PCLATH
	   
	   movf		status_temp,w
	   movwf	   STATUS		  ; refacere valoare originală a reg. STATUS
	   swapf	   w_temp,f
	   swapf	   w_temp,w		; refacere valoare originală a reg. W
	   
	   retfie					  ; Întoarcere din rutina de întrerupere
;**********************************************************************
RX232_int_proc					 ; verificare apariție erori
	   banksel	 RCSTA
	   movf		RCSTA, w
	   movwf	   Rsn32temp
	   btfsc	   Rsn32temp, FERR
	   goto		RX232_int_proc_FERR
	   btfsc	   Rsn32temp, OERR
	   goto		RX232_int_proc_OERR
	   goto		RX232_int_proc_Cont
	   
RX232_int_proc_FERR
	   bcf		 RCSTA, CREN	 ; Pentru ștergerea bitului FERR, receptorul este mai întâi oprit și apoi pornit
							   
	   nop						 ; întârziere
	   nop
	   bsf		 RCSTA, CREN
	   movf		RCREG, w		; citire registru receptor și ștergeer bit FERR
	   bsf		 Port_A, 0	   ; comută LED pe ON (indicator eroare UART)
	   movf		Port_A, w
	   movwf	   PORTA
	   goto		Rsn32_exit
	   
RX232_int_proc_OERR
	   bcf		 RCSTA, CREN	 ; șterge bit OERR
	   nop						 ; întârziere
	   nop
	   bsf		 RCSTA, CREN
	   movf		RCREG, w		; citește reg. receptorului și șșterge bitul FERR
	   bsf		 Port_A, 1	   ; comută LED pe ON (indicator eroare UART)
	   movf		Port_A, w
	   movwf	   PORTA
	   goto		Rsn32_exit
	   
RX232_int_proc_Cont
	   movf		RCREG, W		; citire date primite
	   movwf	   RXchr
	   movwf	   PORTB
	   movwf	   TXREG		   ; trimitere date înapoi la PC
	   
Rsn32_exit
	   return					  ; Revenire din rutina de întrerupere
;**********************************************************************
; Programul principal

main
	   banksel	 ANSEL		   ; selectare banc care conține reg. ANSEL
	   clrf		ANSEL		   ; toate intrările sunt digitale
	   clrf		ANSELH
	   
	   ;---------------------------------------
	   ; configurare Port
	   ;---------------------------------------
	   banksel	 TRISA
	   movlw	   b'11111100'
	   movwf	   TRISA
	   movlw	   b'00000000'
	   movwf	   TRISB
	   ;---------------------------------------
	   ; setare valori inițiale
	   ;---------------------------------------
	   banksel	 PORTA
	   movlw	   b'11111100'
	   movwf	   PORTA
	   movwf	   Port_A
	   movlw	   b'00000000'
	   movwf	   PORTB
	   movwf	   Port_B
	   ;---------------------------------------
	   ; USART - setare pentru 38400 bps
	   ;---------------------------------------
	   banksel	 TRISC
	   bcf		 TRISC, 6		; RC6/TX/CK = ieșire
	   bsf		 TRISC, 7		; RC7/RX/DT = intrare
	   
	   banksel	 BAUDCTL	   
	   bsf		 BAUDCTL, BRG16
	   banksel	 SPBRG
	   movlw	   .51			 ; rată baud = 38400
								   ; ( Fosc/(4*(SPBRG+1)) ) Eroare +0.16%
	   movwf	   SPBRG
	   clrf		SPBRGH
	   
	   banksel	 TXSTA
	   bcf		 TXSTA, TX9	  ; date sunt pe 8 biți
	   bsf		 TXSTA, TXEN	 ; activare transmisie de date
	   bcf		 TXSTA, SYNC	 ; modul asincron
	   bsf		 TXSTA, BRGH	 ; rată de baud viteză mare
	   
	   banksel	 RCSTA
	   bsf		 RCSTA, SPEN	 ; configurare ieșiri RX/DT și TX/CK
	   bcf		 RCSTA, RX9	  ; Selectare mod de recepție date pe 8 biți
	   bsf		 RCSTA, CREN	 ; activare recepție de date
	   bcf		 RCSTA, ADDEN	; dacă nu se detectează adresă, al nouălea bit se poate folosi ca bit de paritate
								   
	   movf		RCSTA, W
	   movf		RCREG, W
	   ;---------------------------------------
	   ; Activare întreuperi
	   ;---------------------------------------
	   banksel	 PIE1
	   bsf		 PIE1, RCIE	  ; activare întrerupere USART Rx
	   
	   bsf		 INTCON, PEIE	; permite întreruperi de la toate perifericele
	   bsf		 INTCON, GIE	 ; activare întrerupere globală
	   
	   ;---------------------------------------
	   ; Rămâi aici
	   ;---------------------------------------
	   goto $
	   
	   end						 ; Sfârșitul programului
Chiar se intreba lumea ce mai face shape. :lol:  si iata-te printre noi iarasi.

#134
craciunfericit

craciunfericit

    Junior Member

  • Grup: Members
  • Posts: 75
  • Înscris: 17.12.2008
............
goto hell

hell
decfsz apocalipse1

..........

; Crăciun fericit!

Edited by craciunfericit, 17 December 2008 - 20:35.


#135
sorin520

sorin520

    OM

  • Grup: Banned
  • Posts: 2,572
  • Înscris: 05.09.2008
[quote name='craciunfericit' date='Dec 17 2008, 20:25' post='5687786']
Ateii sunt posedați în masă de duhul prostiei. Crăciun fericit!







Ce metodă de calcul ai folosit pentru a ajunge la acest rezultat?

#136
caroline_hi

caroline_hi

    One moon shows in every pool, in every pool the one moon.

  • Grup: Senior Members
  • Posts: 7,813
  • Înscris: 04.12.2007

 AMAN_SER, on Dec 17 2008, 20:32, said:

Chiar se intreba lumea ce mai face shape. :lol:  si iata-te printre noi iarasi.
Si mai zici de mine. :lol: Ha! :lol:

 AMAN_SER, on Dec 17 2008, 19:55, said:

bine domnu politai data viitoare o sa postez conform regulamentului, ma scuzati ca m-am abatut de la subiect.


#137
craciunfericit

craciunfericit

    Junior Member

  • Grup: Members
  • Posts: 75
  • Înscris: 17.12.2008

 sorin520, on Dec 17 2008, 20:40, said:

Ce metodă de calcul ai folosit pentru a ajunge la acest rezultat?
un algoritm backtracking cu pas infinitezimal

Edited by craciunfericit, 17 December 2008 - 20:43.


#138
AMAN_SER

AMAN_SER

    Senior Member

  • Grup: Senior Members
  • Posts: 7,566
  • Înscris: 10.11.2008

 caroline_hi, on Dec 17 2008, 20:40, said:

Si mai zici de mine. :lol: Ha! :lol:
Nu mai tu stii ce ai vrut sa zici in postul asta. Fi mai explicita

#139
sorin520

sorin520

    OM

  • Grup: Banned
  • Posts: 2,572
  • Înscris: 05.09.2008

 craciunfericit, on Dec 17 2008, 20:42, said:

un algoritm backtracking cu pas infinitezimal


Ai luat țeapă!
Nu se mai găsește duh de acum 2 milenii
Dacă ai noroc  îți iei banii înapoi

#140
craciunfericit

craciunfericit

    Junior Member

  • Grup: Members
  • Posts: 75
  • Înscris: 17.12.2008
...

Attached Files

  • Attached File  1.jpg   199.94K   12 downloads
  • Attached File  2.jpg   108.77K   11 downloads

Edited by craciunfericit, 17 December 2008 - 20:53.


#141
arpisz

arpisz

    Senior Member

  • Grup: Senior Members
  • Posts: 4,896
  • Înscris: 25.04.2008
noroc ca shape asta e in stare sa copieze din niste exemple :))

clona shapuiasca poti si ceva de capul tau sau esti plin de exemple ?

Edited by arpisz, 17 December 2008 - 20:56.


#142
craciunfericit

craciunfericit

    Junior Member

  • Grup: Members
  • Posts: 75
  • Înscris: 17.12.2008

 arpisz, on Dec 17 2008, 20:56, said:

noroc ca shape asta e in stare sa copieze din niste exemple :))

clona shapuiasca poti si ceva de capul tau sau esti plin de exemple ?
da mă vreau să afișez temperatura de la Budapesta pe GLCD cu DS1820... O iau direct din satelit...   :lol: Crăciun nefericit!

Ungure bulan ai invățat instrucțiunile sau îți fac rezultatul left justified în freză?

Edited by craciunfericit, 17 December 2008 - 21:01.


#143
sorin520

sorin520

    OM

  • Grup: Banned
  • Posts: 2,572
  • Înscris: 05.09.2008

 craciunfericit, on Dec 17 2008, 20:59, said:

da mă vreau să afișez temperatura de la Budapesta pe GLCD cu DS1820... O iau direct din satelit...   :lol: Crăciun nefericit!

Unde erai pe 1 Mai?

#144
craciunfericit

craciunfericit

    Junior Member

  • Grup: Members
  • Posts: 75
  • Înscris: 17.12.2008

 sorin520, on Dec 17 2008, 21:01, said:

Unde erai pe 1 Mai?
în cana cu bere, lângă trandaphir în registrul PIR setându-ți flag-ul de întrerupere la noti...

Edited by craciunfericit, 17 December 2008 - 21:05.


Anunturi

Chirurgia endoscopică a hipofizei Chirurgia endoscopică a hipofizei

"Standardul de aur" în chirurgia hipofizară îl reprezintă endoscopia transnazală transsfenoidală.

Echipa NeuroHope este antrenată în unul din cele mai mari centre de chirurgie a hipofizei din Europa, Spitalul Foch din Paris, centrul în care a fost introdus pentru prima dată endoscopul în chirurgia transnazală a hipofizei, de către neurochirurgul francez Guiot. Pe lângă tumorile cu origine hipofizară, prin tehnicile endoscopice transnazale pot fi abordate numeroase alte patologii neurochirurgicale.

www.neurohope.ro

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate