Accueil > > > DES MILLIERS DE CARACTÈRES UNICODE POUR PC
DES MILLIERS DE CARACTÈRES UNICODE POUR PC
Information sur la source
Description
Ces quelques lignes en Basic permettent de générer la source d'une page HTML présentant des milliers caractères Unicode (exemple à http://louviou.net/JV/unicode.html)
Source
- 100 REM ----- TABLE.BAS par Jean Vichniacoff ---------------------------------------------
- 110 a% = 0: b% = 9999: b$ = STR$(b%): y% = LEN(b$) - 1: s$ = CHR$(47)
- 120 g$ = CHR$(34): e$ = CHR$(35): pv$ = CHR$(59)
- 130 OPEN "O", #1, "TABLE_BAS.HTM"
- 140 PRINT #1, "<html><body bgcolor="; g$; "#CCCCCC"; g$; ">"
- 142 PRINT #1, "<table bgcolor="; g$; "#FFFFFF"; g$; " style="; g$; "font-family: arial;font-size:24px"; g$; " align=center cellpadding=4 border=0>"
- 144 FOR t% = a% TO b% STEP 100
- 146 PRINT #1, "<tr bgcolor="; g$; "#EEDDCC"; g$; " align=center><td width=80></td>"
- 150 PRINT #1, "<td>0</td><td>1</td><td>2</td><td>3</td><td>4</td><td>5</td><td>6</td><td>7</td><td>8</td><td>9</td></tr>"
- 160 FOR L% = 0 TO 9
- 170 PRINT #1, "<tr bgcolor="; g$; "#EEEECC"; g$; " align=center><td bgcolor="; g$; "#EEDDCC"; g$; ">";
- 180 n% = INT(t% / 100) * 100 + (L% * 10): na% = n%: GOSUB 280: PRINT #1, m$; "</td>";
- 190 FOR c% = 0 TO 9
- 200 n% = na% + c%: GOSUB 280: PRINT #1, "<td>&#"; m$; pv$; "</td>";
- 210 IF c% = 4 THEN PRINT #1, ""
- 220 NEXT c%: PRINT #1, "</tr>"
- 230 NEXT L%: NEXT t%
- 240 PRINT #1, "</table></body></html>"
- 250 CLOSE #1: CLS : FILES "*.HTM": PRINT "la page se nomme PAGE_BAS.HTM ... renommez-la unicode.html"
- 260 END
- 270 REM ----- routine -----------------------------------------------------------------------------------
- 280 n$ = STR$(n%): k% = LEN(n$): m$ = RIGHT$(n$, k% - 1): d% = LEN(m$): m$ = STRING$(y% - d%, "0") + m$: RETURN
100 REM ----- TABLE.BAS par Jean Vichniacoff ---------------------------------------------
110 a% = 0: b% = 9999: b$ = STR$(b%): y% = LEN(b$) - 1: s$ = CHR$(47)
120 g$ = CHR$(34): e$ = CHR$(35): pv$ = CHR$(59)
130 OPEN "O", #1, "TABLE_BAS.HTM"
140 PRINT #1, "<html><body bgcolor="; g$; "#CCCCCC"; g$; ">"
142 PRINT #1, "<table bgcolor="; g$; "#FFFFFF"; g$; " style="; g$; "font-family: arial;font-size:24px"; g$; " align=center cellpadding=4 border=0>"
144 FOR t% = a% TO b% STEP 100
146 PRINT #1, "<tr bgcolor="; g$; "#EEDDCC"; g$; " align=center><td width=80></td>"
150 PRINT #1, "<td>0</td><td>1</td><td>2</td><td>3</td><td>4</td><td>5</td><td>6</td><td>7</td><td>8</td><td>9</td></tr>"
160 FOR L% = 0 TO 9
170 PRINT #1, "<tr bgcolor="; g$; "#EEEECC"; g$; " align=center><td bgcolor="; g$; "#EEDDCC"; g$; ">";
180 n% = INT(t% / 100) * 100 + (L% * 10): na% = n%: GOSUB 280: PRINT #1, m$; "</td>";
190 FOR c% = 0 TO 9
200 n% = na% + c%: GOSUB 280: PRINT #1, "<td>&#"; m$; pv$; "</td>";
210 IF c% = 4 THEN PRINT #1, ""
220 NEXT c%: PRINT #1, "</tr>"
230 NEXT L%: NEXT t%
240 PRINT #1, "</table></body></html>"
250 CLOSE #1: CLS : FILES "*.HTM": PRINT "la page se nomme PAGE_BAS.HTM ... renommez-la unicode.html"
260 END
270 REM ----- routine -----------------------------------------------------------------------------------
280 n$ = STR$(n%): k% = LEN(n$): m$ = RIGHT$(n$, k% - 1): d% = LEN(m$): m$ = STRING$(y% - d%, "0") + m$: RETURN
Conclusion
ici une variante avec JavaScript à insérer dans le BODY d'une page HTML (exemple à http://louviou.net/JV/unicode2.html)
<SCRIPT LANGUAGE="JavaScript"> <!-- document.write ("<table bgcolor=#FFEECC style='font-family: arial;font-size: 36px;color: #000000' cellspacing=1 border=1 align=center>"); nombre=1; centaine=1; while (centaine<657) { document.write ("<tr style='font-size: 20px;color: #990000' align=center bgcolor=#EEDDCC>"); document.write ("<td bgcolor=#006666 width=80 align=right><font style='font-size: 36px;color: #FFFFFF'><b>☞</b><font style='font-size: 20px;color: #CCBB00'> +</font></font>"); chiffre=1; while (chiffre<11) { document.write ("<td width=60 align=center>"+chiffre+"</td>"); chiffre++; } docu ment.write ("</tr>"); ligne=1 while (ligne<11) { document.write ("<tr align=center height=60>"); repere=nombre-1; document.write ("<td bgcolor=#EEDDCC width=100 style='font-size: 20px;color: #990000'>"+repere+" "); colonne=1 while (colonne<11) { document.write ("<td>"); document.write("&#"+ nombre + ";"); document.write ("</td>"); nombre++; colonne++; } document.write ("</tr>"); ligne++; } centaine++; } document.write ("</table>"); //--> </SCRIPT>
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
browser window [ par ianus ]
bizarre !!je travaille sur dream 3 sous pc et lorsque je programme des browser window (fenetre flottante) cela fonctionne parfaitement en ligne avec u
donnée propre a un pc [ par psychodingue ]
Salut à tous,Voulà je voudrai savoir s'il été possible de récupérer une donnée propre à un pc, comme le nom de sa machine ou l'adresse mac de sa carte
lire video [ par mogmog ]
bonjour!Avec mon PC Win XP, je n'arrive pas a lire des videos en lien sur une page. Par exemple si je met une video sur une page de mon site kelle soi
connaitre la résolution d'un pc [ par Nargzul ]
voila bonjour,je sais que ca doit etre tout con, mais comment arrive-t-on à connaitre la résolution d'un pc???merci beaucoup
mettre su son sur une page web [ par les ray monds ]
J'ai lus toute les soluce concernant la maniere de mettre du son mais je n'entend le son que sur mon pc de la page web en question J'ai essayer avec u
javascript bdr [ par homer29 ]
bonjour,SVP quelqu' un pourrait-il m' indiquer comment ecrire dans la base de registre avec javascript en fonction du nom du pcun truc du genre: if h
contourner les programmes popup des pc clients [ par nicenails ]
certains programme popup des pc client stoppe la commande window.open, il considere la fenetre ouverte comme un popup. Comment eviter cela pour ouvrir
Passer des paramètres d'un PC récupérés en JS vers PHP ? [ par _ET_ ]
Bonjour,Voilà, mon pb est simple : pour le compte d'un MOD phpBB qui ajuste l'heure du forum sur celui du PC client, j'ai besoin récupérer ses paramèt
pc sous client serveur ou non comment le savoir [ par josswel ]
Salut à tous,je cherche depuis un certain temps 2 programmes en delphi particuliers ... Le 1er programme
Trouver un pc ds un reseau [ par overdoz69 ]
Voila je vous explique mon probleme, en fait je doit trouve dans un reseau local, sur kel port de kel switch est branché un pc connaisant juste s
|
Derniers Blogs
CSS CONTENT STATE SELECTORS (PERSONNAL DRAFT)CSS CONTENT STATE SELECTORS (PERSONNAL DRAFT) par FREMYCOMPANY
Bonjour à tous, Je viens de publier une proposition comprenant 5 pseudo-classes pour le CSS Working Group ayant trait à l'état de chargement d'un élément (ex: IMG,VIDEO,AUDIO,OBJECT pour l'HTML.). Si le c½ur vous en dit, vous pouvez retrouver cette p...
Cliquez pour lire la suite de l'article par FREMYCOMPANY MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ?MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ? par ROMELARD Fabrice
Formation initiale Durant la formation, le découpage classique est le suivant (je donnerai les équivalences Suisse lorsque je les connaîtrais) : Ecole primaire jusqu'au Collège : Formation générale permettant d'obtenir les méthodes...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice Y'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENTY'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENT par Aleks
Quand on a ce genre d'erreur sans log :
Et bas on a juste envie de choper le gas de Microsoft qu'a développé ça et lui foutre des baffes de Coboye ! ...
Cliquez pour lire la suite de l'article par Aleks [HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL[HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL par Pierrick CATRO-BROUILLET
Avec la sortie prochaine de la Beta Consumer Preview de Windows 8, j'avais envie de revenir sur une des fonctionnalités que j'attends le plus et que, en bon geek que je suis, j'utilise déjà : Hyper-V 3 ainsi son module PowerShell.
Il y a déjà pléthor...
Cliquez pour lire la suite de l'article par Pierrick CATRO-BROUILLET IIS7 - COMPRESSION GZIPIIS7 - COMPRESSION GZIP par cyril
La compression GZIP permet d'améliorer les performances de navigation en compressant ce qu'envoie le serveur à un client. Pour comprendre comment cela fonctionne, regardons ce qu'il se passe au niveau HTTP lorsqu'un client tente d'accéder à une ress...
Cliquez pour lire la suite de l'article par cyril
Logiciels
Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning COLLECTOR PLUS (3.00B)COLLECTOR PLUS (3.00B)COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par :
- L... Cliquez pour télécharger COLLECTOR PLUS PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO LettresFaciles 2011 (8.0.0.1)LETTRESFACILES 2011 (8.0.0.1)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011
|