pourquoi faire simple... - Page 1

.. quand on peu faire compliqué ?

je vous propose de poster ici des bouts de code qui font des actions assez simple, mais par les moyens les plus détournés possibles

je commence :
vertel("var_make",digits+4,"zero","/","var_bset","zero",digits+2,digits,"/","var_bset","zero",digits,31):nb+zero->nb

mais qu'est ce que ca fait ?
et bien comme vous l'aurez sans doute deviné, ca formate le nombre nb pour qu'il s'affiche toujours avec au moins digits chiffre (remplacé par des zeros si il n'est pas assz grand)

par exemple, pour nb=15 et digits=3 ca va donner 015

vala ,
a vous de faire pire !

J'ai pas grand chose sous la main... Je retrouve pas mes meilleurs monstres

augment(augment(left(#l_tmp,4),mid(#l_tmp,s_chx,1)),augment(mid(#l_tmp,5,s_chx-5),mid(#l_tmp,s_chx+1)))»#l_tmp

expr("ixm_"&left(l_tmp,4)&"(l_pth[dim(l_pth)],#(l_pth[dim(l_pth)])[2],l_usr,x_xtern1)")

augment(augment(left(#s_var,l_dim+3),{(y_users[1])[s_usr]}),augment(right(#s_var,l_dim),{l_5}))»#s_var

#b&",0x"&mid(string(expr("0b"&string(polyEval(matÐlist(m[c]),10))&"Ðhex")),3)»#b

listÐmat(seq(expr(mid(left("00000000000000000000000000000000",z-dim(mid(string(expr("polyEval(k,256)Ðbin")),3)))&mid(string(expr("polyEval(k,256)Ðbin")),3),k,1)),k,1,z))»m[c+1]

heu, explique un peu ce que c'est pasque...

when(dim(right(time,dim(time)-instring(time,".")))<=1,when(instring(time,".")=dim(time),time&"00",time"0"),time)->time

J'en sais rien moi
C'est vieux tout ça...

à priori c'est :

- Un truc pour déplacer un élement dans une liste
- Un truc pour lancer un fichier
- Un truc pour... modifier un data ?
- Une convertion de liste {1,0,1,0...} en un nombre hexa
- L'inverse (convertion d'hexa en liste de 0 et de 1)

rah, zavez pas bien compris le but du topic
c'ets pas des lignes de porc (les votres sont de tre belels lignes de porc, bravo ) que je vous demande de poster mais de slignes qui font une action en utilisant une methode completement détourné
et expliquesz un peut vos ligne aussi, pliz

bah la mienne récupère un nbr à virgule en base 10 sous forme de chaine, que je change en base 60 (enfin, je crois)

ouais, c bien illisible
(mais bob, ta 1ere ligne est tot ce qu'il y a de normal)

ah... pourtant je vois pas ce qu'elle a de différent des autres

(tes autres, j'ai pas tout reussi a comprendre )
mais la 1ere contien de saugment, des mid, cad tout ce qu'il faut pout manipuler les liste et deplacer un elt..
(alors que dans mon code,tu vois des fonctions de manipulation de nb ou de string ? )

shift([4][1,1],-1)+expr({"4","3","2","1"}[#abc[7]])|abc="list" and list={9,8,7,6,5,4,3,2,1,}

Je tape cette formule à chaque fois que j'ai oublié combien font 2+2

pas mal !!

Elle est belle, celle-là, Link

ba regarde les sources de mes prog., t'en vera des beau

tes progs, on pouurrait tailler les if... then au couteau!

loooooooooooooooooool