FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Planétarium virtuel.
par Pedro Alvarez Hier à 16:57

» Roues dentées
par jean_debord Hier à 10:40

» Attention arnaque !
par mindstorm Jeu 19 Juil 2018 - 19:18

» Qui fait quoi ?
par silverman Mer 18 Juil 2018 - 15:21

» ITEM_SELECT N,L pour synedit
par silverman Mer 18 Juil 2018 - 15:20

» Boussole
par jean_debord Mer 18 Juil 2018 - 11:06

» Roue à n faces
par Marc Dim 15 Juil 2018 - 22:16

» Exemple d'une nouvelle version d'un GRID
par Jean Claude Ven 13 Juil 2018 - 10:32

» Une simple question
par Oscaribout Sam 7 Juil 2018 - 23:20

» BUG sur l'objet TAB
par Jack Sam 7 Juil 2018 - 21:12

» Monopoly moderne
par jjn4 Sam 7 Juil 2018 - 15:06

» Récapitulatif ludothèque panoramic jjn4
par jjn4 Ven 6 Juil 2018 - 17:41

» Lignes ondulées
par JL35 Ven 6 Juil 2018 - 17:39

» bug off_activate 0 : sans d'effet
par silverman Ven 6 Juil 2018 - 13:02

» Position des objets d'un conteneur dans FBPano et Panoramic
par Navigateur Ven 6 Juil 2018 - 12:59

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juillet 2018
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
CalendrierCalendrier

Partagez | 
 

  Il faut bien rigoler un peu !

Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5980
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Il faut bien rigoler un peu !   Ven 20 Fév 2015 - 2:25

Je suis bien dans les créations les plus inutiles et les plus folles, des programmes amusants et qui ne servent à rien, créés avec PANORAMIC , n’est-ce-pas ?
Alors, N’EXECUTEZ PAS le code suivant AVANT d’avoir lu les lignes REM.

Code:
rem ============================================================================
rem                 Il faut bien rigoler un peu !
rem ============================================================================
' Quelqu'un m'a envoyé un message pour me prouver que je suis un c..
' Apparemment, il n'a pas totalement échoué puisque je me suis pris à son jeu!
' Je m'en suis inspiré pour vous faire profiter de cette blague.
' AVERTISSEMENT : Si vous exécutez ce code c'est à vos risques et périls !
' RASSUREZ-VOUS : Il n'y a rien de méchant, c'est juste pour rigoler !
' Peut-être une blague de mauvais goût, mais personnellement ça m'a arraché
' un sourire tout de même !
' Alors si ça vous tente, cliquez sur l'éclair rouge et... rigoler!
rem ============================================================================
dim secret$,message$,i
hide 0 : application_title " ***** ***** Il faut bien rigoler un peu ***** *****"
secret$ = "074101032115097105115032049049032116114117099115032115117114032118111117115"
secret$ = secret$ + "013013"
secret$ = secret$ + "049041032086111117115032234116101115032101110116114097105110032"
secret$ = secret$ + "100101032108105114101032109111110032116101120116101013050041032"
secret$ = secret$ + "086111117115032234116101115032117110032104117109097105110013051"
secret$ = secret$ + "041032086111117115032110101032112111117118101122032112097115032"
secret$ = secret$ + "100105114101032039080039032115097110115032113117101032118111115"
secret$ = secret$ + "032108232118114101115032115101032116111117099104101110116013052"
secret$ = secret$ + "041032086111117115032118101110101122032100039101115115097121101"
secret$ = secret$ + "114013054041032086111117115032118111117115032115101110116101122"
secret$ = secret$ + "032099046046046032040112097114100111110032033041013055041032086"
secret$ = secret$ + "111117115032099111110116105110117101114032098234116101109101110"
secret$ = secret$ + "116032224032108105114101032040114101032112097114100111110032033"
secret$ = secret$ + "041013056041032086111117115032110039097118101122032109234109101"
secret$ = secret$ + "032112097115032114101109097114113117233032113117101032118111117"
secret$ = secret$ + "115032097118101122032108111117112233032108097032053013057041032"
secret$ = secret$ + "086111117115032118101110101122032100101032118233114105102105101"
secret$ = secret$ + "114013049048041032086111117115032115111117114105101122032112097"
secret$ = secret$ + "114099101032099039101115116032100233098105108101013049049041032"
secret$ = secret$ + "086111117115032097108108101122032101110032102097105114101032112"
secret$ = secret$ + "114111102105116101114032116111117116032108101032109111110100101"
secret$ = secret$ + "032112111117114032108101032102097105114101032099104046046046105101114"

for i = 1 to len(secret$) step 3
    message$ = message$ + chr$(val(mid$(secret$,i,3)))
next i
message$ = message$ + chr$(13) + chr$(13) + " !!! TOUTES MES EXCUSES POUR LES AMES SENSIBLES !!!"
message message$
terminate
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jicehel

avatar

Nombre de messages : 5928
Age : 45
Localisation : 77500
Date d'inscription : 18/04/2011

MessageSujet: Re: Il faut bien rigoler un peu !   Ven 20 Fév 2015 - 7:26

Smile
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 5527
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: Il faut bien rigoler un peu !   Ven 20 Fév 2015 - 8:14

BOF
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Froggy One

avatar

Nombre de messages : 400
Date d'inscription : 06/01/2012

MessageSujet: Re   Ven 20 Fév 2015 - 18:27

Moi ça m'a fait rire... d'autant plus que je la connaissais !!!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://gaeldwest.wordpress.com
papydall

avatar

Nombre de messages : 5980
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Il faut bien rigoler un peu !   Ven 20 Fév 2015 - 23:35

Et de trois! Smile
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Contenu sponsorisé




MessageSujet: Re: Il faut bien rigoler un peu !   

Revenir en haut Aller en bas
 
Il faut bien rigoler un peu !
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» canton comment bien débuter pour un débutant
» Tout ce qu'il faut savoir pour bien se présenter.
» Ma configuration est tel bien ou nul
» (résolu) bonjour je suis bien embêter avec un cheval ou un virus
» Bien le bonjour à tous.

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Les inutilitaires-
Sauter vers: