-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathbong.asm
1428 lines (1283 loc) · 33.3 KB
/
bong.asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
;==================================================================;
; Jogo Brick Breaker
;==================================================================;
segment code
..start:
mov ax,data
mov ds,ax
mov ax,stack
mov ss,ax
mov sp,stacktop
; Salvar modo corrente de video
mov ah,0Fh
int 10h
mov [modo_anterior],al
; Alterar modo de video para gráfico 640x480 16 cores
mov al,12h
mov ah,0
int 10h
; Limpa si, di, e define onde a bolinha começa
xor si, si
xor di, di
mov cx, 0800h
mov si, 319
mov di, 240
;apaga o titulo ;usado para apagar o texto de game over
mov cx,50 ;proximo caracter
mov bx,0
mov dh,14 ;linha 0-29
mov dl,10 ;coluna 0-79
mov byte[cor],preto
apaga_title:
call cursor
mov al,[bx+apaga]
call caracter
inc bx ;proximo caracter
inc dl ;avanca a coluna
loop apaga_title
;escrever o cabecalho
mov cx,20 ;numero de caracteres
mov bx,0
mov dh,14 ;linha 0-29
mov dl,29 ;coluna 0-79
mov byte[cor],branco
show_title:
call cursor
mov al,[bx+title]
call caracter
inc bx ;proximo caracter
inc dl ;avanca a coluna
loop show_title
inicio:
mov ah,00h
int 16h
cmp al,0Dh ;'enter' -> start no jogo
je desenha_layout
jmp inicio
desenha_layout:
mov byte [cor], preto ; apaga title com rect
mov ax, 230
push ax
mov ax, 240
push ax
mov ax, 390
push ax
mov ax, 255
push ax
call rect
mov byte[cor],branco_intenso ; esquerda
mov ax,0
push ax
mov ax,0
push ax
mov ax,0
push ax
mov ax,479
push ax
call line
mov byte[cor],branco_intenso ; cima
mov ax,0
push ax
mov ax,479
push ax
mov ax,639
push ax
mov ax,479
push ax
call line
mov byte[cor],branco_intenso ; direita
mov ax,639
push ax
mov ax,0
push ax
mov ax,639
push ax
mov ax,479
push ax
call line
desenha_blocos: ;Largura: 95, Altura: 20, Espaçamento: 10
;1,1
mov byte [cor], magenta
mov ax, 10
push ax
mov ax, 450
push ax
mov ax, 105
push ax
mov ax, 470
push ax
call rect
;1,2
mov byte [cor], azul
mov ax, 115
push ax
mov ax, 450
push ax
mov ax, 210
push ax
mov ax, 470
push ax
call rect
;1,3
mov byte [cor], cyan
mov ax, 220
push ax
mov ax, 450
push ax
mov ax, 315
push ax
mov ax, 470
push ax
call rect
;1,4
mov byte [cor], verde_claro
mov ax, 325
push ax
mov ax, 450
push ax
mov ax, 420
push ax
mov ax, 470
push ax
call rect
;1,5
mov byte [cor], amarelo
mov ax, 430
push ax
mov ax, 450
push ax
mov ax, 525
push ax
mov ax, 470
push ax
call rect
;1,6
mov byte [cor], vermelho
mov ax, 535
push ax
mov ax, 450
push ax
mov ax, 630
push ax
mov ax, 470
push ax
call rect
;2,1
mov byte [cor], vermelho
mov ax, 10
push ax
mov ax, 420
push ax
mov ax, 105
push ax
mov ax, 440
push ax
call rect
;2,2
mov byte [cor], amarelo
mov ax, 115
push ax
mov ax, 420
push ax
mov ax, 210
push ax
mov ax, 440
push ax
call rect
;2,3
mov byte [cor], verde_claro
mov ax, 220
push ax
mov ax, 420
push ax
mov ax, 315
push ax
mov ax, 440
push ax
call rect
;2,4
mov byte [cor], cyan
mov ax, 325
push ax
mov ax, 420
push ax
mov ax, 420
push ax
mov ax, 440
push ax
call rect
;2,5
mov byte [cor], azul
mov ax, 430
push ax
mov ax, 420
push ax
mov ax, 525
push ax
mov ax, 440
push ax
call rect
;2,6
mov byte [cor], magenta
mov ax, 535
push ax
mov ax, 420
push ax
mov ax, 630
push ax
mov ax, 440
push ax
call rect
main:
; Desenhar a bola
mov byte[cor],branco_intenso
mov ax, si
push ax
mov ax, di
push ax
mov ax,10
push ax
call full_circle
; Delay utilizando a interrupção int 15h
mov ah, 86h
mov cx, 0
mov dx, 100
int 15h
; Limpar a bola anterior (desenhar a bola em preto para apagar)
mov byte[cor],preto
mov ax, si
push ax
mov ax, di
push ax
mov ax,10
push ax
call full_circle
pop ax
pop ax
pop ax
; Barra horizontal
mov byte[cor],branco_intenso
mov ax, word[x_barra]
push ax
mov ax, word[y_barra]
push ax
mov ax, word[x_barra_end]
push ax
mov ax, word[y_barra]
push ax
call line
pop ax
pop ax
pop ax
; Atualizar a posição da bola
add si, word[vx]
add di, word[vy]
; Verificar colisões com as bordas
cmp si, 624
jge colisao_direita
cmp si, 16
jle colisao_esquerda
cmp di, 464
jge colisao_cima
cmp di, 16
jle colisao_baixo
; Verificar entrada do teclado
mov ah,01h
int 16h
jnz jmp_check
;Verifica a colisão com a barra
cmp di, 55
jle colisao_barra
; Verificar colisão com blocos
call colisao_blocos
loop main
jmp_check:
jmp check_com
jmp_boost2:
jmp main
jmp_sair:
jmp sair
; Funções de colisão
colisao_barra:
cmp si,word[x_barra]
jl jmp_boost2
cmp si,word[x_barra_end]
jg jmp_boost2
neg word[vy]
jmp main
colisao_direita:
neg word[vx]
jmp main
colisao_cima:
neg word[vy]
jmp main
colisao_esquerda:
neg word[vx]
jmp main
colisao_baixo: ;esta colisão é diferente pois é usada para ser o game over
mov cx,27 ;seta config para escrever game over
mov bx,0
mov dh,14
mov dl,26
mov byte[cor],vermelho
game_over:
call cursor
mov al,[bx+fim]
call caracter
inc bx
inc dl
loop game_over
esperar_entrada:
mov ah,00h
int 16h
cmp al,6Eh ;'n' -> Sair
je jmp_sair
cmp al,4Eh ;'N' -> Sair
je jmp_sair
cmp al,'y' ;'n' -> Sair
je jmp_salva
jmp esperar_entrada
jmp_salva:
jmp salva_inicio
pause:
mov cx,6 ;seta config para escrever paused
mov bx,0
mov dh,14
mov dl,36 ;dl=coluna (0-79)
mov byte[cor],branco_intenso
loop_pause_text:
call cursor
mov al,[bx+paused]
call caracter
inc bx
inc dl
loop loop_pause_text
; Desenhar a bola
mov byte[cor],branco_intenso
mov ax, si
push ax
mov ax, di
push ax
mov ax,10
push ax
call full_circle
esperar_unpause:
mov ah,00h
int 16h
cmp al,'p'
je unpause
jmp esperar_unpause
unpause:
mov cx,50 ;seta config para apagar texto paused
mov bx,0
mov dh,14
mov dl,10 ;dl=coluna (0-79)
mov byte[cor],preto
loop_apaga_pause_text:
call cursor
mov al,[bx+apaga]
call caracter
inc bx
inc dl
loop loop_apaga_pause_text
jmp main
check_com: ; checa tecla
mov ah,00h
int 16h
cmp al,41h ;'A' -> Move para esquerda
je PADDLE_LEFT
cmp al,61h ;'a'
je PADDLE_LEFT
cmp al,44h ;'D' -> Move para direita
je PADDLE_RIGHT
cmp al,64h ;'d'
je PADDLE_RIGHT
cmp al,27h ;'>'-> Move para direita
je PADDLE_RIGHT
cmp al,25h ;'<'-> Move para direita
je PADDLE_LEFT
cmp al,50h ;'P' -> Pause
je jmp_pause
cmp al,70h ;'p'
je jmp_pause
cmp al,51h ;'Q' -> Sair
je sair
cmp al,71h ;'q'
je sair
jmp main
jmp_pause:
jmp pause
sair:
mov ah,0 ; set video mode
mov al,[modo_anterior] ; recupera o modo anterior
int 10h
mov ax,4c00h
int 21h
PADDLE_LEFT: ; Move barra para a esquerda
cmp word[x_barra],10
jle jmp_boost
mov byte[cor],preto ; apaga barra
mov ax, word[x_barra]
push ax
mov ax, word[y_barra]
push ax
mov ax, word[x_barra_end]
push ax
mov ax, word[y_barra]
push ax
call line
pop ax
pop ax
pop ax
sub word[x_barra], 10
sub word[x_barra_end], 10
jmp main
PADDLE_RIGHT: ; Move barra para a direita
cmp word[x_barra_end],629
jge jmp_boost
mov byte[cor],preto ; apaga barra
mov ax, word[x_barra]
push ax
mov ax, word[y_barra]
push ax
mov ax, word[x_barra_end]
push ax
mov ax, word[y_barra]
push ax
call line
pop ax
pop ax
pop ax
add word[x_barra], 10
add word[x_barra_end], 10
jmp main
jmp_boost:
jmp main
salva_inicio: ;redefine as variaveis para seus valores iniciais
mov word[vx], 3
mov word[vy], 3
mov word[x_barra], 270
mov word[x_barra_end], 370
mov word[y_barra], 40
mov word[y1], 420
mov word[y2], 420
mov word[y3], 420
mov word[y4], 420
mov word[y5], 420
mov word[y6], 420
mov word[pontos], 0
jmp ..start
colisao_blocos:
;colisão dos blocos da coluna 1
mov ax,word[y1] ;posição y inicial dos blocos da coluna 1
sub ax,10 ;diminui 10 por causa do raio da bola
cmp di, ax ;colisão com a parte de baixo
jl bloco2
add ax, 30 ;soma 30 pixels para a ter a colisão da parte de cima
cmp di, ax ;colisão com a parte de cima
jg bloco2
cmp si, 5 ;colisão direita
jl bloco2
cmp si, 110 ;colisão esquerda
jg bloco2
;apaga blocos da coluna 1
mov byte [cor], preto
mov ax, 10 ;x1
push ax
mov ax, word[y1] ;y1
push ax
mov ax, 105 ;x2
push ax
mov bx, word[y1]
add bx, 20 ;soma 20
mov ax, bx ;y2
push ax
call rect
mov ax, word[y1]
add ax, 30 ;adiciona o espaçamento e o tamanho dos blocos para a nova posição
mov word[y1],ax ;salva novo valor de y1
mov ax, word[pontos]
add ax, 1
mov word[pontos], ax
neg word [vy]
bloco2:
;colisão dos blocos da coluna 2
mov ax,word[y2] ;posição y inicial dos blocos da coluna 2
sub ax,10 ;soma 5 por causa do raio da bola
cmp di, ax ;colisão com a parte de baixo
jl bloco3
add ax, 20 ;soma vinte pixels para a ter a colisão da parte de cima
cmp di, ax ;colisão com a parte de cima
jg bloco3
cmp si, 110 ;colisão direita
jl bloco3
cmp si, 215 ;colisão esquerda
jg bloco3
mov byte [cor], preto ;apaga blocos da coluna 2
mov ax, 115 ;x1
push ax
mov ax, word[y2] ;y1
push ax
mov ax, 210 ;x2
push ax
mov bx, word[y2]
add bx, 20 ;soma 20
mov ax, bx ;y2
push ax
call rect
mov ax, word[y2]
add ax, 30 ;adiciona o espaçamento e o tamanho dos blocos para a nova posição
mov word[y2],ax ;salva novo valor de y2
mov ax, word[pontos]
add ax, 1
mov word[pontos], ax
neg word [vy]
bloco3:
;colisão dos blocos da coluna 3
mov ax,word[y3] ;posição y inicial dos blocos da coluna 3
sub ax,10 ;soma 5 por causa do raio da bola
cmp di, ax ;colisão com a parte de baixo
jl bloco4
add ax, 20 ;soma vinte pixels para a ter a colisão da parte de cima
cmp di, ax ;colisão com a parte de cima
jg bloco4
cmp si, 215 ;colisão direita
jl bloco4
cmp si, 320 ;colisão esquerda
jg bloco4
mov byte [cor], preto ;apaga blocos da coluna 3
mov ax, 220 ;x1
push ax
mov ax, word[y3] ;y1
push ax
mov ax, 315 ;x2
push ax
mov bx, word[y3]
add bx, 20 ;soma 20
mov ax, bx ;y2
push ax
call rect
mov ax, word[y3]
add ax, 30 ;adiciona o espaçamento e o tamanho dos blocos para a nova posição
mov word[y3],ax ;salva novo valor de y3
mov ax, word[pontos]
add ax, 1
mov word[pontos], ax
neg word [vy]
bloco4:
;colisão dos blocos da coluna 4
mov ax,word[y4] ;posição y inicial dos blocos da coluna 4
sub ax,10 ;soma 5 por causa do raio da bola
cmp di, ax ;colisão com a parte de baixo
jl bloco5
add ax, 20 ;soma vinte pixels para a ter a colisão da parte de cima
cmp di, ax ;colisão com a parte de cima
jg bloco5
cmp si, 320 ;colisão direita
jl bloco5
cmp si, 425 ;colisão esquerda
jg bloco5
mov byte [cor], preto ;apaga blocos da coluna 4
mov ax, 325 ;x1
push ax
mov ax, word[y4] ;y1
push ax
mov ax, 420 ;x2
push ax
mov bx, word[y4]
add bx, 20 ;soma 20
mov ax, bx ;y2
push ax
call rect
mov ax, word[y4]
add ax, 30 ;adiciona o espaçamento e o tamanho dos blocos para a nova posição
mov word[y4],ax ;salva novo valor de y4
mov ax, word[pontos]
add ax, 1
mov word[pontos], ax
neg word [vy]
bloco5:
;colisão dos blocos da coluna 5
mov ax,word[y5] ;posição y inicial dos blocos da coluna 5
sub ax,10 ;soma 5 por causa do raio da bola
cmp di, ax ;colisão com a parte de baixo
jl bloco6
add ax, 20 ;soma vinte pixels para a ter a colisão da parte de cima
cmp di, ax ;colisão com a parte de cima
jg bloco6
cmp si, 425 ;colisão direita
jl bloco6
cmp si, 530 ;colisão esquerda
jg bloco6
mov byte [cor], preto ;apaga blocos da coluna 5
mov ax, 430 ;x1
push ax
mov ax, word[y5] ;y1
push ax
mov ax, 525 ;x2
push ax
mov bx, word[y5]
add bx, 20 ;soma 20
mov ax, bx ;y2
push ax
call rect
mov ax, word[y5]
add ax, 30 ;adiciona o espaçamento e o tamanho dos blocos para a nova posição
mov word[y5],ax ;salva novo valor de y5
mov ax, word[pontos]
add ax, 1
mov word[pontos], ax
neg word [vy]
bloco6:
;colisão dos blocos da coluna 6
mov ax,word[y6] ;posição y inicial dos blocos da coluna 6
sub ax,10 ;soma 5 por causa do raio da bola
cmp di, ax ;colisão com a parte de baixo
jl termina_checagem
add ax, 20 ;soma vinte pixels para a ter a colisão da parte de cima
cmp di, ax ;colisão com a parte de cima
jg termina_checagem
cmp si, 540 ;colisão direita
jl termina_checagem
cmp si, 635 ;colisão esquerda
jg termina_checagem
mov byte [cor], preto ;apaga blocos da coluna 6
mov ax, 525 ;x1
push ax
mov ax, word[y6] ;y1
push ax
mov ax, 630 ;x2
push ax
mov bx, word[y6]
add bx, 20 ;soma 20
mov ax, bx ;y2
push ax
call rect
mov ax, word[y6]
add ax, 30 ;adiciona o espaçamento e o tamanho dos blocos para a nova posição
mov word[y6],ax ;salva novo valor de y6
mov ax, word[pontos]
add ax, 1
mov word[pontos], ax
neg word [vy]
termina_checagem:
cmp word[pontos], 12
jge winner
jmp main
winner:
mov cx,39 ;seta config para escrever texto de vencedor
mov bx,0
mov dh,14
mov dl,20
mov byte[cor],verde
winner_text:
call cursor
mov al,[bx+win]
call caracter
inc bx
inc dl
loop winner_text
jmp esperar_entrada
;===============================================================================================================;
l4:
call cursor
mov al,[bx+mens]
call caracter
inc bx ;proximo caracter
inc dl ;avanca a coluna
inc byte [cor] ;mudar a cor para a seguinte
loop l4
mov ah,08h
int 21h
mov ah,0 ; set video mode
mov al,[modo_anterior] ; modo anterior
int 10h
mov ax,4c00h
int 21h
;***************************************************************************
;
; fun��o cursor
;
; dh = linha (0-29) e dl=coluna (0-79)
cursor:
pushf
push ax
push bx
push cx
push dx
push si
push di
push bp
mov ah,2
mov bh,0
int 10h
pop bp
pop di
pop si
pop dx
pop cx
pop bx
pop ax
popf
ret
;_____________________________________________________________________________
;
; fun��o caracter escrito na posi��o do cursor
;
; al= caracter a ser escrito
; cor definida na variavel cor
caracter:
pushf
push ax
push bx
push cx
push dx
push si
push di
push bp
mov ah,9
mov bh,0
mov cx,1
mov bl,[cor]
int 10h
pop bp
pop di
pop si
pop dx
pop cx
pop bx
pop ax
popf
ret
;_____________________________________________________________________________
;
; fun��o plot_xy
;
; push x; push y; call plot_xy; (x<639, y<479)
; cor definida na variavel cor
plot_xy:
push bp
mov bp,sp
pushf
push ax
push bx
push cx
push dx
push si
push di
mov ah,0ch
mov al,[cor]
mov bh,0
mov dx,479
sub dx,[bp+4]
mov cx,[bp+6]
int 10h
pop di
pop si
pop dx
pop cx
pop bx
pop ax
popf
pop bp
ret 4
;_____________________________________________________________________________
; fun��o circle
; push xc; push yc; push r; call circle; (xc+r<639,yc+r<479)e(xc-r>0,yc-r>0)
; cor definida na variavel cor
circle:
push bp
mov bp,sp
pushf ;coloca os flags na pilha
push ax
push bx
push cx
push dx
push si
push di
mov ax,[bp+8] ; resgata xc
mov bx,[bp+6] ; resgata yc
mov cx,[bp+4] ; resgata r
mov dx,bx
add dx,cx ;ponto extremo superior
push ax
push dx
call plot_xy
mov dx,bx
sub dx,cx ;ponto extremo inferior
push ax
push dx
call plot_xy
mov dx,ax
add dx,cx ;ponto extremo direita
push dx
push bx
call plot_xy
mov dx,ax
sub dx,cx ;ponto extremo esquerda
push dx
push bx
call plot_xy
mov di,cx
sub di,1 ;di=r-1
mov dx,0 ;dx ser� a vari�vel x. cx � a variavel y
;aqui em cima a l�gica foi invertida, 1-r => r-1
;e as compara��es passaram a ser jl => jg, assim garante
;valores positivos para d
stay: ;loop
mov si,di
cmp si,0
jg inf ;caso d for menor que 0, seleciona pixel superior (n�o salta)
mov si,dx ;o jl � importante porque trata-se de conta com sinal
sal si,1 ;multiplica por doi (shift arithmetic left)
add si,3
add di,si ;nesse ponto d=d+2*dx+3
inc dx ;incrementa dx
jmp plotar
inf:
mov si,dx
sub si,cx ;faz x - y (dx-cx), e salva em di
sal si,1
add si,5
add di,si ;nesse ponto d=d+2*(dx-cx)+5
inc dx ;incrementa x (dx)
dec cx ;decrementa y (cx)
plotar:
mov si,dx
add si,ax
push si ;coloca a abcisa x+xc na pilha
mov si,cx
add si,bx
push si ;coloca a ordenada y+yc na pilha
call plot_xy ;toma conta do segundo octante
mov si,ax
add si,dx
push si ;coloca a abcisa xc+x na pilha
mov si,bx
sub si,cx
push si ;coloca a ordenada yc-y na pilha
call plot_xy ;toma conta do s�timo octante
mov si,ax
add si,cx
push si ;coloca a abcisa xc+y na pilha
mov si,bx
add si,dx
push si ;coloca a ordenada yc+x na pilha
call plot_xy ;toma conta do segundo octante
mov si,ax
add si,cx
push si ;coloca a abcisa xc+y na pilha
mov si,bx
sub si,dx
push si ;coloca a ordenada yc-x na pilha
call plot_xy ;toma conta do oitavo octante
mov si,ax
sub si,dx
push si ;coloca a abcisa xc-x na pilha
mov si,bx
add si,cx
push si ;coloca a ordenada yc+y na pilha
call plot_xy ;toma conta do terceiro octante
mov si,ax
sub si,dx
push si ;coloca a abcisa xc-x na pilha
mov si,bx
sub si,cx
push si ;coloca a ordenada yc-y na pilha
call plot_xy ;toma conta do sexto octante
mov si,ax
sub si,cx
push si ;coloca a abcisa xc-y na pilha
mov si,bx