An easy porting by Apple 1 to Apple ii platform made by me here the code:

1020 PRINT "WELCOME TO ROCK PAPER SCISSORS"

1030 DIM V$(10)

1040 PRINT "ROCK OR PAPER OR SCISSORS": INPUT V$

1050 IF V$ = "ROCK" THEN 1080

1060 IF V$ = "PAPER" THEN 1150

1070 IF V$ = "SCISSORS" THEN 2020

1080 A= INT (2 * RND (1) + 1)

1090 IF A = 0 THEN 1110

1100 IF A = 1 THEN 1130

1110 PRINT "PAPER YOU LOSE"

1120 GOTO 1040

1130 PRINT "SCISSORS YOU WIN"

1140 GOTO 1040

1150 A= INT (2 * RND (1) + 1)

1160 IF A = 0 THEN 1180

1170 IF A = 1 THEN 2000

1180 PRINT "SCISSORS YOU LOSE"

1190 GOTO 1040

2000 PRINT "ROCK YOU WIN"

2010 GOTO 1040

2020 A = INT (2 * RND (1) + 1)

2030 IF A = 0 THEN 2050

2040 IF A = 1 THEN 2070

2050 PRINT "ROCK YOU LOSE"

2060 GOTO 1040

2070 PRINT "PAPER YOU WIN"

2080 GOTO 1040