forks/multipaint-js: multipaint.pde annotate

annotate multipaint.pde @ 176:0940d991d3b0

Cleanups.

author	Matti Hamalainen <ccr@tnsp.org>
date	Thu, 23 Aug 2018 12:47:11 +0300
parents	3ddf4d799fe6
children	66c1d15e335a

rev	line source
35 eb9157c6a067 Update author blurb. Matti Hamalainen <ccr@tnsp.org> parents: 31 diff changeset	1 //
159 fec2088cdd31 Change version. Matti Hamalainen <ccr@tnsp.org> parents: 154 diff changeset	2 // Multipaint.JS 1.8.2018
35 eb9157c6a067 Update author blurb. Matti Hamalainen <ccr@tnsp.org> parents: 31 diff changeset	3 // Tero Heikkinen (Dr. TerrorZ)
eb9157c6a067 Update author blurb. Matti Hamalainen <ccr@tnsp.org> parents: 31 diff changeset	4 // ProcessingJS port and changes by Matti Hämäläinen (ccr/TNSP)
eb9157c6a067 Update author blurb. Matti Hamalainen <ccr@tnsp.org> parents: 31 diff changeset	5 // processing setup draw and file things here
eb9157c6a067 Update author blurb. Matti Hamalainen <ccr@tnsp.org> parents: 31 diff changeset	6 //
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	7
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	8 // Supported
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	9 final int C64 = 0, MSX = 5, SPECTRUM = 6, C64M = 10,
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	10 PLUS4 = 9, PLUS4M = 19, CPC = 2;
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	11
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	12 // Experimental or incomplete
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	13 final int C64NOLIMIT = 32; // Commodore 64 without attribute limitations
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	14 final int C64FLI = 20, C64FLIM = 21; // incomplete FLI & AFLI modes
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	15 final int TIMEX = 7, JR200 = 8, AMIGA = 11, ATARIST = 12;
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	16 final int PICO8 = 88;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	17 final int UNIA = 33;
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	18 final int COCO3 = 34;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	19 final int BK0010 = 99;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	20 final int QLLOW = 66;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	21
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	22 // Reserved but completely unimplemented
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	23 final int VIC = 22; // VIC-20
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	24 final int CGA = 23; // 320 x 200 PC CGA screen with black, white, cyan, magenta
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	25 final int CGAX = 24; // 320 x 200 PC CGA screen with black, yellow, green, red-ish
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	26 final int EGA = 200; // 320 x 200 PC EGA screen, 16 colors of 64
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	27 final int VGA = 255; // 320 x 200 PC VGA screen, 256 colors of 65536
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	28 final int NES = 90; // 8-bit NES
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	29 final int SEGAM = 91; // 8-bit Sega Master System
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	30
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	31 final int GRIDMODE_OLD = 0;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	32 final int GRIDMODE_NEW = 1;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	33 final int AR_FLAT = 1;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	34 final int AR_SQUARE = 0;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	35
16 f356d9c176a6 ProcessingJS does not provide "platform" variables, we need to define them ourselves. Matti Hamalainen <ccr@tnsp.org> parents: 15 diff changeset	36 final int PEESEE = 0, MACOSX = 1, PSJS = 2;
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	37 final int COMMAND = 157; // Marq's cmd/ctrl solution
69 3d40683b367a Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 60 diff changeset	38
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	39 int machine = -1; // change this to autoselect
16 f356d9c176a6 ProcessingJS does not provide "platform" variables, we need to define them ourselves. Matti Hamalainen <ccr@tnsp.org> parents: 15 diff changeset	40 int platform = PSJS;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	41
133 f5c32f6470d0 Begin integrating more changes from Multipaint 1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 131 diff changeset	42 int[] g_grids = new int[16];
f5c32f6470d0 Begin integrating more changes from Multipaint 1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 131 diff changeset	43
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	44 int[] g_r = new int[266];
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	45 int[] g_g = new int[266];
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	46 int[] g_b = new int[266];
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	47 int[] g_rgb = new int[266];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	48
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	49 byte[] g_map = new byte[88000];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	50 byte[] g_fillmap = new byte[88000];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	51 byte[] g_rmap = new byte[88000];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	52 byte[] g_icons = new byte[88000];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	53 byte[] g_brush = new byte[88000];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	54 byte[] g_template = new byte[16384];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	55 byte[] g_redo = new byte[1024];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	56 byte[] g_remdo = new byte[1024];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	57 int[] g_chaup = new int[64];
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	58 byte[] g_data = new byte[1024];
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	59 int[] g_magpix = new int[64];
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	60 int[] g_magpiy = new int[64];
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	61
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	62 byte g_realfront, g_realback;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	63
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	64 int g_tooltrigger, g_prevtool, g_rband, g_rbang, g_boxreconstruct,
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	65 g_charlimit, g_animx, g_animy, g_animframes, g_animno, g_animtime,
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	66 g_animspeed, g_keymacpos, g_forced_width, g_forced_height;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	67
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	68 int g_wheelup = int(':'), g_wheeldown = int(';'), g_middlebutton = int(',');
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	69 int g_gridmode = GRIDMODE_OLD;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	70 int g_pixelw = 1;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	71 int g_aspect = AR_SQUARE;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	72
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	73 boolean g_control = false, g_shift = false,
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	74 g_dirty, g_inhibit_aspect = false;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	75
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	76 String g_formatname, g_formatext,
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	77 filename = "", sfilename = "",
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	78 g_name, g_exportext = "",
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	79 g_exportname = "", g_keymacro = "",
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	80 g_forced_palette = "";
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	81
69 3d40683b367a Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 60 diff changeset	82
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	83 //dimensions
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	84 int X, Y, MX, MY;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	85 //generic mouse
154 1b2cbf3ab441 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 153 diff changeset	86 boolean g_klikkeri, g_iconmode = false;
143 5e18cb16bc4b Booleanize. Matti Hamalainen <ccr@tnsp.org> parents: 142 diff changeset	87 int g_ofx, g_ofy, g_button, g_realbutton, g_mx, g_my, g_orx, g_ory, g_msx, g_msy;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	88 //rubberband,mouse
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	89 int g_phase, g_rx, g_ry, g_rx2, g_ry2, g_rubbermode;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	90 int g_prex, g_prey, g_storedcoordx, g_storedcoordy;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	91 //window positioning
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	92 int g_windowx, g_windowy, g_maglocx, g_maglocy;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	93 int g_hedge, g_vedge, g_uizoom, g_wzoom;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	94 //icons & gui stuff
154 1b2cbf3ab441 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 153 diff changeset	95 int g_iconx, g_icony, g_piconx, g_picony;
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	96 int g_gridx, g_gridy, g_spare;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	97 int g_farge, g_backg, g_ofarge, g_repanel, g_msgctr;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	98 //machine related color properties
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	99 int g_attrimode, g_britemode, g_multic, g_backmode, g_maxcolors, g_hzoomer;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	100 float g_palsteps;
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	101 //brush, tool parameters
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	102 int g_bsourcex, g_bsourcey, g_bsourcex2, g_bsourcey2;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	103 int g_bsize, g_btype;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	104
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	105
83 6524e83c3ba7 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 82 diff changeset	106 void setup()
6524e83c3ba7 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 82 diff changeset	107 {
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	108 // Get settings from Javascript runner, or use defaults
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	109 machine = (mpMachine >= 0) ? mpMachine : C64;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	110 g_uizoom = (g_uizoom >= 1 && g_uizoom <= 3) ? g_uizoom : 2;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	111 g_animspeed = 1;
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	112
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	113 //normi
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	114 g_magpix[0] = 3;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	115 g_magpix[1] = 8;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	116 g_magpix[2] = 16;
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	117 g_magpiy[0] = 3;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	118 g_magpiy[1] = 8;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	119 g_magpiy[2] = 16;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	120
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	121 //mini
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	122 g_magpix[10] = 2;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	123 g_magpix[11] = 6;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	124 g_magpix[12] = 16;
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	125 g_magpiy[10] = 2;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	126 g_magpiy[11] = 6;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	127 g_magpiy[12] = 16;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	128
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	129 //maxi
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	130 g_magpix[20] = 4;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	131 g_magpix[21] = 16;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	132 g_magpix[22] = 32;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	133 g_magpiy[20] = 4;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	134 g_magpiy[21] = 16;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	135 g_magpiy[22] = 32;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	136
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	137 //FLAT normi
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	138 g_magpix[100] = 3;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	139 g_magpix[101] = 9;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	140 g_magpix[102] = 12;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	141 g_magpiy[100] = 2;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	142 g_magpiy[101] = 6;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	143 g_magpiy[102] = 8;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	144
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	145 //FLAT mini
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	146 g_magpix[110] = 3;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	147 g_magpix[111] = 9;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	148 g_magpix[112] = 12;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	149 g_magpiy[110] = 2;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	150 g_magpiy[111] = 6;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	151 g_magpiy[112] = 8;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	152
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	153 //FLAT maxi
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	154 g_magpix[120] = 6;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	155 g_magpix[121] = 12;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	156 g_magpix[122] = 21;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	157 g_magpiy[120] = 4;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	158 g_magpiy[121] = 8;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	159 g_magpiy[122] = 14;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	160
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	161 // Setup other stuff
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	162 if (g_inhibit_aspect)
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	163 {
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	164 if (machine == QLLOW \|\| machine == BK0010)
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	165 Y = 256;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	166 }
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	167
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	168 if (g_uizoom >= 1 && g_uizoom <= 3)
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	169 g_wzoom = g_uizoom + 1;
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	170
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	171 g_hedge = 32 * g_uizoom;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	172 g_vedge = 32 * g_uizoom;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	173
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	174 g_spare = 0;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	175 g_bsize = 0;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	176 g_btype = 0;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	177 g_phase = 0;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	178 g_button = LEFT;
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	179
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	180 g_data[int('f')] = 1; // fill on
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	181 g_data[int('g')] = 1; // grid on
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	182 g_data[int('m')] = 0;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	183 g_data[int('M')] = 0; // mags off
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	184
29 249c4f5742f3 Refactor the import/export stuff a bit and the GUI bits for JS. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	185 g_icons = mpLoadBinaryFile("icons.bin");
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	186
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	187 set_tool(3);
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	188
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	189 g_gridx = 8;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	190 g_gridy = 8;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	191 g_multic = 0;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	192 g_repanel = -2;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	193
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	194 mpSetUIColors();
81 7ee5e0c590bd Clean set_machine() and rename to mpSetupMachine() Matti Hamalainen <ccr@tnsp.org> parents: 73 diff changeset	195 mpSetupMachine(machine);
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	196
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	197 if (g_forced_palette.length() > 3)
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	198 mpLoadPalette(g_forced_palette);
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	199
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	200 int truwinsizex = X * g_magpix[magmode()];
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	201 int truwinsizey = Y * g_magpiy[magmode()];
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	202
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	203 if (g_forced_width == 0 \|\| g_forced_height == 0)
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	204 {
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	205 g_hadjust = 0;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	206 g_vadjust = 0;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	207
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	208 int hsize = truwinsizex + g_hedge + (22) * g_wzoom;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	209 int vsize = truwinsizey + g_vedge + (14) * g_wzoom;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	210
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	211 while (vsize - g_vedge < (12 * 16) * g_wzoom)
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	212 vsize += 2;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	213
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	214 while (hsize - g_hedge < (17 * 16) * g_wzoom)
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	215 hsize += 2;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	216
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	217 size(hsize, vsize);
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	218 }
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	219
176 0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	220 if (g_forced_width > 800 && g_forced_height > 600)
0940d991d3b0 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 175 diff changeset	221 size(g_forced_width, g_forced_height);
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	222
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	223 if (g_inhibit_aspect)
172 e77a726a587e Rename FLATRATIO/SQUARERATIO and gridmode OLD/NEW constants to something more sane. Matti Hamalainen <ccr@tnsp.org> parents: 168 diff changeset	224 g_aspect = AR_SQUARE;
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	225
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	226 int paspect = g_wzoom;
172 e77a726a587e Rename FLATRATIO/SQUARERATIO and gridmode OLD/NEW constants to something more sane. Matti Hamalainen <ccr@tnsp.org> parents: 168 diff changeset	227 if (g_aspect == AR_FLAT)
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	228 {
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	229 if (g_wzoom == 2) paspect = 1;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	230 if (g_wzoom == 3) paspect = 2;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	231 if (g_wzoom == 4) paspect = 3;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	232 }
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	233
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	234 g_windowx = width - (g_hedge) - (truwinsizex);
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	235 g_windowx = g_windowx / 2;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	236 g_windowy = height - (g_vedge) - (truwinsizey);
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	237 g_windowy = g_windowy / 2;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	238
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	239 if (g_hadjust > 0)
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	240 g_windowx = width - (g_hedge) - (g_wzoom * X) - g_hadjust;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	241
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	242 if (g_vadjust > 0)
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	243 g_windowy = height - (g_vedge) - (paspect * Y) - g_vadjust;
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	244
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	245 switcher(3);
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	246
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	247 g_map[4] = byte(g_maxcolors - 1);
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	248 g_ofarge = g_farge;
7 c848a6133cfc Fix many calculations (divisions) that assume integer variable division Matti Hamalainen <ccr@tnsp.org> parents: 4 diff changeset	249 MX = int(X / 8);
c848a6133cfc Fix many calculations (divisions) that assume integer variable division Matti Hamalainen <ccr@tnsp.org> parents: 4 diff changeset	250 MY = int(Y / 8);
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	251 g_realfront = byte(g_farge);
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	252 g_realback = byte(g_backg);
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	253
83 6524e83c3ba7 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 82 diff changeset	254 for (int y = 0; y < Y; y++)
6524e83c3ba7 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 82 diff changeset	255 for (int x = 0; x < X; x++)
69 3d40683b367a Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 60 diff changeset	256 absolute_clearpoint(x, y);
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	257
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	258 switcher(2);
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	259 noStroke();
150 d7c13f427178 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 148 diff changeset	260 background(g_r[263], g_g[263], g_b[263]);
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	261 sussborder();
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	262 setup_raster();
83 6524e83c3ba7 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 82 diff changeset	263
159 fec2088cdd31 Change version. Matti Hamalainen <ccr@tnsp.org> parents: 154 diff changeset	264 message(" Multipaint\| - 2018 -\|\|v1.8.2018.JS");
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	265 message("*");
89 09c1a4aba305 Set dirty flag on setup. Matti Hamalainen <ccr@tnsp.org> parents: 88 diff changeset	266 g_dirty = true;
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	267 }
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	268
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	269
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	270 void mpSetUIColors()
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	271 {
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	272 // UI colors
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	273 makecolor(256, 0xff, 0, 0xff);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	274 makecolor(257, 180, 180, 180);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	275 // g_rgb[257] = 0xff808080;
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	276 makecolor(258, 0, 0, 0);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	277 makecolor(259, 48, 48, 48);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	278
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	279 // R,G and B for the palette sliders
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	280 makecolor(260, 255, 0, 0);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	281 makecolor(261, 0, 255, 0);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	282 makecolor(262, 0, 0, 255);
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	283 makecolor(263, 48, 48, 48); //backest UI background
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	284
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	285 }
ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	286
101 e5c147a7bf98 Remove fexists(), it's not in use. Matti Hamalainen <ccr@tnsp.org> parents: 97 diff changeset	287 void mpSetTitle(String str)
e5c147a7bf98 Remove fexists(), it's not in use. Matti Hamalainen <ccr@tnsp.org> parents: 97 diff changeset	288 {
29 249c4f5742f3 Refactor the import/export stuff a bit and the GUI bits for JS. Matti Hamalainen <ccr@tnsp.org> parents: 28 diff changeset	289 console.log("TITLE: '" + str + "'");
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	290 }
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	291
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	292
117 44a07b1c620d Rename 'bool' -> 'boolean'. Matti Hamalainen <ccr@tnsp.org> parents: 114 diff changeset	293 boolean mpHaveLocalStorage()
102 287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	294 {
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	295 var test = 'mpLSTest';
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	296 try {
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	297 localStorage.setItem(test, test);
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	298 if (localStorage.getItem(test) == test)
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	299 {
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	300 localStorage.removeItem(test);
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	301 return true;
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	302 }
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	303 }
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	304 catch (e) {
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	305 return false;
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	306 }
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	307 return false;
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	308 }
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	309
287892b5eff8 Add function for checking availability of browser local storage. Matti Hamalainen <ccr@tnsp.org> parents: 101 diff changeset	310
54 dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	311 function mpLoadFileSelector(fmtname, fmtexts, fcallback)
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	312 {
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	313 var mpUI = stGE("mpUI");
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	314 if (mpUI)
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	315 {
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	316 stClearChildren(mpUI);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	317 mpUI.style.background = "red";
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	318 mpUI.style.padding = "0.5em";
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	319
54 dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	320 mobj = stCE("input", "mpFileSelector");
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	321 mobj.type = "file";
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	322 mobj.name = "name";
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	323 mobj.multiple = false;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	324
54 dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	325 if (fmtexts != null)
dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	326 mobj.accept = fmtexts;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	327
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	328 stAddEventOb(mobj.name, mobj, "change",
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	329 function(evt)
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	330 {
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	331 var files = evt.target.files;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	332 if (files.length > 0)
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	333 {
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	334 var freader = new FileReader();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	335
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	336 freader.onloadend = (function(theFile) {
58 8c47708f0196 Oops, forgot to commit this. Matti Hamalainen <ccr@tnsp.org> parents: 56 diff changeset	337 fcallback(theFile, new Uint8Array(freader.result));
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	338 });
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	339
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	340 freader.readAsArrayBuffer(files[0]);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	341 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	342 stClearChildren(mpUI);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	343 mpUI.style.background = null;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	344 });
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	345
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	346 mpUI.appendChild(mobj);
54 dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	347
dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	348 mobj = stCE("span", "mpFileInfo");
dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	349 mobj.innerHTML = "Load / import an '<b>"+ fmtname +"</b>' file.";
dee55b8f97a6 Use defined format extensions in the file selector. Also display format name Matti Hamalainen <ccr@tnsp.org> parents: 53 diff changeset	350 mpUI.appendChild(mobj);
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	351 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	352 else
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	353 return null;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	354 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	355
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	356
52 4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	357 //
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	358 // Basically the same as Processing loadBytes(), but it seems
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	359 // that Processing.JS's loadBytes() is broken at least in v1.4.8
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	360 // and does not return byte-clean data. So roll a replacement of
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	361 // our own design. --ccr
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	362 //
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	363 byte[] mpLoadBinaryFile(String url)
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	364 {
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	365 var xhr = new XMLHttpRequest();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	366 xhr.open("GET", url, false);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	367 xhr.overrideMimeType("text/plain; charset=x-user-defined");
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	368 xhr.setRequestHeader("If-Modified-Since", "Fri, 01 Jan 1960 00:00:00 GMT");
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	369 xhr.send(null);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	370
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	371 if (xhr.status !== 200 && xhr.status !== 0)
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	372 return null;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	373
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	374 var string = xhr.responseText;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	375 byte[] ret = new byte[string.length];
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	376
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	377 for (var i = 0; i < string.length; i++)
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	378 {
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	379 ret[i] = string.charCodeAt(i) & 0xff;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	380 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	381
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	382 return ret;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	383 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	384
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	385
103 7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	386 Blob mpMakeBinaryBlob(byte[] data)
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	387 {
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	388 var blob = null;
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	389 if (data == null)
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	390 return null;
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	391
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	392 if (typeof(data) == "string")
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	393 blob = new Blob([data], {type: "application/octet-stream"});
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	394 else
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	395 if (typeof(data) == "object")
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	396 blob = new Blob([new Uint8Array(data)], {type: "application/octet-stream"});
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	397
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	398 return blob;
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	399 }
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	400
7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	401
52 4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	402 //
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	403 // "Save" a byte array to file. Basically creates a blob URI
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	404 // and dumps it in the DOM, giving user a download.
4f998eb1700a Add some comments. Matti Hamalainen <ccr@tnsp.org> parents: 51 diff changeset	405 //
117 44a07b1c620d Rename 'bool' -> 'boolean'. Matti Hamalainen <ccr@tnsp.org> parents: 114 diff changeset	406 boolean mpSaveBinaryFile(String name, byte[] data)
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	407 {
103 7a889d59b405 Split Blob creation to mpMakeBinaryBlob(). Matti Hamalainen <ccr@tnsp.org> parents: 102 diff changeset	408 var blob = mpMakeBinaryBlob(data);
96 2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	409 if (blob == null)
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	410 {
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	411 console.log("Could not create BLOB from data.");
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	412 return false;
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	413 }
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	414
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	415 var url = window.URL.createObjectURL(blob);
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	416 if (url == null)
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	417 {
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	418 console.log("Could not create URL from BLOB object.");
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	419 return false;
2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	420 }
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	421
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	422 var alink = stCE("a");
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	423 var mpUI = stGE("mpUI");
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	424 stClearChildren(mpUI);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	425 mpUI.appendChild(alink);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	426
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	427 alink.style = "display: none";
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	428 alink.href = url;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	429 alink.download = name;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	430 alink.click();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	431
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	432 window.URL.revokeObjectURL(url);
96 2d4b56e4d966 Improve mpSaveBinaryFile() to also handle string format data. Also improve Matti Hamalainen <ccr@tnsp.org> parents: 94 diff changeset	433 return true;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	434 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	435
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	436
175 3ddf4d799fe6 Get rid of globals g_omag, g_bordh and g_bordv which set PNG/JPEG image Matti Hamalainen <ccr@tnsp.org> parents: 172 diff changeset	437 // bordh/v = 64, 32, omag = 1
3ddf4d799fe6 Get rid of globals g_omag, g_bordh and g_bordv which set PNG/JPEG image Matti Hamalainen <ccr@tnsp.org> parents: 172 diff changeset	438 void mpSavePNGImage(String name, int fmt, boolean border, int bordh, int bordv, int omag)
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	439 {
175 3ddf4d799fe6 Get rid of globals g_omag, g_bordh and g_bordv which set PNG/JPEG image Matti Hamalainen <ccr@tnsp.org> parents: 172 diff changeset	440 PImage simg = mpRenderImage(border, bordh, bordv, omag);
94 6e74d45ea620 More work towards jpeg/png image export/import. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	441 // if (g_data[int('Q')] == 0)
88 03823fa2cb01 Refactor export_image() and export_image_sans_border() to use common code, Matti Hamalainen <ccr@tnsp.org> parents: 84 diff changeset	442
94 6e74d45ea620 More work towards jpeg/png image export/import. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	443 if (simg !== null)
6e74d45ea620 More work towards jpeg/png image export/import. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	444 {
6e74d45ea620 More work towards jpeg/png image export/import. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	445 // XXX TODO .. actually save the image, something like ..
6e74d45ea620 More work towards jpeg/png image export/import. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	446 //simg.canvas.toBlob(function(idata){ mpSaveBinaryFile(name, idata); }, "image/png", 0.95);
6e74d45ea620 More work towards jpeg/png image export/import. Matti Hamalainen <ccr@tnsp.org> parents: 93 diff changeset	447 }
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	448 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	449
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	450
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	451 int mpLoadPNGImage(String name)
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	452 {
92 4161d798cb64 Clean up/refactor image (jpeg/png) importing a bit and rename function. Matti Hamalainen <ccr@tnsp.org> parents: 90 diff changeset	453 PImage simg = null;
4161d798cb64 Clean up/refactor image (jpeg/png) importing a bit and rename function. Matti Hamalainen <ccr@tnsp.org> parents: 90 diff changeset	454 if (simg == null)
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	455 return -1;
92 4161d798cb64 Clean up/refactor image (jpeg/png) importing a bit and rename function. Matti Hamalainen <ccr@tnsp.org> parents: 90 diff changeset	456
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	457 int lefth = g_farge;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	458 int righth = g_backg;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	459 storeparameters();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	460
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	461 g_data[int('d')] = 0;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	462 g_data[int('t')] = 0;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	463 g_data[int('b')] = 1; //old IQ
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	464
92 4161d798cb64 Clean up/refactor image (jpeg/png) importing a bit and rename function. Matti Hamalainen <ccr@tnsp.org> parents: 90 diff changeset	465 if (!mpImportFromImage(simg))
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	466 return -2;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	467
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	468 restoreparameters();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	469 refreshpalette();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	470 refresh();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	471 g_boxreconstruct = 2;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	472 selectcolor(0, lefth);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	473 selectcolor(1, righth);
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	474 return 0;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	475 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	476
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	477
104 73a8773466ae Change mpSaveNativeImage() to mpGetNativeImage(). Matti Hamalainen <ccr@tnsp.org> parents: 103 diff changeset	478 byte[] mpGetNativeImage()
53 c551029a7086 Cosmetic. Matti Hamalainen <ccr@tnsp.org> parents: 52 diff changeset	479 {
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	480 //save the picture page g_map[], make sure some essential parameters are correct
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	481 g_map[3] = byte(machine);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	482 g_map[5] = byte(MX);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	483 g_map[7] = byte(MY);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	484
104 73a8773466ae Change mpSaveNativeImage() to mpGetNativeImage(). Matti Hamalainen <ccr@tnsp.org> parents: 103 diff changeset	485 return g_map;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	486 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	487
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	488
117 44a07b1c620d Rename 'bool' -> 'boolean'. Matti Hamalainen <ccr@tnsp.org> parents: 114 diff changeset	489 int mpSetNativeImage(byte[] data, boolean noError)
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	490 {
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	491 if (data == null)
65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	492 return -1;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	493
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	494 if (data[3] != machine && !noError)
65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	495 return -2;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	496
111 044e3371d44b Do store_undo() in mpSetNativeImage() when supposedly successfully loading Matti Hamalainen <ccr@tnsp.org> parents: 110 diff changeset	497 store_undo();
044e3371d44b Do store_undo() in mpSetNativeImage() when supposedly successfully loading Matti Hamalainen <ccr@tnsp.org> parents: 110 diff changeset	498
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	499 g_map = data;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	500
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	501 refreshpalette();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	502 consistency();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	503 g_farge = int(g_realfront);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	504 g_ofarge = g_farge;
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	505 g_backg = int(g_realback);
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	506 sussborder();
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	507
97 65e6cacd068c Make PRG export work. Also some improvements in overall error handling. Matti Hamalainen <ccr@tnsp.org> parents: 96 diff changeset	508 return 0;
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	509 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	510
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	511
117 44a07b1c620d Rename 'bool' -> 'boolean'. Matti Hamalainen <ccr@tnsp.org> parents: 114 diff changeset	512 int mpLoadNativeImage(String name, boolean noError)
55 7194cdcc9dab Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	513 {
7194cdcc9dab Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	514 return mpSetNativeImage(
7194cdcc9dab Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 54 diff changeset	515 mpLoadBinaryFile(name), noError);
28 edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	516 }
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	517
edcf9039552b Add several new helper functions for loading and saving formats using Javascript facilities. Matti Hamalainen <ccr@tnsp.org> parents: 27 diff changeset	518
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	519 boolean mpLoadPalette(String fname)
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	520 {
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	521 if (g_map[13] != C64)
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	522 {
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	523 return false;
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	524 }
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	525
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	526 byte fdata[] = mpLoadbinaryFile(fname);
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	527 if (fdata == null \|\|
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	528 fdata.length != 772 \|\|
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	529 fdata[0x301] != byte(0x10) \|\|
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	530 fdata[0x302] != byte(0xff) \|\|
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	531 fdata[0x303] != byte(0xff))
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	532 {
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	533 return false;
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	534 }
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	535
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	536 for (int n = 0; n < 16; n++)
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	537 {
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	538 makecolor(n,
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	539 int(fdata[n * 3]),
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	540 int(fdata[n * 3 + 1]),
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	541 int(fdata[n * 3 + 2]));
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	542 }
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	543
162 ca07bdf66a70 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 159 diff changeset	544 mpSetUIColors();
153 9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	545
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	546 sussborder();
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	547 refresh_all();
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	548
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	549 return true;
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	550 }
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	551
9f4e6f888120 Integrate more changes from v1.8.2018. Matti Hamalainen <ccr@tnsp.org> parents: 150 diff changeset	552
69 3d40683b367a Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 60 diff changeset	553 void draw()
3d40683b367a Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 60 diff changeset	554 {
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	555 if (!focused)
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	556 {
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	557 g_control = false;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	558 g_shift = false;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	559 }
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	560
72 5e7553e9aee0 Improve 'dirty' flag for only updating canvas when something changes. Matti Hamalainen <ccr@tnsp.org> parents: 69 diff changeset	561 // If there should be no update, do not update.
73 d2a89e88f958 When in rubberband mode, do not delay screen updates. Matti Hamalainen <ccr@tnsp.org> parents: 72 diff changeset	562 if (!g_dirty && !g_rubbermode)
72 5e7553e9aee0 Improve 'dirty' flag for only updating canvas when something changes. Matti Hamalainen <ccr@tnsp.org> parents: 69 diff changeset	563 return;
5e7553e9aee0 Improve 'dirty' flag for only updating canvas when something changes. Matti Hamalainen <ccr@tnsp.org> parents: 69 diff changeset	564 g_dirty = false;
5e7553e9aee0 Improve 'dirty' flag for only updating canvas when something changes. Matti Hamalainen <ccr@tnsp.org> parents: 69 diff changeset	565
5e7553e9aee0 Improve 'dirty' flag for only updating canvas when something changes. Matti Hamalainen <ccr@tnsp.org> parents: 69 diff changeset	566 // Animate animbrush
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	567 if (g_data[int('n')] == 1)
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	568 {
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	569 if (++g_animtime > 8 - g_animspeed * 2)
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	570 {
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	571 animbrush_do();
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	572 g_animtime = 0;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	573 }
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	574 }
9 dfdc18b62fab Change the help() function and its usage to have more than one parameter to Matti Hamalainen <ccr@tnsp.org> parents: 7 diff changeset	575
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	576 // Update some mouse variables
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	577 if (g_data[int('m')] == 0 && g_data[int('M')] == 0)
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	578 {
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	579 g_mx = g_msx - g_windowx;
5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	580 g_my = g_msy - g_windowy;
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	581 }
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	582 else
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	583 {
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	584 g_mx = mouseX;
5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	585 g_my = mouseY;
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	586 }
11 c1667eb54808 Cosmetics and indentation. Matti Hamalainen <ccr@tnsp.org> parents: 9 diff changeset	587
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	588 g_msx = mouseX;
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	589 g_msy = mouseY;
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	590
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	591 // Actual tool drawing
145 5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	592 if (g_tooltrigger == 1 &&
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	593 g_mx <= width - g_hedge &&
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	594 g_my <= height - g_vedge)
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	595 do_tool(g_mx, g_my, g_button);
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	596
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	597 switcher(0);
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	598
142 1ec3488bfd1e Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 136 diff changeset	599 for (int i = 0; i < 1024; i++)
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	600 g_remdo[i] = 0;
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	601
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	602 // Tool drawing for shows
135 72ae62f2036b Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 133 diff changeset	603 int savebut = g_button;
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	604 if (tool() != 5)
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	605 {
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	606 if (g_phase == 0)
8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	607 g_button = LEFT;
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	608 do_tool(g_mx, g_my, LEFT);
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	609 }
148 d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	610 else
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	611 storecoords(g_mx, g_my);
d80871032cdd More change integration. Matti Hamalainen <ccr@tnsp.org> parents: 145 diff changeset	612
150 d7c13f427178 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 148 diff changeset	613 if (tool() == 6) do_line(g_rx, g_ry, g_rx2, g_ry2, 0);
d7c13f427178 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 148 diff changeset	614 if (tool() == 7) do_circle(g_rx, g_ry, g_rx2, g_ry2);
d7c13f427178 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 148 diff changeset	615 if (tool() == 8) do_rectangle(g_rx, g_ry, g_rx2, g_ry2);
135 72ae62f2036b Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 133 diff changeset	616 g_button = savebut;
39 5e0306ac3575 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 36 diff changeset	617
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	618 // Screen update stuff
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	619 loadPixels();
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	620 viewport();
5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	621 switcher(1);
145 5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	622
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	623 if (g_pgrab)
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	624 preview_box_drag();
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	625
5af8b5ddf349 Merge and clean up changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 143 diff changeset	626 preview_window();
136 12cf30907f26 More work on integrating changes from v1.8.2018 Matti Hamalainen <ccr@tnsp.org> parents: 135 diff changeset	627 update_ui(false);
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	628 updatePixels();
11 c1667eb54808 Cosmetics and indentation. Matti Hamalainen <ccr@tnsp.org> parents: 9 diff changeset	629
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	630 // Message control
40 8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	631 if (g_msgctr > 0)
8d2362b6ac12 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 39 diff changeset	632 g_msgctr--;
2 5eb3559e1778 Run everything through JS-beautifier and remove trailing whitespace. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	633
113 f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	634 // Macro handling
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	635 if (g_keymacro.length() > g_keymacpos)
f87c6577e696 Cleanups and few comments added. Matti Hamalainen <ccr@tnsp.org> parents: 112 diff changeset	636 {
0 ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	637 macro_command(g_keymacro.charAt(g_keymacpos));
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	638 g_keymacpos++;
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	639 }
ebd5689e2985 Initial import of Multipaint sketch version 22.5.2017. Tero Heikkinen parents: diff changeset	640 }

Mercurial > hg > forks > multipaint-js

annotate multipaint.pde @ 176:0940d991d3b0