Author Topic: #CPCRetroDev 2018 - Amstrad CPC Game Creation Contest new for 2018!  (Read 7049 times)

0 Members and 1 Guest are viewing this topic.

Offline XeNoMoRPH

  • 464 Plus
  • *****
  • Posts: 390
  • Country: es
  • " ... in space no one , can hear you scream ... "
  • Liked: 736
  • Likes Given: 672
Awesome @Nich ... maybe  ....  can you make loader + pokes of this game too : Legend of Steel - TOD Studios ?
Thx in advance  :D

Offline Gryzor

  • Administrator
  • 6128 Plus
  • *****
  • Posts: 14.937
  • Country: gr
  • CPC-Wiki maintainer
    • CPCWiki
  • Liked: 2914
  • Likes Given: 5070
Should we open a Peeks&Pokes section? :D

Offline Nich

  • Supporter
  • 6128 Plus
  • *
  • Posts: 654
  • Country: gb
  • CPC Game Reviews webmaster
    • CPC Game Reviews
  • Liked: 498
  • Likes Given: 607
Awesome @Nich ... maybe  ....  can you make loader + pokes of this game too : Legend of Steel - TOD Studios ?
Thx in advance  :D

I certainly can:

Code: [Select]
1 ' Legend of Steel pokes
2 ' by Nich
3 '
10 MODE 1:CALL &BC02
20 INPUT"Infinite energy (Y/N)? ",e$
30 e$=UPPER$(e$)
40 IF INSTR("YN",e$)=0 THEN 20
50 INPUT"Infinite keys (Y/N)? ",k$
60 k$=UPPER$(k$)
70 IF INSTR("YN",k$)=0 THEN 50
80 MODE 0:BORDER 0:FOR i=0 TO 15
90 READ c:INK i,c:NEXT
100 LOAD"legend.scr",&C000
110 MEMORY &15FF
120 LOAD"legend.bin",&1600
130 MODE 0:INK 15,0
140 a=&BF00
150 READ h$
160 IF h$="END" THEN 190
170 POKE a,VAL("&"+h$)
180 a=a+1:GOTO 150
190 IF e$="Y" THEN POKE &BF0C,&C9
200 IF k$="Y" THEN POKE &BF11,&C9
210 CALL &BF00
220 DATA 0,1,7,3,4,6,9,11
230 DATA 12,13,15,16,18,24,25,26
240 DATA 21,00,16,11,00,01,01,a6
250 DATA 7e,ed,b0,3e,dd,32,4a,74
260 DATA 3e,3d,32,d0,73,c3,94,6a
270 DATA END

Offline XeNoMoRPH

  • 464 Plus
  • *****
  • Posts: 390
  • Country: es
  • " ... in space no one , can hear you scream ... "
  • Liked: 736
  • Likes Given: 672
Should we open a Peeks&Pokes section? :D
totally agree ;D ;D

Offline skylas

  • CPC664
  • ***
  • Posts: 56
  • Country: gr
  • Liked: 81
  • Likes Given: 73
Here you are:

Operation Alexandra


Code: [Select]
1 ' Operation Alexandra pokes
2 ' by Nich
3 '
10 MODE 0
20 OPENOUT"d":MEMORY &964:CLOSEOUT
30 LOAD"disc.bin"
40 a=&BF00
50 POKE &1363,0:POKE &1364,&BF
60 READ h$
70 IF h$="END" THEN CALL &965
80 POKE a,VAL("&"+h$)
90 a=a+1:GOTO 60
100 DATA 3e,c9,32,9a,ba,cd,79,ba
110 ' Infinite health
120 DATA 3e,21,32,60,14
130 ' Don't delete the line below!
140 DATA c3,40,00,END
Does anyone know how i use this?I wrote this code on same dsk and saved it (poke.bas)Then i <run"poke>,  but this leads to a restart of emulator after the intro (when decrunching)
I havent used poke in  anything yet, thats why i am asking.

Edit: sorry guys, no problems, i had made a silly mistake in copying code, many thx for poke!

Offline XeNoMoRPH

  • 464 Plus
  • *****
  • Posts: 390
  • Country: es
  • " ... in space no one , can hear you scream ... "
  • Liked: 736
  • Likes Given: 672

Offline Gryzor

  • Administrator
  • 6128 Plus
  • *****
  • Posts: 14.937
  • Country: gr
  • CPC-Wiki maintainer
    • CPCWiki
  • Liked: 2914
  • Likes Given: 5070
"This month, on our cover disk: a fine collection of pokes for all the newest games!"

Offline skylas

  • CPC664
  • ***
  • Posts: 56
  • Country: gr
  • Liked: 81
  • Likes Given: 73
Does anyone know if or when cassettes will be available for buying? and maybe how much does it cost?

Offline asertus

  • CPC664
  • ***
  • Posts: 58
  • Country: es
  • Liked: 52
  • Likes Given: 174
I only see up to 2016 edition.

http://cpcretrodev.byterealms.com/games/buy/




2016 (10,95€ / unit, 34 games included)

« Last Edit: 09:44, 21 December 18 by asertus »