Write 80387 ALP to plot Sine Wave, Cosine Wave and Sinc function. Access video memory directly for plotting

Second Year Computer Engineering Microprocessor Programs:

Microprocessor Lab:

Practical 11:

             Write 80387 ALP to plot Sine Wave, Cosine Wave and Sinc function. Access video memory directly for plotting

This program is performed using TASM on windows operating system.

----------------------------------------------------------------------------------------------------------------------------------
;sin.asm


;Y=100-60 sin((pi/180)*x)
;Bit    7  6  5  4  3  2  1  0
;Data   R  R  R  G  G  G  B  B

.387
.model small

.stack 100

.data
msg db 10,13,'this is Sine wave$'
one_eighty dw 180
scale dw 30
hundred dw 100
rint dw 0
x dw 0

.code
main: 
mov ax,@data            ; Initialize DS (needed for .exe-program)
    mov ds, ax
    mov ax, 0A000h         ; Segment to video memory
    mov es, ax

    mov ax, 13h             ;Standard video graphics mode
    int 10h                 ; switch to 320x200 mode

    mov cx, 0

    l1:
    push cx                 ; store CX
    call get_sine
    
    mov bx, cx
    call vector_to_memory

    mov di, ax
    mov al, 03h            ; color
    mov [es:di], al         ; put pixel
    pop cx                  ; restore CX
    inc cx                  ; CX = CX + 1
    cmp cx, 320             ; right boarder reached?
    jne l1                 ; no, next degree

mov ah,09h                      ; display message
lea dx,msg
int 21h

    xor ah, ah
    int 16h                 ; keyboard (wait for key)
    mov ax, 3
    int 10h                 ; go to text mode
    mov ax, 4C00h
    int 21h                 ; return to DOS, exit code 0

get_sine:                   ; Args: CX = angle (degree!)
    mov word[x],cx
    fldpi                   ; ST(0)=Pi, ST(1)=CX
    fimul word[x]            ; ST(0)=Pi*CX
    
    fidiv word[one_eighty] ; ST(0)=(Pi*CX)/180(degree to rad)
    fsin                    ; ST(0)=sine (rad)
    fimul word[scale]      ; ST(0)=sine*scale
    fild hundred
    fsub st,st(1)    ;ST(0)=100-60*SIN((Pi*CX)/180)
    fist word [rint]       ; store integer with rounding 
    mov ax, word[rint]     ; AX = Y
    ret                     ; Return: AX = Y (signed!)

vector_to_memory:           ; Calculate offset=Y*320+X 
;Args: BX = X, AX = Y
    push dx                 ; mul changes dx too
    mov cx, 320             ; video mode width 
    mul cx                  ; DX:AX = AX * CX
    add ax, bx              ; left indentation
    pop dx
    ret                     ; Return: AX = offset in memory

end   main
----------------------------------------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------------------------------------
;cos.asm
;Y=100-60 cos((pi/180)*x)
;Bit    7  6  5  4  3  2  1  0
;Data   R  R  R  G  G  G  B  B

.387
.model small

.stack 100

.data
msg db 10,13,'this is COS wave$'
one_eighty dw 180
scale dw 30
hundred dw 100
rint dw 0
x dw 0

.code
main: 
mov ax,@data            ; Initialize DS (needed for .exe-program)
    mov ds, ax
    mov ax, 0A000h         ; Segment to video memory
    mov es, ax

    mov ax, 13h             ;Standard video graphics mode
    int 10h                 ; switch to 320x200 mode

    mov cx,0

    l1:
    push cx                 ; store CX
    call get_cos
    
    mov bx, cx
    call vector_to_memory
    mov di, ax
    mov al, 03h            ; color
    mov [es:di], al         ; put pixel
    pop cx                  ; restore CX
    inc cx                  ; CX = CX + 1
    cmp cx, 320             ; right boarder reached?
    jne l1                 ; no, next degree

mov ah,09h                      ; display message
lea dx,msg
int 21h

    xor ah, ah
    int 16h                 ; keyboard (wait for key)
    mov ax, 3
    int 10h                 ; go to text mode
    mov ax, 4C00h
    int 21h                 ; return to DOS, exit code 0

get_cos:                   ; Args: CX = angle (degree!)
    mov word[x],cx
    fldpi                   ; ST(0)=Pi, ST(1)=CX
    fimul word[x]            ; ST(0)=Pi*CX
    
    fidiv word[one_eighty] ; ST(0)=(Pi*CX)/180(degree to rad)
    fcos                    ; ST(0)=sine (rad)
    fimul word[scale]      ; ST(0)=sine*scale
    fild hundred
    fsub st,st(1)    ;ST(0)=100-60*SIN((Pi*CX)/180)
    fist word [rint]       ; store integer with rounding 
    mov ax, word[rint]     ; AX = Y
    ret                     ; Return: AX = Y (signed!)

vector_to_memory:           ; Calculate offset=Y*320+X 
;Args: BX = X, AX = Y
    push dx                 ; mul changes dx too
    mov cx, 320             ; video mode width 
    mul cx                  ; DX:AX = AX * CX
    add ax, bx              ; left indentation
    pop dx
    ret                     ; Return: AX = offset in memory

end   main
;---------------------------------------------------------------------------------------------------------------------------------

;Each file can be executed independently on tasm:

;commands:
;tasm sin.asm
;tlink sin.obj

;sin

Comments

Post a Comment

Popular posts from this blog

Write C++ program to maintain club member‘s information using singly linked list. Store student PRN and Name.

Second Year Computer Engineering Data Structure Programs: Data Structure Lab: Practical B14: Department of Computer Engineering has student's club named 'Pinnacle Club'. Students of Second, third and final year of department can be granted membership on request. Similarly one may cancel the membership of club. First node is reserved for president of club and last node is reserved for secretary of club. Write C++ program to maintain club member‘s information using singly linked list. Store student PRN and Name. Write functions to a) Add and delete the members as well as president or even secretary. b) Compute total number of members of club c) Display members d) Display list in reverse order using recursion e) Two linked lists exists for two divisions. Concatenate two lists. ------------------------------------------------------------------------------------------------------------------------------- #include <iostream> #include <string.h> usin...
Read more

Implement C++ program for expression conversion as infix to postfix and its evaluation using stack.

Second Year Computer Engineering Data Structure Programs: Data Structure Lab: Practical C25: Implement C++ program for expression conversion as infix to postfix and its evaluation using stack based on given conditions i. Operands and operator, both must be single character. ii. Input Postfix expression must be in a desired format. iii. Only '+', '-', '*' and '/ ' operators are expected. ---------------------------------------------------------------------------------------------------------------------------------- #include<iostream> #include<conio.h> using namespace std; class stack {  public:   char stack_array[50];   int top;   stack()   {     top=-1;   } void push(char symbol) {  if(full())       cout<<"\nStack overflow:\n";     else     { top=top+1;       stack_array[top]=symbol;      } } char pop() {   if(empty())...
Read more

Write C++ program for simulating job queue. Write functions to add job and delete job from queue.

Second Year Computer Engineering Data Structure Programs: Data Structure Lab: Practical D28: Queues are frequently used in computer programming, and a typical example is the creation of a job queue by an operating system. If the operating system does not use priorities, then the jobs are processed in the order they enter the system. Write C++ program for simulating job queue. Write functions to add job and delete job from queue. ---------------------------------------------------------------------------------------------------------------------------------- #include <iostream> #define MAX 10 using namespace std; struct queue {       int data[MAX]; int front,rear; }; class Queue {    struct queue q;    public:       Queue(){q.front=q.rear=-1;}       int isempty();       int isfull();       void enqueue(int);       int delqueue();     ...
Read more