Easter Egg или как добавить в игру чит-код

  1. 1000 REM -= Easter Egg by aNNiMON =-
  2. 1005 REM -= INIT =-
  3. 1010 IF eeidx%<>0 THEN GOTO 1050
  4. 1015   eesleep% = 800: eenumkey% = 4
  5. 1020   eeidx% = 1: eeslp% = 0: eeidkey% = 0
  6. 1025   DIM eekeys%(eenumkey%)
  7. 1030   FOR eei%=0 TO eenumkey%
  8. 1035      READ eekeys%(eei%)
  9. 1040   NEXT eei%
  10. 1050 REM -= PROC =-
  11. 1055 IF eeidkey%=eenumkey% THEN level%=level%+1: RETURN
  12. 1060 IF INKEY(0)=eekeys%(eeidkey%) THEN eeidkey%=eeidkey%+1: eeslp%=0
  13. 1070 eeslp%=eeslp%+1
  14. 1075 IF eeslp%>eesleep% THEN eeidkey%=0
  15. 1080 SLEEP 1
  16. 1085 RETURN
  17. 1090 DATA 48, 53, 57, 52: REM 0+5+9+4
Допустим хотим мы, при нажатии последовательно клавиш 0,5,9,4 перейти на следующий уровень. Вот эта подпрограмма нам поможет.
Все параметры задаются в строке 1015, а именно:
eesleep% - задержка в мс, за которую нужно успеть нажать следующую клавишу
eenumkey% - кол-во кодов клавиш, используемых в читах.
В строке 1090 указываем коды клавиш.
Ну и в строке 1055 редактируем код после THEN :)

Мы в соцсетях

vk tw tg yt

Пожертвования

Аноним2850 р.
Freddy1700 р.
riseremi1111 р.
NaruTrey800 р.
vlavolk637 р.
  © aNNiMON (Melnik Software)