a prime number by GreaseMonkey

>\x82G\x1f\x1f\x1f\x1f\xe6\x0f\xc4\x18\x00x\xe6\x0f\xcd\x18\x00x=' \xebv\xc60

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

Disassemble:

	ORG	00000H

	LD A,082H		;0000	3E 82 	> . 
	LD B,A			;0002	47 	G 
	RRA			;0003	1F 	. 
	RRA			;0004	1F 	. 
	RRA			;0005	1F 	. 
	RRA			;0006	1F 	. 
	AND 00FH		;0007	E6 0F 	. . 
	CALL NZ,00018H		;0009	C4 18 00 	. . . 
	LD A,B			;000C	78 	X 
	AND 00FH		;000D	E6 0F 	. . 
	CALL 00018H		;000F	CD 18 00 	. . . 
	LD A,B			;0012	78 	X 
	DEC A			;0013	3D 	= 
	DAA			;0014	27 	' 
	JR NZ,$-19		;0015	20 EB 	  . 
	HALT			;0017	76 	V 
	ADD A,030H		;0018	C6 30 	. 0 

download

return top