SPRITE EDITOR
FILE INFORMATION
FILENAME(S): SPRITE EDITOR
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-12-02 23:08:22
APPEARS ON: 1 disk(s)
FILE HASH
5103773c95e2b14606fa9e1641f0d1ce62ec2150b0554118ec2b3d98cf5b2e25
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COPY SIEBEN | SPRITE EDITOR | PRG | swasti, flohmarkt, swasti, misc | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 04 00 86 58 24 28 37 2C 32 31 29 2C |..A....X$(7,21),| 00000010: 58 28 37 2C 33 2C 32 31 29 3A 44 44 24 B2 22 11 |X(7,3,21):DD$.".| 00000020: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000030: 11 11 11 11 11 11 11 22 3A 9F 31 35 2C 38 2C 31 |.......":.15,8,1| 00000040: 35 00 86 08 05 00 99 22 93 11 11 11 11 1D 12 53 |5......".......S| 00000050: 50 52 49 54 45 20 47 45 4E 45 52 49 45 52 55 4E |PRITE GENERIERUN| 00000060: 47 22 3A 99 22 11 11 11 1D 12 31 92 20 4C 45 53 |G":.".....1. LES| 00000070: 45 4E 20 45 49 4E 45 52 20 53 50 52 49 54 45 20 |EN EINER SPRITE | 00000080: 44 41 54 45 49 22 00 D0 08 06 00 8D 31 31 30 30 |DATEI"......1100| 00000090: 3A 99 22 11 1D 12 32 92 20 47 45 4E 45 52 49 45 |:."...2. GENERIE| 000000A0: 52 45 4E 20 56 4F 4E 20 53 50 52 49 54 45 53 22 |REN VON SPRITES"| 000000B0: 3A 4C 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 |:LL$." | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "| 000000D0: 00 07 09 08 00 85 22 11 20 20 20 20 20 20 4E 52 |......". NR| 000000E0: 2E 20 20 20 32 9D 9D 9D 22 3B 4A 24 3A 4A B2 C5 |. 2...";J$:J..| 000000F0: 28 4A 24 29 3A 8B 4A B3 31 B0 4A B1 32 A7 99 22 |(J$):.J.1.J.2.."| 00000100: 91 91 91 22 3A 89 38 00 20 09 09 00 85 22 11 11 |...":.8. ...."..| 00000110: 1D 44 41 54 45 49 4E 41 4D 45 20 20 22 3B 41 24 |.DATEINAME ";A$| 00000120: 00 2E 09 0A 00 8B 4A B2 31 A7 8D 35 30 30 00 6E |......J.1..500.n| 00000130: 09 0B 00 99 22 93 11 11 11 11 1D 53 50 52 49 54 |...."......SPRIT| 00000140: 45 20 47 45 4E 45 52 49 45 52 55 4E 47 22 3A 99 |E GENERIERUNG":.| 00000150: 22 11 11 1D 42 49 53 20 5A 55 20 38 20 53 50 52 |"...BIS ZU 8 SPR| 00000160: 49 54 45 53 20 4D 4F 45 47 4C 49 43 48 22 00 AA |ITES MOEGLICH"..| 00000170: 09 0C 00 85 22 11 11 11 1D 53 50 52 49 54 45 20 |...."....SPRITE | 00000180: 4E 52 2E 20 28 30 2D 37 29 20 22 3B 53 24 3A 53 |NR. (0-7) ";S$:S| 00000190: B2 C5 28 53 24 29 3A 8B 53 B3 30 B0 53 B1 37 A7 |..(S$):.S.0.S.7.| 000001A0: 99 22 91 91 91 22 3A 89 31 32 00 EF 09 0F 00 99 |."...":.12......| 000001B0: 22 93 20 20 20 20 20 20 20 31 20 20 20 20 20 20 |". 1 | 000001C0: 32 20 20 20 20 20 20 20 33 20 20 20 20 20 22 3A |2 3 ":| 000001D0: 99 22 20 20 20 20 20 20 20 20 20 38 20 32 20 20 |." 8 2 | 000001E0: 20 20 20 38 20 32 20 20 20 20 20 38 20 32 22 00 | 8 2 8 2".| 000001F0: 15 0A 10 00 99 22 20 20 20 20 20 20 20 20 20 20 |....." | 00000200: 34 20 31 20 20 20 20 20 34 20 31 20 20 20 20 20 |4 1 4 1 | 00000210: 34 20 31 20 22 00 4D 0A 28 00 81 49 B2 31 A4 32 |4 1 ".M.(..I.1.2| 00000220: 31 3A 99 49 3B A3 34 29 3B 22 BF 22 58 24 28 53 |1:.I;.4);"."X$(S| 00000230: 2C 49 29 3A 82 3A 99 22 13 11 11 11 1D 1D 1D 1D |,I):.:."........| 00000240: 1D 22 3B 3A 50 5A B2 31 3A 50 53 B2 31 00 8A 0A |.";:PZ.1:PS.1...| 00000250: 32 00 50 4F B2 31 30 32 34 AA 28 50 5A AA 32 29 |2.PO.1024.(PZ.2)| 00000260: AC 34 30 AA 50 53 AA 34 3A 97 50 4F 2C C2 28 50 |.40.PS.4:.PO,.(P| 00000270: 4F 29 B0 31 32 38 3A 97 50 4F AA 35 34 32 37 32 |O).128:.PO.54272| 00000280: 2C 31 37 3A 97 32 30 34 2C 30 00 9C 0A 33 00 A1 |,17:.204,0...3..| 00000290: 4A 24 3A 8B 4A 24 B2 22 22 A7 35 31 00 B5 0A 37 |J$:.J$."".51...7| 000002A0: 00 97 32 30 34 2C 31 3A 97 50 4F 2C C2 28 50 4F |..204,1:.PO,.(PO| 000002B0: 29 AF 31 32 37 00 F0 0A 3C 00 41 B2 C6 28 4A 24 |).127...<.A..(J$| 000002C0: 29 3A 8B 41 B2 32 39 B0 41 B2 33 32 A7 50 53 B2 |):.A.29.A.32.PS.| 000002D0: 50 53 AA 31 3A 99 4A 24 3B 3A 8B 50 53 B1 32 34 |PS.1:.J$;:.PS.24| 000002E0: A7 50 53 B2 32 34 3A 99 22 9D 22 3B 3A 89 35 30 |.PS.24:.".";:.50| 000002F0: 00 1D 0B 46 00 8B 41 B2 31 35 37 A7 50 53 B2 50 |...F..A.157.PS.P| 00000300: 53 AB 31 3A 99 4A 24 3B 3A 8B 50 53 B3 31 A7 50 |S.1:.J$;:.PS.1.P| 00000310: 53 B2 31 3A 99 22 1D 22 3B 3A 89 35 30 00 4B 0B |S.1:.".";:.50.K.| 00000320: 50 00 8B 41 B2 31 37 A7 50 5A B2 50 5A AA 31 3A |P..A.17.PZ.PZ.1:| 00000330: 99 4A 24 3B 3A 8B 50 5A B1 32 31 A7 50 5A B2 32 |.J$;:.PZ.21.PZ.2| 00000340: 31 3A 99 22 91 22 3B 3A 89 35 30 00 78 0B 5A 00 |1:.".";:.50.x.Z.| 00000350: 8B 41 B2 31 34 35 A7 50 5A B2 50 5A AB 31 3A 99 |.A.145.PZ.PZ.1:.| 00000360: 4A 24 3B 3A 8B 50 5A B3 31 A7 50 5A B2 31 3A 99 |J$;:.PZ.1.PZ.1:.| 00000370: 22 11 22 3B 3A 89 35 30 00 9E 0B 64 00 8B 41 B2 |".";:.50...d..A.| 00000380: 31 39 A7 99 22 13 11 11 11 1D 1D 1D 1D 1D 22 3B |19..".........";| 00000390: 3A 50 5A B2 31 3A 50 53 B2 31 3A 89 35 30 00 CF |:PZ.1:PS.1:.50..| 000003A0: 0B 6E 00 8B 41 B2 31 33 AF 50 53 B3 32 35 A7 99 |.n..A.13.PS.25..| 000003B0: 22 A6 22 3B 3A 50 53 B2 50 53 AA 31 3A 8B 50 53 |".";:PS.PS.1:.PS| 000003C0: B1 32 34 A7 50 53 B2 32 34 3A 99 22 9D 22 3B 00 |.24.PS.24:.".";.| 000003D0: F2 0B 78 00 8B 41 B2 31 34 AF 50 53 B1 31 A7 99 |..x..A.14.PS.1..| 000003E0: 22 9D A6 9D 22 3B 3A 50 53 B2 50 53 AB 31 3A 89 |"...";:PS.PS.1:.| 000003F0: 35 30 00 25 0C 82 00 8B 41 B2 31 33 33 AF 50 5A |50.%....A.133.PZ| 00000400: B3 32 31 A7 99 22 13 22 C8 28 44 44 24 2C 50 5A |.21..".".(DD$,PZ| 00000410: AA 33 29 3B A3 35 29 3B 3A 50 5A B2 50 5A AA 31 |.3);.5);:PZ.PZ.1| 00000420: 3A 50 53 B2 31 00 33 0C 8C 00 8B 41 B2 36 39 A7 |:PS.1.3....A.69.| 00000430: 32 30 30 00 5C 0C 96 00 8B 41 B2 31 33 37 A7 99 |200.\....A.137..| 00000440: C8 28 4C 4C 24 2C 32 35 AB 50 53 29 3A 99 22 91 |.(LL$,25.PS):.".| 00000450: 22 A3 50 53 AA 34 29 3B 3A 89 35 30 00 80 0C A0 |".PS.4);:.50....| 00000460: 00 8B 41 B2 31 34 30 A7 81 49 B2 31 A4 32 31 3A |..A.140..I.1.21:| 00000470: 58 24 28 53 2C 49 29 B2 22 22 3A 82 3A 89 31 35 |X$(S,I)."":.:.15| 00000480: 00 88 0C BE 00 89 35 30 00 B6 0C C8 00 97 32 30 |......50......20| 00000490: 34 2C 31 3A 99 22 13 11 11 11 22 3B 3A 9F 31 2C |4,1:."....";:.1,| 000004A0: 33 3A 81 49 B2 31 A4 32 31 3A 99 A3 34 29 3B C7 |3:.I.1.21:..4);.| 000004B0: 28 33 34 29 3A 82 00 D1 0C D2 00 99 22 13 11 11 |(34):......."...| 000004C0: 11 22 3B 3A 81 49 B2 31 A4 32 31 3A 99 A3 33 29 |.";:.I.1.21:..3)| 000004D0: 3B 00 02 0D DC 00 84 31 2C 58 24 28 53 2C 49 29 |;......1,X$(S,I)| 000004E0: 3A 82 3A 99 22 93 22 3A 81 49 B2 31 A4 32 31 3A |:.:.".":.I.1.21:| 000004F0: 99 58 24 28 53 2C 49 29 3A 82 3A A0 31 3A 8D 37 |.X$(S,I):.:.1:.7| 00000500: 30 30 00 3A 0D E6 00 85 22 11 20 20 20 12 57 92 |00.:....". .W.| 00000510: 45 49 54 45 52 20 20 20 20 20 20 12 45 92 4E 44 |EITER .E.ND| 00000520: 45 20 3D 20 41 42 53 50 45 49 43 48 45 52 4E 20 |E = ABSPEICHERN | 00000530: 20 20 57 9D 9D 9D 22 3B 4A 24 00 51 0D EB 00 97 | W...";J$.Q....| 00000540: 56 AA 32 31 2C 30 3A 8B 4A 24 B2 22 57 22 A7 31 |V.21,0:.J$."W".1| 00000550: 31 00 6D 0D F0 00 8B 4A 24 B2 22 45 22 A7 99 22 |1.m....J$."E".."| 00000560: 91 22 4C 4C 24 22 91 22 3A 89 32 36 30 00 7D 0D |."LL$".":.260.}.| 00000570: FA 00 99 22 91 91 91 22 3A 89 32 33 30 00 A4 0D |..."...":.230...| 00000580: 04 01 99 22 20 44 41 54 45 49 4E 41 4D 45 20 20 |..." DATEINAME | 00000590: 20 20 20 22 41 24 3A 99 22 91 22 A3 31 33 29 3B | "A$:.".".13);| 000005A0: 3A 85 41 24 00 DC 0D 09 01 9F 31 2C 38 2C 32 2C |:.A$......1,8,2,| 000005B0: 22 40 3A 22 AA 41 24 AA 22 53 2C 57 22 3A 81 53 |"@:".A$."S,W":.S| 000005C0: B2 30 A4 37 3A 81 49 B2 31 A4 32 31 3A 98 31 2C |.0.7:.I.1.21:.1,| 000005D0: C7 28 33 34 29 58 24 28 53 2C 49 29 00 FD 0D 0E |.(34)X$(S,I)....| 000005E0: 01 81 4A B2 31 A4 33 3A 98 31 2C 58 28 53 2C 4A |..J.1.3:.1,X(S,J| 000005F0: 2C 49 29 3A 82 4A 2C 49 2C 53 3A A0 31 00 38 0E |,I):.J,I,S:.1.8.| 00000600: 18 01 99 22 91 22 C8 28 4C 4C 24 2C 33 39 29 22 |...".".(LL$,39)"| 00000610: 91 22 3A 85 22 20 20 20 12 57 92 45 49 54 45 52 |.":." .W.EITER| 00000620: 20 20 20 20 20 20 12 45 92 4E 44 45 20 20 20 20 | .E.NDE | 00000630: 45 9D 9D 9D 22 3B 4A 24 00 47 0E 36 01 8B 4A 24 |E...";J$.G.6..J$| 00000640: B3 B1 22 57 22 A7 80 00 4E 0E 40 01 89 35 00 7E |.."W"...N.@..5.~| 00000650: 0E F4 01 9F 31 2C 38 2C 32 2C 41 24 AA 22 53 2C |....1,8,2,A$."S,| 00000660: 52 22 3A 8D 39 30 30 3A 8B 46 B2 36 32 A7 99 22 |R":.900:.F.62.."| 00000670: 11 22 4C 4C 24 22 91 91 22 3A 89 35 30 30 00 B6 |."LL$"..":.500..| 00000680: 0E FE 01 81 53 B2 30 A4 37 3A 81 49 B2 31 A4 32 |....S.0.7:.I.1.2| 00000690: 31 3A 84 31 2C 58 24 28 53 2C 49 29 3A 81 4A B2 |1:.1,X$(S,I):.J.| 000006A0: 31 A4 33 3A 84 31 2C 58 28 53 2C 4A 2C 49 29 3A |1.3:.1,X(S,J,I):| 000006B0: 82 4A 2C 49 2C 53 00 BF 0E 08 02 A0 31 3A 8E 00 |.J,I,S......1:..| 000006C0: E7 0E BC 02 81 49 B2 31 A4 32 31 3A 81 4A B2 33 |.....I.1.21:.J.3| 000006D0: A4 31 A9 AB 31 3A 58 28 53 2C 4A 2C 49 29 B2 30 |.1..1:X(S,J,I).0| 000006E0: 3A 81 59 B2 30 A4 37 00 19 0F E4 02 8B CA 28 58 |:.Y.0.7.......(X| 000006F0: 24 28 53 2C 49 29 2C 38 AC 4A AB 59 2C 31 29 B2 |$(S,I),8.J.Y,1).| 00000700: 22 A6 22 A7 58 28 53 2C 4A 2C 49 29 B2 58 28 53 |".".X(S,J,I).X(S| 00000710: 2C 4A 2C 49 29 AA 32 AE 59 00 38 0F EE 02 82 59 |,J,I).2.Y.8....Y| 00000720: 2C 4A 2C 49 3A 99 22 91 22 4C 4C 24 22 91 91 22 |,J,I:."."LL$".."| 00000730: 3A 8D 31 30 30 30 3A 8E 00 65 0F F8 02 99 22 93 |:.1000:..e....".| 00000740: 22 3A 81 49 B2 31 A4 32 31 3A 58 24 28 53 2C 49 |":.I.1.21:X$(S,I| 00000750: 29 B2 22 22 3A 81 4A B2 31 A4 33 3A 81 59 B2 37 |)."":.J.1.3:.Y.7| 00000760: A4 30 A9 AB 31 00 97 0F 02 03 49 8B 58 28 53 2C |.0..1.....I.X(S,| 00000770: 4A 2C 49 29 AF 32 AE 59 A7 58 24 28 53 2C 49 29 |J,I).2.Y.X$(S,I)| 00000780: B2 58 24 28 53 2C 49 29 AA 22 A6 22 3A 99 22 A6 |.X$(S,I).".":.".| 00000790: 22 3B 3A 89 38 32 30 00 B5 0F 2A 03 58 24 28 53 |";:.820...*.X$(S| 000007A0: 2C 49 29 B2 58 24 28 53 2C 49 29 AA 22 20 22 3A |,I).X$(S,I)." ":| 000007B0: 99 22 20 22 3B 00 C5 0F 34 03 82 59 2C 4A 3A 99 |." ";...4..Y,J:.| 000007C0: 3A 82 49 3A 8E 00 E2 0F 84 03 84 31 35 2C 46 2C |:.I:.......15,F,| 000007D0: 46 31 24 2C 46 32 24 2C 46 33 24 3A 8B 46 B2 30 |F1$,F2$,F3$:.F.0| 000007E0: A7 8E 00 1E 10 8E 03 8B 46 B2 36 32 A7 99 22 11 |........F.62..".| 000007F0: 44 41 54 45 49 20 4E 49 43 48 54 20 56 4F 52 48 |DATEI NICHT VORH| 00000800: 41 4E 44 45 4E 91 91 91 22 3A A0 31 3A 85 22 44 |ANDEN...":.1:."D| 00000810: 41 54 45 49 4E 41 4D 45 22 3B 41 24 3A 8E 00 44 |ATEINAME";A$:..D| 00000820: 10 98 03 99 22 11 46 4C 4F 50 50 59 20 46 45 48 |....".FLOPPY FEH| 00000830: 4C 45 52 20 21 22 3A 81 49 B2 31 A4 32 35 30 30 |LER !":.I.1.2500| 00000840: 3A 82 3A 8A 00 71 10 E8 03 4E B2 30 3A 81 49 B2 |:.:..q...N.0:.I.| 00000850: 31 A4 32 31 3A 81 4A B2 31 A4 33 3A 97 38 33 32 |1.21:.J.1.3:.832| 00000860: AA 4E 2C 58 28 53 2C 4A 2C 49 29 3A 4D B2 4D AA |.N,X(S,J,I):M.M.| 00000870: 31 00 85 10 F2 03 82 4A 2C 49 3A 97 56 AA 32 31 |1......J,I:.V.21| 00000880: 2C 36 30 3A 8E 00 C0 10 4C 04 56 B2 35 33 32 34 |,60:....L.V.5324| 00000890: 38 3A 97 56 AA 31 36 2C 36 30 3A 81 49 B2 32 A4 |8:.V.16,60:.I.2.| 000008A0: 35 3A 97 32 30 34 30 AA 49 2C 31 33 3A 82 3A 81 |5:.2040.I,13:.:.| 000008B0: 49 B2 34 A4 31 30 A9 32 3A 97 56 AA 49 2C 31 30 |I.4.10.2:.V.I,10| 000008C0: 00 E5 10 56 04 82 3A 59 B2 36 30 3A 81 49 B2 35 |...V..:Y.60:.I.5| 000008D0: A4 31 31 A9 32 3A 97 56 AA 49 2C 59 3A 59 B2 59 |.11.2:.V.I,Y:Y.Y| 000008E0: AA 34 30 3A 82 00 0F 11 60 04 81 49 B2 34 31 A4 |.40:....`..I.41.| 000008F0: 34 34 3A 97 56 AA 49 2C 31 3A 82 3A 97 56 AA 32 |44:.V.I,1:.:.V.2| 00000900: 33 2C 34 38 3A 97 56 AA 32 39 2C 34 30 3A 8E 00 |3,48:.V.29,40:..| 00000910: 00 00 |.. |
..A....X$(7,21),X(7,3,21):DD$.".........
...............":.15,8,15......".......S
PRITE GENERIERUNG":.".....1. LESEN EINER
SPRITE DATEI".P....1100:."...2. GENERIE
REN VON SPRITES":LL$."
"......". NR. 2...";J$:J.E
(J$):.J.1.J.2.."...":.8. ...."...DATEINA
ME ";A$......J.1..500.N...."......SPRIT
E GENERIERUNG":."...BIS ZU 8 SPRITES MOE
GLICH"......"....SPRITE NR. (0-7) ";S$:S
.E(S$):.S.0.S.7.."...":.12......".
1 2 3 ":." 8 2
8 2 8 2"......" 4 1
4 1 4 1 ".M.(..I.1.21:.I;.4);"."X$(S
,I):.:.".........";:PZ.1:PS.1...2.PO.102
4.(PZ.2).40.PS.4:.PO,B(PO).128:.PO.54272
,17:.204,0...3..J$:.J$."".51...7..204,1:
.PO,B(PO).127...<.A.F(J$):.A.29.A.32.PS.
PS.1:.J$;:.PS.24.PS.24:.".";:.50...F..A.
157.PS.PS.1:.J$;:.PS.1.PS.1:.".";:.50.K.
P..A.17.PZ.PZ.1:.J$;:.PZ.21.PZ.21:.".";:
.50.X.Z..A.145.PZ.PZ.1:.J$;:.PZ.1.PZ.1:.
".";:.50...D..A.19..".........";:PZ.1:PS
.1:.50.O.N..A.13.PS.25..".";:PS.PS.1:.PS
.24.PS.24:.".";...X..A.14.PS.1.."...";:P
S.PS.1:.50.%....A.133.PZ.21.."."H(DD$,PZ
.3);.5);:PZ.PZ.1:PS.1.3....A.69.200.\...
.A.137..H(LL$,25.PS):.".".PS.4);:.50...
..A.140..I.1.21:X$(S,I)."":.:.15......50
...H..204,1:."....";:.1,3:.I.1.21:..4);G
(34):..Q.R.."....";:.I.1.21:..3);......1
,X$(S,I):.:.".":.I.1.21:.X$(S,I):.: 1:.7
00.:....". .W.EITER .E.NDE = ABSP
EICHERN W...";J$.Q....V.21,0:.J$."W".1
1.M....J$."E".."."LL$".":.260.}...."..."
:.230......" DATEINAME "A$:.".".13);
:.A$......1,8,2,"@:".A$."S,W":.S.0.7:.I.
1.21:.1,G(34)X$(S,I)......J.1.3:.1,X(S,J
,I):.J,I,S: 1.8...."."H(LL$,39)".":."
.W.EITER .E.NDE E...";J$.G.6..J$
.."W"...N.@..5.~....1,8,2,A$."S,R":.900:
.F.62.."."LL$"..":.500......S.0.7:.I.1.2
1:.1,X$(S,I):.J.1.3:.1,X(S,J,I):.J,I,S..
... 1:.......I.1.21:.J.3.1..1:X(S,J,I).0
:.Y.0.7......J(X$(S,I),8.J.Y,1).".".X(S,
J,I).X(S,J,I).2.Y.8....Y,J,I:."."LL$".."
:.1000:..E....".":.I.1.21:X$(S,I)."":.J.
1.3:.Y.7.0..1.....I.X(S,J,I).2.Y.X$(S,I)
.X$(S,I).".":.".";:.820...*.X$(S,I).X$(S
,I)." ":." ";.E.4..Y,J:.:.I:.......15,F,
F1$,F2$,F3$:.F.0........F.62..".DATEI NI
CHT VORHANDEN...": 1:."DATEINAME";A$:..D
....".FLOPPY FEHLER !":.I.1.2500:.:..Q..
.N.0:.I.1.21:.J.1.3:.832.N,X(S,J,I):M.M.
1......J,I:.V.21,60:....L.V.53248:.V.16,
60:.I.2.5:.2040.I,13:.:.I.4.10.2:.V.I,10
...V..:Y.60:.I.5.11.2:.V.I,Y:Y.Y.40:....
`..I.41.44:.V.I,1:.:.V.23,48:.V.29,40:..
..
> CLICK IMAGE PREVIEW FOR FULL MODAL