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

File name: /tmp/php8F7MnY (494 bytes)
Options: bin=None cset='UK' dasm='' html='' info='' out='/tmp/php8F7MnY.out'
EP-ASCII: UK
EXOS header pos/serial: #0 at 0x0
EXOS type/header: 0x4 [00 04 CE 01 00 00 00 00 00 00 00 00 00 00 00 00]
EXOS type determined: IS-BASIC program (single)

Program: 0x0, size: 0x1ce bytes.
  100 PROGRAM "Pelda-15.bas"
  110 OPTION ANGLEDEGREES
  120 GRAPHICS HIRES16
  130 SET PALETTE0,0,0,0,0,0,0,0
  140 LET X=600:LET Y=100:LET A=40:LET B=300:LET T=1
  150 PRINT "Varj egy kicsit!"
  160 FOR FI=90TO0STEP-15
  170   SET INKT:LET T=T+1
  180   PLOT X,Y;ANGLEFI;FORWARDB;ANGLE90+FI;FORWARDA;ANGLE180+FI;FORWARDB;ANGLE270+FI;FORWARDA
  190 NEXT 
  200 CLEAR TEXT
  210 FOR T=1TO6
  220   SET COLOURT,2
  230   FOR J=1TO20
  240   NEXT 
  250   SET COLOURT,0
  260 NEXT 
  270 GOTO  210

EXOS header pos/serial: #1 at 0x1de
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)