Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

YukiRaven

Members
  • Content count

    4101
  • Joined

  • Last visited

About YukiRaven

  • Rank
    Will DDR for food

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

Single Status Update

See all updates by YukiRaven

  1. *needs to remove unused textures from a pk3 file*

     

    *Opens up Emacs*

     

    *Starts SLIME, loads up her Waddle library*

     

    *Types up some Common Lisp REPL fun*

    (let ((textures (check-for-unused-textures-in-wads
                     "/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax.pk3"
    
                     '("textures/redsky1.png" "textures/underwater.png"
                       "textures/q1hrtex/cop1_2.png" "textures/QFLAT07.png"
                       "textures/adel_v80.png")
    
                     #P"/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax-start.wad"
                     #P"/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax01.wad"
                     #P"/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax02.wad"
                     #P"/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax03.wad"
                     #P"/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax04.wad"
                     #P"/home/alexa/storage/bin/games/doom/Mine/Heretic Map/corax31.wad")))
    
      (format t "~%** Found ~a unused textures~%" (length textures))
    
      (format t "Writing textures to output file and modifying pk3~%")
      (with-open-file (out #P"/mnt/storage/alexa-extended/bin/games/doom/Mine/Heretic Map/unused-textures.txt"
                           :direction :output
                           :if-exists :supersede :if-does-not-exist :create)
        (loop for tex across textures
           do (progn
                (write-line tex out)
                (sb-ext:run-program
                 "zip" (list "-d" "/mnt/storage/alexa-extended/bin/games/doom/Mine/Heretic Map/corax.pk3" tex)
                 :search t :wait t
                 :output *standard-output*)))))
    

     

    And that's how I optimized SoTNR's pk3 in just a few minutes :D  I really need to wrap that in a command line program someday.

     

    Speaking of which, I've gotten a lot of things in the past few days, so SoTNR is now 95-98% done.  All that's left is:

    • More playtesting and last-minute tweaking
    • Text file proofreading
    • Music tweaks
    • Tweak some brightmaps
    1. Show previous comments  5 more
    2. DoctorGenesis

      DoctorGenesis

      What's SLIME?

    3. YukiRaven

      YukiRaven

      "Superior Lisp Interaction Mode or Emacs".  It essentially turns Emacs into a Common Lisp IDE on steroids. 

    4. DoctorGenesis

      DoctorGenesis

      @YukiRaven Huh, that's rather interesting.

×