Messages récents

11

TEA 4 Tous / Re : Synopsys: Usage des bases for Miniville

« Dernier message par Arenas le avril 19, 2023, 23:27:33 pm »

J'ai modifier le txt.

J'ai ajouter de la couleur
et les paramètre "if/else"

J'ai verras bien .....

Version ter
@

----------------------

cls

########################
#
# Synopsys:
#
# Creat
# 2023-02-10 00:33:07Z
# Modif
# 2023-02-25 10:25:47Z (last, ter)
#
# Copyright @renas alias (athome)
# France
#
# File Name :
# DownloadString-from-Mv-bases.ps1
#
# Us any Powershell version
# All Info are cumule
# Non restriction
#
# The convention is:
# 1 klick env for 2 pop
# 1 klick ind or *com for 3 pop
# 1 klick sec for 4 pop
# 1 klick tra for 5 pop
#
# * "com" is obsolete "Yстаревший, nicht verwenden, not tu use!
#
# Bases: pop/- us [math]::round(bases 1..4) = somme
#
# That's all to do. Great to hear from you.
#
########################

$Xt = [string] "#text"

# your Miniville city name

$Xminiville = "mv0" # also or: aldana-test, mv0, xenia, burschi, st-innsbruck, bangor, sandefri

$Xa = (Get-Host).UI.RawUI
$Xa.WindowTitle = "Sync Bases for $Xminiville"

$XmlUrl = "http://$Xminiville.miniville.fr/xml"
[xml]$Xml = (new-object System.Net.WebClient).DownloadString($XmlUrl)

$Xpop = $Xml.selectSingleNode('city/population').$Xt # $Xt = format txt
$Xcom = $Xml.selectSingleNode('city/bases/@com').$Xt
$Xenv = $Xml.selectSingleNode('city/bases/@env').$Xt
$Xind = $Xml.selectSingleNode('city/bases/@ind').$Xt
$Xsec = $Xml.selectSingleNode('city/bases/@sec').$Xt
$Xtra = $Xml.selectSingleNode('city/bases/@tra').$Xt
""
""" Last update Date/Time (yyyy-mm-dd hh:mm:ssz) """ # The Time is zulu
Get-Date -Format (Get-culture).DateTimeFormat.UniversalSortableDateTimePattern
""
"Bases: pop/- us [math]::round(bases 1..4) = somme"

""
# name f the City
Write-host "Ideal: 52 % for Pop and 48 % for Bases"
Write-host "The ' " -nonewline;
Write-host $Xminiville -ForegroundColor green -nonewline;
Write-host " ' MiniVille have :";
""
# the best is 52 %
$Xtot = [int]$Xpop
Write-host "Pop's <> 50 % = " -nonewline;
Write-host ("{0:## ### ###}" -f $Xtot) -ForegroundColor green;

$Xtot = [int]$Xenv + [int]$Xind + [int]$Xcom + [int]$Xsec + [int]$Xtra
$Xplus_minus =  [int]$Xtot - [int]$Xpop

if ($Xplus_minus -lt -0){
    Write-host "Somme bases <> 50 % = "" env,ind,com,sec,tra = +/- "" " -nonewline;
    Write-host ("{0:## ### ###}" -f $Xtot) -ForegroundColor red -nonewline;
    Write-host " [ klick: " -nonewline; $Xplus_minus_2 = "{0:## ### ###}" -f ($Xplus_minus)
    Write-host $Xplus_minus_2 -ForegroundColor green -nonewline;
    Write-host " ]""";
    }
else {
    Write-host "Somme bases <> 50 % = "" env,ind,com,sec,tra = +/- "" " -nonewline;
    Write-host  (" {0:## ### ###}" -f $Xtot) -ForegroundColor green -nonewline;
    Write-host " ""[ klick: missing pop! " -nonewline; $Xplus_minus_2 = "{0:## ### ###}" -f ($Xplus_minus)
    Write-host $Xplus_minus_2 -ForegroundColor red -nonewline;
    Write-host " ]""";
}


""
""
# If 500 pop, env is on
# 1 env
if ($Xenv -lt 0){Write-host """ Env is off """ -ForegroundColor yellow}
    else {Write-Host """ " -nonewline; Write-Host Env is on -ForegroundColor yellow -nonewline; " """}

if ($Xenv -gt 0){
    $Xround_env = [math]::round($Xenv - ($Xpop/2))
    if($Xround_env -gt 0){`
        Write-Host " [ 1 ($Xenv - ($Xpop/2)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_env) -ForegroundColor green -nonewline;
        Write-Host " [Env]";
    }
    else {
        Write-Host " [ 1 ($Xenv - ($Xpop/2)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f  $Xround_env) -ForegroundColor Red
    }
}
# Si 50 pop, ind is off
# 2a ind
if ($Xind -lt 1){Write-host """ Ind is off """ -ForegroundColor yellow}
    else{Write-Host """ " -nonewline;
        Write-Host Ind is on -ForegroundColor yellow -nonewline; " """
    }

if ($Xind -gt 1){
    $Xround_ind = [math]::round($Xind - ($Xpop/3))
    if ($Xround_ind -gt 1){
        Write-Host " [ 2a ($Xind - ($Xpop/3)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_ind) -ForegroundColor Green
    }
    else{
        Write-Host " [ 2a ($Xind - ($Xpop/3)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_ind) -ForegroundColor Red
    }
}
# us switsh (if/else/elseif)
# Si -1 000 pop, com is off
# 2b com is obsolete, Yстаревший, nicht verwenden, not tu use!
if ($Xcom -lt 1000){Write-host """ Com is off """ -ForegroundColor yellow}
    else{Write-Host """ " -nonewline;
        Write-Host Com is on -ForegroundColor yellow -nonewline; " """
    }
if ($Xcom -gt 0){
    $Xround_com = [math]::round($Xcom/3)
    if ($Xround_com -gt 0){
        Write-Host " [ 2b ($Xcom/3) ] = " -nonewline;
        if ($Xround_com -eq 0){$Xround_com = "0"
            Write-Host ("{0:## ### ###}" -f $Xround_com) -ForegroundColor Green}
        else{Write-Host ("{0:## ### ###}" -f $Xcom) -ForegroundColor Green}
    }
    else{
        Write-Host " [ 2b ($Xcom/3) ] = " -nonewline;
        if ($Xround_com -eq 0){$Xround_com = "0"
            Write-Host ("{0:## ### ###}" -f $Xround_com) -ForegroundColor Red}
        else{Write-Host ("{0:## ### ###}" -f $Xcom) -ForegroundColor Red}
    }
}
# Si 300 pop, sec is off
# 3 sec
if ($Xsec -lt 0){Write-host """ Sec is off """ -ForegroundColor yellow}
    else{Write-Host """ " -nonewline;
        Write-Host Sec is on -ForegroundColor yellow -nonewline; " """
    }

if ($Xsec -gt 0){
    $Xround_sec = [math]::round($Xsec - ($Xpop/4))
    if($Xround_sec -gt 0){
        Write-Host " [ 3 ($Xsec - ($Xpop/4)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_sec) -ForegroundColor Green
    }
    else{
        Write-Host " [ 3 ($Xsec - ($Xpop/4)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_sec) -ForegroundColor Red
    }
}
# Si 100 pop, tra is off
# 4 tra
if ($Xpop -lt 100){Write-host """ Tra is off """ -ForegroundColor yellow}
    else{Write-Host """ " -nonewline;
    Write-Host Tra is on -ForegroundColor yellow -nonewline; " """
    }

if ($Xpop -gt 100){
    $Xround_tra = [math]::round($Xtra - ($Xpop/5))
    if($Xround_tra -gt 100){
        Write-Host " [ 4 ($Xtra - ($Xpop/5)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_tra) -ForegroundColor Green
    }
    else{
        Write-Host " [ 4 ($Xtra - ($Xpop/5)) ] = " -nonewline;
        Write-Host ("{0:## ### ###}" -f $Xround_tra) -ForegroundColor Red
    }
}

""
$Xobs = "I hope this helps your situation. If not, I'd be happy to revisite`n"
$Xobs += "------------------------------------------------------------------`n"
$Xobs
""
clear-variable X* -scope global -F
-------------------------------------

30 avril 2023 - 00:44:08z évolutive

12

TEA 4 Tous / Synopsys: Usage des bases for Miniville

« Dernier message par Arenas le avril 05, 2023, 20:54:33 pm »

# The stuff



cls

########################
#
# Synopsys:
#
# Creat
# 2023-02-10 00:33:07Z
# Modif
# 2023-02-25 10:25:47Z (last, ter)
#
# Copyright @renas alias (athome)
# France
#
# File Name :
# DownloadString-from-Mv-bases.ps1
#
# Us any Powershell version
# All Info are cumule
# Non restriction
#
# The convention is:
# 1 klick env for 2 pop
# 1 klick ind or *com for 3 pop
# 1 klick sec for 4 pop
# 1 klick tra for 5 pop
#
# * "com" is obsolete "Yстаревший, nicht verwenden, not tu use!
#
# Bases: pop/- us [math]::round(bases 1..4) = somme
#
# That's all to do. Great to hear from you.
#
########################

$Xt = [string] "#text"

# Type your Miniville city name

$Xminiville = "aldana" # aldana, mv0, xenia, burschi
$XmlUrl = "http://$Xminiville.miniville.fr/xml"
[xml]$Xml = (new-object System.Net.WebClient).DownloadString($XmlUrl)

$Xpop = $Xml.selectSingleNode('city/population').$Xt
$Xcom = $Xml.selectSingleNode('city/bases/@com').$Xt
$Xenv = $Xml.selectSingleNode('city/bases/@env').$Xt
$Xind = $Xml.selectSingleNode('city/bases/@ind').$Xt
$Xsec = $Xml.selectSingleNode('city/bases/@sec').$Xt
$Xtra = $Xml.selectSingleNode('city/bases/@tra').$Xt
""
""" Last update Date/Time (yyyy-mm-dd hh:mm:ss) """
Get-Date -Format (Get-culture).DateTimeFormat.UniversalSortableDateTimePattern
""
"Bases: pop/- us [math]::round(bases 1..4) = somme"
""
"[1 (($Xpop/2) - $Xenv) ] = " + [math]::round(($Xpop/2) - $Xenv)+" [klick's: env]"
"[2 (($Xpop/3) - ($Xind + $Xcom)) ] = " + [math]::round(($Xpop/3) - ($Xind + $Xcom))+" [klick's: ind+com]"
"[3 (($Xpop/4) - $Xsec) ] = " + [math]::round(($Xpop/4) - $Xsec)+" [klick's: sec]"
"[4 (($Xpop/5) - $Xtra) ] = " + [math]::round(($Xpop/5) - $Xtra)+" [klick's: tra]"
""
""" The ' "+$Xminiville+" ' Miniville is not equal ! """
"Pop's 50 % = "+[int]$Xpop

$Xtot = [int]$Xenv + [int]$Xind + [int]$Xcom + [int]$Xsec + [int]$Xtra

$Xplus_minus = [int]$Xtot - [int]$Xpop
"Somme Bases <> 50 % = ""env,(ind+(com)),sec,tra"" = " + $Xtot + " ""[klick's: " + "{0:### ###}" -f ($Xplus_minus) + " ]"""

clear-variable X* -scope global -F

""
"I hope this helps your situation. If not, I'd be happy to revisit"
""

Visit the table !

13

TEA 4 Tous / My-Mini-city, Mini-Ville

« Dernier message par Arenas le avril 27, 2022, 22:44:36 pm »

Bonjours, Bonsoir

Pour utiliser ces deux ville, lise bien qui et dans la page web:
 https://arenas.pagesperso-orange.fr/Table-OneDrive/Table-OneDrive.html

@

14

TEA 4 Tous / Re : Pour Edge

« Dernier message par Arenas le avril 17, 2020, 16:57:20 pm »

Bonjour Monsieur,

[La voila]

https://arenas.pagesperso-orange.fr/image/tag.png

@r

15

TEA 4 Tous / Re : Pour Edge

« Dernier message par Klaatou le avril 17, 2020, 12:04:08 pm »

désolé j'avais pas vu ta question Arenas
la voila


https://i.snipboard.io/6VkElJ.jpg

16

TEA 4 Tous / Re : Pour Edge

« Dernier message par Arenas le mars 22, 2020, 15:42:32 pm »

Bonjour,

Je peut avoir une copy d'écran?

Merci

@r

17

TEA 4 Tous / Re : Pour Edge

« Dernier message par Klaatou le mars 22, 2020, 14:41:22 pm »

Merci Arenas mais pour moi ça n'ouvre qu'une page vide avec un trait horizontal vers le haut, ceci sur pc et mobile.

18

TEA 4 Tous / Pour Edge

« Dernier message par Arenas le mars 18, 2020, 21:26:26 pm »

Bonjour

Qui n'aime pas la musique sur son portable/Pc 24 h sur 24 h? Il y a 100 station radio en FM disponible
Le sys, fonction très bien. Mais cette scripte est fait pour "Edge" et les portable. Moi j'utilise iPhone.

Vous allez crée un raccourcie sur votre portable et le tours est jouer ….

 https://arenas.pagesperso-orange.fr/GradientExample/frameset-mediaplayer.html

@r

19

TEA 4 Tous / mIRC 7.55 fr

« Dernier message par Cks le mars 03, 2019, 22:45:00 pm »

mIRC 7.55 déjà cracké.
- mirc.exe du zip à copier dans le dossier de votre script (à renommer au besoin)
- Si ça ne fonctionne pas, copiez aussi le .reg dans le dossier du script et et lancez le.

20

Dials et essais / Re : Gilles est jaune!

« Dernier message par Cks le décembre 04, 2018, 13:46:53 pm »

Hier j'achète mon nouveau véhicule au garage. Flambant neuf, noir avec des sièges cuir, un volant multi fonctions et une roue de secours.
Le vendeur m'indique qu'elle est équipée d'un autoradio à commande vocale nouvelle génération et me fait une démonstration.
Choisissez un chanteur me demande-t-il
-"Hallyday" ! . L'autoradio me demande :
- "Johnny ou David ?" interloqué je répond : "Johnny." et l'autoradio diffuse une chanson de notre feu Jojo national "Allumez le feu".
Je demande au vendeur si je peux faire un nouveau test. Le vendeur :
- " OK, vous allez voir, la radio répond à tous les coups!"
Je lance :
- "Iglésias" L'autoradio demande : "Julio ou Enrique ?" J'en reste baba et dit : "Julio" et la radio passe "Non, je n'ai pas changé"
Enchanté, je prends la voiture, sort du garage et me fais couper la route par un abruti qui manque de m'accrocher.
Énervé je crie au chauffard :"Enculé, connard, abruti, trou du cul !!!" Et la radio me demande : " Emmanuel Macron , Édouard Philippe, Christophe castaner ?"
-"je me dis " Oh putain, il y a même la mise à jour en temps réel !" 😂😂😂