-
Notifications
You must be signed in to change notification settings - Fork 0
/
BouncingBall.v.bak
97 lines (75 loc) · 1.8 KB
/
BouncingBall.v.bak
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
module BouncingBall (
input wire clk,
output reg swap,
output reg [8:0] data,
output reg [18:0] address
);
reg [2:0] color_r = 3'b000;
reg [2:0] color_g = 3'b000;
reg [2:0] color_b = 3'b000;
reg [9:0] posy = 0;
reg [9:0] posx = 0;
reg [9:0] counter;
// Write to frame buffer
always @* begin
address = (posy * 640) + posx;
end
reg [9:0] speed;
reg dir;
reg [31:0] cnt;
initial begin
cnt <= 32'h00000000;
end
always @(posedge clk) begin
cnt <= cnt + 1;
end
always @(posedge cnt[19]) begin
if (dir == 1'b0) begin
if (speed < 10'd620) begin
speed <= speed + 1;
end else begin
dir <= 1'b1; // Use non-blocking assignment for sequential logic
end
end else begin
if (speed > 10'd0) begin
speed <= speed - 1;
end else begin
dir <= 1'b0; // Use non-blocking assignment for sequential logic
end
end
end
always @(posedge clk) begin
// Update posx and posy sequentially
if (posx < 639) begin
posx <= posx + 1;
end else if (posy < 479) begin
posx <= 0;
posy <= posy + 1;
end else begin
// Reset to beginning after reaching the end of the frame
posx <= 0;
posy <= 0;
swap <= ~swap;
end
end
integer dx = 2;
integer dy = -2;
integer x = 320;
integer y = 470;
integer ballSize = 20;
always @(posedge clk) begin
if (x + dx > 640 - ballSize || x + dx < ballSize) begin
dx <= -dx;
end
if (y + dy > 640 - ballSize || y + dy < ballSize) begin
dy <= -dy;
end
x <= x + dx;
y <= y + dy;
if ((posx > (20 + x) && posx < (30 + x)) && (posy > (20 + y) && posy < (30 + y)) begin
data <= {3'b111, 3'b111, 3'b111}; // Red color
end else begin
data <= {3'b000, 3'b000, 3'b000}; // Red color
end
end
endmodule