CARVIEW |
Select Language
HTTP/2 200
date: Sun, 12 Oct 2025 07:48:13 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=b61faf40909631eaec66a8b7cdc5beaec59cedcde7ca1f0d23f545958eb41208a%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22DZUts606Fpnu4GGwQMnVV6DSRkIz5wag%22%3B%7D; HttpOnly; Path=/
cf-ray: 98d4fe5bdc7bb9d7-BLR
simple pong basic code - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 10?"{clear}":xb=20:yb=13:dx=1:dy=1:yp=13:dw$="{down}":fort=1to5:dw$=dw$+dw$:next
- 15 sc=0:ye=13:oc=32+128:b(1)=32:b(6)=32:fort=2to5:b(t)=32+128:next:poke53281,1:poke53280,1:gosub2000
- 20 a$=" {down}{left}{reverse on} {down}{left} {down}{left} {down}{left} {down}{left}{reverse off} "
- 30 j=peek(56320):yp=yp+(j=126)-(j=125):rem if up then j=126 gives -1, so yp=yp-1.same for down
- 35 gosub 1000:gosub 1050:gosub1080
- 38 if xb=5and(yb<yp+5 and yb>yp)thendy=1+dy*(j=126orj=125):dx=-dx:sc=sc+1:rem spin
- 39 if xb=34and(yb<ye+5 and yb>ye)then dx=-dx:dy=-dy
- 40 if xb<5 then print"{clear}you lose! score: "sc"{return}press return":input z$: run
- 42 if xb>35 then print"{clear}you win! score: "sc"{return}press return":input z$: run
- 45 if ye+3<yb then ye=ye+1
- 48 if ye+3>yb then ye=ye-1
- 49 print"{home}";left$(dw$,24)sc;
- 50 goto30
- 1000 rem move the ball
- 1010 poke 1024+xb+yb*40,oc:rem delete old ball
- 1020 xb=xb+dx:yb=yb+dy:rem ?"{home}"xb,yb,yp
- 1021 if yb<1 then y=1:dy=-dy
- 1022 if yb>=24 then y=24: dy=-dy
- 1026 if yb<0 then yb=1:dy=1
- 1030 nl=1024+xb+yb*40:oc=peek(nl):poke nl,81
- 1040 return
- 1050 rem ? player s bar
- 1055 if yp<0thenyp=0
- 1058 if yp>20thenyp=20
- 1060 fort=1to6:poke1028+40*(yp+t-1),b(t):next
- 1070 return
- 1080 rem enemy movement
- 1090 if ye<0thenye=0
- 1100 if ye>18thenye=18
- 1110 ? "{home}"spc(35)left$(dw$,ye)a$
- 1120 return
- 2000 REM SCREEN 1 -
- 2010 ? "{clear} {light gray}NM ";
- 2020 ? " N M ";
- 2030 ? " N{reverse on}{dark gray}{127}{reverse off} {reverse on}{gray}{169}{reverse off} ";
- 2040 ? " {light gray}N {reverse on}{dark gray} {127}{gray}{169} {reverse off} ";
- 2050 ? " {light gray}N {reverse on}{gray}{169}{dark gray} {gray} {reverse off} ";
- 2060 ? " {light gray}N {reverse on}{gray}{169} {dark gray} {gray} {reverse off} ";
- 2070 ? " {light gray}N {reverse on}{gray}{169} {reverse off}{169}{reverse on}{dark gray} {gray} {reverse off} ";
- 2080 ? " {light gray}N {reverse on}{gray}{169} {reverse off}{169} {reverse on}{dark gray} {gray} {reverse off} ";
- 2090 ? " {light gray}N {reverse on}{gray}{169} {reverse off}{169} {reverse on}{dark gray} {gray} {reverse off} ";
- 2100 ? " {light gray}N {reverse on}{gray}{169} {reverse off}{169} {reverse on}{dark gray} {gray} {reverse off} ";
- 2110 ? " {light gray}N {reverse on}{gray}{169} {reverse off}{169} {reverse on}{dark gray} {gray} {reverse off} ";
- 2120 ? " {reverse on}{dark gray}{127}{reverse off} {gray}{127}{169} {reverse on}{dark gray} {gray} {reverse off} ";
- 2130 ? " {reverse on}{dark gray} {127}{reverse off} {light gray}M {reverse on}{dark gray} {gray} {reverse off} ";
- 2140 ? " {dark gray}{127}{reverse on} {127}{reverse off} {light gray}M {reverse on}{dark gray} {gray} {reverse off} ";
- 2150 ? " {dark gray}{127}{reverse on} {127}{reverse off} {light gray}M {reverse on}{dark gray} {gray} {reverse off} ";
- 2160 ? " {dark gray}{127}{reverse on} {127}{reverse off} {light gray}M {reverse on}{dark gray} {gray} {reverse off} ";
- 2170 ? " {dark gray}{127}{reverse on} {127}{reverse off} {light gray}M {reverse on}{dark gray} {gray} {reverse off} ";
- 2180 ? " {dark gray}{127}{reverse on} {127}{reverse off} {light gray}M{reverse on}{dark gray} {gray} {reverse off} ";
- 2190 ? " {dark gray}{127}{reverse on} {127}{reverse off} {reverse on} {gray} {reverse off} ";
- 2200 ? " {dark gray}{127}{reverse on} {127} {gray} {reverse off} ";
- 2210 ? " {dark gray}{127}{reverse on} {gray} {reverse off} ";
- 2220 ? " {dark gray}{127}{reverse on} {gray} {reverse off} ";
- 2230 ? " {dark gray}{127}{reverse on} {gray} {reverse off}{169} ";
- 2240 ? " {dark gray}{127}{gray}{169} ";
- 2260 return
Advertisement
Add Comment
Please, Sign In to add comment
-
⭐⭐⭐Free Giftcards Method⭐⭐
Java | 4 sec ago | 0.10 KB
-
⭐⭐⭐MAKE $900 INSTANTLY⭐⭐
Java | 15 sec ago | 0.10 KB
-
⭐⭐⭐MAKE $9OO INSTANTLY D M⭐⭐
Java | 26 sec ago | 0.10 KB
-
⭐⭐⭐MAKE $9OO INSTANTLY D A⭐⭐
Java | 37 sec ago | 0.10 KB
-
⭐⭐⭐Profit Method⭐⭐
Java | 49 sec ago | 0.10 KB
-
⭐⭐⭐Exploit 500$ in 15 Minutes⭐⭐
Java | 1 min ago | 0.10 KB
-
⭐⭐⭐Exploit 500$ in 15 Minutes⭐⭐
Java | 1 min ago | 0.10 KB
-
⭐⭐⭐Exchange Exploit T 3⭐⭐
Java | 1 min ago | 0.10 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand