Hola buenas, pues porque no existe esa opción? Así se evitarían baneos o advertencias innecesarias por revivir...
Un saludo.
Un saludo.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menúusing UnityEngine;
using System.Collections;
//ItemDataBase
public class ItemScript : MonoBehaviour {
private GameObject LoadItemPrefab(string name) {
return (GameObject)Resources.Load ("prefabs/Items/"+name);
}
private Texture LoadItemTex(string name) {
return (Texture)Resources.Load ("textures/Items/"+name);
}
void Start() {
Inventory inv = new Inventory();
InventoryItem preset;
preset = new InventoryItem();
preset.id = 1;
preset.itemname = "Ring2";
preset.DisplayName = "Ring of Gods";
preset.itemtex = LoadItemTex (preset.itemname);
preset.worldObject = LoadItemPrefab (preset.itemname);
inv.AddNewItem(preset, preset.itemname); //Aquí se supone que es donde se crea el Item, esto es llamado antes que la clase GameGUI para que el se inserten los Items en el Diccionario....
}
}
//Item Class
public class InventoryItem
{
public GameObject worldObject;
public int id;
public string itemname;
public string DisplayName;
public Texture itemtex;
public string itemtype;
public string equipmenttype;
public string usable;
public float itemweight;
public bool droppable;
public Transform itemmodel;
public int itemstacksize;
public int itemstacklimit;
public bool showStack;
public int bagsize;
public bool showBag;
public InventoryItem[] BagItem;
}
public class Inventory {
private Dictionary<string, InventoryItem> itemsBase = new Dictionary<string, InventoryItem>();
public void AddNewItem(InventoryItem item, string name) {
itemsBase.Add (name, item);
}
public InventoryItem FindItem(string name) {
return itemsBase[name];
}
}
public class GameGUI : MonoBehaviour {
public void Start() {
InventoryItem[] InventorySlots = new InventoryItem[5]; //Se crea un inventario con 5 slots
//Y en el slots 3 se añade el Item Ring2...
InventorySlots[3] = FindItem("Ring2"); //Aquí es donde salta la excepción de que no se encontró la Key en el Diccionario.
}
}
::cloc-1.60.exe "C:\Users\Alvaro\Documents\Dropbox2\Dropbox\Game Unity3D\Assets\resources\src\CoherentNoise"
@echo off
::set carpeta="C:\Users\Alvaro\Documents\Dropbox2\Dropbox\Game Unity3D\Assets\resources\src"
set archivo=mi_juego.log
For /F "Tokens=*" %%a in ('dir /B /S /A:D "C:\Users\Alvaro\Documents\Dropbox2\Dropbox\Game Unity3D\Assets\resources\src"') do (
::echo Explorando carpeta "%%a"
echo Carpeta: "%%a" >> "%archivo%"
echo. >> "%archivo%"
cloc-1.60.exe "%%a" >> "%archivo%"
echo. >> "%archivo%"
For /F "Tokens=*" %%b in ('dir /B /S /A:D "%%a"') do (
::echo Explorando carpeta "%%b"
echo Carpeta: "%%b" >> "%archivo%"
echo. >> "%archivo%"
cloc-1.60.exe "%%b" >> "%archivo%"
echo. >> "%archivo%"
For /F "Tokens=*" %%c in ('dir /B /S /A:D "%%b"') do (
::echo Explorando carpeta "%%c"
echo Carpeta: "%%c" >> "%archivo%"
echo. >> "%archivo%"
cloc-1.60.exe "%%c" >> "%archivo%"
echo. >> "%archivo%"
)
)
)
cls
echo Proceso terminado, gracias por usar CLOC.
pause
public override float GetValue(float x, float y, float z)
{
float value = 0;
float signal = 0;
x *= Frequency;
y *= Frequency;
z *= Frequency;
for (int curOctave = 0; curOctave < OctaveCount; curOctave++)
{
// Get the coherent-noise value from the input value and add it to the
// final result.
signal = m_Noise.GetValue(x, y, z);
// äåôîëòíûé ïåðëèí - ñêëàäûâàåò âñå çíà÷åíèÿ ñ óìåíüøàþùèìñÿ âåñîì
value = CombineOctave(curOctave, signal, value);
// Prepare the next octave.
// scale coords to increase frequency, then rotate to break up lattice pattern
var rotated = s_Rotation*(new Vector3(x, y, z) * Lacunarity);
x = rotated.x;
y = rotated.y;
z = rotated.z;
}
return value;
}
static void GenerateHeights(Terrain terrain, int last)
{
var Pink = seed;
var n = new CoherentNoise.Generation.Fractal.PinkNoise(Pink) ; //213321
float[,] heights = new float[terrain.terrainData.heightmapWidth, terrain.terrainData.heightmapHeight];
for (int i = 0; i < terrain.terrainData.heightmapWidth; i++) //terrain.terrainData.heightmapWidth * lastChunkCharged
{
for (int k = 0; k < terrain.terrainData.heightmapHeight; k++) //terrain.terrainData.heightmapHeight * lastChunkCharged
{
var x = n.GetValue((((float)i + terrain.terrainData.heightmapWidth * last) / ((float)terrain.terrainData.heightmapWidth * last)) * tileSize, (((float)k + terrain.terrainData.heightmapHeight * last) / ((float)terrain.terrainData.heightmapHeight * last)) * tileSize, 0);
heights[i, k] = x / 5 + baseLine;
}
}
terrain.terrainData.SetHeights(0,0, heights);
}
float[,] heights = new float[terrain.terrainData.heightmapWidth, terrain.terrainData.heightmapHeight];
$int = 0;
/*// Catbg header
echo '<div class="cat_bar">
<h3 class="catbg">', $context['youraction_Head'], '</h3>
</div>';
// Windowbg2 Content
echo '<div class="windowbg2">
<span class="topslice"><span></span></span>
<div class="content">
</div>
<span class="botslice"><span></span></span>
</div><br />';*/
// Catbg header
echo '<div class="cat_bar">
<h3 class="catbg">Resultados de la búsqueda:</h3>
</div>';
// Windowbg2 Content
echo '<div class="windowbg2">
<span class="topslice"><span></span></span>
<div class="content">';
echo '<table>'; //Se inicia la tabla
$FullString = $_POST['busqueda']; //Se pone una string general
if(strpos($FullString,' ') !== false) { //Y si tiene espacios (lo que quiere decir varias palabras)
$Array = explode(' ', $_POST['busqueda']); //Pues se hace un array con esta
foreach ($Array AS $Values) { //Y por cada valor se hace una busqueda en MySQL
$result = mysql_query("SELECT DISTINCT * FROM juegos WHERE nombre LIKE '%$Values%' OR descripcion LIKE '%$Values%'");
$total = mysql_num_rows($result); //Esto se cuenta para hacer de una forma chapucera las separaciones de los elementos por <hr>'s
while($rs2 = mysql_fetch_array($result)) { //Y aqui se muestran los resultados
$int++; //Por cada while se suma uno a int
echo '<tr><td class="txt_desc" bgcolor="#FFFFFF"><img src="'.$rs2['miniatura'].'" width="104" height="70" align="left"><span style="position:relative;left:10px;"><span class="titulos"><a href="http://'.$_SERVER['SERVER_NAME'].'/game.php?id='.$rs2['id'].'">'.$rs2['nombre'].'</a></span><br>'.$rs2['descripcion'].'</span></td></tr>'; //Se hace un echo a toda la query para mostrarla
if($int<$total){echo '<tr><td><hr width="98%" color="#000000" size="2"></td></tr>';}else{echo '</table><br>';} //Y si int es mayor al total de numeros de tablas en la query, pues se cierra la tabla y san sacabo...
}
}
} else { //Y esto lo mismo, pero en caso de que fuese una palabra individual
$result = mysql_query("SELECT DISTINCT * FROM juegos WHERE nombre LIKE '%$FullString%' OR descripcion LIKE '%$FullScreen%'");
$total = mysql_num_rows($result);
while($rs2 = mysql_fetch_array($result)) {
$int++;
echo '<tr><td class="txt_desc" bgcolor="#FFFFFF"><img src="'.$rs2['miniatura'].'" width="104" height="70" align="left"><span style="position:relative;left:10px;"><span class="titulos"><a href="http://'.$_SERVER['SERVER_NAME'].'/game.php?id='.$rs2['id'].'">'.$rs2['nombre'].'</a></span><br>'.$rs2['descripcion'].'</span></td></tr>';
if($int<$total){echo '<tr><td><hr width="98%" color="#000000" size="2"></td></tr>';}else{echo '</table><br>';}
}
}
echo '</div>
<span class="botslice"><span></span></span>
</div><br />';
SELECT DISTINCT * FROM juegos WHERE nombre LIKE '%$Values%' OR descripcion LIKE '%$Values%'
$Id = preg_match($_POST['del_link'], "/\d+(?=[_])$/");
$Fecha = preg_match($_POST['del_link'], "/\d+$/");
ReadOnly motor As String = "http://mrtzcmp3.net/"
Dim sourceString As String
Dim matches As MatchCollection
ReadOnly regexSearch As String = "D\?.+? _"
Dim firstMatch As String
Private Sub Buscar()
sourceString = New System.Net.WebClient().DownloadString(motor & TextBox1.Text & "_1s.html")
matches = Regex.Matches(sourceString, regexSearch)
firstMatch = matches.Item(0).Value
firstMatch = Regex.Replace(firstMatch, "._$", "")
TextBox1.Text = motor & firstMatch
'sourceString = New System.Net.WebClient().DownloadString(motor & firstMatch)
'File.AppendAllText(".\prueba.txt", sourceString)
End Sub
sourceString = New System.Net.WebClient().DownloadString(motor & TextBox1.Text & "_1s.html")
<a rel="nofollow" href="D?QAk1Bl0_Pitbull_Prueba _WRFDqkYz" target="_blank"><img alt="Download" title="Download" border="0" width="18" height="18" src="images/Download.png"></a>
#include <iostream>
#include <string>
int main()
{
std::string s = "0,0,0,1,1,1,0,0,1";
std::string delimiter = ",";
int x = 0;
std::string mapa[9];
size_t pos = 0;
std::string token;
while ((pos = s.find(delimiter)) != std::string::npos) {
token = s.substr(0, pos);
std::cout << token << std::endl;
s.erase(0, pos + delimiter.length());
mapa[x] = token;
x++;
}
std::cout << s << std::endl;
cin.get();
}
std::cout << s << std::endl;
Citar"0,0,0,1,1,1,0,0,1"
Citar0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
Dim Line As String = File.ReadAllText(PathArchivo)
For Each Result As String In Line.Split(", ")
If Not Regex.IsMatch(Result, "^'|'$") Then
MsgBox("Error", MsgBoxStyle.Critical, "Error")
else
msgbox(result)
End If
Next
CitarINSERT INTO Videos VALUES(13455,1,9,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,''dfdfdfd',NULL,NULL,429060,NULL);
INSERT INTO Videos VALUES(13456,1,9,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,429060,NULL);
INSERT INTO Videos VALUES(13457,1,9,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,429060,NULL);
INSERT INTO Videos VALUES(13455,1,9,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,429060,NULL);
Dim WithEvents Timer1 As New Timer With {.Interval = 1}
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
ProgressBar1.Value += 1
End Sub
Function SendEmail(ByVal Recipients As List(Of String), _
ByVal FromAddress As String, _
ByVal Subject As String, _
ByVal Body As String, _
ByVal UserName As String, _
ByVal Password As String, _
Optional ByVal Server As String = "smtp.gmail.com", _
Optional ByVal Port As Integer = 587, _
Optional ByVal Attachments As List(Of String) = Nothing) As String
Dim Email As New MailMessage()
Try
Dim SMTPServer As New SmtpClient
For Each Attachment As String In Attachments
Email.Attachments.Add(New Attachment(Attachment))
Next
Email.From = New MailAddress(FromAddress)
For Each Recipient As String In Recipients
Email.To.Add(Recipient)
Next
Email.Subject = Subject
Email.Body = Body
SMTPServer.Host = Server
SMTPServer.Port = Port
SMTPServer.Credentials = New System.Net.NetworkCredential(UserName, Password)
SMTPServer.EnableSsl = True
SMTPServer.Send(Email)
Email.Dispose()
Return "Email to " & Recipients(0) & " from " & FromAddress & " was sent."
Catch ex As SmtpException
Email.Dispose()
Return "Sending Email Failed. Smtp Error."
Catch ex As ArgumentOutOfRangeException
Email.Dispose()
Return "Sending Email Failed. Check Port Number."
Catch Ex As InvalidOperationException
Email.Dispose()
Return "Sending Email Failed. Check Port Number."
End Try
End Function
Private Function GenerateHash(ByVal SourceText As String) As String
'Create an encoding object to ensure the encoding standard for the source text
Dim Ue As New UnicodeEncoding()
'Retrieve a byte array based on the source text
Dim ByteSourceText() As Byte = Ue.GetBytes(SourceText)
'Instantiate an MD5 Provider object
Dim Md5 As New MD5CryptoServiceProvider()
'Compute the hash value from the source
Dim ByteHash() As Byte = Md5.ComputeHash(ByteSourceText)
'And convert it to String format for return
Return Convert.ToBase64String(ByteHash)
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Recipients As New List(Of String)
Recipients.Add("Email a enviar, es decir, el mío")
Dim FromEmailAddress As String = Recipients(0)
Dim Subject As String = "Test From VB."
Dim Body As String = "email body text, if you are reading this from your gmail account, the program worked."
Dim UserName As String = "Email sin el @gmail.com"
Dim Password As String = GenerateHash("Contraseña que se saque de un TXT cifrada en Base64") 'Aquí debería estar la magia del ChMod... Me gustaría saber como resaltar una línea de code... :-\
Dim Port As Integer = 587
Dim Server As String = "smtp.gmail.com"
Dim Attachments As New List(Of String)
SendEmail(Recipients, FromEmailAddress, Subject, Body, UserName, Password, Server, Port, Attachments)
End Sub
Citar
Ejecución Ejecutar el archivo. Recorrer su árbol para acceder archivos y subdirectorios, pero no ver los archivos dentro del directorio (excepto que se le de el permiso de lectura)