_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

L/S-DEMO.S

FILE INFORMATION

FILENAME(S): L/S-DEMO.S

FILE TYPE(S): SEQ

FILE SIZE: 1.2K

FIRST SEEN: 2025-11-30 01:12:59

APPEARS ON: 1 disk(s)

FILE HASH

30769bfee8e1aacd16d145e5dcff7c4654bd2df648808b2f2fa32a0e608269a0

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10201 SEITE A L/S-DEMO.S SEQ C64er 4 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 0D 0D 20 20 20 20 20 20  20 20 20 2A 3D 20 24 32  |..         *= $2|
00000010: 30 30 30 0D 0D 0D 46 49  4C 50 41 52 20 20 20 3D  |000...FILPAR   =|
00000020: 20 24 46 46 42 41 0D 46  49 4C 4E 41 4D 20 20 20  | $FFBA.FILNAM   |
00000030: 3D 20 24 46 46 42 44 0D  4C 4F 41 44 20 20 20 20  |= $FFBD.LOAD    |
00000040: 20 3D 20 24 46 46 44 35  0D 53 41 56 45 20 20 20  | = $FFD5.SAVE   |
00000050: 20 20 3D 20 24 46 46 44  38 0D 56 20 20 20 20 20  |  = $FFD8.V     |
00000060: 20 20 20 3D 20 24 44 30  30 30 0D 0D 0D 20 20 20  |   = $D000...   |
00000070: 20 20 20 20 20 20 4A 53  52 20 24 45 35 34 34 0D  |      JSR $E544.|
00000080: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 24 34  |         LDX #$4|
00000090: 30 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |0.         LDA #|
000000A0: 24 46 46 0D 4C 4F 4F 50  20 20 20 20 20 53 54 41  |$FF.LOOP     STA|
000000B0: 20 24 32 46 46 46 2C 58  0D 20 20 20 20 20 20 20  | $2FFF,X.       |
000000C0: 20 20 44 45 58 0D 20 20  20 20 20 20 20 20 20 42  |  DEX.         B|
000000D0: 4E 45 20 4C 4F 4F 50 0D  3B 2D 2D 2D 2D 2D 2D 2D  |NE LOOP.;-------|
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000000F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000100: 0D 53 50 49 4E 49 54 20  20 20 4C 44 41 20 23 24  |.SPINIT   LDA #$|
00000110: 36 34 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |64.         STA |
00000120: 56 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 56  |V.         STA V|
00000130: 2B 31 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |+1.         STA |
00000140: 56 2B 32 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |V+2.         LDA|
00000150: 20 23 24 39 36 0D 20 20  20 20 20 20 20 20 20 53  | #$96.         S|
00000160: 54 41 20 56 2B 33 0D 20  20 20 20 20 20 20 20 20  |TA V+3.         |
00000170: 4C 44 41 20 23 24 30 33  0D 20 20 20 20 20 20 20  |LDA #$03.       |
00000180: 20 20 53 54 41 20 56 2B  32 31 0D 20 20 20 20 20  |  STA V+21.     |
00000190: 20 20 20 20 4C 44 41 20  23 24 43 30 0D 20 20 20  |    LDA #$C0.   |
000001A0: 20 20 20 20 20 20 53 54  41 20 32 30 34 30 0D 20  |      STA 2040. |
000001B0: 20 20 20 20 20 20 20 20  4C 44 41 20 23 24 43 31  |        LDA #$C1|
000001C0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 32 30  |.         STA 20|
000001D0: 34 31 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |41.         JSR |
000001E0: 4B 45 59 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |KEY.;-----------|
000001F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000200: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 53 41 56  |------------.SAV|
00000210: 49 4E 47 20 20 20 4C 44  58 20 23 24 30 38 0D 20  |ING   LDX #$08. |
00000220: 20 20 20 20 20 20 20 20  4A 53 52 20 46 49 4C 50  |        JSR FILP|
00000230: 41 52 0D 20 20 20 20 20  20 20 20 20 4C 44 58 20  |AR.         LDX |
00000240: 23 3C 28 4E 41 4D 45 29  0D 20 20 20 20 20 20 20  |#<(NAME).       |
00000250: 20 20 4C 44 59 20 23 3E  28 4E 41 4D 45 29 0D 20  |  LDY #>(NAME). |
00000260: 20 20 20 20 20 20 20 20  4C 44 41 20 23 24 30 36  |        LDA #$06|
00000270: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 46 49  |.         JSR FI|
00000280: 4C 4E 41 4D 0D 20 20 20  20 20 20 20 20 20 4C 44  |LNAM.         LD|
00000290: 58 20 23 24 30 30 0D 20  20 20 20 20 20 20 20 20  |X #$00.         |
000002A0: 4C 44 59 20 23 24 33 30  0D 20 20 20 20 20 20 20  |LDY #$30.       |
000002B0: 20 20 53 54 58 20 24 46  42 0D 20 20 20 20 20 20  |  STX $FB.      |
000002C0: 20 20 20 53 54 59 20 24  46 43 0D 20 20 20 20 20  |   STY $FC.     |
000002D0: 20 20 20 20 4C 44 41 20  23 24 46 42 0D 20 20 20  |    LDA #$FB.   |
000002E0: 20 20 20 20 20 20 4C 44  58 20 23 24 34 31 0D 20  |      LDX #$41. |
000002F0: 20 20 20 20 20 20 20 20  4C 44 59 20 23 24 33 30  |        LDY #$30|
00000300: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 53 41  |.         JSR SA|
00000310: 56 45 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |VE.         JSR |
00000320: 4B 45 59 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |KEY.;-----------|
00000330: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000340: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 4C 4F 41  |------------.LOA|
00000350: 44 49 4E 47 20 20 4C 44  58 20 23 24 30 38 0D 20  |DING  LDX #$08. |
00000360: 20 20 20 20 20 20 20 20  4C 44 59 20 23 24 30 30  |        LDY #$00|
00000370: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 46 49  |.         JSR FI|
00000380: 4C 50 41 52 0D 20 20 20  20 20 20 20 20 20 4C 44  |LPAR.         LD|
00000390: 58 20 23 3C 28 4E 41 4D  45 29 0D 20 20 20 20 20  |X #<(NAME).     |
000003A0: 20 20 20 20 4C 44 59 20  23 3E 28 4E 41 4D 45 29  |    LDY #>(NAME)|
000003B0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 24  |.         LDA #$|
000003C0: 30 36 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |06.         JSR |
000003D0: 46 49 4C 4E 41 4D 0D 20  20 20 20 20 20 20 20 20  |FILNAM.         |
000003E0: 4C 44 41 20 23 24 30 30  0D 20 20 20 20 20 20 20  |LDA #$00.       |
000003F0: 20 20 4C 44 58 20 23 24  34 30 0D 20 20 20 20 20  |  LDX #$40.     |
00000400: 20 20 20 20 4C 44 59 20  23 24 33 30 0D 20 20 20  |    LDY #$30.   |
00000410: 20 20 20 20 20 20 4A 53  52 20 4C 4F 41 44 0D 20  |      JSR LOAD. |
00000420: 20 20 20 20 20 20 20 20  52 54 53 0D 3B 2D 2D 2D  |        RTS.;---|
00000430: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000440: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000450: 2D 2D 2D 2D 0D 4B 45 59  20 20 20 20 20 20 4A 53  |----.KEY      JS|
00000460: 52 20 24 46 46 45 34 0D  20 20 20 20 20 20 20 20  |R $FFE4.        |
00000470: 20 42 45 51 20 4B 45 59  0D 20 20 20 20 20 20 20  | BEQ KEY.       |
00000480: 20 20 52 54 53 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  |  RTS.;---------|
00000490: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000004A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 0D 4E  |--------------.N|
000004B0: 41 4D 45 20 20 20 20 20  2E 54 45 58 54 20 22 53  |AME     .TEXT "S|
000004C0: 50 52 49 54 45 22 0D 0D                           |PRITE"..        |
..         *= $2000...FILPAR   = $FFBA.F
ILNAM   = $FFBD.LOAD     = $FFD5.SAVE   
  = $FFD8.V        = $D000...         JS
R $E544.         LDX #$40.         LDA #
$FF.LOOP     STA $2FFF,X.         DEX.  
       BNE LOOP.;-----------------------
----------------.SPINIT   LDA #$64.     
    STA V.         STA V+1.         STA 
V+2.         LDA #$96.         STA V+3. 
        LDA #$03.         STA V+21.     
    LDA #$C0.         STA 2040.         
LDA #$C1.         STA 2041.         JSR 
KEY.;-----------------------------------
----.SAVING   LDX #$08.         JSR FILP
AR.         LDX #<(NAME).         LDY #>
(NAME).         LDA #$06.         JSR FI
LNAM.         LDX #$00.         LDY #$30
.         STX $FB.         STY $FC.     
    LDA #$FB.         LDX #$41.         
LDY #$30.         JSR SAVE.         JSR 
KEY.;-----------------------------------
----.LOADING  LDX #$08.         LDY #$00
.         JSR FILPAR.         LDX #<(NAM
E).         LDY #>(NAME).         LDA #$
06.         JSR FILNAM.         LDA #$00
.         LDX #$40.         LDY #$30.   
      JSR LOAD.         RTS.;-----------
----------------------------.KEY      JS
R $FFE4.         BEQ KEY.         RTS.;-
--------------------------------------.N
AME     .TEXT "SPRITE"..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL