Capture the Power of the Internet

home *** CD-ROM | disk | FTP | other *** search
/ Capture the Power of the Internet / Capture the Power of the Internet.iso / mac / MacFiles / MultimediaTools / Audio-Visual / betterplay.sit / BetterPlayer 1.0.2 / source / source.00.6 / SetCreator.INCL < prev next >
MacBinary | 2000-02-01 | 2.3 KB | [TEXT/FB^e]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Tue Feb 1 09:31:36 2000, modified Tue Feb 1 09:31:36 2000, creator 'FB^e', type ASCII, 1680 bytes "SetCreator.INCL" , at 0x710 371 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[FB^e]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0f 53 65 74 43 72 65 | 61 74 6f 72 2e 49 4e 43 |..SetCre|ator.INC|
|00000010| 4c 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |L.......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 46 42 5e | 65 01 00 00 00 00 00 00 |.TEXTFB^|e.......|
|00000050| 00 00 00 00 00 06 90 00 | 00 01 73 b4 bc 9e c8 b4 |........|..s.....|
|00000060| bc 9e c8 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 9c 17 00 00 |........|........|
|00000080| 52 45 4d 20 53 65 74 43 | 72 65 61 74 6f 72 2e 49 |REM SetC|reator.I|
|00000090| 4e 43 4c 0d 52 45 4d 20 | 54 48 49 53 20 46 49 4c |NCL.REM |THIS FIL|
|000000a0| 45 20 49 53 20 49 4e 20 | 22 43 22 20 47 52 4f 55 |E IS IN |"C" GROU|
|000000b0| 50 0d 52 45 4d 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |P.REM --|--------|
|000000c0| 2d 2d 2d 2d 2d 0d 52 45 | 4d 20 62 79 20 4d 61 74 |-----.RE|M by Mat|
|000000d0| 74 68 65 77 20 42 65 65 | 64 6c 65 0d 52 45 4d 20 |thew Bee|dle.REM |
|000000e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000f0| 2d 0d 6c 6f 63 61 6c 20 | 66 6e 20 53 65 74 43 72 |-.local |fn SetCr|
|00000100| 65 61 74 6f 72 0d 6d 79 | 4e 61 6d 65 73 24 20 3d |eator.my|Names$ =|
|00000110| 20 66 6e 20 47 65 74 4d | 6f 76 69 65 4e 61 6d 65 | fn GetM|ovieName|
|00000120| 24 20 28 67 4d 6f 76 69 | 65 42 6c 6f 63 6b 26 2c |$ (gMovi|eBlock&,|
|00000130| 77 69 6e 64 6f 77 28 31 | 29 29 0d 6d 79 56 6f 6c |window(1|)).myVol|
|00000140| 25 20 3d 20 66 6e 20 47 | 65 74 4d 6f 76 69 65 56 |% = fn G|etMovieV|
|00000150| 6f 6c 25 20 28 67 4d 6f | 76 69 65 42 6c 6f 63 6b |ol% (gMo|vieBlock|
|00000160| 26 2c 77 69 6e 64 6f 77 | 28 31 29 29 0d 6c 6f 6e |&,window|(1)).lon|
|00000170| 67 20 69 66 20 66 6e 20 | 43 68 65 63 6b 49 66 52 |g if fn |CheckIfR|
|00000180| 65 73 46 6f 72 6b 20 28 | 6d 79 4e 61 6d 65 73 24 |esFork (|myNames$|
|00000190| 2c 6d 79 56 6f 6c 25 29 | 3d 30 0d 0d 78 24 20 3d |,myVol%)|=0..x$ =|
|000001a0| 20 46 4e 20 47 65 74 53 | 74 72 69 6e 67 24 20 28 | FN GetS|tring$ (|
|000001b0| 6d 79 4e 61 6d 65 73 24 | 2c 6d 79 56 6f 6c 25 2c |myNames$|,myVol%,|
|000001c0| 35 30 30 32 29 0d 6c 6f | 6e 67 20 69 66 20 78 24 |5002).lo|ng if x$|
|000001d0| 3d 22 65 72 72 22 20 6f | 72 20 6c 65 6e 28 78 24 |="err" o|r len(x$|
|000001e0| 29 3d 30 0d 66 6e 20 53 | 74 72 43 72 65 61 74 6f |)=0.fn S|trCreato|
|000001f0| 72 20 28 67 4d 6f 76 69 | 65 42 6c 6f 63 6b 26 2c |r (gMovi|eBlock&,|
|00000200| 57 49 4e 44 4f 57 28 31 | 29 29 0d 65 6e 64 20 69 |WINDOW(1|)).end i|
|00000210| 66 0d 0d 78 24 3d 46 4e | 20 47 65 74 53 74 72 69 |f..x$=FN| GetStri|
|00000220| 6e 67 24 20 28 6d 79 4e | 61 6d 65 73 24 2c 6d 79 |ng$ (myN|ames$,my|
|00000230| 56 6f 6c 25 2c 35 30 30 | 33 29 0d 6c 6f 6e 67 20 |Vol%,500|3).long |
|00000240| 69 66 20 78 24 3d 22 65 | 72 72 22 20 6f 72 20 6c |if x$="e|rr" or l|
|00000250| 65 6e 28 78 24 29 3d 30 | 0d 66 6e 20 53 74 72 54 |en(x$)=0|.fn StrT|
|00000260| 79 70 65 20 28 67 4d 6f | 76 69 65 42 6c 6f 63 6b |ype (gMo|vieBlock|
|00000270| 26 2c 57 49 4e 44 4f 57 | 28 31 29 29 0d 65 6e 64 |&,WINDOW|(1)).end|
|00000280| 20 69 66 0d 0d 6d 79 43 | 75 72 72 43 72 65 61 74 | if..myC|urrCreat|
|00000290| 6f 72 24 20 3d 20 46 4e | 20 47 65 74 46 69 6c 65 |or$ = FN| GetFile|
|000002a0| 43 72 65 61 74 6f 72 24 | 28 6d 79 4e 61 6d 65 73 |Creator$|(myNames|
|000002b0| 24 2c 6d 79 56 6f 6c 25 | 29 0d 0d 78 24 3d 46 4e |$,myVol%|)..x$=FN|
|000002c0| 20 47 65 74 53 74 72 69 | 6e 67 24 20 28 6d 79 4e | GetStri|ng$ (myN|
|000002d0| 61 6d 65 73 24 2c 6d 79 | 56 6f 6c 25 2c 35 30 30 |ames$,my|Vol%,500|
|000002e0| 32 29 0d 6c 6f 6e 67 20 | 69 66 20 6c 65 6e 28 78 |2).long |if len(x|
|000002f0| 24 29 20 61 6e 64 20 78 | 24 3c 3e 22 65 72 72 22 |$) and x|$<>"err"|
|00000300| 0d 6d 79 43 72 65 61 74 | 6f 72 24 20 3d 20 78 24 |.myCreat|or$ = x$|
|00000310| 0d 78 65 6c 73 65 0d 6d | 79 43 72 65 61 74 6f 72 |.xelse.m|yCreator|
|00000320| 24 20 3d 20 6d 79 43 75 | 72 72 43 72 65 61 74 6f |$ = myCu|rrCreato|
|00000330| 72 24 0d 65 6e 64 20 69 | 66 0d 0d 79 24 3d 46 4e |r$.end i|f..y$=FN|
|00000340| 20 47 65 74 53 74 72 69 | 6e 67 24 20 28 6d 79 4e | GetStri|ng$ (myN|
|00000350| 61 6d 65 73 24 2c 6d 79 | 56 6f 6c 25 2c 35 30 30 |ames$,my|Vol%,500|
|00000360| 33 29 0d 6c 6f 6e 67 20 | 69 66 20 6c 65 6e 28 79 |3).long |if len(y|
|00000370| 24 29 20 61 6e 64 20 78 | 24 3c 3e 22 65 72 72 22 |$) and x|$<>"err"|
|00000380| 0d 6d 79 54 79 70 65 24 | 20 3d 20 79 24 0d 78 65 |.myType$| = y$.xe|
|00000390| 6c 73 65 0d 6d 79 54 79 | 70 65 24 20 3d 20 46 4e |lse.myTy|pe$ = FN|
|000003a0| 20 47 65 74 46 69 6c 65 | 54 79 70 65 24 28 6d 79 | GetFile|Type$(my|
|000003b0| 4e 61 6d 65 73 24 2c 6d | 79 56 6f 6c 25 29 0d 65 |Names$,m|yVol%).e|
|000003c0| 6e 64 20 69 66 0d 0d 6d | 79 44 6c 6f 67 48 6e 64 |nd if..m|yDlogHnd|
|000003d0| 6c 26 20 3d 20 46 4e 20 | 47 45 54 4e 45 57 44 49 |l& = FN |GETNEWDI|
|000003e0| 41 4c 4f 47 20 28 31 32 | 39 2c 30 2c 2d 31 29 0d |ALOG (12|9,0,-1).|
|000003f0| 43 41 4c 4c 20 44 52 41 | 57 44 49 41 4c 4f 47 20 |CALL DRA|WDIALOG |
|00000400| 28 6d 79 44 6c 6f 67 48 | 6e 64 6c 26 29 0d 0d 73 |(myDlogH|ndl&)..s|
|00000410| 65 6c 65 63 74 20 6d 79 | 43 75 72 72 43 72 65 61 |elect my|CurrCrea|
|00000420| 74 6f 72 24 0d 63 61 73 | 65 20 22 42 50 4c 41 22 |tor$.cas|e "BPLA"|
|00000430| 0d 46 4e 20 64 6f 52 61 | 64 69 6f 42 75 74 74 6f |.FN doRa|dioButto|
|00000440| 6e 20 28 6d 79 44 6c 6f | 67 48 6e 64 6c 26 2c 33 |n (myDlo|gHndl&,3|
|00000450| 2c 33 2c 34 29 0d 63 61 | 73 65 20 65 6c 73 65 0d |,3,4).ca|se else.|
|00000460| 6e 24 3d 66 6e 20 43 6f | 6e 76 65 72 74 34 4c 65 |n$=fn Co|nvert4Le|
|00000470| 74 74 65 72 24 20 28 6d | 79 43 75 72 72 43 72 65 |tter$ (m|yCurrCre|
|00000480| 61 74 6f 72 24 29 0d 46 | 4e 20 70 75 74 44 74 65 |ator$).F|N putDte|
|00000490| 78 74 28 6d 79 44 6c 6f | 67 48 6e 64 6c 26 2c 37 |xt(myDlo|gHndl&,7|
|000004a0| 2c 6e 24 2c 30 2c 30 29 | 0d 46 4e 20 64 6f 52 61 |,n$,0,0)|.FN doRa|
|000004b0| 64 69 6f 42 75 74 74 6f | 6e 20 28 6d 79 44 6c 6f |dioButto|n (myDlo|
|000004c0| 67 48 6e 64 6c 26 2c 34 | 2c 33 2c 34 29 0d 65 6e |gHndl&,4|,3,4).en|
|000004d0| 64 20 73 65 6c 65 63 74 | 0d 0d 46 4e 20 70 75 74 |d select|..FN put|
|000004e0| 44 74 65 78 74 28 6d 79 | 44 6c 6f 67 48 6e 64 6c |Dtext(my|DlogHndl|
|000004f0| 26 2c 35 2c 6d 79 43 72 | 65 61 74 6f 72 24 2c 30 |&,5,myCr|eator$,0|
|00000500| 2c 30 29 0d 46 4e 20 70 | 75 74 44 74 65 78 74 28 |,0).FN p|utDtext(|
|00000510| 6d 79 44 6c 6f 67 48 6e | 64 6c 26 2c 36 2c 6d 79 |myDlogHn|dl&,6,my|
|00000520| 54 79 70 65 24 2c 30 2c | 30 29 0d 0d 44 4f 0d 43 |Type$,0,|0)..DO.C|
|00000530| 41 4c 4c 20 4d 4f 44 41 | 4c 44 49 41 4c 4f 47 20 |ALL MODA|LDIALOG |
|00000540| 28 30 2c 6d 79 48 69 74 | 25 29 0d 0d 73 65 6c 65 |(0,myHit|%)..sele|
|00000550| 63 74 20 6d 79 48 69 74 | 25 0d 63 61 73 65 20 33 |ct myHit|%.case 3|
|00000560| 2c 34 0d 46 4e 20 64 6f | 52 61 64 69 6f 42 75 74 |,4.FN do|RadioBut|
|00000570| 74 6f 6e 20 28 6d 79 44 | 6c 6f 67 48 6e 64 6c 26 |ton (myD|logHndl&|
|00000580| 2c 6d 79 48 69 74 25 2c | 33 2c 34 29 0d 65 6e 64 |,myHit%,|3,4).end|
|00000590| 20 73 65 6c 65 63 74 0d | 0d 55 4e 54 49 4c 20 6d | select.|.UNTIL m|
|000005a0| 79 48 69 74 25 20 3d 20 | 31 20 6f 72 20 6d 79 48 |yHit% = |1 or myH|
|000005b0| 69 74 25 20 3d 20 32 0d | 0d 6c 6f 6e 67 20 69 66 |it% = 2.|.long if|
|000005c0| 20 6d 79 48 69 74 25 20 | 3d 20 31 0d 6c 6f 6e 67 | myHit% |= 1.long|
|000005d0| 20 69 66 20 46 4e 20 67 | 65 74 44 62 75 74 74 6f | if FN g|etDbutto|
|000005e0| 6e 28 6d 79 44 6c 6f 67 | 48 6e 64 6c 26 2c 33 29 |n(myDlog|Hndl&,3)|
|000005f0| 20 3d 20 31 0d 74 79 70 | 65 26 20 3d 20 5f 22 4d | = 1.typ|e& = _"M|
|00000600| 6f 6f 56 22 0d 63 72 65 | 61 74 6f 72 26 20 3d 20 |ooV".cre|ator& = |
|00000610| 5f 22 42 50 4c 41 22 0d | 46 4e 20 53 65 74 54 79 |_"BPLA".|FN SetTy|
|00000620| 70 65 41 6e 64 43 72 65 | 61 74 6f 72 28 6d 79 4e |peAndCre|ator(myN|
|00000630| 61 6d 65 73 24 2c 6d 79 | 56 6f 6c 25 2c 74 79 70 |ames$,my|Vol%,typ|
|00000640| 65 26 2c 63 72 65 61 74 | 6f 72 26 29 0d 78 65 6c |e&,creat|or&).xel|
|00000650| 73 65 0d 74 79 70 65 26 | 20 3d 20 43 56 49 28 6d |se.type&| = CVI(m|
|00000660| 79 54 79 70 65 24 29 0d | 63 72 65 61 74 6f 72 26 |yType$).|creator&|
|00000670| 20 3d 20 43 56 49 28 6d | 79 43 72 65 61 74 6f 72 | = CVI(m|yCreator|
|00000680| 24 29 0d 46 4e 20 53 65 | 74 54 79 70 65 41 6e 64 |$).FN Se|tTypeAnd|
|00000690| 43 72 65 61 74 6f 72 28 | 6d 79 4e 61 6d 65 73 24 |Creator(|myNames$|
|000006a0| 2c 6d 79 56 6f 6c 25 2c | 74 79 70 65 26 2c 63 72 |,myVol%,|type&,cr|
|000006b0| 65 61 74 6f 72 26 29 0d | 65 6e 64 20 69 66 0d 65 |eator&).|end if.e|
|000006c0| 6e 64 20 69 66 0d 0d 43 | 41 4c 4c 20 44 49 53 50 |nd if..C|ALL DISP|
|000006d0| 4f 53 44 49 41 4c 4f 47 | 20 28 6d 79 44 6c 6f 67 |OSDIALOG| (myDlog|
|000006e0| 48 6e 64 6c 26 29 0d 78 | 65 6c 73 65 0d 66 6e 20 |Hndl&).x|else.fn |
|000006f0| 44 69 73 70 6c 61 79 44 | 4c 4f 47 20 28 31 33 32 |DisplayD|LOG (132|
|00000700| 29 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 66 6e 0d |).end if|.end fn.|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 01 00 00 00 01 12 | 00 00 00 12 00 00 00 61 |........|.......a|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 08 00 2c 00 0f | 02 4e 02 4f 00 00 00 02 |.....,..|.N.O....|
|00000890| 01 18 00 00 01 00 00 00 | 01 12 00 00 00 12 00 00 |........|........|
|000008a0| 00 61 04 30 d3 5c 00 c2 | 00 00 00 1c 00 46 00 01 |.a.0.\..|.....F..|
|000008b0| 77 50 4f 53 00 00 00 12 | 52 45 4d 3e 00 00 00 1e |wPOS....|REM>....|
|000008c0| 03 e8 00 00 00 00 00 00 | 04 30 d4 7c 03 e8 00 10 |........|.0.|....|
|000008d0| 00 00 00 0c 04 30 d1 90 | 0f 57 69 6e 64 6f 77 20 |.....0..|.Window |
|000008e0| 50 6f 73 69 74 69 6f 6e | 0a 52 45 4d 20 49 6e 64 |Position|.REM Ind|
|000008f0| 65 6e 74 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ent.....|........|
+--------+-------------------------+-------------------------+--------+--------+