; Name: Arpan Chavda
; Roll No.:09BCE006
; Aim: Enter string from user and convert upper case to lower case and
; vice versa without change in entered number in string.
;it runs on tasm assembler
read macro str1
mov ah,0ah
lea dx,str1
int 21H
endm
disp macro str
mov ah,09h
lea dx,str
int 21h
endm
data segment
str1 db 20
db 0
db 20 dup('$')
msg1 db "Enter the String : $"
msg2 db...
Saturday, September 8, 2012
[PROLOG] How to insert an element in list?
%program to insert an element in list
domains
A=symbol *.
predicates
addsym(A,symbol,integer,A).
clauses
addsym([],S,N,Q):-
N<>0.
addsym(P,S,N,[S|Q]):-
N=0,!,
addsym(P,S,-1,Q),
write("inserted").
addsym([H|T],S,N,[H|Q]):-
B=N-1,
addsym(T,S,B,Q),
write("ins").
...
[C-CODE] TCP Implementation in C
/*----------------------------tcp_client.c----------------------------------------*/
#include<stdio.h>
#include<sys/socket.h>
#include<sys/types.h>
#include<netinet/in.h>
#include<string.h>
#define LOCAL_PORT 1500
#define SIZE 20
int main()
{
int sd,cd,len;
char buff1[SIZE],buff[SIZE];
struct sockaddr_in server,client;
sd = socket(AF_INET,SOCK_STREAM,0);
client.sin_family = AF_INET;
...
[MATLAB] Histogram Matching program
final_img=imread('fig3.jpg');
input_img=imread('fig3.jpg');
ref_img=imread('fig3.jpg');
[m n]=size(input_img);
mn=m*n;
pdf_main=zeros(1,256);
pdf_ref=zeros(1,256);
cdf_main=zeros(1,256);
cdf_ref=zeros(1,256);
tmp=zeros(1,256);
final=zeros(m,n);
%a=0;
%b=0;
for k=1:m
for l=1:n
for r=0:255
if(input_img(k,l)==r)
pdf_main(1,r+1)=pdf(1,r+1)+1;
...
[MATLAB] Histogram Equalization program
final_img=imread('fig3.jpg');
input_img=imread('fig3.jpg');
[m n]=size(input_img);
mn=m*n;
pdf=zeros(1,256);
cdf=zeros(1,256);
tmp=zeros(1,256);
final=zeros(m,n);
%a=0;
%b=0;
for k=1:m
for l=1:n
for r=0:255
if(input_img(k,l)==r)
pdf(1,r+1)=pdf(1,r+1)+1;
end
...
[MATLAB] Gamma,Log and Negetive Trasformation Code
log_input=imread('fig3.jpg');
gamma_input=imread('fig6.jpg');
neg_input=imread('fig5.jpg');
%img=rgb2gray(inpt);
%imview(img);
[m n]=size(log_input);
[o p]=size(gamma_input);
[q r]=size(neg_input);
log_opt=zeros(m,n);
gamma_opt=zeros(o,p);
neg_opt=zeros(q,r);
for k=1:m
for l=1:n
log_opt(k,l)=30*log(double(log_input(k,l)));
end
end
for k=1:o
for l=1:p
gamma_opt(k,l)=0.6*power(double(gamma_input(k,l)),0.98);
...
Subscribe to:
Posts (Atom)
Posts
