Archives
Trending
Support
Login
clear text
XML
Django
JavaScript
MATLAB
C
C++
C#
Python
SQL
Shell
Bash
Markdown
YAML
JSON
HTML
CSS
PHP
Java
Ruby
Go
Rust
Swift
Kotlin
Arduino
TypeScript
Perl
Autohotkey
Lua
SQF
R
Scala
Haskell
Groovy
Dart
Clojure
VB.NET
Objective-C
PowerShell
Bash
CoffeeScript
Verilog
' Fonction ICR By Boussaid Mustafa ' APC SALI 2023 Function Zone89(cateegori As String) Dim point As Variant Dim saler As Variant point = 0.315 Select Case cateegori Case "01/1": saler = 1500 Case "01/2": saler = 1520 Case "01/3": saler = 1540 Case "02/1": saler = 1560 Case "02/2": saler = 1580 Case "02/3": saler = 1600 Case "03/1": saler = 1620 Case "03/2": saler = 1640 Case "03/3": saler = 1660 Case "04/1": saler = 1680 Case "04/2": saler = 1700 Case "04/3": saler = 1745 Case "05/1": saler = 1790 Case "05/2": saler = 1850 Case "05/3": saler = 1910 Case "06/1": saler = 1970 Case "06/2": saler = 2040 Case "06/3": saler = 2100 Case "07/1": saler = 2170 Case "07/2": saler = 2240 Case "07/3": saler = 2300 Case "08/1": saler = 2380 Case "08/2": saler = 2460 Case "08/3": saler = 2530 Case "09/1": saler = 2610 Case "09/2": saler = 2700 Case "09/3": saler = 2780 Case "10/1": saler = 2850 Case "10/2": saler = 2920 Case "10/3": saler = 2990 Case "10/4": saler = 3060 Case "11/1": saler = 3070 Case "11/2": saler = 3130 Case "11/3": saler = 3190 Case "11/4": saler = 3250 Case "12/1": saler = 3320 Case "12/2": saler = 3380 Case "12/3": saler = 3450 Case "12/4": saler = 3530 Case "13/1": saler = 3540 Case "13/2": saler = 3640 Case "13/3": saler = 3730 Case "13/4": saler = 3830 Case "14/1": saler = 3920 Case "14/2": saler = 4000 Case "14/3": saler = 4080 Case "14/4": saler = 4160 Case "14/5": saler = 4240 Case "15/1": saler = 4340 Case "15/2": saler = 4430 Case "15/3": saler = 4520 Case "15/4": saler = 4620 Case "15/5": saler = 4720 Case "16/1": saler = 4820 Case "16/2": saler = 4920 Case "16/3": saler = 5020 Case "16/4": saler = 5120 Case "16/5": saler = 5220 Case "17/1": saler = 5340 Case "17/2": saler = 5450 Case "17/3": saler = 5560 Case "17/4": saler = 5690 Case "17/5": saler = 5810 Case "18/1": saler = 5930 Case "18/2": saler = 6060 Case "18/3": saler = 6190 Case "18/4": saler = 6320 Case "18/5": saler = 6450 Case "19/1": saler = 6580 Case "19/2": saler = 6720 Case "19/3": saler = 6860 Case "19/4": saler = 7000 Case "19/5": saler = 7140 Case "20/1": saler = 7300 Case "20/2": saler = 7460 Case "20/3": saler = 7620 Case "20/4": saler = 7780 Case "20/5": saler = 7940 Case Else saler = 0 End Select Zone89 = saler * point End Function
Mark as private (unlisted)
for 30 minutes
for 6 hours
for 1 day
for 1 week
for 1 month
for 1 year
everlasting (like CCCP)
