Ülesanne: Koosta või katseta olemasolevat programmi, millega lülitatakse kõik digitaalväljundid sisse Käik: Kasutasime registreid PORTC, PORTD, TRISC, TRISD. Need aga paiknevad erinevates mäluakendes, seega lülitasime ümber mäluaknad registri signaalidega 5 ja 6 (RP0 EQU 5 ja RP1 EQU 6). Siis lülitatasime sisse mäluakna 1. Järgnevalt kustutasime registrid TRISC ja TRISD nulliks ja mõlemas määrasime RD0, RD1, RD2, RD, RD4, RD5, RD6 ja RD7 väljunditeks. Lõpetuseks laadisime registrisse W 8-bitilise arvu, milles kõik signaalid on ühed ninglülitasime sisse mäluakna 0 ning laadisime registrist W oleva arvu registritesse PORTC ja PORTD. Kõige lõpuks olid kõik signaalid RD väärtusega 1 ning LED-lambid põlesid. Plokkskeem:
Plokkskeem: Joonis 1: AD-muunduri plokkskeem Juhtprogrammi väljatrükk: ;Mikrokontrolleri registrinimede lisamine list p=16f877a include "p16f877a.inc" ;Muutujate defineerimine cblock 0x20 Pause Pause_tmp temp_var endc ;Programm alates aadressist 0 org 0x00 bsf STATUS,RP0 ;Valime mäluala 1 bcf STATUS,RP1 movlw b'00000000' ;Kogu portD on väljund movwf TRISD movlw b'00000000' ;Kogu portC on väljund movwf TRISC movlw .0 movwf ADCON1 ;PORTA seadistatakse analoogsisenditeks
LED0 välja LED0 sisse goto mainloop goto mainloop Seadme juhtprogrammi väljatrükk list p=16f877a ;defineeritakse kontrolleri tüüp include "p16f877a.inc" ;lisatakse kontrolleri infot sisaldav ;*.inc fail org 0x00 ;määrab kindlaks programmi algusvektori bsf STATUS,RP0 ;valitakse mälupank nr 1 (00,10,01,11) bcf STATUS,RP1 ;TRIS register asub pangas1! movlw b'00000000' ;tööregistrisse omistatakse binaararv ;00000000 movwf TRISD ;pordis D määratakse kõik viigud ;väljunditeks movlw 0x06 ;tööregistrisse antakse nr 6 movwf ADCON1 ;PORTA seadistatakse digitaalsisendiks
Sitke purunemine Tugevus- ja plastusnäitajate arvutamine: Algandmed: Arvutuskäik Teras C20 näitel: Teras C20 S0=t S0=2.9* S0=58 Rm=19040 Rm=328.2 Rm Rm=Fm/S0 *b 20 mm /58 8 Rp0. Rp0.2=Fp/S Rp0.2=14572/5 Rp0.2=25 2 0 8 1.24 A=((Lu- A L0)/L0)*100 A=((113.57-80)/80)*100 A=41.96% Arvutustulemused: Tulemused Teras Komposiit Polüestervai : C20 Komposiit II x k ABS PMMA Rm 328.28 290 363.45 32
annaabi.ee 
