mirror of
https://github.com/rvtr/Cookie-Clicker-C64.git
synced 2025-10-31 07:41:12 -04:00
fixed a few more graphical bugs
This commit is contained in:
Myles Skinner
parent
b23d82b7fe
commit
b116367f23
@ -23,11 +23,11 @@
|
||||
|
||||
Cookie Clicker C64 (or CC64 for short) is a Cookie clicker clone for the Commodore 64.
|
||||
|
||||
### How to play :
|
||||
## How to play :
|
||||
|
||||
- Press the space bar to 'click' for cookies.
|
||||
|
||||
- Buy items by pressing the letter beside them. (the one in brackets)
|
||||
- Buy/select items by pressing the letter beside them. (the one in brackets)
|
||||
|
||||
## Saves:
|
||||
|
||||
@ -54,7 +54,7 @@ Cookies
|
||||
<br>32
|
||||
<br>1</p>
|
||||
|
||||
### Credits and Notes
|
||||
## Credits and Notes
|
||||
|
||||
Credits:
|
||||
- [@Orteil](https://orteil.dashnet.org/) (for making the original cookie clicker game)
|
||||
|
||||
BIN
build/.DS_Store
vendored
Normal file
BIN
build/.DS_Store
vendored
Normal file
Binary file not shown.
BIN
build/cookie.prg
BIN
build/cookie.prg
Binary file not shown.
Binary file not shown.
72
prg.txt
72
prg.txt
@ -9,16 +9,16 @@
|
||||
80 print"{clear}{home}"
|
||||
|
||||
400 cl$(0)="{grey2}*CCCCCCCCCCCCCCCCCCCCCCCCC*CCCCCCCCCCC*"
|
||||
410 cl$(1)="{grey2}B{wht} you have "
|
||||
410 cl$(1)="{grey2}B{wht} you have {grey2}B{wht}cursor(c) {grey2}B"
|
||||
420 cl$(2)="{grey2}B{wht} cookies {grey2}B"
|
||||
430 cl$(3)="*CCCCCCCCCCCCCCCCCCCCCCCCC*{wht}cost: {grey2}B"
|
||||
440 cl$(4)="B bakery B"
|
||||
450 cl$(5)="B *CCCCCCCCCCC*"
|
||||
460 cl$(6)="B B{wht}grandma(g) {grey2}B"
|
||||
470 cl$(7)="B B"
|
||||
480 cl$(8)="B {brown}********{grey2} B{wht}cost: {grey2}B"
|
||||
490 cl$(9)="B {brown}*******{blk}**{brown}*{grey2} B"
|
||||
500 cl$(10)="B {brown}***{blk}*{brown}********{grey2} *CCCCCCCCCCC*"
|
||||
430 cl$(3)="{grey2}*CCCCCCCCCCCCCCCCCCCCCCCCC*{wht}cost: {grey2}B"
|
||||
440 cl$(4)="{grey2}B bakery B"
|
||||
450 cl$(5)="{grey2}B *CCCCCCCCCCC*"
|
||||
460 cl$(6)="{grey2}B B{wht}grandma(g) {grey2}B"
|
||||
470 cl$(7)="{grey2}B B"
|
||||
480 cl$(8)="{grey2}B {brown}********{grey2} B{wht}cost: {grey2}B"
|
||||
490 cl$(9)="{grey2}B {brown}*******{blk}**{brown}*{grey2} B"
|
||||
500 cl$(10)="{grey2}B {brown}***{blk}*{brown}********{grey2} *CCCCCCCCCCC*"
|
||||
510 cl$(11)="B {brown}***{blk}**{brown}*********{grey2} B B"
|
||||
520 cl$(12)="B {brown}********{blk}**{brown}****{grey2} B B"
|
||||
530 cl$(13)="B {brown}********{blk}**{brown}****{grey2} B B"
|
||||
@ -36,15 +36,15 @@
|
||||
650 rem ft$="0":mt$="0"
|
||||
|
||||
700 print cl$(0)
|
||||
710 print cl$(1)int(cc)
|
||||
720 print cl$(2)"{wht}"ca
|
||||
710 print cl$(1)ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$int(cc)
|
||||
720 print cl$(2)"{wht} 0 {grey2}B"ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ca$
|
||||
730 print cl$(3)
|
||||
740 print cl$(4)"{wht}"c1
|
||||
740 print cl$(4)"{wht}15 {grey2}B"
|
||||
750 print cl$(5)
|
||||
760 print cl$(6)
|
||||
770 print cl$(7)"{wht}"ga
|
||||
770 print cl$(7)"{wht} 0 {grey2}B"ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ls$ga$
|
||||
780 print cl$(8)
|
||||
790 print cl$(9)"{wht}"c2
|
||||
790 print cl$(9)"{wht}100 {grey2}B"
|
||||
800 print cl$(10)
|
||||
810 print cl$(11):rem f
|
||||
820 print cl$(12):rem f
|
||||
@ -143,14 +143,13 @@
|
||||
6040 print"{home}"ds$"{grey2}B{wht} you have "int(cc)
|
||||
6050 goto 1000
|
||||
|
||||
|
||||
9999 rem start of unlockable building text
|
||||
|
||||
9999 rem start of unlockable building text
|
||||
|
||||
10000 if cc<400 then return
|
||||
10010 ft$="1"
|
||||
10020 cl$(10)="{grey2}B {brown}***{blk}**{brown}*********{grey2} B{wht}farm(f) {grey2}B"
|
||||
10025 print "{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$cl$(10)
|
||||
10025 print "{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$
|
||||
10026 print cl$(10)
|
||||
10030 cl$(11)="B {brown}********{blk}**{brown}****{grey2} B{wht} 0 {grey2}B"
|
||||
10035 print cl$(11)
|
||||
10040 cl$(12)="B {brown}********{blk}**{brown}****{grey2} B{wht}cost: {grey2}B"
|
||||
@ -161,12 +160,11 @@
|
||||
10065 print cl$(14)
|
||||
10070 return
|
||||
|
||||
|
||||
|
||||
11000 if cc<6000 then return
|
||||
11010 mt$="1"
|
||||
11020 cl$(16)="{grey2}B {brown}*************{brown}*{grey2} B{wht}mine(m) {grey2}B"
|
||||
11025 print "{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$cl$(16)
|
||||
11025 print "{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$
|
||||
11026 print cl$(16)
|
||||
11030 cl$(17)="B {brown}******{blk}**{brown}****{grey2} B{wht} 0 {grey2}B"
|
||||
11035 print cl$(17)
|
||||
11040 cl$(18)="B {brown}*****{blk}**{brown}***{grey2} B{wht}cost: {grey2}B"
|
||||
@ -177,8 +175,6 @@
|
||||
11065 print cl$(20)
|
||||
11070 return
|
||||
|
||||
|
||||
|
||||
30000 rem settings start here
|
||||
30010 poke53280,0:poke53281,0:sl$=chr$(163)
|
||||
|
||||
@ -228,7 +224,7 @@
|
||||
33060 close 8
|
||||
33070 print"loading complete"
|
||||
33075 poke53280,14:poke53281,6
|
||||
33080 goto 700
|
||||
33080 goto 650
|
||||
|
||||
34000 rem saving
|
||||
|
||||
@ -250,21 +246,27 @@
|
||||
35020 getk$:ifk$=""then35020
|
||||
35030 goto 36000
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
36000 rem exit settings
|
||||
|
||||
36010 print"{clear}{home}"
|
||||
36010 print"{clear}"
|
||||
36020 poke53280,14:poke53281,6
|
||||
36030 gosub 10000
|
||||
36040 gosub 11000
|
||||
36050 goto 650
|
||||
36030 rem gosub 10000
|
||||
36040 rem gosub 11000
|
||||
36050 goto 700
|
||||
|
||||
60000 print cc
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
60000 rem save debug
|
||||
|
||||
60005 print cc
|
||||
60010 print cg
|
||||
60020 print ca
|
||||
60030 print ga
|
||||
|
||||
Loading…
Reference in New Issue
Block a user