epbas.lgb.hu :: Enterprise-128 EXOS file analyzer, lister and disassembler

File name: /tmp/php7v1WA4 (1843 bytes) Options: bin=None cset='UK' dasm='' html='' info='' out='/tmp/php7v1WA4.out' EP-ASCII: UK EXOS header pos/serial: #0 at 0x0 EXOS type/header: 0x4 [00 04 13 07 00 08 00 00 00 00 00 00 00 00 00 00] EXOS type determined: IS-BASIC program (single)
Program: 0x0, size: 0x713 bytes.
24000 ! COPYRIGHT BY ZOZOSOFT&APUCI ALL RIGHTS RESERVED !! 24001 ! 24002 ! 24003 ! 24004 POKE 56,201!] 24005 ALLOCATE 180!] 24006 WHEN EXCEPTIONUSESTOPOT_NYOMOTT!] 24007 POKE 45604,255!] 24008 CODE R=""!] 24009 LET CALLL=33+R!] 24010 LET SZOV=41+R!] 24011 LET COUNT=72+R!] 24012 CODE FO=HEX$("21")&WORD$(COUNT)&HEX$("7E,3C,77,fe,ff,c8,FE,0A,D4")&WORD$(CALLL)&HEX$("00,C6,b0,32")&WORD$(SZOV+7)!] 24013 CODE =HEX$("21")&WORD$(SZOV)&HEX$("ED,5B,F6,BF,01,1f,00,ED,B0,C9")!] 24014 CODE CALLL=HEX$("21")&WORD$(SZOV+6)&HEX$("36,b1,D6,0A,C9")!] 24015 CODE SZOV="EDDIG 00 BLOKK VAN BET"&CHR$(3)&"LTVE. "!] 24016 CODE COUNT=CHR$(254)!] 24017 CODE KERET=HEX$("f3,f5,c5,d5,e5,dd,e5,fd,e5,cd")&WORD$(FO)&HEX$("3e,40,d3,b4,fd,e1,dd,e1,e1,d1,c1,f1,c9")!] 24018 POKE 47368,MAGENTA!] 24019 POKE 47369,WHITE!] 24020 POKE 47370,YELLOW!] 24021 POKE 47371,BLUE!] 24022 POKE 542,PEEK(540)!] 24023 POKE 543,PEEK(541)!] 24024 FOR I=SZOVTOSZOV+30!] 24025 POKE I,PEEK(I)-128!] 24026 NEXT !] 24027 POKE 57,ORD(WORD$(KERET)(1))!] 24028 POKE 58,ORD(WORD$(KERET)(2))!] 24029 POKE 59,201!] 24030 SET VIDEOX40!] 24031 SET VIDEOY26!] 24032 SET VIDEOCOLOR0!] 24033 SET VIDEOMODE1!] 24034 OPEN #101:"video:"!] 24035 DISPLAY #101:AT1FROM1TO26!] 24036 SET #101:PALETTE0,0!] 24037 POKE 56,205!] 24038 EXT "vload "KOCKAPOK.PIC""!] 24039 SET #101:PALETTE0,255!] 24040 POKE COUNT,255!] 24041 RUN "kockapok.bas"!] 24042 END WHEN !] 24043 HANDLER STOPOT_NYOMOTT!] 24044 ALLOCATE 10!] 24045 POKE 47368,RED!] 24046 POKE 47369,WHITE!] 24047 POKE 47370,RED!] 24048 POKE 47371,WHITE!] 24049 LET A$=" "&EXSTRING$(EXTYPE)&" "!] 24050 FOR I=1TOLEN(A$)!] 24051 POKE 48829+I,ORD(A$(I))!] 24052 NEXT !] 24053 CODE RES=HEX$("3e,ff,4f,f7,00")!] 24054 FOR I=1TO1000!] 24055 NEXT !] 24056 CALL USR(RES,0)!] 24057 END HANDLER !] 24058 ! 24059 ! 24060 ! 24061 ! 24062 ! 24063 ! COPYRIGHT BY ZOZOSOFT&APUCI ALL RIGHTS RESERVED !!
EXOS header pos/serial: #1 at 0x723 EXOS type/header: 0xa [00 0A 00 00 00 00 00 00 00 00 00 00 00 00 00 00] EXOS type determined: End of module
End of FILE parsing, because: End-of-module header got (type=10)



Enterprise-128 EXOS file analyzer, lister and disassembler v0.5.8 ©2012,2013 "LGB" Gábor Lénárt (lgb at-sign lgb dot hu)