                           ллллллллллллллл
                          АллллллллллллллА
                          БлллллллллллллБ
                         Алллллллллллллл
                         АлллВллллллллл
                        АБлллл ллллллл
                        АлллБллВллллл
                        БлллААллллллА
                       АллллА АллллА
                       ллллллАБлллА
А                     БллБАллллллБ
л                    АлллА  лллллА
ллА                  АлллА  АлллА                                    АБллллллл
лллБ                 Блллл  АллБ                              АБллллллллББлББл
ллллл               АллБлллБлллА                           АБллллллВлВ    АА л
лллллл              ллА  лллллА                           АлллллллллллллБАБлБл
ллллллБ            БлА   АлллБ                           АллБААБллллллллллллВл
лБАллллА          АлБА   АлллБ                           БлБ           АБллллл
А   лллл          БлА    лллллБА                          ллА               АА
Б    лллБ         ллА   ллллллллА                          ллБАА
л     лллБ       АлБ   БллллллллБ                           БллБАА
лл     БллБ      АлА  АллллВлллллА                           АБллллБА
ллл     АллБА   АлА   ллВлллБллллл                             АлллллБАА
лллл     АлллА  Ал   БлББлББллллВлл                              БллллллАА
Алллл      БллАБлА  Алл  лА БлллВБлл        АБллллллАА            АБллВББллАА
 АллллА     БлллБА  лл  АлА АлБлллБлБ      АлллллллВллБ             ААлББААллБ
   БлллБ    АлллВлБлл   Бл АлА Алл БлА    АлллА  ВллллллА             Алл  Алл
    АБллл   АлБлллллА   лБ АА  АБлББлл   АБлл   АлллББлллА             АлБ   л
      АБллААлА Алллл    лББлА   АлБ БлБ  АллА  БлллА  АлВлл             БлА  А
        АлллБА АБлллА   ллллБА  БллББллА АлБА Бллл     АлБлл             ллА А
          лллАББлБллл   ллллллллллллББлБББлБББллл      АллАлА             ллАл
          БлВлллБААллБ  лллБААББАААллБллВллББллл        лАААлБ             ллБ
          лллБллБ   ллББллБ        АллБллллВллБ         л  АллллБАА        Алл
         АлА ллллА  Аллллл           ллВлллллБ          лА  ллллллллллБА   Блл
        АлА АлллллА  БлллА            ллллллБ           лА АллллВАББлллллллллл
        АА  ллААлллАА лллА             лллллА           АА АлБАллББ    Блллллл
        л  лл    БллллВллБ              ллллА           АлБлБ  АБллБА   АААББл
       л  ллА     АБллллллА              ллллА           лллА    АлллАА    ААБ
      АББллА        АллББлл               ллллААА        лВлА     АБлллБАААБББ
     АБлллБ          АллБлллА             АлллВБллллАА  АллА         АБллллллл
    АлВллБ             лллВллБА            АллллБ  ВллААллБ            АБллллБ
    лБллА               БллллллА            АллБАлллллААА                АББА
   лВлл                  ААБллллА             лА   АА
  лллл                     АБллллАА            А
 Бллл                        АлллллБ
АлллА                         АлллллБ
БллБ                           АБллллА
ллл                              АБллл
лл                                 Аллл
А                                    БлА

ФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФФ

 ;--------------------------------------------------------------------------
 ; misc
 ;--------------------------------------------------------------------------

 .model demo, brutal
 .386
 .600kb
 .gus        ; nosound also works, but it suxx

 include my_favourite_disclaimer.inc

 ; if you want to put this on yar CD, you have to send
 ; us some copies of it (or money ;)

 ; congratulations to all who survived watching this demo ;)
 ; we wanted to try making something original/alternative
 ; we do not take responsibility for any kind of damages caused
 ; by this production

 ;--------------------------------------------------------------------------
 ; credits
 ;--------------------------------------------------------------------------

 .code  ; samael
 .3ds   ; voomie
 .gfx   ; rage
 .mzx   ; johnko

 ;--------------------------------------------------------------------------
 ; membah list
 ;--------------------------------------------------------------------------

 include samael.inc     ; code
 include voomie.inc     ; 3ds + raytrace + code
 include rage.inc       ; gfx
 include johnko.inc     ; music
 include laser_harp.inc ; music
 include gurun.inc      ; music

 ;--------------------------------------------------------------------------
 ; greets
 ;--------------------------------------------------------------------------

 slovak_scene db ? dup(?)
 polish_scene db ? dup(?)

 friends      db 'akira, azure, bear, bonifacy, cortez, dose, draken'
              db 'hellfire, insanity, jojo, morbus, nyarlathotep, pro'
              db 'scape, victs, warlock, xtd, yarpen, zd3n, mini, bzone'
              db 'mirsoft, pepe, honsalik, black axe, emzet'
              db 'and all the others...'

 thanx        db 'piggy'              ; for GUS

 ;--------------------------------------------------------------------------
 ; contax
 ;--------------------------------------------------------------------------

 .smail

   include samael.inc  ; juraj duris
                       ; h. melickovej 9
                       ; 841 05 bratislava
                       ; slovakia
                       ; *noswap*

   include rage.inc    ; michael gallo
                       ; viglasska 11
                       ; 851 06 bratislava
                       ; slovakia
                       ; *swap/gfx*

   include voomie.inc  ; ivan klimo
                       ; kosicka 50
                       ; 821 08 bratislava
                       ; slovakia
                       ; *swap/raytrace*

   include johnko.inc  ; jan kysucky
                       ; bakosova 42
                       ; 841 03 bratislava
                       ; slovakia
                       ; kysucky@alpha.euba.sk
                       ; or johnko@crazy.dcs.elf.stuba.sk


 .email

   klimo@managr.fm.uniba.sk (subj. "mist")

 ;feel free to contact us for any reason

 ;--------------------------------------------------------------------------
 ; main code
 ;--------------------------------------------------------------------------

   call disable_light  ; ambient = R:0, G:0, B:0
   call set_max_volume

 @mortal_loop:

   call run_xaos

   mov  dx,life_status_port
   in   al,dx
   cmp  al,alive

   je @mortal_loop

   call funeral_service

   mov ax, 4c00h
   int 21h

end
