; 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