From 5cdbdabc975e1973c1c0f39bb200b7a60e7632fc Mon Sep 17 00:00:00 2001
From: Joseph Hale <j.hale1805@gmail.com>
Date: Sun, 6 Mar 2022 22:52:18 -0700
Subject: [PATCH] Preserve RCKPPRSC

Well, here's the first computer game I ever made: an extremely verbose
Rock, Paper, Scissors game! I remember being especially proud of the
"PLAY AGAIN?" menu.

I don't remember when I wrote this program in relation to the others in
this repository.
---
 PRGM/RCKPPRSC.8xp | Bin 0 -> 590 bytes
 PRGM/RCKPPRSC.txt |  78 ++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 78 insertions(+)
 create mode 100644 PRGM/RCKPPRSC.8xp
 create mode 100644 PRGM/RCKPPRSC.txt

diff --git a/PRGM/RCKPPRSC.8xp b/PRGM/RCKPPRSC.8xp
new file mode 100644
index 0000000000000000000000000000000000000000..11ab97a7899174dd0d30e73003481618fb349b8b
GIT binary patch
literal 590
zcmdPW3h}fscGHsLV(?8ZD#<9$Pb*Of$<I#BQ}A?gWxx(ZnRppkm{^0Hy#oS*f}I%{
zSeTfYu0`5Ew11}M>*(#O8R;Jyr0MM8@9FHSrL7g@@9eFm?WnC4;27W<q^0eotrhI-
z864~%6s)D~ENFkt(cX|H)c&4Uq<<(#SFo!lSd0DjX!~nU_C{!O5L3XC&i2M&Ntiac
zv0&L~``uiI+Qxz`&i3b=vkdLe+uzf2_V*144RHm#E*S1O`zs(7M%YzA?E@<@#;ycm
z?-l!Vp<t`vHime*YGE}$+|w@@Dg!YV<o$3@Kad#M7?6A5#vn<abIt-u-P1xC4KV=j
zIhfI4V?c6nV=$D!4MVj6qzP`p75f|Z&$I%393wRy-5ovs)@x~NMY;xSX-8^n`T1*U
O`w7}#^RvGhuo(crmAxte

literal 0
HcmV?d00001

diff --git a/PRGM/RCKPPRSC.txt b/PRGM/RCKPPRSC.txt
new file mode 100644
index 0000000..4183d59
--- /dev/null
+++ b/PRGM/RCKPPRSC.txt
@@ -0,0 +1,78 @@
+Lbl Y
+ClrHome
+Menu("MAKE YOUR CHOICE","ROCK",A,"PAPER",B,"SCISSORS",C)
+Lbl A
+1→U
+Disp "YOU CHOSE ROCK"
+Goto θ
+Lbl B
+2→U
+Disp "YOU CHOSE PAPER"
+Goto θ
+Lbl C
+3→U
+Disp "U CHOSE SCISSORS"
+Goto θ
+Lbl θ
+randInt(1,3)→C
+If C=1
+Then
+Disp "COMPUTER CHOSE","ROCK"
+End
+If C=2
+Then
+Disp "COMPUTER CHOSE","PAPER"
+End
+If C=3
+Then
+Disp "COMPUTER CHOSE","SCISSORS"
+End
+If U=1
+Then
+If C=1
+Then
+Disp "TIE"
+End
+If C=2
+Then
+Disp "COMPUTER WINS"
+End
+If C=3
+Then
+Disp "YOU WIN"
+End
+End
+If U=2
+Then
+If C=1
+Then
+Disp "YOU WIN"
+End
+If C=2
+Then
+Disp "TIE"
+End
+If C=3
+Then
+Disp "COMPUTER WINS"
+End
+End
+If U=3
+Then
+If C=1
+Then
+Disp "COMPUTER WINS"
+End
+If C=2
+Then
+Disp "YOU WIN"
+End
+If C=3
+Then
+Disp "TIE"
+End
+End
+Pause 
+Menu("PLAY AGAIN?","YES",Y,"NO",N)
+Lbl N
+Stop
\ No newline at end of file
-- 
2.51.2