home *** CD-ROM | disk | FTP | other *** search
/ Windows 95 Secrets (4th Edition) / Windows95Secrets4thEdition.iso / tools / graphics / bmpwiz / scalargb.bas < prev    next >
Unknown  |  1994-08-01  |  635 b 

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert GW-BASIC (document/gwBasic) ext Supported
66% dexvert GFA-BASIC Atari (other/gfaBASICAtari) ext Supported
1% dexvert Amiga BASIC Protected File (other/amigaBASICProtectedFile) ext Unsupported
1% dexvert BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source) ext Unsupported
1% dexvert Visual Basic Tokenized Source (other/visualBasicTokenizedSource) ext Unsupported
1% dexvert ZBASIC (other/zbasic) ext Unsupported
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 77 02 00 00 0d 0a 27 20 | 53 63 61 6c 61 20 52 47 |w.....' |Scala RG|
|00000010| 42 2e 0d 0a 0d 0a 27 20 | 44 65 66 69 6e 69 7a 69 |B.....' |Definizi|
|00000020| 6f 6e 65 20 76 61 72 69 | 61 62 69 6c 69 0d 0a 66 |one vari|abili..f|
|00000030| 6c 6f 61 74 09 78 2c 79 | 2c 58 73 69 7a 65 2c 59 |loat.x,y|,Xsize,Y|
|00000040| 73 69 7a 65 0d 0a 44 65 | 76 43 6f 6e 09 69 6d 67 |size..De|vCon.img|
|00000050| 0d 0a 52 47 42 09 70 69 | 78 0d 0a 0d 0a 27 20 49 |..RGB.pi|x....' I|
|00000060| 6e 69 7a 69 61 6c 69 7a | 7a 61 7a 69 6f 6e 65 0d |nizializ|zazione.|
|00000070| 0a 58 73 69 7a 65 3d 32 | 35 36 09 09 27 20 6c 61 |.Xsize=2|56..' la|
|00000080| 72 67 68 65 7a 7a 61 0d | 0a 59 73 69 7a 65 3d 32 |rghezza.|.Ysize=2|
|00000090| 35 36 09 09 27 20 61 6c | 74 65 7a 7a 61 0d 0a 0d |56..' al|tezza...|
|000000a0| 0a 69 6d 67 3d 43 72 65 | 61 74 65 49 6d 61 67 65 |.img=Cre|ateImage|
|000000b0| 28 58 73 69 7a 65 2c 59 | 73 69 7a 65 2c 32 34 29 |(Xsize,Y|size,24)|
|000000c0| 0d 0a 0d 0a 46 6f 72 20 | 79 3d 30 20 74 6f 20 59 |....For |y=0 to Y|
|000000d0| 73 69 7a 65 2d 31 0d 0a | 20 20 20 44 73 70 57 68 |size-1..| DspWh|
|000000e0| 69 6c 65 28 22 43 72 65 | 61 7a 69 6f 6e 65 20 73 |ile("Cre|azione s|
|000000f0| 63 61 6c 61 20 52 47 42 | 22 2c 31 30 30 2f 59 73 |cala RGB|",100/Ys|
|00000100| 69 7a 65 2a 79 29 0d 0a | 20 20 20 46 6f 72 20 78 |ize*y)..| For x|
|00000110| 3d 30 20 74 6f 20 58 73 | 69 7a 65 2d 31 0d 0a 20 |=0 to Xs|ize-1.. |
|00000120| 20 20 20 20 20 70 69 78 | 2e 42 6c 75 65 3d 32 35 | pix|.Blue=25|
|00000130| 36 2d 78 0d 0a 20 20 20 | 20 20 20 70 69 78 2e 47 |6-x.. | pix.G|
|00000140| 72 65 65 6e 3d 78 0d 0a | 20 20 20 20 20 20 70 69 |reen=x..| pi|
|00000150| 78 2e 52 65 64 3d 79 0d | 0a 20 20 20 20 20 20 53 |x.Red=y.|. S|
|00000160| 65 74 50 69 78 65 6c 28 | 69 6d 67 2c 78 2c 79 2c |etPixel(|img,x,y,|
|00000170| 70 69 78 29 0d 0a 20 20 | 20 4e 65 78 74 20 78 0d |pix).. | Next x.|
|00000180| 0a 4e 65 78 74 20 79 0d | 0a 44 73 70 57 68 69 6c |.Next y.|.DspWhil|
|00000190| 65 28 22 22 2c 30 29 0d | 0a 0d 0a 27 53 61 76 65 |e("",0).|...'Save|
|000001a0| 49 6d 61 67 65 28 69 6d | 67 2c 22 54 65 73 74 6f |Image(im|g,"Testo|
|000001b0| 2e 62 6d 70 22 29 20 20 | 20 27 20 20 6c 61 20 6d |.bmp") | ' la m|
|000001c0| 65 6d 6f 72 69 7a 7a 61 | 7a 69 6f 6e 65 20 73 75 |emorizza|zione su|
|000001d0| 20 66 69 6c 65 20 6e 6f | 6e 20 65 60 20 61 74 74 | file no|n e` att|
|000001e0| 69 76 61 20 65 6c 69 6d | 69 6e 61 72 65 20 0d 0a |iva elim|inare ..|
|000001f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000220| 20 20 20 27 20 20 6c 27 | 61 70 69 63 65 20 70 65 | ' l'|apice pe|
|00000230| 72 20 65 66 66 65 74 74 | 75 61 72 65 20 6c 61 20 |r effett|uare la |
|00000240| 6d 65 6d 6f 72 69 7a 7a | 61 7a 69 6f 6e 65 2e 0d |memorizz|azione..|
|00000250| 0a 0d 0a 50 72 65 76 69 | 65 77 28 69 6d 67 2c 22 |...Previ|ew(img,"|
|00000260| 4f 75 74 70 75 74 22 2c | 35 2c 35 29 0d 0a 44 73 |Output",|5,5)..Ds|
|00000270| 70 4d 65 73 28 22 45 6e | 64 22 29 |pMes("En|d") |
+--------+-------------------------+-------------------------+--------+--------+