; Play Samples - Better sound is on the newest AtariWin than Atari800 for DOS
 Disk 'SMP\DOOR.SMP'  \ Disk 'SMP\EXP.SMP'
 Disk 'SMP\INDIA.SMP' \ Disk 'SMP\VISTA.SMP'

 Org $2000
Start:
;FIRST SAMPLE------------------------------------------------------------------
 Load $3000,'D1:INDIA.SMP' ;load sample

 InterruptSMP OFF ;POKEY interrupt OFF
 TempoSMP 9       ;less tempo - faster

 Poke $D400,0
 Poke $D40E,0 ;DMACTL & NMIEN - Screen OFF & DLI/VBI/RESET OFF (Max speed)

 PlaySMP $3000  ;Play until finish

;SECOND SAMPLE-----------------------------------------------------------------
 Load $3000,'D1:VISTA.SMP'

 PlaySMP $3000  ;Play until finish

 Poke $D40E,128+64+32
 Poke 559,34    ;DLI/VBI/RESET ON & Screen ON (Slow but screen is visible)

;THIRD SAMPLE------------------------------------------------------------------
 InterruptSMP ON ;POKEY interrupt ON

 Load $3000,'D1:DOOR.SMP'

 PlaySMP $3000   ;Start playing sample...the main program isn't break

 WaitKey         ;wait for a key and play sample,too

;FOURTH SAMPLE-----------------------------------------------------------------
 Load $3000,'D1:EXP.SMP'

 PlaySMP $3000   ;Start playing sample...the main program isn't break

 WaitKey         ;wait for a key and play sample,too
 Dos
End Start