atarionline.pl Ciekawostki - Forum Atarum

    Jeśli chcesz wziąć udział w dyskusjach na forum - zaloguj się. Jeżeli nie masz loginu - poproś o członkostwo.

    • :
    • :

    Vanilla 1.1.4 jest produktem Lussumo. Więcej informacji: Dokumentacja, Forum.

      • 1:
         
        CommentAuthorpirx
      • CommentTime2 Apr 2026 23:26 (1 godzinę temu) zmieniony
       
      retro forum na retro kodzie, ma sens


      bonus
      oneliner pokazujący strukturę xexa:

      perl -e '$f=shift;open F,$f;binmode F;$_=do{local $/;<F>};for($i=0;$i+3<length;){$i+=2if substr($_,$i,2)eq"\xff\xff";last if$i+3>=length;($a,$b)=unpack"vv",substr($_,$i,4);$n=$b-$a+1;push@s,[$a,$b,$n];$i+=4+$n}print"$f\n";printf"  \$%04X-\$%04X  %d\n",@$_ for@s;print"  total segments ".@s."\n"' filename


      na przykład
      perl -e '$f=shift;open F,$f;binmode F;$_=do{local $/;<F>};for($i=0;$i+3<length;){$i+=2if substr($_,$i,2)eq"\xff\xff";last if$i+3>=length;($a,$b)=unpack"vv",substr($_,$i,4);$n=$b-$a+1;push@s,[$a,$b,$n];$i+=4+$n}print"$f\n";printf"  \$%04X-\$%04X  %d\n",@$_ for@s;print"  total segments ".@s."\n"' scorch.xex
      scorch.xex
      $2000-$2005 6
      $02E2-$02E3 2
      $2010-$3F4F 8000
      $4000-$4260 609
      $4C00-$7978 11641
      $8000-$8DA4 3493
      $96A5-$9730 140
      $02E2-$02E3 2
      $4000-$43FF 1024
      $4400-$45E7 488
      $45E8-$4654 109
      $4655-$46CC 120
      $46CD-$A9DB 25359
      $AA00-$AABF 192
      $AB00-$AFFC 1277
      $B000-$BFE3 4068
      $02E0-$02E1 2
      total segments 17