HORA
FILE INFORMATION
FILENAME(S): HORA
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-12-01 01:10:17
APPEARS ON: 1 disk(s)
FILE HASH
be303d969a732521eef553000c52379c1e26a5361a0fa0924a65fee05c705e7e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAME DISK | HORA | PRG | hedning, Martin L0fgren | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 C1 07 9E 32 30 37 33 20 54 43 53 2D |.......2073 TCS-|
00000010: 43 52 55 4E 43 48 21 00 00 00 A9 36 85 01 4C 82 |CRUNCH!....6..L.|
00000020: 10 45 31 3A 53 41 56 45 22 30 3A 48 4F 52 41 22 |.E1:SAVE"0:HORA"|
00000030: 2C 38 3A 56 45 52 49 46 59 22 48 4F 52 41 22 2C |,8:VERIFY"HORA",|
00000040: 38 3A 52 45 4D 20 31 37 2E 39 2E 38 36 00 71 08 |8:REM 17.9.86.q.|
00000050: 14 00 81 50 B2 38 31 39 32 A4 38 31 39 32 AA 31 |...P.8192.8192.1|
00000060: 37 3A 87 45 3A 97 50 2C 45 3A 82 3A 9E 38 31 39 |7:.E:.P,E:.:.819|
00000070: 32 00 B2 08 1E 00 83 31 32 30 2C 31 36 39 2C 34 |2......120,169,4|
00000080: 39 2C 31 34 31 2C 32 30 2C 33 2C 31 36 39 2C 32 |9,141,20,3,169,2|
00000090: 33 34 2C 31 34 31 2C 32 31 2C 33 2C 31 36 39 2C |34,141,21,3,169,|
000000A0: 32 33 32 2C 31 34 31 2C 34 30 2C 33 2C 38 38 2C |232,141,40,3,88,|
000000B0: 39 36 00 D0 08 28 00 97 37 39 32 2C 30 3A 97 37 |96...(..792,0:.7|
000000C0: 39 33 2C 31 39 32 3A 97 34 39 31 35 32 2C 36 34 |93,192:.49152,64|
000000D0: 00 E7 08 32 00 97 35 33 32 38 30 2C 36 3A 97 35 |...2..53280,6:.5|
000000E0: 33 32 38 31 2C 31 35 00 1A 09 37 00 4C 24 B2 22 |3281,15...7.L$."|
000000F0: 12 20 28 FF 22 00 4C 09 3C 00 99 22 93 11 1C B0 |. (.".L.<.."....|
00000100: C0 25 FF AE 22 00 7F 09 46 00 99 22 DD 20 12 1F |.%.."...F..". ..|
00000110: 20 0B FF 45 52 53 54 45 20 53 43 48 52 49 54 54 | ..ERSTE SCHRITT|
00000120: 45 20 0A FF 1C 92 20 DD 22 00 B0 09 50 00 99 22 |E .... ."...P.."|
00000130: 1C AD C0 25 FF BD 1F 22 00 D1 09 5A 00 99 22 11 |...%..."...Z..".|
00000140: 20 0E FF 48 41 55 50 54 2D 4D 45 4E 55 45 00 FD | ..HAUPT-MENUE..|
00000150: 09 64 00 99 22 11 11 1C 20 07 FF B0 C0 13 FF C3 |.d.."... .......|
00000160: C0 05 FF AE 00 26 0A 6E 00 99 22 20 07 FF DD 20 |.....&.n.." ... |
00000170: 19 FF DD 00 51 0A 78 00 99 22 20 07 FF DD 1F 20 |....Q.x.." .... |
00000180: 54 41 53 54 41 54 55 52 20 2F 20 46 41 52 42 45 |TASTATUR / FARBE|
00000190: 4E 20 05 FF 31 1C 20 DD 00 7C 0A 82 00 99 22 20 |N ..1. ..|...." |
000001A0: 07 FF DD 1F 20 50 52 49 4E 54 2D 42 45 46 45 48 |.... PRINT-BEFEH|
000001B0: 4C 20 0A FF 32 1C 20 DD 00 A7 0A 8C 00 99 22 20 |L ..2. ......." |
000001C0: 07 FF DD 1F 20 56 41 52 49 41 42 4C 45 4E 20 2F |.... VARIABLEN /|
000001D0: 20 53 43 48 4C 45 49 46 45 4E 20 33 1C 20 DD 00 | SCHLEIFEN 3. ..|
000001E0: D2 0A 96 00 99 22 20 07 FF DD 1F 20 4C 4F 41 44 |....." .... LOAD|
000001F0: 2F 53 41 56 45 20 44 49 53 4B 45 54 54 45 4E 20 |/SAVE DISKETTEN |
00000200: 03 FF 34 1C 20 DD 00 FD 0A A0 00 99 22 20 07 FF |..4. ......." ..|
00000210: DD 1F 20 4C 4F 41 44 2F 53 41 56 45 20 4B 41 53 |.. LOAD/SAVE KAS|
00000220: 53 45 54 54 45 4E 20 03 FF 35 1C 20 DD 00 28 0B |SETTEN ..5. ..(.|
00000230: BE 00 99 22 20 07 FF DD 1F 20 45 4E 44 45 20 12 |..." .... ENDE .|
00000240: FF 45 1C 20 DD 00 51 0B C8 00 99 22 20 07 FF AD |.E. ..Q...." ...|
00000250: C0 16 FF C3 C0 C0 BD 00 74 0B D2 00 99 22 11 11 |........t...."..|
00000260: 20 0D FF 56 4F 4E 20 4A 55 41 4E 20 48 4F 4C 5A | ..VON JUAN HOLZ|
00000270: 00 A6 0B DC 00 99 22 11 11 1C B0 C0 25 FF AE 22 |......".....%.."|
00000280: 00 D9 0B E6 00 99 22 DD 20 12 1F 20 05 FF 47 45 |......". .. ..GE|
00000290: 57 55 45 4E 53 43 48 54 45 20 54 41 53 54 45 20 |WUENSCHTE TASTE |
000002A0: 44 52 55 45 43 4B 45 4E 2E 20 03 FF 1C 92 20 DD |DRUECKEN. .... .|
000002B0: 22 00 18 0C F0 00 99 22 1C AD C0 25 FF BD 22 3B |"......"...%..";|
000002C0: 3A 97 31 39 38 2C 30 3A 45 53 B2 31 39 37 00 2B |:.198,0:ES.197.+|
000002D0: 0C 04 01 A1 47 24 3A 8B 47 24 B2 22 22 A7 32 36 |....G$:.G$."".26|
000002E0: 30 00 5A 0C 0E 01 8B 47 24 B2 22 31 22 A7 41 24 |0.Z....G$."1".A$|
000002F0: B2 22 31 22 3A 42 24 B2 22 54 41 53 54 41 54 55 |."1":B$."TASTATU|
00000300: 52 20 2F 20 46 41 52 42 45 4E 22 3A 89 33 36 30 |R / FARBEN":.360|
00000310: 00 84 0C 18 01 8B 47 24 B2 22 32 22 A7 41 24 B2 |......G$."2".A$.|
00000320: 22 32 22 3A 42 24 B2 22 50 52 49 4E 54 2D 42 45 |"2":B$."PRINT-BE|
00000330: 46 45 48 4C 22 3A 89 33 36 30 00 B7 0C 22 01 8B |FEHL":.360..."..|
00000340: 47 24 B2 22 33 22 A7 41 24 B2 22 33 22 3A 42 24 |G$."3".A$."3":B$|
00000350: B2 22 56 41 52 49 41 42 4C 45 4E 20 2F 20 53 43 |."VARIABLEN / SC|
00000360: 48 4C 45 49 46 45 4E 22 3A 89 33 36 30 00 CA 0C |HLEIFEN":.360...|
00000370: 2C 01 8B 47 24 B2 22 45 22 A7 9E 36 34 37 33 38 |,..G$."E"..64738|
00000380: 00 F6 0C 36 01 8B 47 24 B2 22 34 22 A7 41 24 B2 |...6..G$."4".A$.|
00000390: 22 34 22 3A 42 24 B2 22 46 4C 4F 50 50 59 2D 42 |"4":B$."FLOPPY-B|
000003A0: 45 46 45 48 4C 45 22 3A 89 33 36 30 00 25 0D 40 |EFEHLE":.360.%.@|
000003B0: 01 8B 47 24 B2 22 35 22 A7 41 24 B2 22 35 22 3A |..G$."5".A$."5":|
000003C0: 42 24 B2 22 4B 41 53 53 45 54 54 45 4E 2D 42 45 |B$."KASSETTEN-BE|
000003D0: 46 45 48 4C 45 22 3A 89 33 36 30 00 2E 0D 5E 01 |FEHLE":.360...^.|
000003E0: 89 32 36 30 00 64 0D 68 01 58 24 B2 22 45 52 53 |.260.d.h.X$."ERS|
000003F0: 54 45 20 53 43 48 52 49 54 54 45 20 22 AA 41 24 |TE SCHRITTE ".A$|
00000400: 3A A0 31 35 3A 9F 31 35 2C 38 2C 31 35 3A A0 33 |:.15:.15,8,15:.3|
00000410: 3A 9F 33 2C 38 2C 33 2C 58 24 00 7F 0D 6D 01 84 |:.3,8,3,X$...m..|
00000420: 31 35 2C 45 2C 4D 24 3A A0 33 3A 8B 45 B1 32 30 |15,E,M$:.3:.E.20|
00000430: A7 32 31 36 35 00 97 0D 72 01 99 22 93 11 0E FF |.2165...r.."....|
00000440: 22 3B 00 CA 0D 7C 01 4C 24 B2 22 12 20 28 FF 22 |";...|.L$.". (."|
00000450: 00 FD 0D 86 01 44 31 24 B2 22 20 06 FF 49 43 48 |.....D1$." ..ICH|
00000460: 20 4C 41 44 45 20 44 49 45 20 4C 45 4B 54 49 4F | LADE DIE LEKTIO|
00000470: 4E 20 0E FF 22 00 0A 0E 8B 01 59 24 B2 C7 28 33 |N ..".....Y$..(3|
00000480: 34 29 00 49 0E 90 01 44 33 24 B2 22 20 06 FF 22 |4).I...D3$." .."|
00000490: AA 59 24 AA 42 24 AA 59 24 AA 22 2E 20 22 3A 44 |.Y$.B$.Y$.". ":D|
000004A0: 33 B2 C3 28 44 33 24 29 3A 44 34 24 B2 44 33 24 |3..(D3$):D4$.D3$|
000004B0: AA C9 28 4C 24 2C 28 34 30 AB 44 33 29 29 00 89 |..(L$,(40.D3))..|
000004C0: 0E 9A 01 99 4B 24 4C 24 44 31 24 4C 24 44 34 24 |....K$L$D1$L$D4$|
000004D0: 4C 24 22 20 06 FF 42 49 54 54 45 20 57 41 52 54 |L$" ..BITTE WART|
000004E0: 45 4E 20 16 FF 22 4C 24 00 93 0E 2A 08 99 22 13 |EN .."L$...*..".|
000004F0: 22 3B 00 A2 0E 3E 08 8F 20 4C 4F 41 44 58 24 2C |";...>.. LOADX$,|
00000500: 38 00 D9 0E 48 08 99 22 13 9B 50 CF 34 34 2C 38 |8...H.."..P.44,8|
00000510: 3A 50 CF 34 33 2C 31 3A 50 CF 38 30 38 2C 32 33 |:P.43,1:P.808,23|
00000520: 37 3A 50 CF 35 32 2C 31 36 30 3A 50 CF 35 36 2C |7:P.52,160:P.56,|
00000530: 31 36 30 3A 4E 45 57 22 00 F8 0E 52 08 99 22 11 |160:NEW"...R..".|
00000540: 11 4C CF 22 C7 28 33 34 29 3B 58 24 3B C7 28 33 |.L.".(34);X$;.(3|
00000550: 34 29 3B 22 2C 38 22 00 07 0F 5C 08 99 22 11 04 |4);",8"...\.."..|
00000560: FF 52 55 4E 22 00 32 0F 66 08 97 31 39 38 2C 34 |.RUN".2.f..198,4|
00000570: 3A 97 36 33 31 2C 31 39 3A 97 36 33 32 2C 31 33 |:.631,19:.632,13|
00000580: 3A 97 36 33 33 2C 31 33 3A 97 36 33 34 2C 31 33 |:.633,13:.634,13|
00000590: 00 38 0F 70 08 80 00 43 0F 75 08 99 22 93 11 11 |.8.p...C.u.."...|
000005A0: 22 00 67 0F 7A 08 99 22 20 20 22 4D 24 22 20 3F |".g.z.." "M$" ?|
000005B0: 20 3F 20 44 49 53 4B 45 54 54 45 20 50 52 55 45 | ? DISKETTE PRUE|
000005C0: 46 45 4E 21 22 00 A0 0F 7B 08 99 22 11 12 22 4C |FEN!"...{..".."L|
000005D0: 24 22 20 20 44 49 45 20 41 55 53 47 45 57 41 45 |$" DIE AUSGEWAE|
000005E0: 48 4C 54 45 20 4C 45 4B 54 49 4F 4E 20 42 45 46 |HLTE LEKTION BEF|
000005F0: 49 4E 44 45 54 20 05 FF 22 4C 24 3B 00 D3 0F 7C |INDET .."L$;...||
00000600: 08 99 22 20 20 53 49 43 48 20 4E 49 43 48 54 20 |.." SICH NICHT |
00000610: 41 55 46 20 44 45 52 20 44 49 53 4B 45 54 54 45 |AUF DER DISKETTE|
00000620: 2E 20 0A FF 22 4C 24 3B 00 06 10 7E 08 99 22 20 |. .."L$;...~.." |
00000630: 20 55 45 42 45 52 50 52 55 45 46 45 4E 20 53 49 | UEBERPRUEFEN SI|
00000640: 45 2C 20 4F 42 20 53 49 45 20 44 49 45 20 0A FF |E, OB SIE DIE ..|
00000650: 22 4C 24 3B 00 39 10 80 08 99 22 20 20 27 45 52 |"L$;.9...." 'ER|
00000660: 53 54 45 20 53 43 48 52 49 54 54 45 27 2D 44 49 |STE SCHRITTE'-DI|
00000670: 53 4B 45 54 54 45 20 49 4E 20 44 41 53 20 06 FF |SKETTE IN DAS ..|
00000680: 22 4C 24 3B 00 6C 10 82 08 99 22 20 20 4C 41 55 |"L$;.l...." LAU|
00000690: 46 57 45 52 4B 20 45 49 4E 47 45 4C 45 47 54 20 |FWERK EINGELEGT |
000006A0: 48 41 42 45 4E 2C 20 44 52 55 45 43 4B 45 4E 20 |HABEN, DRUECKEN |
000006B0: 04 FF 22 4C 24 3B 00 A4 10 83 08 99 22 20 20 53 |.."L$;......" S|
000006C0: 49 45 20 44 41 4E 4E 20 44 49 45 20 52 45 54 55 |IE DANN DIE RETU|
000006D0: 52 4E 2D 54 41 53 54 45 2E 20 0C FF 22 4C 24 3A |RN-TASTE. .."L$:|
000006E0: 8D 32 32 31 30 00 B8 10 84 08 A1 5A 24 3A 8B 5A |.2210......Z$:.Z|
000006F0: 24 B2 22 22 A7 32 31 38 30 00 C9 10 89 08 8B 5A |$."".2180......Z|
00000700: 24 B2 C7 28 31 33 29 A7 36 30 00 D3 10 8E 08 89 |$..(13).60......|
00000710: 32 31 38 30 00 EC 10 A2 08 97 35 34 32 39 36 2C |2180......54296,|
00000720: 31 35 3A 97 35 34 32 37 38 2C 32 34 30 00 03 11 |15:.54278,240...|
00000730: AC 08 81 49 B2 31 A4 31 30 30 3A 97 35 34 32 37 |...I.1.100:.5427|
00000740: 36 2C 31 37 00 31 11 B6 08 97 35 34 32 37 33 2C |6,17.1....54273,|
00000750: 31 30 30 AA 31 30 30 AC BB 28 30 29 3A 82 3A 97 |100.100..(0):.:.|
00000760: 35 34 32 37 33 2C 30 3A 97 35 32 34 39 36 2C 30 |54273,0:.52496,0|
00000770: 3A 8E 00 64 11 CA 08 99 22 93 20 2A FF 22 00 9A |:..d....". *."..|
00000780: 11 DE 08 99 22 1C 22 4C 24 22 20 28 FF 22 3B 00 |...."."L$" (.";.|
00000790: CC 11 E8 08 99 22 20 28 FF 22 4C 24 00 16 12 F2 |....." (."L$....|
000007A0: 08 99 22 90 22 4C 24 22 20 3C FF 22 3B 00 5C 12 |.."."L$" <.";.\.|
000007B0: FC 08 99 22 20 3C FF 22 4C 24 00 A7 12 06 09 99 |..." <."L$......|
000007C0: 22 1C 22 4C 24 22 20 3D FF 22 3B 00 EC 12 10 09 |"."L$" =.";.....|
000007D0: 99 22 20 3B FF 22 4C 24 00 33 13 1A 09 99 22 1F |." ;."L$.3....".|
000007E0: 22 4C 24 22 20 3A FF 22 00 57 13 24 09 99 22 20 |"L$" :.".W.$.." |
000007F0: 1A FF 22 4C 24 00 7E 13 2E 09 99 22 20 1F FF 22 |.."L$.~...." .."|
00000800: 00 89 13 38 09 97 31 39 38 2C 30 00 9D 13 42 09 |...8..198,0...B.|
00000810: A1 58 24 3A 8B 58 24 B2 22 22 A7 32 33 37 30 00 |.X$:.X$."".2370.|
00000820: A3 13 4C 09 8E 00 DA 13 A2 F8 97 35 34 32 39 36 |..L........54296|
00000830: 2C 31 35 3A 97 35 34 32 37 38 2C 32 34 30 3A 97 |,15:.54278,240:.|
00000840: 35 34 32 37 36 2C 31 37 3A 97 35 34 32 37 33 2C |54276,17:.54273,|
00000850: 31 30 30 AA 31 30 30 AC BB 28 30 29 00 FE 13 A4 |100.100..(0)....|
00000860: F8 81 49 58 B2 31 A4 31 30 30 3A 82 3A 97 35 34 |..IX.1.100:.:.54|
00000870: 32 37 33 2C 30 3A 97 35 34 32 39 36 2C 30 3A 8E |273,0:.54296,0:.|
00000880: 00 03 FF A2 00 BD C4 10 9D 10 01 E8 D0 F7 A2 34 |...............4|
00000890: BD 2B 11 9D 00 03 E8 D0 F7 EA EA A2 FF 9A A9 00 |.+..............|
000008A0: 85 2D 38 E9 01 85 FE A9 14 85 2E E9 00 85 FF A9 |.-8.............|
000008B0: 81 85 FC A9 10 85 FD AD 20 D0 85 FB 4C 52 01 00 |........ ...LR..|
000008C0: 00 00 00 00 00 00 4D 08 0A 00 8F 20 4F 50 45 4E |......M.... OPEN|
000008D0: 31 2C 38 2C 31 35 2C 22 53 30 3A 48 4F 52 41 22 |1,8,15,"S0:HORA"|
000008E0: 3A 43 4C 4F 53 48 C6 FC A5 FC C9 FF D0 02 C6 FD |:CLOSH..........|
000008F0: 68 60 48 AD 20 D0 49 01 8D 20 D0 C6 FE A5 FE C9 |h`H. .I.. ......|
00000900: FF D0 02 C6 FF 68 60 A0 00 B1 FC C9 FF D0 18 EE |.....h`.........|
00000910: 20 D0 20 30 01 B1 FC AA 20 30 01 B1 FC 91 FE 20 | . 0.... 0..... |
00000920: 3D 01 CA D0 F8 F0 05 91 FE 20 3D 01 A6 FC CA 86 |=........ =.....|
00000930: FC E0 FF D0 02 C6 FD A5 FE C9 1F A5 FF E9 08 B0 |................|
00000940: C8 A5 FB 8D 20 D0 A9 37 85 01 20 60 A6 20 8E A6 |.... ..7.. `. ..|
00000950: A2 1F BD 10 01 9D 00 08 CA D0 F7 A9 FF 4C 34 03 |.............L4.|
00000960: 4C AE A7 |L.. |
....A..2073 TCS-CRUNCH!....6..L..E1:SAVE
"0:HORA",8:VERIFY"HORA",8:REM 17.9.86.Q.
...P.8192.8192.17:.E:.P,E:.:.8192......1
20,169,49,141,20,3,169,234,141,21,3,169,
232,141,40,3,88,96.P.(..792,0:.793,192:.
49152,64...2..53280,6:.53281,15...7.L$."
. (.".L.<..".....%.."..F..". .. ..ERSTE
SCHRITTE .... ."...P.."...%...".Q.Z..".
..HAUPT-MENUE...D.."... ......C.....&.N
.." ... ....Q.X.." .... TASTATUR / FARBE
N ..1. ..|...." .... PRINT-BEFEHL ..2. .
......" .... VARIABLEN / SCHLEIFEN 3. ..
R...." .... LOAD/SAVE DISKETTEN ..4. ...
. .." .... LOAD/SAVE KASSETTEN ..5. ..(.
..." .... ENDE ..E. ..Q.H.." ......C....
T.R..".. ..VON JUAN HOLZ......".....%.."
.Y....". .. ..GEWUENSCHTE TASTE DRUECKEN
. .... ."......"...%..";:.198,0:ES.197.+
....G$:.G$."".260.Z....G$."1".A$."1":B$.
"TASTATUR / FARBEN":.360......G$."2".A$.
"2":B$."PRINT-BEFEHL":.360..."..G$."3".A
$."3":B$."VARIABLEN / SCHLEIFEN":.360.J.
,..G$."E"..64738...6..G$."4".A$."4":B$."
FLOPPY-BEFEHLE":.360.%.@..G$."5".A$."5":
B$."KASSETTEN-BEFEHLE":.360...^..260.D.H
.X$."ERSTE SCHRITTE ".A$: 15:.15,8,15: 3
:.3,8,3,X$..M..15,E,M$: 3:.E.20.2165...
R.."....";.J.|.L$.". (.".....D1$." ..ICH
LADE DIE LEKTION ..".....Y$.G(34).I...D
3$." ..".Y$.B$.Y$.". ":D3.C(D3$):D4$.D3$
.I(L$,(40.D3))......K$L$D1$L$D4$L$" ..BI
TTE WARTEN .."L$...*..".";...>.. LOADX$,
8.Y.H.."..PO44,8:PO43,1:PO808,237:PO52,1
60:PO56,160:NEW"...R.."..LO"G(34);X$;G(3
4);",8"...\.."...RUN".2.F..198,4:.631,19
:.632,13:.633,13:.634,13.8.P...C.U.."...
".G.Z.." "M$" ? ? DISKETTE PRUEFEN!". .
{..".."L$" DIE AUSGEWAEHLTE LEKTION BEF
INDET .."L$;.S.|.." SICH NICHT AUF DER
DISKETTE. .."L$;...~.." UEBERPRUEFEN SI
E, OB SIE DIE .."L$;.9...." 'ERSTE SCHR
ITTE'-DISKETTE IN DAS .."L$;.L...." LAU
FWERK EINGELEGT HABEN, DRUECKEN .."L$;..
...." SIE DANN DIE RETURN-TASTE. .."L$:
.2210......Z$:.Z$."".2180.I....Z$.G(13).
60.S....2180......54296,15:.54278,240...
...I.1.100:.54276,17.1....54273,100.100.
.(0):.:.54273,0:.52496,0:..D.J..". *."..
...."."L$" (.";.L...." (."L$......"."L$"
<.";.\...." <."L$......"."L$" =.";.....
." ;."L$.3...."."L$" :.".W.$.." .."L$.~.
..." .."...8..198,0...B..X$:.X$."".2370.
..L...Z....54296,15:.54278,240:.54276,17
:.54273,100.100..(0)......IX.1.100:.:.54
273,0:.54296,0:.......D.....P..4.+.....P
.........-8..................... P..LR..
......M.... OPEN1,8,15,"S0:HORA":CLOSHF.
..I.P.F.H`H. PI.. PF...I.P.F.H` ...I.P..
P 0.... 0..... =.JP..... =...J....P.F..
.I......H... P.7.. `. ..........JP...L4.
L..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL