Natrag   Forum.hr > Informatička tehnologija > Za napredne korisnike

Za napredne korisnike Hardcore geeks here
Podforumi: Linux, Programiranje, Networking

Odgovor
 
Tematski alati Opcije prikaza
Old 23.11.2022., 21:13   #881
Quote:
grogo bolger kaže: Pogledaj post
Jeste li danas zaspali za vrime tekme
na njemačka-japan sam bacio drkicu
kamaz is offline  
Odgovori s citatom
Old 24.11.2022., 11:21   #882
jedina utakmica koju ja priznan je njemačka-grčka
fekalis is offline  
Odgovori s citatom
Old 24.11.2022., 13:29   #883
Quote:
kamaz kaže: Pogledaj post
ajde gori pa vidi, vodila se rasprava ženu ne smiš pribit ali dva-tri šamara su skroz ok i drž nedaj drž nedaj boladeji posivi
Valjda nije pazio. Danas su takva vremena da više ni vlastitu ženu ne smiješ prebiti!
__________________
Human
Human1 is offline  
Odgovori s citatom
Old 24.11.2022., 13:53   #884
Quote:
grogo bolger kaže: Pogledaj post
Nisi ti ni blesav!

Jeste li danas zaspali za vrime tekme
Ucijo sam biznis na naprdnom kutku, diplomski sam napisao sa savjetima naprdnih korisnika. Komisija se nije mogla obraniti.
__________________
Ako krades, kradi pomalo i sigurno.
Ministar obrane Seva, 2012
logit is offline  
Odgovori s citatom
Old 24.11.2022., 15:41   #885
Quote:
fekalis kaže: Pogledaj post
jedina utakmica koju ja priznan je njemačka-grčka
heureka
kamaz is offline  
Odgovori s citatom
Old 24.11.2022., 18:27   #886
Quote:
kamaz kaže: Pogledaj post
heureka
Ma da - trebao je taj zabiti, pa onda skinuti dres i trčeći naokolo vikati "heureka heureka!"


(ali da je i onak' smiješno, smiješno je)
adelon is offline  
Odgovori s citatom
Old 24.11.2022., 19:09   #887
Statua Miše Presleya, posvećena u ovom trenutku ponovo vidljivom potpisu inače sivog sokola @Judolina, naše naprdne ptice pjevice

(posuđeno s podforuma 'Vicevi/Smiješne fotke'):
adelon is offline  
Odgovori s citatom
Old 24.11.2022., 19:57   #888
sivog sokola
fekalis is offline  
Odgovori s citatom
Old 25.11.2022., 07:27   #889
Clock

CGROUP GROUP VECTOR,CODESEG
VECTOR SEGMENT AT 0H
DB 6CH DUP(?) ;FILLER
TIME_LO DW ? ;DOS TIME
TIME_HI DW ? ;DOS TIME
VEC_IP DW ;CLOCK UPDATE VECTOR IP
VEC_CS DW ;CLOCK UPDATE VECTOR CS
VECTOR ENDS

CODESEG SEGMENT PARA
ASSUME CS:CODESEG,DS:CGROUP
ORG 100H
CLK PROC FAR
JMP SETUP ;ATTACH TO DOS
INTRPT LABEL DWORD
INT_IP DW 0 ;OLD UPDATE VECTOR IP
INT_CS DW 0 ;OLD UPDATE VECROR CS
TICKS DW 0 ;TICK COUNTER
SCR_OFF DB 0,0 ;SCREEN OFFSET IN BUFFER
CRT_PORT DW 0 ;SCREEN STATUS PORT
flag db 0
TIME DB 8 DUP(':',0BH) ;TIME SAVE AREA
CLK_INT LABEL NEAR
PUSH AX ;SAVE REGISTERS
PUSH CX
PUSH DI
PUSH SI
PUSH DS
PUSH ES
PUSHF ; AND FLAGS
CALL CS:[INTRPT] ;DO OLD UPDATE INTERRUPT
MOV CX,0040H ;GET SEGMENT OF DOS TABLE
MOV DS,CX ;PUT IN DS
MOV CX,CS:TICKS ;GET TICK COUNT
INC CX ;INCREMENT IT
CMP CX,20 ;01F4H ;HAS A MINUTE GONE BY?
JB NO_MINUTE ;NO, MOVE ON
CALL UPDATE ;YES, UPDATE CLOCK AND
MOV CX,0 ; RESET TICK COUNTER
NO_MINUTE:
MOV CS:TICKS,CX ;SAVE UPDATED TICK COUNT
MOV CX,0B000H ;GET VIDEO SEGMENT
MOV ES,CX ;PUT IN ES
MOV DX,CS:CRT_PORT ;GET CRT STATUS PORT ADDR
MOV DI,WORD PTR CS:SCR_OFF ;GET SCREEN BUFFER OFFSET
LEA SI,CS:TIME ;GET DOS TIME
MOV CX,16 ;SET UP TO MOVE 10 BYTES
CLI ;DISABLE OTHER INTERRUPTS
WAIT1: IN AL,DX ;READ CRT STATUS
TEST AL,1 ;CHECK FOR VERTICAL RETRACE
JNZ WAIT1 ;WAIT FOR RETRACE LOW
MOV AH,CS:[SI] ;GET FIRST BYTE TO MOVE
WAIT2: IN AL,DX ;GET CRT STATUS
TEST AL,1 ;CHECK FOR VERTICAL RETRACE
JZ WAIT2 ;WAIT FOR RETRACE HIGH
MOV ES:[DI],AH ;MOVE BYTE TO SCREEN
INC DI ;INCREMENT INDEX
INC SI
LOOP WAIT1 ;MOVE NEXT BYTE
STI ;ENABLE INTERRUPTS
POP ES ;RESTORE REGISTERS
POP DS
POP SI
POP DI
POP CX
POP AX
IRET ;RETURN FROM INTERRUPT
CLK ENDP
UPDATE PROC NEAR
PUSH AX ;SAVE REGISTERS
PUSH BX
PUSH CX
PUSH DX
PUSH DS
MOV AX,0040H ;GET ADDRESS OF DOS TABLE
MOV DS,AX ;PUT IN DS
MOV AX,TIME_HI ;GET HIGH BYTE OF DOS TIME
mov flag,0 ;am flag
HOUR: CMP AX,0CH ;CONVERT TO HOURS
JLE H1
mov flag,1 ;set to pm
SUB AX,0CH
JMP HOUR
H1: AAM ;CONVERT TO ASCII
ADD AX,3030H
LEA BX,CS:TIME ;GET ADDRESS OF TIME AREA
MOV CS:[BX],AH ;SAVE HOURS FIRST DIGIT
MOV CS:[BX+2],AL ;SAVE HOURS SECOND DIGIT
MOV AX,TIME_LO ;GET DOS TIME LOW BYTE
MOV CX,8H ;CONVERT TO MINUTES
SHR AX,CL
MOV DX,3CH
MUL DL
SHR AX,CL
AAM ;CONVERT TO ASCII
ADD AX,3030H
MOV CS:[BX+6],AH ;SAVE MINUTES FIRST DIGIT
MOV CS:[BX+8],AL ;SAVE MINUTES SECOND DIGIT
mov byte ptr cs:[bx+12],'a'
cmp flag,0 ;is it am?
jz goahead
mov byte ptr cs:[bx+12],'p'
goahead:
mov byte ptr cs:[bx+14],'m'
POP DS ;RESTORE REGISTERS
POP DX
POP CX
POP BX
POP AX
RET
UPDATE ENDP
SETUP: MOV AX,0 ;GET ADDRESS OF VECTOR TABLE
MOV DS,AX ;PUT IN DS
CLI ;DISABLE FURTHER INTERRUPTS
MOV AX,[VEC_IP] ;GET ADDRESS OF OLD UPDATE IP
MOV CS:[INT_IP],AX ;SAVE IT
MOV AX,[VEC_CS] ;GET ADDRESS OF OLD UPDATE CS
MOV CS:[INT_CS],AX ;SAVE IT
MOV VEC_IP,OFFSET CLK_INT ;PUT ADDRESS OF CLK IN VECTOR IP
MOV VEC_CS,CS ;PUT CS OF CLK IN VECTOR CS
STI ;ENABLE INTERRUPTS
MOV AH,0FH ;READ VIDEO STATUS
INT 10H
SUB AH,8 ;SUBTRACT 8 CHAR TIME FROM NCOLS
SHL AH,1 ;MULTIPLY BY 2 FOR ATTRIBUTE
MOV CS:SCR_OFF,AH ;SAVE SCREEN TIME LOCATION
MOV WORD PTR CS:CRT_PORT,03BAH ;SAVE MONO STATUS PORT ADDR
TEST AL,4 ;CHECK FOR COLOR MONITOR
JNZ MONO ;IF MONO, MOVE ON
ADD WORD PTR CS:SCR_OFF,8000H ;ADD COLOR OFFSET TO TIME OFFSET
MOV WORD PTR CS:CRT_PORT,03DAH ;SAVE COLOR STATUS PORT ADDR
MONO: CALL UPDATE ;DO FIRST UPDATE & PRINT TIME
MOV DX,OFFSET SETUP ;GET END ADDRESS OF NEW INTERRUPT
INT 27H ;TERMINATE AND REMAIN RESIDENT
DB 117 DUP(0) ;FILLER
CODESEG ENDS
END CLK
brigadir90 is offline  
Odgovori s citatom
Old 25.11.2022., 08:39   #890
Kaki je ovo asembler?

Edit:
A i ja pitam gluposti. Valjda je naprdni.
__________________
Human
Human1 is offline  
Odgovori s citatom
Old 25.11.2022., 12:38   #891
uberi mu avatar
fekalis is offline  
Odgovori s citatom
Old 25.11.2022., 13:44   #892
A jbg, zaboravio je isključiti i 'automatizirani postupak' za izbor avatara...
adelon is offline  
Odgovori s citatom
Old 25.11.2022., 18:44   #893
ja više ovde nemogu povatat ko je ko
kamaz is offline  
Odgovori s citatom
Old 25.11.2022., 19:58   #894
koliko sam ja upućen, a upućen sam jer sam plaćen da budem upućen, adelon je klon svih adelona iz multiversa. ima ih miljun. sramota
fekalis is offline  
Odgovori s citatom
Old 25.11.2022., 20:12   #895
gadi mi se to kloniranje više
kamaz is offline  
Odgovori s citatom
Old 25.11.2022., 20:19   #896
bože sačuvaj. pogledaj samo onog juda i njegova 2 acca... jedan plav jedan siv
fekalis is offline  
Odgovori s citatom
Old 25.11.2022., 20:31   #897
i judo pa kak im to vodže foruma dopuštaju
kamaz is offline  
Odgovori s citatom
Old 26.11.2022., 09:40   #898
Quote:
kamaz kaže: Pogledaj post
gadi mi se to kloniranje više
Sve je počelo s ovcom Dolly i gle gdje smo sada.
__________________
Human
Human1 is offline  
Odgovori s citatom
Old 26.11.2022., 10:26   #899
a i ja imam za ispovijed... katkad kloniram hdd na ssd
fekalis is offline  
Odgovori s citatom
Old 26.11.2022., 12:29   #900
Quote:
fekalis kaže: Pogledaj post
koliko sam ja upućen, a upućen sam jer sam plaćen da budem upućen, adelon je klon svih adelona iz multiversa. ima ih miljun. sramota
Pa ne može milijarda preko noći jbg
adelon is offline  
Odgovori s citatom
Odgovor


Tematski alati
Opcije prikaza

Kreni na podforum




Sva vremena su GMT +2. Trenutno vrijeme je: 03:17.