ААА Патя на середину апреля

Цитата:

---

Сообщение от shurik-ua

поковыряв, получил таки заветные коды

---

молодец.
когда DrBars намекнул про чит в dizzy я понял что надо назначить кнопки движения особым образом.
чёткой проверки небыло, пришлось писать переборщик на бейсике.
запустил в турбо режиме и достаточно скоро посыпались подходящие слова.
как оказалось он выбрал какую-то бессмыслицу

Цитата:

---

Сообщение от shurik-ua

ocsocc же )

---

Не гуглится)

Цитата:

---

Сообщение от Titus

Не гуглится)

---

oscoss ))

Затупил сразу не написал - просто страницы 2-3 назад её активно ломали - и так и не доломали.

Я уже обрадовался - думал ААА вернулся :) А тут эвона как!

shurik-ua, впечатляешь
я когда-то потыкался, но ничего так и не понял.

робус говорил что заюзал защиту, которую пользовал для кода на работе

расскажи, как разломал?

Цитата:

---

Сообщение от Hacker VBI

расскажи, как разломал?

---

небольшое howto

ставим бряк на 0x8aae - вызов функции хеширования строки
на выходе в DE - хеш

далее хеш и сама строка копируются по адресам
0х4397 hash
0х4399 string, zero terminated


далее ставим бряк на 0x406f
это главный цикл некоей виртуальной машины, которая обрабатывает придуманный автором пикод.
собственно по адресу 0x406f и стоит сам переход на нужную функцию в зависимости от опкода.

в HL - указатель на текущий опкод
в А - сам опкод
вот опкод который нас интересует
0х60 - сравнение хеша строки с аргументами в ленте пикода, и переход на адрес пикода если не равно.

вот все хеши с которыми идёт сравнение

Код:

---

hashes:
        0563        warning, need 128k mode
        31f8        ZUAF=AB                this is ending

        26c6        GREETINGS
        ea56        MORPHING
        1980        AAA
        0109        TITUS
        bc18        TETRIS
        032b        POP ROLLER
        3ba7        VNN
        08ef        DMM

---

опкод 0х05 по всей видимости - расшифровать блок
расшифровка - это простой XOR со строкой - поэтому даже зная хеш расшифровать блок не получится.
)) - так видимо задумывал автор, но он сделал маленькое упущение, которое заключается в том что после этой расшифровки первые 0x20
байт оказываются одинаковыми для всех частей )

для начала я проверил эту догадку, зная как раз два кода 'AAA' и 'VNN' - после

расшифровки они на выходе имеют такую хекс строку:

Код:

---

0C137025CFFB70B5
1FB57BC5FC738504
749563BC9BCF7D50
238C32CD1698D967

---

ну а дальше дело техники
1.подменяем хеш из списка
2.доходим до программы декcора - сохраняем зашифрованные 0х20 байт
3.ксорим их с хекс строкой выше
4.и получайм искомую строку )


http://savepic.ru/15008011.png

Цитата:

---

Сообщение от Hacker VBI

shurik-ua, впечатляешь

---

спасибо, просто я иногда реверсю для х86 машин (иногда даже за деньги ) - а тут выяснилось что для такой простенькой машины как спек придумали чтото неломаемое ) - вот и захотелось посмотреть что же там такое намудрили ) - вдруг есть чтото чего я не знаю ).
Но оказалось всё довольно банально - виртуальные машины в защитах на ПЦ встречаются повсеместно (VMProtect, Themida и пр.) - а тут даже обфускации не было )

shurik-ua, нам надо будет с тобой забухать :)

Цитата:

---

Сообщение от BlastOff

Я уже обрадовался - думал ААА вернулся

---

31.07.2017 ~01:00 ожидаем вероятного шоу по этому поводу.

чтобы не быть голословным http://www.pouet.net/prod.php?which=61311 :)
витуальная машина это весьма интересно. сам мечтал сделать что-то подобное
однако увидев этот топик мне захотелось сделать запил...

Цитата:

---

Сообщение от shurik-ua

)) - так видимо задумывал автор, но он сделал маленькое упущение, которое заключается в том что после этой расшифровки первые 0x20

---

Ха ... Я думал что Лёша выложил поправленную версию. Я заметил этот просчёт когда отправил ААА первую сборку. Видать вторая сборка не попала к нему. Эти 20 байт это вот эта строчка:

Код:

---

        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START

---

Да это мой промах был, лепил всё в кучу, и получилось, что первым всегда грузился один и тот же кусок. А выглядит текст первой сборки в компиляторе вот так:

Код:

---

;O-OPEN TRD                  "PATH\file"
;o-OPEN BOOT.B                "NAME.B"
;C-CLOSE TRD                  "PATH\file"
;L-LOAD                      "PATH\file",Start,Size
;U-LOAD/UNPACK                "PATH\file",Start,Size
;P-PAGE                      Page
;E-FLUSH & EXEC              Start
;R-REDEFINE CMD              "CMD",Value
;G-GoTo                      Label
;g-GoSub                      Label
;I-GoToIF                    A,<=>,B,Label
;i-GoSubIF                    A,<=>,B,Label
;T-RET
;l-Label
;K-Start Coding OUT DATA      CodingString
;k-End Coding OUT DATA

        ReDef  :"L","..\loados.inc"CMD.L
        ReDef  :"U","..\loados.inc"CMD.U
        ReDef  :"X","..\loados.inc"CMD.X
        ReDef  :"x","..\loados.inc"CMD.XX
        ReDef  :"E","..\loados.inc"CMD.E
        ReDef  :"P","..\loados.inc"CMD.P
        ReDef  :"G","..\loados.inc"CMD.G
        ReDef  :"g","..\loados.inc"CMD.GG
        ReDef  :"I","..\loados.inc"CMD.I
        ReDef  :"i","..\loados.inc"CMD.II
        ReDef  :"T","..\loados.inc"CMD.T
        ReDef  :1,"..\loados.inc"CMD.COM1
        ReDef  :2,"..\loados.inc"CMD.COM2
        ReDef  :3,"..\loados.inc"CMD.COM3
        ReDef  :4,"..\loados.inc"CMD.COM4
        ReDef  :5,"..\loados.inc"CMD.COM5
        ReDef  :6,"..\loados.inc"CMD.COM6
        ReDef  :"K","..\loados.inc"CMD.K

        OpenTRD :"..\oscoss.trd",1664
        OpenFile:"boot.B"

        StartKEY:"48"
        GoTo  :Loading48K
        StopKEY

;        StartKEY:"ASD"
;        Pack  :"test.cod","test.txt"START
;        Exec  :"test.txt"START
;        StopKEY


;        Load    :"..\DOS\dsq.bin","..\DOS\dosdsq.inc"DSQ.START

;LOA.PTR_MEM = 128 128K MODE
;LOA.PTR_MEM =  48  48K MODE
        GoToIF  :"..\loader.inc"LOA.PTR_MEM = 48, Loading48K


;A=0 - Uncnown Model
;A=1 - Pentagon
;A=2 - Spectrum 128
;A=3 - Scorpion
;A=4 - Spectrum Lvov
;A=5 - TURBO MODE
        GoToIF  :"..\loader.inc"LOA.PTR_VER = 5,  LoadingTurboMode
        GoToIF  :"..\loader.inc"LOA.PTR_VER = 0,  LoadingNeedPentagonMode
        GoToIF  :"..\loader.inc"LOA.PTR_VER = 2,  LoadingNeedPentagonMode
        GoToIF  :"..\loader.inc"LOA.PTR_VER = 3,  LoadingNeedPentagonMode
        GoToIF  :"..\loader.inc"LOA.PTR_VER = 4,  LoadingNeedPentagonMode



;EPILOGUE
        StartKEY:"ZUAF=AB"
        Page    :"..\MODE\epilogue.txt"MUSIC.PAGE
        Pack    :"..\MODE\epilogue.mus","..\MODE\epilogue.txt"MUSIC.START
        Page    :17
        Load    :"..\MODE\epilogue.p17",49152
        Page    :19
        Load    :"..\MODE\epilogue.p19",49152
        Page    :20
        Load    :"..\MODE\epilogue.p20",49152
        Page    :16
        Pack    :"..\MODE\epilogue.cod","..\MODE\epilogue.txt"START
        Exec    :"..\MODE\epilogue.txt"START
        StopKEY



;HIDDEN-1
        StartKEY:"GREETINGS"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-1.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\idiotics.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\kumar.bin","..\MODE\hidden.txt"MUSIC.DATA
l:LabelHidEXEC
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-2
        StartKEY:"MORPHING"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-2.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\level1.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\level2.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-3
        StartKEY:"AAA"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-3.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\level3.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\level4.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-4
        StartKEY:"TITUS"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-4.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\level5.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\level6.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-5
        StartKEY:"TETRIS"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-5.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\level7.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\level8.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-6
        StartKEY:"POP ROLLER"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-6.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\move.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\never.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-7
        StartKEY:"VNN"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-7.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\poor.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\shaman.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY
;HIDDEN-8
        StartKEY:"DMM"
        Pack    :"..\MODE\hidden.cod","..\MODE\hidden.txt"START
        Pack    :"..\GRAPHICS\WARNING\hidden-8.scr","..\MODE\hidden.txt"PICDATA
        Pack    :"..\MUSIC\HIDDEN\stick.bin","..\MODE\hidden.txt"MUSIC.DATA
        GoToIF  :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LabelHidEXEC
        Pack    :"..\MUSIC\HIDDEN\percuss.bin","..\MODE\hidden.txt"MUSIC.DATA
        Exec    :"..\MODE\hidden.txt"START
        StopKEY


;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_RU.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end

l:MainLoading
        Page    :"..\MUSIC\jetset.txt"MUSIC.PAGE
        Pack    :"..\MUSIC\jetset.cod","..\iorq.inc"MUSIC.START
        GoSub  :XaraLoading
        Pack    :"..\CODE\iorq.cod","..\iorq.inc"IORQ.START
        Pack    :"..\CODE\main.cod","..\main.inc"MAIN.START
        Exec    :"..\iorq.inc"IORQ.START






;XARA PACKs
l:XaraLoading
;EFF FINISH ... Start Loader
;        XaraPack:"..\EFFECT\finish.bin"
;        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 0 ,LoaFuckVAL0
;        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 1 ,LoaFuckVAL1
;        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 2 ,LoaFuckVAL2
;        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 3 ,LoaFuckVAL3
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B00","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF JokerA
        XaraPack:"..\EFFECT\jokera.bin"
        XaraPack:"..\GRAPHICS\JOKER\jokera.bin"
;EFF Long Girl
;        XaraPack:"..\EFFECT\logr.bin"
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 0 ,LoaGIRL0
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 1 ,LoaGIRL0
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 2 ,LoaGIRL0
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 3 ,LoaGIRL1
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b00"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b01"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b02"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b03"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b04"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b05"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b06"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b07"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b08"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b09"
        XaraPack:"..\GRAPHICS\LONGGIRL\logr.b0a"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_YI.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B01","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF Long Girl MESSAGE
        XaraPack:"..\EFFECT\lomsg.bin"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_IT.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;EFF Life
        XaraPack:"..\EFFECT\life.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif_a2.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif_a1.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif_a0.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif__b.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif__c.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif__d.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif__e.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif__f.bin"
        XaraPack:"..\GRAPHICS\LIFE\lif_f0.bin"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_HI.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B02","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF JokerB MackDonalds
        XaraPack:"..\EFFECT\jokerb.bin"
        XaraPack:"..\GRAPHICS\JOKER\jokerb.bic"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_FR.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B03","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF Nude Mellona
        XaraPack:"..\EFFECT\nude.bin"
        XaraPack:"..\GRAPHICS\NUDE\melly-03.bin"
        XaraPack:"..\GRAPHICS\NUDE\melly-04.bin"
        XaraPack:"..\GRAPHICS\NUDE\melly-05.bin"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_FI.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;EFF SPACE SPACE SPACE SPACE SPACE SPACE EFF
;        Xara    :"..\EFFECT\_space_.bin"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_UA.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B04","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF Head
        XaraPack:"..\EFFECT\head.bin"
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx2 = 0 ,LoaHEADA
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx2 = 1 ,LoaHEADB
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_PL.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B05","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF Greetings
        XaraPack:"..\EFFECT\greets.bin"
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 0 ,LoaGREE0
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 1 ,LoaGREE1
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 2 ,LoaGREE2
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 3 ,LoaGREE3
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 4 ,LoaGREE4
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 5 ,LoaGREE5
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 6 ,LoaGREE6
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx8 = 7 ,LoaGREE7
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_ES.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B06","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF WomanMan
        XaraPack:"..\EFFECT\wo_ma.bin"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_DE.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;EFF Multicolor Move
        XaraPack:"..\EFFECT\multic.bin"
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B07","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF ZebraGirl
        XaraPack:"..\EFFECT\zebra_g.bin"
;=== LOADER MESSAGE
        Load    :"..\MODE\cryp.cod","..\MODE\cryp.txt"START
        Pack    :"..\GRAPHICS\WARNING\cryp_EN.scr","..\MODE\cryp.txt"CRYPDATA
        Exec    :"..\MODE\cryp.txt"START
;=== LOADER MESSAGE end
;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B08","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP
;EFF FINISH ... Start Loader
        XaraPack:"..\EFFECT\finish.bin"
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 0 ,LoaFuckVAL0
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 1 ,LoaFuckVAL1
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 2 ,LoaFuckVAL2
        GoSubIF :"..\loader.txt"LOA.PTR_RNDx4 = 3 ,LoaFuckVAL3

;EFF Piano
;        XaraPack:"..\EFFECT\piano.bin"
;        Xara:"..\EFFECT\c_tnl.bin"
;        Xara:"..\EFFECT\c_tunel.bin"
;        Xara:"..\EFFECT\chunka.bin"
;        Xara:"..\EFFECT\mult_g.bin"
;        Xara:"..\EFFECT\thunka.bin"

;=== LOADER QR-CODE STEP
    Load    :"..\MODE\loaqr.cod","..\MODE\loaqr.txt"START
    Pack    :"..\GRAPHICS\LOADER\steps.B09","..\MODE\loaqr.txt"PICDATA
    Exec    :"..\MODE\loaqr.txt"START
;==== LOADER QR-CODE STEP


        Return


l:LoaFuckVAL0
        XaraPack:"..\GRAPHICS\FUCK\fuck.bin"
        Return
l:LoaFuckVAL1
        XaraPack:"..\GRAPHICS\FUCK\luck.bin"
        Return
l:LoaFuckVAL2
        XaraPack:"..\GRAPHICS\FUCK\love.bin"
        Return
l:LoaFuckVAL3
        XaraPack:"..\GRAPHICS\FUCK\lovefuck.bin"
        Return

l:LoaGIRL0
        XaraPack:"..\EFFECT\logr.bin"
        Return
l:LoaGIRL1
        XaraPack:"..\EFFECT\logr1.bin"
        Return


l:LoaHEADA
        XaraPack:"..\EFFECT\head0.bin"
        XaraPack:"..\EFFECT\head3.bin"
        Return
l:LoaHEADB
        XaraPack:"..\EFFECT\head1.bin"
        XaraPack:"..\EFFECT\head2.bin"
        Return

l:LoaGREE0
        XaraPack:"..\QR-CODE\txt_o00.bin"
        Return
l:LoaGREE1
        XaraPack:"..\QR-CODE\txt_o01.bin"
        Return
l:LoaGREE2
        XaraPack:"..\QR-CODE\txt_o02.bin"
        Return
l:LoaGREE3
        XaraPack:"..\QR-CODE\txt_o03.bin"
        Return
l:LoaGREE4
        XaraPack:"..\QR-CODE\txt_o04.bin"
        Return
l:LoaGREE5
        XaraPack:"..\QR-CODE\txt_o05.bin"
        Return
l:LoaGREE6
        XaraPack:"..\QR-CODE\txt_o06.bin"
        Return
l:LoaGREE7
        XaraPack:"..\QR-CODE\txt_o07.bin"
        Return

l:Loading48K
        Load    :"..\MODE\warning.cod","..\MODE\warning.txt"START
        Pack    :"..\GRAPHICS\WARNING\48.bin","..\MODE\warning.txt"WARNDATA
        Exec    :"..\MODE\warning.txt"START
        Pack    :"..\MODE\starwars.cod","..\MODE\starwars.txt"START
        Exec    :"..\MODE\starwars.txt"START

l:LoadingTurboMode
        Load    :"..\MODE\warning.cod","..\MODE\warning.txt"START
        Pack    :"..\GRAPHICS\WARNING\turbo.bin","..\MODE\warning.txt"WARNDATA
        Exec    :"..\MODE\warning.txt"START
        Page    :"..\MODE\pianogir.txt"MUSIC.PAGE
        Pack    :"..\MODE\pianogir.mus","..\MODE\pianogir.txt"MUSIC.START
        Page    :"..\MODE\pianogir.txt"PIAG_P
        Pack    :"..\GRAPHICS\NINBER\piagirl.big","..\MODE\pianogir.txt"PIAG
        Page    :"..\MODE\pianogir.txt"PIAM_P
        Pack    :"..\GRAPHICS\NINBER\piagirl.bim","..\MODE\pianogir.txt"PIAM
        Page    :16
        Pack    :"..\MODE\pianogir.cod","..\MODE\pianogir.txt"START
        Exec    :"..\MODE\pianogir.txt"START

l:LoadingNeedPentagonMode
        Load    :"..\MODE\warning.cod","..\MODE\warning.txt"START
        Pack    :"..\GRAPHICS\WARNING\pentagon.bin","..\MODE\warning.txt"WARNDATA
        Exec    :"..\MODE\warning.txt"START
        Pack    :"..\MODE\needpent.cod","..\MODE\needpent.txt"START
        Exec    :"..\MODE\needpent.txt"START





;l:TestLoading
;
;        Pack    :"test.cod","test.txt"START
;        Exec    :"test.txt"START
;        Return

        CloseTRD:"---.trd"

        RenameFile:,"boot.B","OSCOSS.B"
        RenameFile:,"boot.B","OSCOSS.L"
        RenameFile:,"boot.B","OSCOSS.I"
        RenameFile:,"boot.B","OSCOSS.N"
        RenameFile:,"boot.B","OSCOSS.C"

---