Div GO : Div Games Online

Entorno de desarrollo de juegos online en HTML5

Haz clic para obtener el control del teclado

// Div GO: Games Online
// Php + Html5 + Canvas + Javascript
// by J. Manuel Habas

program ejemplo_escribir_texto;	
begin    
	set_mode(480, 300);
	screen_color(cc_silver);

set_fps(60, 0);

escribir();
	
	loop		
		if (key(_esc)) exit("Amaka Soft 2020", 1); end

frame;
	end
end

process escribir();
private
    txt		= "";
    tmp_txt = "";
    shift 	= 32;
    
begin
	text_size  = 50;
    text_color = cc_gray;
    write(0, 240, 130, 4, "Escribe un texto (max. 20 caracteres):");

text_size  = 70;
    text_color = cc_black;
    write_int(0, 150, 150, 3, offset txt);
    
	loop
    	txt = tmp_txt;
        if (key(_shift) or scan_caps_lock) shift = 0; else shift = 32; end
        if (key_in(_space) and strlen(txt) < 20) txt += " "; end
        if (key_in(_backspace) and strlen(txt) > 0) txt = strdel(txt, 0, 1); end
        
        //pinta cualquier tecla pulsada hasta un maximo de 20 caracteres
        if (scan_code > 47 and scan_code < 90)
        	if (key_in(scan_code) and strlen(txt) < 20)
            	if (scan_code > 64)
            		txt += char(scan_code + shift);
                else
                	txt += char(scan_code);
                end
            end
        end

tmp_txt = txt;
		if (timer < 30 and strlen(txt) < 20) 
        	txt = tmp_txt + "|";
        else
        	txt = tmp_txt + " ";
        end
        if (timer > 60) timer = 0; end

frame;
	end
end

Tamaño Código:

HTML5 Game engine

Entorno de desarrollo de juegos online en HTML5