start:
bsr	s
move.l	#scrolltext,$57ff0
move.l	#endtext,$57ff4
move.l	#scrolltext1,$57ff8
move.l	#endtext1,$57ffc
jsr $50000
rts
scrolltext:	
DC.B "SPECIAL GREETINGS TO OUR BRITISH PARTNERS:  TCS   "
DC.B "ALSO SPECIAL HI TO : BILL, DAG, DR. CHIP, EXEC, FLASH, "
DC.B "IRATA, MZP, ONYX AND SLL WHICH JOIN TOGETHER FOREVER IN"
DC.B " RED SECTOR IN 1941             " 
DC.B "RSI TOP EUROPEAN RANKINGS: 1. DEFJAM   2. SINNERS   "
DC.B "3. BAMIGA   4. SKYLINE   5. GIGAFLOPS   6. TRISTAR   "
DC.B "7. QUADLITE   8. UNIT A   9. HQC INC   10. JUNGLE COMMAND   "
DC.B "11. OKS   12. MEGAFORCE   13. CFR AND SAXXONS CREW   "
DC.B "14. FAIRLIGHT   15. IKARI   16. RAGE   17. DOC   "
DC.B "18. IAN AND MIC   19. THE LOST BOYS   20. LIGHTFORCE    "
DC.B "USA DIRECT TOP TEN:  1. ALL MEMBERS OF SINNERS AND RSI IN"
DC.B " OVERSEAS   "
DC.B "2. BLUEBEARD   3. DOKKEN   4. AMERICAN NINJA   5. RGB CANADA"
DC.B "   6. FBR   7. THE QUEST   8. PHANTHOM   9. NECROMATIC   10. "
DC.B "NEXT GENERATION             "
DC.B "ALSO SPECIAL GREETINGS AND MEGA REGARDS TO THE FOLLOWING "
DC.B "TEAMS :  1001 AND THE CRACKING CREW - 3 MUSKETIERS - "
DC.B "42 CREW - ACA AMERICA - ACS-PIRASOFT - ACTION 2009 - "
DC.B "ADJ AND MEGABYTE - ALPHAFLIGHT - AMERICAN NINJA - "
DC.B "AMIGA ALLIANCE - AMIGA POWER TEAM - ANC EUROPE - "
DC.B "ANTITRAX 2010 - ARTFUL DODGER - APRIL - BAMIGA SECTOR 1 -"
DC.B " BAND (BARBARA) - BEASTY BOYS - BFBS " 
DC.B "- BITSTOPPERS - BLADERUNNERS "
DC.B "- BLIZZARD CREW - BLUEBEARD - CASANDRA COMPLEX - CBS - "
DC.B "CCW - COMMANDO FRONTIERS - CPU - DARKSIDE DEV. - "
DC.B "DEFJAM - DELTAFORCE - DESTROYER - DANISH GOLD - "
DC.B "DMA - DOCTOR D - DOCTOR DANSON - DOCTOR MABUSE (DOC) -"
DC.B " DOKKEN - DOMINATORS (WELCOME BACK IN CRIME SEBASTIAN!) -"
DC.B " DR.F - DRUNKEN ROM CREW - DUTCH USA TEAM - ECA 1998 - "
DC.B "ELECTONIC CRACKING CREW - EURATOM - FEDERATION AGAINST "
DC.B "COPYRIGHT - FBR - FST - GIB - GIGAFLOPS - HACKERS ELITE - "
DC.B "HAGAR AND RAMBONES - HQC INC. - HUSA - IAN AND MIC - "
DC.B " ITALIAN BAD BOYS - ICI OF TAURUS ONE - IKARI - INTRUDER - "
DC.B "JABBA CRACKINGS - JAZZCAT - JUNGLE COMMAND - KAI AND GUNNAR "
DC.B "- KAZU INC. - KID CHAOS - KNIGHTHAWKS - THE DEADLY FRIENDS - "
DC.B "LIGHTFORCE - LORD BLITTER - LORD PETER - MADNESS - "
DC.B "MAGICIAN 42 - MAGNIFICENT FORCE - MAJOR ROM - MARC II - "
DC.B "MCP - MEGAFORCE (FRANCE AND AUSTRIA) - MIRAGE - MR. AMERICA"
DC.B " - MR. COMMODORE - NECROMATIC - NEXT GENERATION - NICS - "
DC.B "NORTHERN LIGHTS - OBI - OKS IMPORTS - PARAMOUNT - PHANTHOM"
DC.B " - PHILIP (AUSTRALIA) - POWERSLAVES - PUREBYTE - QUADLITE"
DC.B " (MAJOR ROM AND ZERONINE) - RAD - RAGE - RANDOM ACCESS - "
DC.B "RBB - RDAP - REPTILIA DESIGN - RGB - RICK ROSS - SAXXONS"
DC.B " CREW - SCA - SCOOP - SHARKS - SIMONE - SINNERS - SKYLINE"
DC.B " - SLL - SODAN - SOFTTEAM - SOUTHHAMPTHON TEAM - SPREADPOINT"
DC.B " - SPY 19 - STEEL PULSE - STOAT AND TIM - SUPRASOFT INC. -"
DC.B " SURVIVORS - SYNDICATE DK - TBR - TEESIDE CRACKING SERVICE"
DC.B " - TEK - TERRORISTS - THE CHAMPS (HI BERND , MY FAVORITE BEST"
DC.B " ENEMY AROUND   THANXX FOR ALL FUNNY PHONECALLS ) "
DC.B "- THE GENERAL - THE HOBBIT - TLC - THE LOST BOYS - THE MOVERS"
DC.B " - THE QUEST - THE WEB INC. - THE YOUNG ONES - TRIAD (PETER,"
DC.B " IXION, JEFF SMART .....) - TWI - TWILIGHT ZONE - USI - "
DC.B "UNLABELED - USR - VORTEX - WOD AND LAST ZERONINE!!!!!     "
DC.B "  








               
     
endtext:
even
scrolltext1: DC.B " MANIAX WAS SPREAD FOR OUR COOL DUDES SKYLINE"
             DC.B " FOR ALL AMIGA FREAKS AROUND !!!        "
             DC.B "THE GAME WAS IMPORTED AND CRACKED BY SKYLINE   "
             DC.B "   THATZ ALL FOR TODAY     " 
endtext1:
even
s:
;--------it's only the Lord Blitter cruncher...hehe...no source...
;--------I'm sorry...haegar

lea brushram_end,a0
move.l #$50000,a1		
move.l -(a0),a2		
add.l a1,a2		
move.l -(a0),d5		
move.l -(a0),d0		
eor.l d0,d5		

notfinished:
lsr.l #1,d0
bne.S notempty1
bsr getnextlwd
notempty1:
bcs.S bigone		

moveq #8,d1	
moveq #1,d3	
lsr.l #1,d0
bne.S notempty2
bsr getnextlwd
notempty2:
bcs.S dodupl	

moveq #3,d1	
clr.w d4	

dojmp:		
		
bsr rdd1bits	
move.w d2,d3	
add.w d4,d3	

getd3chr:

moveq #7,d1	
get8bits:
lsr.l #1,d0
bne.S notempty3
bsr getnextlwd
notempty3:
roxl.l #1,d2
dbf d1,get8bits	

move.b d2,-(a2)
dbf d3,getd3chr	
bra nextcmd

bigjmp:
moveq #8,d1	
moveq #8,d4	
		
		
		
bra dojmp

bigone:
moveq #2,d1	
bsr rdd1bits
cmp.b #2,d2	
blt.S midjumps	
cmp.b #3,d2	
beq.S bigjmp	


moveq #8,d1	
bsr rdd1bits	
move.w d2,d3	
move.w #12,d1	
bra dodupl	

midjumps:
move.w #9,d1	
add.w d2,d1
addq #2,d2
move.w d2,d3	

dodupl:
bsr rdd1bits	
		
		
copyd3bytes:
subq #1,a2

move.b (a2,d2.w),(a2)

dbf d3,copyd3bytes

nextcmd:
cmp.l a2,a1
blt.L notfinished
tst.l d5
bne.S damage
rts

damage:
rts


getnextlwd:
move.l -(a0),d0
eor.l d0,d5
move.w #$10,ccr
roxr.l #1,d0
rts

rdd1bits:	
subq.w #1,d1
clr.w d2

getbits:
lsr.l #1,d0
bne.S notempty
move.l -(a0),d0
eor.l d0,d5
move.w #$10,ccr
roxr.l #1,d0

notempty:
roxl.l #1,d2
dbf d1,getbits
rts

brushram:	blk.b	34608,0	
brushram_end: