ERRORLEVEL -302
LIST P=16F84
#INCLUDE "P16F84.INC"
__CONFIG _XT_OSC&_CP_OFF&_WDT_OFF
CBLOCK 0X0C
SLP
ENDC
ORG 0
GOTO START
START
BANKSEL TRISA
MOVLW B'11111111'
MOVWF TRISA
MOVLW B'00000000'
MOVWF TRISB
BANKSEL PORTB
MAIN
MOVLW B'00000001'
MOVWF PORTB
GOTO WAIT
FORGAT
BTFSC PORTB,7
GOTO I
GOTO O
GOTO WAIT
I
BTFSC STATUS,0
GOTO FOROG
BSF STATUS,0
GOTO FOROG
O
BTFSC STATUS,0
BCF STATUS,0
GOTO FOROG
FOROG
RLF PORTB, F
GOTO 0xD
WAIT
MOVLW 00F
MOVWF SLP
WAIT2
NOP
DECFSZ SLP, F
GOTO WAIT2
GOTO FORGAT
END
Azt hiszem, megbolondultam. De cserébe érzem, hogy csendben egy tanszék büszke rám :P
Update: hogy a bölcsész-beállítottságúak se keseredjenek nagyon el, most néhány napig be fogom linkelni a wikimedia 2007es képei közül a legjobbakat:
Mára például ez jutott, mert szerintem tök jó, hogy olyan, mintha a középkorban készült volna, és nincs rajt semmi olyan, ami nem passzol oda.